10 {
12
13
14
15
16
17
18 $this->nocase = "0";
19 $this->notrim = "0";
20 $this->perl = "0";
21
22
23
24 $this->colours = array("blue", "purple", "gray", "brown");
25 $this->quotecolour = "blue";
26 $this->blockcommentcolour = "green";
27 $this->linecommentcolour = "green";
28
29
30
31 $this->indent = array();
32 $this->unindent = array();
33
34
35
36 $this->stringchars = array("'");
37 $this->delimiters = array("!", "^", "*", "+", "(", ")", "=", "|", ";", "\"", "'", ",");
38 $this->escchar = "";
39
40
41
42 $this->linecommenton = array("-*");
43 $this->blockcommenton = array("");
44 $this->blockcommentoff = array("");
45
46
47
48 $this->keywords = array(
49 "A" => "1",
50 "ABS" => "1",
51 "ACCESS" => "1",
52 "ACROSS" => "1",
53 "ADD" => "1",
54 "AFTER" => "1",
55 "AGAIN" => "1",
56 "ALL" => "1",
57 "ANALYSE" => "1",
58 "AND" => "1",
59 "ANOVA" => "1",
60 "AS" => "1",
61 "ASNAMES" => "1",
62 "ASQ" => "1",
63 "AVE" => "1",
64 "B" => "1",
65 "BACK" => "1",
66 "BIN" => "1",
67 "BINS" => "1",
68 "BY" => "1",
69 "C1" => "1",
70 "C2" => "1",
71 "C3" => "1",
72 "CASE" => "1",
73 "CDN" => "1",
74 "CHANGE" => "1",
75 "CHECK" => "1",
76 "CLEAR" => "1",
77 "CNT" => "1",
78 "CO" => "1",
79 "COLUMN" => "1",
80 "COLUMNS" => "1",
81 "COLUMN-TOTAL" => "1",
82 "COMBINE" => "1",
83 "COMPILE" => "1",
84 "COMPUTE" => "1",
85 "CONTAINS" => "1",
86 "CONTINUE" => "1",
87 "CORRE" => "1",
88 "COUNT" => "1",
89 "CREATE" => "1",
90 "CRTFORM" => "1",
91 "CT" => "1",
92 "DBA" => "1",
93 "DECODE" => "1",
94 "DECRYPT" => "1",
95 "DEFINE" => "1",
96 "DEL" => "1",
97 "DELETE" => "1",
98 "DIS" => "1",
99 "DISK" => "1",
100 "DISPLAY" => "1",
101 "DMTY" => "1",
102 "DMY" => "1",
103 "DMYY" => "1",
104 "DUPL" => "1",
105 "ECHO" => "1",
106 "EDIT" => "1",
107 "ELSE" => "1",
108 "ENCRYPT" => "1",
109 "END" => "1",
110 "ENDCASE" => "1",
111 "ENDREPEAT" => "1",
112 "EO1" => "1",
113 "EO2" => "1",
114 "EO3" => "1",
115 "EQ" => "1",
116 "EX" => "1",
117 "EXCEEDS" => "1",
118 "EXCLUDES" => "1",
119 "EXEC" => "1",
120 "EXIT" => "1",
121 "EXITREPEAT" => "1",
122 "EXPLAIN" => "1",
123 "EXSMO" => "1",
124 "FACTO" => "1",
125 "FI" => "1",
126 "FILE" => "1",
127 "FIN" => "1",
128 "FINISH" => "1",
129 "FIXFORM" => "1",
130 "FML" => "1",
131 "FOCUS" => "1",
132 "FOOTING" => "1",
133 "FOR" => "1",
134 "FORM" => "1",
135 "FORMAT" => "1",
136 "FREEFORM" => "1",
137 "FROM" => "1",
138 "FST" => "1",
139 "GE" => "1",
140 "GOTO" => "1",
141 "GRAPH" => "1",
142 "GT" => "1",
143 "GTREND" => "1",
144 "HEADING" => "1",
145 "HIST" => "1",
146 "HOLD" => "1",
147 "I" => "1",
148 "IF" => "1",
149 "IN" => "1",
150 "INCLUDE" => "1",
151 "INCLUDES" => "1",
152 "INDEX" => "1",
153 "INIT" => "1",
154 "INPUT" => "1",
155 "INT" => "1",
156 "INTO" => "1",
157 "INVALID" => "1",
158 "IS" => "1",
159 "IS-LESS-THAN" => "1",
160 "IS-MORE-THAN" => "1",
161 "IS-NOT" => "1",
162 "JOIN" => "1",
163 "JUMP" => "1",
164 "LAST" => "1",
165 "LE" => "1",
166 "LET" => "1",
167 "LINES" => "1",
168 "LINK" => "1",
169 "LIST" => "1",
170 "LOC" => "1",
171 "LOCATE" => "1",
172 "LOCATION" => "1",
173 "LOG" => "1",
174 "LST" => "1",
175 "LT" => "1",
176 "MAINTAIN" => "1",
177 "MARK" => "1",
178 "MATCH" => "1",
179 "MATCH/NOMATCH" => "1",
180 "MAX" => "1",
181 "MDISC" => "1",
182 "MDY" => "1",
183 "MDYY" => "1",
184 "MIN" => "1",
185 "MISSING" => "1",
186 "MODIFY" => "1",
187 "MOVE" => "1",
188 "MSG" => "1",
189 "MT" => "1",
190 "MTDY" => "1",
191 "MULTR" => "1",
192 "N" => "1",
193 "NE" => "1",
194 "NEW" => "1",
195 "NEW-OR-OLD" => "1",
196 "NEW-NOR-OLD" => "1",
197 "NEW-NOT-OLD" => "1",
198 "NEXT" => "1",
199 "NOMATCH" => "1",
200 "NOPRINT" => "1",
201 "NOR" => "1",
202 "NOT" => "1",
203 "NOTOTAL" => "1",
204 "OFF" => "1",
205 "OFFLINE" => "1",
206 "OLD" => "1",
207 "OLD-OR-NEW" => "1",
208 "OLD-NOT-NEW" => "1",
209 "OLD-NOR-NEW" => "1",
210 "OM" => "1",
211 "OMITS" => "1",
212 "ON" => "1",
213 "ONLINE" => "1",
214 "OR" => "1",
215 "OVER" => "1",
216 "PAGE" => "1",
217 "PAGE-BREAK" => "1",
218 "PANEL" => "1",
219 "PASS" => "1",
220 "PAUSE" => "1",
221 "PCT" => "1",
222 "PERFORM" => "1",
223 "PICKUP" => "1",
224 "PIE" => "1",
225 "POLRG" => "1",
226 "POST" => "1",
227 "PRINT" => "1",
228 "PROMPT" => "1",
229 "QUIT" => "1",
230 "RANKED" => "1",
231 "READLIMIT" => "1",
232 "REBUILD" => "1",
233 "RECAP" => "1",
234 "RECOMPUTE" => "1",
235 "RECORDLIMIT" => "1",
236 "RECTYP" => "1",
237 "RECTYPE" => "1",
238 "REORG" => "1",
239 "REPEAT" => "1",
240 "REPLACE" => "1",
241 "REPLOT" => "1",
242 "RESTRICT" => "1",
243 "RETYPE" => "1",
244 "ROW" => "1",
245 "ROWS" => "1",
246 "ROW-TOTAL" => "1",
247 "RPCT" => "1",
248 "RUN" => "1",
249 "SAVB" => "1",
250 "SAVE" => "1",
251 "SCAN" => "1",
252 "SEG" => "1",
253 "SEGMENT" => "1",
254 "SEGNAME" => "1",
255 "SET" => "1",
256 "SHOW" => "1",
257 "SKIP-LINE" => "1",
258 "SQRT" => "1",
259 "ST" => "1",
260 "STATSET" => "1",
261 "STOR" => "1",
262 "STORE" => "1",
263 "SUBFOOT" => "1",
264 "SUBHEAD" => "1",
265 "SUBTOTAL" => "1",
266 "SUB-TOTAL" => "1",
267 "SUM" => "1",
268 "SUMMARIZE" => "1",
269 "SUPPRINT" => "1",
270 "TABLE" => "1",
271 "TABLEF" => "1",
272 "TED" => "1",
273 "TEMP" => "1",
274 "THEN" => "1",
275 "TLOCATE" => "1",
276 "TO" => "1",
277 "TOP" => "1",
278 "TOT" => "1",
279 "TOTAL" => "1",
280 "TRACE" => "1",
281 "TYPE" => "1",
282 "UNDERLINE" => "1",
283 "UP" => "1",
284 "UPDATE" => "1",
285 "USAGE" => "1",
286 "USE" => "1",
287 "USER" => "1",
288 "VALIDATE" => "1",
289 "WITH" => "1",
290 "WITHIN" => "1",
291 "WRITE" => "1",
292 "X1" => "1",
293 "X2" => "1",
294 "X3" => "1",
295 "XFER" => "1",
296 "Y" => "1",
297 "YMD" => "1",
298 "YMTD" => "1",
299 "YYMD" => "1",
300 "&ACCEPTS" => "2",
301 "&BASEIO" => "2",
302 "&CHNGD" => "2",
303 "&CURSOR" => "2",
304 "&DATE" => "2",
305 "&ECHO" => "2",
306 "&FOCCPU" => "2",
307 "&FOCDISORG" => "2",
308 "&FOCERRNUM" => "2",
309 "&FOCEXTTRM" => "2",
310 "&FOCFIELDNAME" => "2",
311 "&FOCFOCEXEC" => "2",
312 "&FOCINCLUDE" => "2",
313 "&FOCMODE" => "2",
314 "&FOCPRINT" => "2",
315 "&FOCPUTLVL" => "2",
316 "&FOCQUALCHAR" => "2",
317 "&FOCREL" => "2",
318 "&FOCSBORDER" => "2",
319 "&FOCSYSTYP" => "2",
320 "&FOCTMPDSK" => "2",
321 "&FOCTRMSD" => "2",
322 "&FOCTRMSW" => "2",
323 "&FORTRMTYP" => "2",
324 "&FOCTTIME" => "2",
325 "&FOCVTIME" => "2",
326 "&FORMAT" => "2",
327 "&HIPERFOCUS" => "2",
328 "&INPUT" => "2",
329 "&INVALID" => "2",
330 "&IORETURN" => "2",
331 "&LINES" => "2",
332 "&MDY" => "2",
333 "&MDYY" => "2",
334 "&NOMATCH" => "2",
335 "&PFKEY" => "2",
336 "&QUIT" => "2",
337 "&READS" => "2",
338 "&RECORDS" => "2",
339 "&REJECTS" => "2",
340 "&RETCODE" => "2",
341 "&STACK" => "2",
342 "&TOD" => "2",
343 "&TRANS" => "2",
344 "&WINDOWNAME" => "2",
345 "&WINDOWVALUE" => "2",
346 "&YMD" => "2",
347 "&YYMD" => "2",
348 "-CMS" => "3",
349 "-CLOSE" => "3",
350 "-CRTCLEAR" => "3",
351 "-CRTFORM" => "3",
352 "-DEFAULTS" => "3",
353 "-EXIT" => "3",
354 "-GOTO" => "3",
355 "-IF" => "3",
356 "-INCLUDE" => "3",
357 "-MVS" => "3",
358 "-PASS" => "3",
359 "-PROMPT" => "3",
360 "-QUIT" => "3",
361 "-READ" => "3",
362 "-REPEAT" => "3",
363 "-RUN" => "3",
364 "-SET" => "3",
365 "-TSO" => "3",
366 "-TYPE" => "3",
367 "-WINDOW" => "3",
368 "-WRITE" => "3",
369 "-?" => "3",
370 "TSO" => "3",
371 "MVS" => "3",
372 "CMS" => "3",
373 "**" => "4",
374 "/A" => "4",
375 "/D" => "4",
376 "/F" => "4",
377 "/I" => "4",
378 "//" => "4",
379 "/DMY" => "4",
380 "/DMYY" => "4",
381 "/MDY" => "4",
382 "/MDYY" => "4",
383 "/YMD" => "4",
384 "/YYMD" => "4");
385
386
387
388
389
390
391
392
393 $this->linkscripts = array(
394 "1" => "donothing",
395 "2" => "donothing",
396 "3" => "donothing",
397 "4" => "donothing");
398 }