1
2
3
4 dcl 1 art static options (constant),
5
6 2 top (8) char (1) unal init
7 ("'", "-", "3", "9", "?", "E", "K", "Q"),
8 2 half_top (8) char (1) unal init
9 ("(", ".", "4", ":", "@", "F", "L", "R"),
10 2 middle (8) char (1) unal init
11 (")", "/", "5", ";", "A", "G", "M", "S"),
12 2 bottom (8) char (1) unal init
13 ("*", "0", "6", "<", "B", "H", "N", "T"),
14 2 half_bottom (8) char (1) unal init
15 ("+", "1", "7", "=", "C", "I", "O", "U"),
16 2 other_part (8) char (1) unal init
17 (",", "2", "8", ">", "D", "J", "P", "V"),
18 2 one (15) char (1) unal init
19 ("^]", """, "^\", "!", "^_", "$", "W", "X",
20 "Í",
21 "Y",
22 "^S",
23 "^X",
24 "^T",
25 "Ã",
26 "Ô"),
27
28
29 2 vpart char (1) unal init ("Z"),
30 2 daro char (1) unal init ("^U"),
31 2 uparo char (1) unal init ("%"),
32 2 horiz,
33 3 start char (1) unal init ("["),
34 3 line char (1) unal init ("\"),
35 3 term char (1) unal init ("]"),
36 2 laro char (1) unal init ("^["),
37 2 raro char (1) unal init (" "),
38 2 diam,
39 3 top char (1) unal init ("^Z"),
40 3 lvert char (1) unal init ("^W"),
41 3 rvert char (1) unal init ("^Y"),
42 3 bottom char (1) unal init ("^V"),
43 2 lslnt char (1) unal init ("^"),
44 2 rslnt char (1) unal init ("_"),
45 2 lcirc char (1) unal init ("^^"),
46 2 rcirc char (1) unal init ("#"),
47 2 PI char (1) unal init ("Ð"),
48 2 pi char (1) unal init ("ð"),
49 2 box,
50 3 tl char (1) unal init ("`"),
51 3 t char (1) unal init ("a"),
52 3 tr char (1) unal init ("b"),
53 3 l char (1) unal init ("c"),
54 3 x char (1) unal init ("d"),
55 3 r char (1) unal init ("e"),
56 3 bl char (1) unal init ("f"),
57 3 b char (1) unal init ("g"),
58 3 br char (1) unal init ("h"),
59 2 loz,
60 3 tl char (1) unal init ("i"),
61 3 tr char (1) unal init ("j"),
62 3 l char (1) unal init ("k"),
63 3 r char (1) unal init ("l"),
64 3 bl char (1) unal init ("m"),
65 3 br char (1) unal init ("n");
66
67
68