blob: e679b98af4e21ed13eaa5b1180647bd9b22ac766 [file] [log] [blame]
Bram Moolenaare4f25e42017-07-07 11:54:15 +02001INIT
Bram Moolenaar88d68de2020-05-18 21:51:01 +02002WANTSCREEN ac
Bram Moolenaare4f25e42017-07-07 11:54:15 +02003
4!Get
5RESET
6PUSH "ABC"
7 movecursor 0,3
Bram Moolenaar88d68de2020-05-18 21:51:01 +02008 ?screen_chars 0,0,1,3 = "ABC"
9 ?screen_chars 0,0,1,80 = "ABC"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020010 ?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
Bram Moolenaar88d68de2020-05-18 21:51:01 +020021 ?screen_chars 0,0,1,80 = "ABC"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020022 ?screen_text 0,0,1,80 = 0x41,0x42,0x43
23PUSH "E"
24 movecursor 0,1
Bram Moolenaar88d68de2020-05-18 21:51:01 +020025 ?screen_chars 0,0,1,80 = "EBC"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020026 ?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"
Bram Moolenaar88d68de2020-05-18 21:51:01 +020040 ?screen_chars 0,0,1,80 = "1ABC"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020041
42RESET
43PUSH "ABC\e[H\e[P"
Bram Moolenaar88d68de2020-05-18 21:51:01 +020044 ?screen_chars 0,0,1,1 = "B"
45 ?screen_chars 0,1,1,2 = "C"
46 ?screen_chars 0,0,1,80 = "BC"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020047
48!Space padding
49RESET
50PUSH "Hello\e[CWorld"
Bram Moolenaar88d68de2020-05-18 21:51:01 +020051 ?screen_chars 0,0,1,80 = "Hello World"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020052 ?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"
Bram Moolenaar88d68de2020-05-18 21:51:01 +020057 ?screen_chars 0,0,2,80 = "Hello\nWorld"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020058 ?screen_text 0,0,2,80 = 0x48,0x65,0x6c,0x6c,0x6f,0x0a,0x57,0x6f,0x72,0x6c,0x64
59
60!Altscreen
61RESET
62PUSH "P"
Bram Moolenaar88d68de2020-05-18 21:51:01 +020063 ?screen_chars 0,0,1,80 = "P"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020064PUSH "\e[?1049h"
65 ?screen_chars 0,0,1,80 =
66PUSH "\e[2K\e[HA"
Bram Moolenaar88d68de2020-05-18 21:51:01 +020067 ?screen_chars 0,0,1,80 = "A"
Bram Moolenaare4f25e42017-07-07 11:54:15 +020068PUSH "\e[?1049l"
Bram Moolenaar88d68de2020-05-18 21:51:01 +020069 ?screen_chars 0,0,1,80 = "P"