The TABS.I include file resides on the Kyan Pascal 2.x Utilities Disk 1.
- PROCEDURE Set_Tab;
- PROCEDURE Clear_Tab;
- PROCEDURE Tab;
Source Code
PROCEDURE Set_Tab;
BEGIN
WRITE(CHR(159));
END;(* set tab procedure *)
PROCEDURE Clear_Tab;
BEGIN
WRITE(CHR(158));
END;(* clear tab procedure *)
PROCEDURE Tab;
BEGIN
WRITE(CHR(127));
END;(* tab to next stop procedure *)
No comments:
Post a Comment