ILIAS  Release_4_1_x_branch Revision 61804
 All Data Structures Namespaces Files Functions Variables Groups Pages
HFile_qbasic.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_qbasic extends HFile{
6  function HFile_qbasic(){
7  $this->HFile();
8 /*************************************/
9 // Beautifier Highlighting Configuration File
10 // QBasic
11 /*************************************/
12 // Flags
13 
14 $this->nocase = "0";
15 $this->notrim = "0";
16 $this->perl = "0";
17 
18 // Colours
19 
20 $this->colours = array("blue");
21 $this->quotecolour = "blue";
22 $this->blockcommentcolour = "green";
23 $this->linecommentcolour = "green";
24 
25 // Indent Strings
26 
27 $this->indent = array();
28 $this->unindent = array();
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("/*");
40 $this->blockcommentoff = array("*/");
41 
42 // Keywords (keyword mapping to colour number)
43 
44 $this->keywords = array(
45  "$DYNAMIC" => "1",
46  "$INCLUDE" => "1",
47  "$STATIC" => "1",
48  "BLOAD" => "1",
49  "BSAVE" => "1",
50  "BYVAL" => "1",
51  "CALL" => "1",
52  "CASE" => "1",
53  "CDECL" => "1",
54  "CHAIN" => "1",
55  "CHR$" => "1",
56  "CIRCLE" => "1",
57  "CLOSE" => "1",
58  "CLS" => "1",
59  "COLOR" => "1",
60  "COM" => "1",
61  "COMMAND" => "1",
62  "COMMAND$" => "1",
63  "COMMON" => "1",
64  "CONST" => "1",
65  "CTRL" => "1",
66  "DAT" => "1",
67  "DATA" => "1",
68  "DATE$" => "1",
69  "DECLARE" => "1",
70  "DEF" => "1",
71  "DEFINT" => "1",
72  "DEFtype" => "1",
73  "DGROUP" => "1",
74  "DIM" => "1",
75  "DOS" => "1",
76  "DOUBLE" => "1",
77  "DRAW" => "1",
78  "EGA" => "1",
79  "ELSE" => "1",
80  "ELSEIF" => "1",
81  "END" => "1",
82  "ENVIRON$" => "1",
83  "ERASE" => "1",
84  "ERDEV" => "1",
85  "ERDEV$" => "1",
86  "ERROR" => "1",
87  "EXIT" => "1",
88  "FIELD" => "1",
89  "FILEATTR" => "1",
90  "FOR" => "1",
91  "FUNCTION" => "1",
92  "GET" => "1",
93  "GOSUB" => "1",
94  "GOTO" => "1",
95  "IBM" => "1",
96  "INKEY$" => "1",
97  "INPUT" => "1",
98  "INPUT$" => "1",
99  "INSTR" => "1",
100  "INTEGER" => "1",
101  "INTERRUPT" => "1",
102  "IOCTL" => "1",
103  "IOCTL$" => "1",
104  "LBOUND" => "1",
105  "LEFT" => "1",
106  "LEN" => "1",
107  "LINE" => "1",
108  "LOCATE" => "1",
109  "LOCK" => "1",
110  "LONG" => "1",
111  "LOOP" => "1",
112  "LPRINT" => "1",
113  "LSET" => "1",
114  "MCGA" => "1",
115  "MID$" => "1",
116  "NAME" => "1",
117  "NEXT" => "1",
118  "NOT" => "1",
119  "OFF" => "1",
120  "OPEN" => "1",
121  "OPTION" => "1",
122  "OUTPUT" => "1",
123  "PALETTE" => "1",
124  "PEN" => "1",
125  "PLAY" => "1",
126  "PRINT" => "1",
127  "PSET" => "1",
128  "PUT" => "1",
129  "RANDOM" => "1",
130  "RANDOMIZE" => "1",
131  "READ" => "1",
132  "README" => "1",
133  "REDIM" => "1",
134  "RESTORE" => "1",
135  "RESUME" => "1",
136  "RETURN" => "1",
137  "RIGHT" => "1",
138  "RIGHT$" => "1",
139  "RSET" => "1",
140  "SCREEN" => "1",
141  "SEEK" => "1",
142  "SEG" => "1",
143  "SELECT" => "1",
144  "SETMEM" => "1",
145  "SHARED" => "1",
146  "SHIFT" => "1",
147  "SINGLE" => "1",
148  "STATIC" => "1",
149  "STEP" => "1",
150  "STICK" => "1",
151  "STOP" => "1",
152  "STRIG" => "1",
153  "STRING" => "1",
154  "STRING$" => "1",
155  "SUB" => "1",
156  "THEN" => "1",
157  "TIME$" => "1",
158  "TIMER" => "1",
159  "TYPE" => "1",
160  "UBOUND" => "1",
161  "UCASE$" => "1",
162  "UEVENT" => "1",
163  "UNLOCK" => "1",
164  "UNTIL" => "1",
165  "USING" => "1",
166  "VARPTR" => "1",
167  "VARPTR$" => "1",
168  "VARSEG" => "1",
169  "VGA" => "1",
170  "VIEW" => "1",
171  "WEND" => "1",
172  "WHILE" => "1",
173  "WIDTH" => "1",
174  "WINDOW" => "1",
175  "WRITE" => "1");
176 
177 // Special extensions
178 
179 // Each category can specify a PHP function that returns an altered
180 // version of the keyword.
181 
182 
183 
184 $this->linkscripts = array(
185  "1" => "donothing");
186 }
187 
188 
189 function donothing($keywordin)
190 {
191  return $keywordin;
192 }
193 
194 }?>