1INIT
2WANTSTATE g
3
4!Initial
5RESET
6PUSH "\tX"
7  putglyph 0x58 1 0,8
8PUSH "\tX"
9  putglyph 0x58 1 0,16
10  ?cursor = 0,17
11
12!HTS
13PUSH "\e[5G\eH"
14PUSH "\e[G\tX"
15  putglyph 0x58 1 0,4
16  ?cursor = 0,5
17
18!TBC 0
19PUSH "\e[9G\e[g"
20PUSH "\e[G\tX\tX"
21  putglyph 0x58 1 0,4
22  putglyph 0x58 1 0,16
23  ?cursor = 0,17
24
25!TBC 3
26PUSH "\e[3g\e[50G\eH\e[G"
27  ?cursor = 0,0
28PUSH "\tX"
29  putglyph 0x58 1 0,49
30  ?cursor = 0,50
31
32!Tabstops after resize
33RESET
34RESIZE 30,100
35# Should be 100/8 = 12 tabstops
36PUSH "\tX"
37  putglyph 0x58 1 0,8
38PUSH "\tX"
39  putglyph 0x58 1 0,16
40PUSH "\tX"
41  putglyph 0x58 1 0,24
42PUSH "\tX"
43  putglyph 0x58 1 0,32
44PUSH "\tX"
45  putglyph 0x58 1 0,40
46PUSH "\tX"
47  putglyph 0x58 1 0,48
48PUSH "\tX"
49  putglyph 0x58 1 0,56
50PUSH "\tX"
51  putglyph 0x58 1 0,64
52PUSH "\tX"
53  putglyph 0x58 1 0,72
54PUSH "\tX"
55  putglyph 0x58 1 0,80
56PUSH "\tX"
57  putglyph 0x58 1 0,88
58PUSH "\tX"
59  putglyph 0x58 1 0,96
60  ?cursor = 0,97
61