The INSERTS.I include file resides on the Kyan Pascal 2.x Utilities Disk 1.
- PROCEDURE Insert_Char;
- PROCEDURE Insert_Line;
Source Code
PROCEDURE Insert_Char;
BEGIN
WRITE(CHR(255));
END;(* insert character procedure *)
PROCEDURE Insert_Line;
BEGIN
WRITE(CHR(157));
END;(* insert line procedure *)
No comments:
Post a Comment