vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-05 23:22:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

added Reset() function to VT100 module.

Browse source
This commit is contained in:
Norayr Chilingarian 2022-05-26 01:29:02 +04:00
parent 590398b27e
commit 9e3995d0ee
1 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/runtime/VT100.Mod
View file

@ -168,8 +168,15 @@ CONST
END EscSeq2;
PROCEDURE Reset*;
VAR
cmd : ARRAY 6 OF CHAR;
BEGIN
COPY(Escape, cmd);
Strings.Append("c", cmd);
Out.String(cmd);
Out.Ln;
END Reset;
(* Cursor up
moves cursor n cells in the given direction. if the cursor is already at the edge of the screen, this has no effect *)