Line | Address | Object Code
| Label | F1 | N1 | B | F2 | N2 | Comments | Check
|
---|
1 | 0 | | ; tape1.d/keywds.t2 |
|
2 | 0 | | ;------------------ |
|
3 | 0 | | ; |
|
4 | 0 | | ; keyword/operator table |
|
5 | 0 | | ; |
|
6 | 0 | | =670 | |
|
7 | 670 | | kwtable: | ; | |
|
8 | 670 | 0000000000030 | | '*',+24 | ; | @670
|
9 | 672 | 0000000000036 | | '=',+30 | |
|
10 | 674 | 0000000000010 | | '\'',+8 | |
|
11 | 676 | 0000000000051 | | ',',+41 | |
|
12 | 678 | 0000000000026 | | '+',+22 | |
|
13 | 680 | 0000000000052 | | ':',+42 | |
|
14 | 682 | 0000000000027 | | '-',+23 | |
|
15 | 684 | 0000000000066 | | '%',+54 | |
|
16 | 686 | 0000000000057 | | '(',+47 | |
|
17 | 688 | 0000000000060 | | ')',+48 | |
|
18 | 690 | 0000000000031 | | '/',+25 | |
|
19 | 692 | 0000000000061 | | '#',+49 | |
|
20 | 694 | 0000000000033 | | '**',+27 | |
|
21 | 696 | 0000000000053 | | ':=',+43 | |
|
22 | 698 | 0000000000050 | | 'DO',+40 | |
|
23 | 700 | 0000000000064 | | 'GR',+52 | |
|
24 | 702 | 0000000000002 | | 'IF',+2 | |
|
25 | 704 | 0000000000043 | | 'OR',+35 | |
|
26 | 706 | 0000000000044 | | 'AND',+36 | |
|
27 | 708 | 0000000000032 | | 'DIV',+26 | |
|
28 | 710 | 0000000000004 | | 'END',+4 | |
|
29 | 712 | 0000000000003 | | 'FOR',+3 | |
|
30 | 714 | 0000000000045 | | 'NOT',+37 | |
|
31 | 716 | 0000000000012 | | 'OWN',+10 | |
|
32 | 718 | 0000000000007 | | 'CODE',+7 | |
|
33 | 720 | 0000000000047 | | 'ELSE',+39 | |
|
34 | 722 | 0000000000001 | | 'GOTO',+1 | |
|
35 | 724 | 0000000000037 | | 'GREQ',+31 | |
|
36 | 726 | 0000000000042 | | 'HOOK',+34 | |
|
37 | 728 | 0000000000034 | | 'LESS',+28 | |
|
38 | 730 | 0000000000005 | | 'READ',+5 | |
|
39 | 732 | 0000000000015 | | 'REAL',+13 | |
|
40 | 734 | 0000000000054 | | 'STEP',+44 | |
|
41 | 736 | 0000000000046 | | 'THEN',+38 | |
|
42 | 738 | 0000000000024 | | 'TRUE',+20 | |
|
43 | 740 | 0000000000016 | | 'ARRAY',+14 | |
|
44 | 742 | 0000000000006 | | 'BEGIN',+6 | |
|
45 | 744 | 0000000000041 | | 'EQUIV',+33 | |
|
46 | 746 | 0000000000025 | | 'FALSE',+21 | |
|
47 | 748 | 0000000000022 | | 'LABEL',+18 | |
|
48 | 750 | 0000000000040 | | 'NOTEQ',+32 | |
|
49 | 752 | 0000000000005 | | 'PRINT',+5 | |
|
50 | 754 | 0000000000055 | | 'UNTIL',+45 | |
|
51 | 756 | 0000000000023 | | 'VALUE',+19 | |
|
52 | 758 | 0000000000056 | | 'WHILE',+46 | |
|
53 | 760 | 0000000000013 | | 'BOOLEA',+11 | |
|
54 | 762 | 0000000000011 | | 'COMMEN',+9 | |
|
55 | 764 | 0000000000014 | | 'INTEGE',+12 | |
|
56 | 766 | 0000000000035 | | 'LESSEQ',+29 | |
|
57 | 768 | 0000000000065 | | 'LOCATI',+53 | |
|
58 | 770 | 0000000000020 | | 'PROCED',+16 | |
|
59 | 772 | 0000000000021 | | 'STRING',+17 | |
|
60 | 774 | | kwtabend: | ; | |
|
61 | 774 | 0000000000017 | | 'SWITCH',+15 | |
|
62 | 776 | | ; |
|
63 | 776 | | ; sorted token table |
|
64 | 776 | | ; |
|
65 | 776 | | ; const -2, -1 |
|
66 | 776 | | ; statement starters |
|
67 | 776 | | ; ident +0 |
|
68 | 776 | | ; 'GOTO', +1 |
|
69 | 776 | | ; 'IF', +2 |
|
70 | 776 | | ; 'FOR', +3 |
|
71 | 776 | | ; 'END', +4 |
|
72 | 776 | | ; 'READ', +5 (note same value for read/print) |
|
73 | 776 | | ; 'PRINT', +5 |
|
74 | 776 | | ; 'BEGIN', +6 |
|
75 | 776 | | ; 'CODE', +7 |
|
76 | 776 | | ; '\'', +8 |
|
77 | 776 | | ; 'COMMEN', +9 |
|
78 | 776 | | ; declaration starters |
|
79 | 776 | | ; 'OWN', +10 |
|
80 | 776 | | ; 'BOOLEA', +11 |
|
81 | 776 | | ; 'INTEGE', +12 |
|
82 | 776 | | ; 'REAL', +13 |
|
83 | 776 | | ; 'ARRAY', +14 |
|
84 | 776 | | ; 'SWITCH', +15 |
|
85 | 776 | | ; 'PROCED', +16 |
|
86 | 776 | | ; 'STRING', +17 |
|
87 | 776 | | ; 'LABEL', +18 |
|
88 | 776 | | ; 'VALUE', +19 |
|
89 | 776 | | ; bool values |
|
90 | 776 | | ; 'TRUE', +20 |
|
91 | 776 | | ; 'FALSE', +21 |
|
92 | 776 | | ; arith operators |
|
93 | 776 | | ; '+', +22 |
|
94 | 776 | | ; '-', +23 |
|
95 | 776 | | ; '*', +24 |
|
96 | 776 | | ; '/', +25 |
|
97 | 776 | | ; 'DIV', +26 |
|
98 | 776 | | ; '**', +27 |
|
99 | 776 | | ; comparison operators |
|
100 | 776 | | ; 'LESS', +28 |
|
101 | 776 | | ; 'LESSEQ', +29 |
|
102 | 776 | | ; '=', +30 |
|
103 | 776 | | ; 'GREQ', +31 |
|
104 | 776 | | ; 'NOTEQ', +32 (but note 'GR' down below!) |
|
105 | 776 | | ; boolean operators |
|
106 | 776 | | ; 'EQUIV', +33 |
|
107 | 776 | | ; 'HOOK', +34 |
|
108 | 776 | | ; 'OR', +35 |
|
109 | 776 | | ; 'AND', +36 |
|
110 | 776 | | ; 'NOT', +37 |
|
111 | 776 | | ; statement constructors |
|
112 | 776 | | ; 'THEN', +38 |
|
113 | 776 | | ; 'ELSE', +39 |
|
114 | 776 | | ; 'DO', +40 |
|
115 | 776 | | ; ',', +41 |
|
116 | 776 | | ; ':', +42 |
|
117 | 776 | | ; ':=', +43 |
|
118 | 776 | | ; 'STEP', +44 |
|
119 | 776 | | ; 'UNTIL', +45 |
|
120 | 776 | | ; 'WHILE', +46 |
|
121 | 776 | | ; '(', +47 |
|
122 | 776 | | ; ')', +48 |
|
123 | 776 | | ; '#', +49 |
|
124 | 776 | | ; 50, 51 ?? |
|
125 | 776 | | ; 'GR', +52 |
|
126 | 776 | | ; 'LOCATI', +53 |
|
127 | 776 | | ; '%', +54 |
|
128 | 776 | | ;------------------------------------------------------------------- |
|
include "hdr2.html"; ?>