ILIAS  Release_4_1_x_branch Revision 61804
 All Data Structures Namespaces Files Functions Variables Groups Pages
HFile_clarion.php
Go to the documentation of this file.
1 <?php
2 $BEAUT_PATH = realpath(".")."/Services/COPage/syntax_highlight/php";
3 if (!isset ($BEAUT_PATH)) return;
4 require_once("$BEAUT_PATH/Beautifier/HFile.php");
5  class HFile_clarion extends HFile{
6  function HFile_clarion(){
7  $this->HFile();
8 /*************************************/
9 // Beautifier Highlighting Configuration File
10 // Clarion Plus
11 /*************************************/
12 // Flags
13 
14 $this->nocase = "1";
15 $this->notrim = "0";
16 $this->perl = "0";
17 
18 // Colours
19 
20 $this->colours = array("blue", "purple", "gray", "brown", "blue", "purple", "gray", "brown");
21 $this->quotecolour = "blue";
22 $this->blockcommentcolour = "green";
23 $this->linecommentcolour = "green";
24 
25 // Indent Strings
26 
27 $this->indent = array("LOOP", "IF", "THEN", "OF", "ELSE");
28 $this->unindent = array("END", "UNTIL", "WHILE");
29 
30 // String characters and delimiters
31 
32 $this->stringchars = array("'");
33 $this->delimiters = array("~", "@", "%", "^", "*", "(", ")", "-", "+", "|", "\\", "/", "{", "}", "[", "]", ";", "\"", "'", ".", ",");
34 $this->escchar = "";
35 
36 // Comment settings
37 
38 $this->linecommenton = array("!");
39 $this->blockcommenton = array("OMIT");
40 $this->blockcommentoff = array("ENDOM");
41 
42 // Keywords (keyword mapping to colour number)
43 
44 $this->keywords = array(
45  "C" => "1",
46  "CODE" => "1",
47  "DATA" => "1",
48  "DLL" => "1",
49  "FUNCTION" => "1",
50  "MAP" => "1",
51  "MEMBER" => "1",
52  "MODULE" => "1",
53  "PASCAL" => "1",
54  "PROC" => "1",
55  "PROCEDURE" => "1",
56  "PROGRAM" => "1",
57  "RAW" => "1",
58  "ROUTINE" => "1",
59  "?" => "2",
60  "ASSERT" => "2",
61  "BEGIN" => "2",
62  "COMPILE" => "2",
63  "EJECT" => "2",
64  "EMBED" => "2",
65  "ENDEMBED" => "2",
66  "EQUATE" => "2",
67  "INCLUDE" => "2",
68  "ITEMIZE" => "2",
69  "OMIT" => "2",
70  "SECTION" => "2",
71  "SIZE" => "2",
72  "SUBTITLE" => "2",
73  "TITLE" => "2",
74  "_PROC" => "3",
75  "_PROC1" => "3",
76  "_PROC2" => "3",
77  "_PROC3" => "3",
78  "ANY" => "3",
79  "AUTO" => "3",
80  "BYTE" => "3",
81  "BFLOAT4" => "3",
82  "BFLOAT8" => "3",
83  "BINARY" => "3",
84  "BINDABLE" => "3",
85  "BLOB" => "3",
86  "BOOL" => "3",
87  "CLASS" => "3",
88  "CREATE" => "3",
89  "CSTRING" => "3",
90  "DATE" => "3",
91  "DECIMAL" => "3",
92  "DIM" => "3",
93  "DISPOSE" => "3",
94  "DRIVER" => "3",
95  "DUP" => "3",
96  "ENCRYPT" => "3",
97  "EXTERNAL" => "3",
98  "FILE" => "3",
99  "FILTER" => "3",
100  "FLOAT4" => "3",
101  "GROUP" => "3",
102  "INDEX" => "3",
103  "INNER" => "3",
104  "JOIN" => "3",
105  "KEY" => "3",
106  "LIKE" => "3",
107  "LONG" => "3",
108  "MEMO" => "3",
109  "NEW" => "3",
110  "NOCASE" => "3",
111  "OEM" => "3",
112  "OPT" => "3",
113  "ORDER" => "3",
114  "OVER" => "3",
115  "OWNER" => "3",
116  "PDECIMAL" => "3",
117  "PRE" => "3",
118  "PRIMARY" => "3",
119  "PRIVATE" => "3",
120  "PSTRING" => "3",
121  "PROJECT" => "3",
122  "PROTECTED" => "3",
123  "QUEUE" => "3",
124  "REAL" => "3",
125  "RECLAIM" => "3",
126  "RECORD" => "3",
127  "SHORT" => "3",
128  "SIGNED" => "3",
129  "SREAL" => "3",
130  "STATIC" => "3",
131  "STRING" => "3",
132  "TIME" => "3",
133  "THREAD" => "3",
134  "TYPE" => "3",
135  "USHORT" => "3",
136  "ULONG" => "3",
137  "UNSIGNED" => "3",
138  "VIEW" => "3",
139  "APPLICATION" => "4",
140  "ABSOLUTE" => "4",
141  "ABOVE" => "4",
142  "ALONE" => "4",
143  "ALRT" => "4",
144  "ANGLE" => "4",
145  "AT" => "4",
146  "AUTOSIZE" => "4",
147  "AVE" => "4",
148  "BELOW" => "4",
149  "BREAK" => "4",
150  "BOX" => "4",
151  "BUTTON" => "4",
152  "BEVEL" => "4",
153  "BOXED" => "4",
154  "CHECK" => "4",
155  "COMBO" => "4",
156  "CAP" => "4",
157  "CENTER" => "4",
158  "CENTERED" => "4",
159  "CLIP" => "4",
160  "CNT" => "4",
161  "COLOR" => "4",
162  "COLUMN" => "4",
163  "COMPATIBILITY" => "4",
164  "CURSOR" => "4",
165  "DETAIL" => "4",
166  "DEFAULT" => "4",
167  "DELAY" => "4",
168  "DISABLE" => "4",
169  "DOCK" => "4",
170  "DOCKED" => "4",
171  "DOCUMENT" => "4",
172  "DOUBLE" => "4",
173  "DRAGID" => "4",
174  "DROP" => "4",
175  "DROPID" => "4",
176  "DOWN" => "4",
177  "ELLIPSE" => "4",
178  "ENTRY" => "4",
179  "ENABLE" => "4",
180  "FOOTER" => "4",
181  "FORM" => "4",
182  "FILL" => "4",
183  "FIRST" => "4",
184  "FLAT" => "4",
185  "FONT" => "4",
186  "FORMAT" => "4",
187  "FROM" => "4",
188  "FULL" => "4",
189  "GRAY" => "4",
190  "GRID" => "4",
191  "HEADER" => "4",
192  "HIDE" => "4",
193  "HLP" => "4",
194  "HSCROLL" => "4",
195  "HVSCROLL" => "4",
196  "IMAGE" => "4",
197  "ITEM" => "4",
198  "ICON" => "4",
199  "ICONIZE" => "4",
200  "IMM" => "4",
201  "INS" => "4",
202  "LAST" => "4",
203  "LINE" => "4",
204  "LIST" => "4",
205  "LANDSCAPE" => "4",
206  "LEFT" => "4",
207  "LINEWIDTH" => "4",
208  "LINK" => "4",
209  "MENU" => "4",
210  "MENUBAR" => "4",
211  "MARK" => "4",
212  "MASK" => "4",
213  "MAX" => "4",
214  "MAXIMIZE" => "4",
215  "MDI" => "4",
216  "META" => "4",
217  "MIN" => "4",
218  "MODAL" => "4",
219  "MSG" => "4",
220  "MM" => "4",
221  "NOBAR" => "4",
222  "NOFRAME" => "4",
223  "NOMERGE" => "4",
224  "NOSHEET" => "4",
225  "OLE" => "4",
226  "OPTION" => "4",
227  "OVR" => "4",
228  "OPEN" => "4",
229  "PAGE" => "4",
230  "PANEL" => "4",
231  "PROMPT" => "4",
232  "PROGRESS" => "4",
233  "PAGEAFTER" => "4",
234  "PAGEBEFORE" => "4",
235  "PAGENO" => "4",
236  "PALETTE" => "4",
237  "PAPER" => "4",
238  "PASSWORD" => "4",
239  "PREVIEW" => "4",
240  "POINTS" => "4",
241  "RADIO" => "4",
242  "REGION" => "4",
243  "REPORT" => "4",
244  "RIGHT" => "4",
245  "RANGE" => "4",
246  "READONLY" => "4",
247  "REPEAT" => "4",
248  "REQ" => "4",
249  "RESIZE" => "4",
250  "ROUND" => "4",
251  "SHEET" => "4",
252  "SPIN" => "4",
253  "SCROLL" => "4",
254  "SEPARATOR" => "4",
255  "SINGLE" => "4",
256  "SPREAD" => "4",
257  "STATUS" => "4",
258  "STD" => "4",
259  "STEP" => "4",
260  "STRETCH" => "4",
261  "SUM" => "4",
262  "SYSTEM" => "4",
263  "TAB" => "4",
264  "TEXT" => "4",
265  "TOOLBAR" => "4",
266  "TALLY" => "4",
267  "TARGET" => "4",
268  "THOUS" => "4",
269  "TILED" => "4",
270  "TIMER" => "4",
271  "TIP" => "4",
272  "TOOLBOX" => "4",
273  "TRN" => "4",
274  "UP" => "4",
275  "UPR" => "4",
276  "USE" => "4",
277  "VBX" => "4",
278  "VALUE" => "4",
279  "VCR" => "4",
280  "VSCROLL" => "4",
281  "WALLPAPER" => "4",
282  "WITHNEXT" => "4",
283  "WITHPRIOR" => "4",
284  "WIZARD" => "4",
285  "WRAP" => "4",
286  "WINDOW" => "4",
287  "ZOOM" => "4",
288  "+" => "5",
289  "+=" => "5",
290  "-" => "5",
291  "-=" => "5",
292  "=" => "5",
293  "//" => "5",
294  "/" => "5",
295  "/=" => "5",
296  "*" => "5",
297  "*=" => "5",
298  "%" => "5",
299  "&" => "5",
300  "&=" => "5",
301  ">" => "5",
302  ">=" => "5",
303  "<" => "5",
304  "<=" => "5",
305  "~" => "5",
306  ":=:" => "5",
307  "ACCEPT" => "5",
308  "BIND" => "5",
309  "BY" => "5",
310  "CASE" => "5",
311  "CYCLE" => "5",
312  "CLEAR" => "5",
313  "DO" => "5",
314  "ELSE" => "5",
315  "ELSIF" => "5",
316  "END" => "5",
317  "EXECUTE" => "5",
318  "EXIT" => "5",
319  "EVALUATE" => "5",
320  "GOTO" => "5",
321  "IF" => "5",
322  "LOOP" => "5",
323  "MATCH" => "5",
324  "OF" => "5",
325  "OR" => "5",
326  "OROF" => "5",
327  "POPBIND" => "5",
328  "RETURN" => "5",
329  "THEN" => "5",
330  "TIMES" => "5",
331  "TO" => "5",
332  "UNTIL" => "5",
333  "UNBIND" => "5",
334  "WHILE" => "5",
335  "ABS" => "6",
336  "ACCEPTED" => "6",
337  "ACOS" => "6",
338  "ADD" => "6",
339  "ADDRESS" => "6",
340  "AGE" => "6",
341  "ALERT" => "6",
342  "ALIAS" => "6",
343  "ALL" => "6",
344  "APPEND" => "6",
345  "ARC" => "6",
346  "ASIN" => "6",
347  "ASK" => "6",
348  "ATAN" => "6",
349  "BAND" => "6",
350  "BEEP" => "7",
351  "BLANK" => "6",
352  "BOF" => "6",
353  "BOR" => "6",
354  "BSHIFT" => "6",
355  "BUILD" => "6",
356  "BUFFER" => "6",
357  "BXOR" => "6",
358  "BYTES" => "6",
359  "CALL" => "6",
360  "CHAIN" => "6",
361  "CHANGE" => "6",
362  "CHANGES" => "6",
363  "CHOICE" => "6",
364  "CHOOSE" => "6",
365  "CHORD" => "6",
366  "CHR" => "6",
367  "CLIPBOARD" => "6",
368  "CLOCK" => "6",
369  "CLOSE" => "6",
370  "COL" => "6",
371  "COLORDIALOG" => "6",
372  "COMMAND" => "6",
373  "COMMIT" => "6",
374  "CONTENTS" => "6",
375  "CONVERTANSITOOEM" => "6",
376  "CONVERTOEMTOANSI" => "6",
377  "COPY" => "6",
378  "COS" => "6",
379  "DAY" => "6",
380  "DEFORMAT" => "6",
381  "DELETE" => "6",
382  "DESTROY" => "6",
383  "DIRECTORY" => "6",
384  "DISPLAY" => "6",
385  "DRAGIT" => "6",
386  "DROPIT" => "6",
387  "DUPLICATE" => "6",
388  "EMPTY" => "6",
389  "ENDPAGE" => "6",
390  "EOF" => "6",
391  "ERASE" => "6",
392  "ERROR" => "6",
393  "ERRORCODE" => "6",
394  "ERRORFILE" => "6",
395  "EVENT" => "6",
396  "EXISTS" => "6",
397  "FIELD" => "6",
398  "FILEDIALOG" => "6",
399  "FILEERROR" => "6",
400  "FILEERRORCODE" => "6",
401  "FIRSTFIELD" => "6",
402  "FLUSH" => "6",
403  "FOCUS" => "6",
404  "FONTDIALOG" => "6",
405  "FREE" => "6",
406  "GET" => "6",
407  "GETFONT" => "6",
408  "GETINI" => "6",
409  "GETPOSITION" => "6",
410  "HALT" => "6",
411  "HELP" => "6",
412  "HOLD" => "6",
413  "IDLE" => "6",
414  "INCOMPLETE" => "6",
415  "INLIST" => "6",
416  "INRANGE" => "6",
417  "INSTRING" => "6",
418  "INT" => "6",
419  "ISALPHA" => "6",
420  "ISLOWER" => "6",
421  "ISSTRING" => "6",
422  "ISUPPER" => "6",
423  "KEYBOARD" => "6",
424  "KEYCHAR" => "6",
425  "KEYCODE" => "6",
426  "KEYSTATE" => "6",
427  "LASTFIELD" => "6",
428  "LEN" => "6",
429  "LOCALE" => "6",
430  "LOCK" => "6",
431  "LOCKTHREAD" => "6",
432  "LOG10" => "6",
433  "LOGE" => "6",
434  "LOGOUT" => "6",
435  "LONGPATH" => "6",
436  "LOWER" => "6",
437  "MAXIMUM" => "6",
438  "MESSAGE" => "6",
439  "MONTH" => "6",
440  "MOUSEX" => "6",
441  "MOUSEY" => "6",
442  "NAME" => "6",
443  "NEXT" => "6",
444  "NOMEMO" => "6",
445  "NULL" => "6",
446  "NUMERIC" => "6",
447  "OMITTED" => "6",
448  "OUT" => "6",
449  "PACK" => "6",
450  "PATH" => "6",
451  "PEEK" => "6",
452  "PENCOLOR" => "6",
453  "PENSTYLE" => "6",
454  "PENWIDTH" => "6",
455  "PIE" => "6",
456  "POINTER" => "6",
457  "POKE" => "6",
458  "POLYGON" => "6",
459  "POPUP" => "6",
460  "POST" => "6",
461  "PRESS" => "6",
462  "PRESSKEY" => "6",
463  "PREVIOUS" => "6",
464  "PRINT" => "6",
465  "PRINTERDIALOG" => "6",
466  "PUT" => "6",
467  "PUTINI" => "6",
468  "RANDOM" => "6",
469  "RECORDS" => "6",
470  "REGISTER" => "6",
471  "REGISTEREVENT" => "6",
472  "REGET" => "6",
473  "REJECTCODE" => "6",
474  "RELEASE" => "6",
475  "REMOVE" => "6",
476  "RENAME" => "6",
477  "RESET" => "6",
478  "ROLLBACK" => "6",
479  "ROUNDBOX" => "6",
480  "RUN" => "6",
481  "RUNCODE" => "6",
482  "SELECT" => "6",
483  "SELECTED" => "6",
484  "SEND" => "6",
485  "SET3DLOOK" => "6",
486  "SET" => "6",
487  "SETCLOCK" => "6",
488  "SETCURSOR" => "6",
489  "SETCOMMAND" => "6",
490  "SETCLIPBOARD" => "6",
491  "SETDROPID" => "6",
492  "SETFONT" => "6",
493  "SETKEYCHAR" => "6",
494  "SETKEYCODE" => "6",
495  "SETNONULL" => "6",
496  "SETNULL" => "6",
497  "SETPATH" => "6",
498  "SETPENCOLOR" => "6",
499  "SETPENSTYLE" => "6",
500  "SETPENWIDTH" => "6",
501  "SETPOSITION" => "6",
502  "SETPROPERTY" => "6",
503  "SETTARGET" => "6",
504  "SETTODAY" => "6",
505  "SHORTNAME" => "6",
506  "SHORTPATH" => "6",
507  "SHOW" => "6",
508  "SHUTDOWN" => "6",
509  "SIN" => "6",
510  "SKIP" => "6",
511  "SORT" => "6",
512  "SQRT" => "6",
513  "START" => "6",
514  "STOP" => "6",
515  "STREAM" => "6",
516  "TAN" => "6",
517  "THREADLOCKED" => "6",
518  "TODAY" => "6",
519  "UNHIDE" => "6",
520  "UNLOAD" => "6",
521  "UNLOCK" => "6",
522  "UNLOCKTHREAD" => "6",
523  "UNREGISTER" => "6",
524  "UNREGISTEREVENT" => "6",
525  "UPDATE" => "6",
526  "UPPER" => "6",
527  "VAL" => "6",
528  "WATCH" => "6",
529  "WHAT" => "6",
530  "WHERE" => "6",
531  "WHO" => "6",
532  "YEAR" => "6",
533  "YIELD" => "6",
534  "DDEACKNOWLEDGE" => "7",
535  "DDEAPP" => "7",
536  "DDECHANNEL" => "7",
537  "DDECLIENT" => "7",
538  "DDECLOSE" => "7",
539  "DDEEXECUTE" => "7",
540  "DDEITEM" => "7",
541  "DDEPOKE" => "7",
542  "DDEQUERRY" => "7",
543  "DDEREAD" => "7",
544  "DDESERVER" => "7",
545  "DDETOPIC" => "7",
546  "DDEVALUE" => "7",
547  "DDEWRITE" => "7",
548  "OLEDIRECTORY" => "7",
549  "OCXGETPARAM" => "7",
550  "OCXGETPARAMCOUNT" => "7",
551  "OCXLOADIMAGE" => "7",
552  "OCXREGISTEREVENTPROC" => "7",
553  "OCXREGISTERPROPCHANGE" => "7",
554  "OCXREGISTERPROPEDIT" => "7",
555  "OCXSETPARAM" => "7",
556  "OCXSETPARAMOCXEVENT" => "7",
557  "OCXUNREGISTERPROPCHANGE" => "7",
558  "OCXUNREGISTERPROPEDIT" => "7",
559  "OCXUNREGISTEREVENTPROC" => "7",
560  "FALSE" => "8",
561  "PARENT" => "8",
562  "SELF" => "8",
563  "TRUE" => "8",
564  "VIRTUAL" => "8",
565  "**" => "8",
566  "&A" => "8",
567  "&B" => "8",
568  "&C" => "8",
569  "&D" => "8",
570  "&E" => "8",
571  "&F" => "8",
572  "&G" => "8",
573  "&H" => "8",
574  "&I" => "8",
575  "&J" => "8",
576  "&K" => "8",
577  "&L" => "8",
578  "&M" => "8",
579  "&N" => "8",
580  "&O" => "8",
581  "&P" => "8",
582  "&Q" => "8",
583  "&R" => "8",
584  "&S" => "8",
585  "&T" => "8",
586  "&U" => "8",
587  "&V" => "8",
588  "&W" => "8",
589  "&X" => "8",
590  "&Y" => "8",
591  "&Z" => "8",
592  "BEEP:" => "8",
593  "BUTTON:" => "8",
594  "COLOR:" => "8",
595  "CREATE:" => "8",
596  "CURSOR:" => "8",
597  "DDE:" => "8",
598  "EVENT:" => "8",
599  "ff_:" => "8",
600  "FILE:" => "8",
601  "FONT:" => "8",
602  "ICON:" => "8",
603  "LISTZONE:" => "8",
604  "PEN:" => "8",
605  "PROP:" => "8",
606  "PROPLIST:" => "8",
607  "PROPPRINT:" => "8",
608  "REJECT:" => "8",
609  "STD:" => "8",
610  "VBXEVENT:" => "8");
611 
612 // Special extensions
613 
614 // Each category can specify a PHP function that returns an altered
615 // version of the keyword.
616 
617 
618 
619 $this->linkscripts = array(
620  "1" => "donothing",
621  "2" => "donothing",
622  "3" => "donothing",
623  "4" => "donothing",
624  "5" => "donothing",
625  "6" => "donothing",
626  "7" => "donothing",
627  "8" => "donothing");
628 }
629 
630 
631 function donothing($keywordin)
632 {
633  return $keywordin;
634 }
635 
636 }?>