1INIT
2WANTSCREEN ac
3
4!Get
5RESET
6PUSH "ABC"
7  movecursor 0,3
8  ?screen_chars 0,0,1,3 = "ABC"
9  ?screen_chars 0,0,1,80 = "ABC"
10  ?screen_text 0,0,1,3 = 0x41,0x42,0x43
11  ?screen_text 0,0,1,80 = 0x41,0x42,0x43
12  ?screen_cell 0,0 = {0x41} width=1 attrs={} fg=rgb(240,240,240) bg=rgb(0,0,0)
13  ?screen_cell 0,1 = {0x42} width=1 attrs={} fg=rgb(240,240,240) bg=rgb(0,0,0)
14  ?screen_cell 0,2 = {0x43} width=1 attrs={} fg=rgb(240,240,240) bg=rgb(0,0,0)
15  ?screen_row 0 = "ABC"
16  ?screen_eol 0,0 = 0
17  ?screen_eol 0,2 = 0
18  ?screen_eol 0,3 = 1
19PUSH "\e[H"
20  movecursor 0,0
21  ?screen_chars 0,0,1,80 = "ABC"
22  ?screen_text 0,0,1,80 = 0x41,0x42,0x43
23PUSH "E"
24  movecursor 0,1
25  ?screen_chars 0,0,1,80 = "EBC"
26  ?screen_text 0,0,1,80 = 0x45,0x42,0x43
27
28WANTSCREEN -c
29
30!Erase
31RESET
32PUSH "ABCDE\e[H\e[K"
33  ?screen_chars 0,0,1,80 =
34  ?screen_text 0,0,1,80 =
35
36!Copycell
37RESET
38PUSH "ABC\e[H\e[@"
39PUSH "1"
40  ?screen_chars 0,0,1,80 = "1ABC"
41
42RESET
43PUSH "ABC\e[H\e[P"
44  ?screen_chars 0,0,1,1 = "B"
45  ?screen_chars 0,1,1,2 = "C"
46  ?screen_chars 0,0,1,80 = "BC"
47
48!Space padding
49RESET
50PUSH "Hello\e[CWorld"
51  ?screen_chars 0,0,1,80 = "Hello World"
52  ?screen_text 0,0,1,80 = 0x48,0x65,0x6c,0x6c,0x6f,0x20,0x57,0x6f,0x72,0x6c,0x64
53
54!Linefeed padding
55RESET
56PUSH "Hello\r\nWorld"
57  ?screen_chars 0,0,2,80 = "Hello\nWorld"
58  ?screen_text 0,0,2,80 = 0x48,0x65,0x6c,0x6c,0x6f,0x0a,0x57,0x6f,0x72,0x6c,0x64
59
60!Altscreen
61RESET
62PUSH "P"
63  ?screen_chars 0,0,1,80 = "P"
64PUSH "\e[?1049h"
65  ?screen_chars 0,0,1,80 =
66PUSH "\e[2K\e[HA"
67  ?screen_chars 0,0,1,80 = "A"
68PUSH "\e[?1049l"
69  ?screen_chars 0,0,1,80 = "P"
70