ILIAS  release_5-3 Revision v5.3.23-19-g915713cf615
HFile_pbasic.php
Go to the documentation of this file.
1<?php
2$BEAUT_PATH = realpath(".") . "/Services/COPage/syntax_highlight/php";
3if (!isset($BEAUT_PATH)) {
4 return;
5}
6require_once("$BEAUT_PATH/Beautifier/HFile.php");
7 class HFile_pbasic extends HFile
8 {
9 public function HFile_pbasic()
10 {
11 $this->HFile();
12 /*************************************/
13 // Beautifier Highlighting Configuration File
14 // PowerBasic
15 /*************************************/
16 // Flags
17
18 $this->nocase = "1";
19 $this->notrim = "0";
20 $this->perl = "0";
21
22 // Colours
23
24 $this->colours = array("blue", "purple", "gray", "brown");
25 $this->quotecolour = "blue";
26 $this->blockcommentcolour = "green";
27 $this->linecommentcolour = "green";
28
29 // Indent Strings
30
31 $this->indent = array();
32 $this->unindent = array();
33
34 // String characters and delimiters
35
36 $this->stringchars = array();
37 $this->delimiters = array("~", "!", "@", "^", "*", "(", ")", "+", "=", "|", "\\", "{", "}", "[", "]", ":", ";", "\"", "'", " ", " ", ",", ".", "<", ">");
38 $this->escchar = "";
39
40 // Comment settings
41
42 $this->linecommenton = array("'");
43 $this->blockcommenton = array("");
44 $this->blockcommentoff = array("");
45
46 // Keywords (keyword mapping to colour number)
47
48 $this->keywords = array(
49 "#Compile" => "1",
50 "#Debug" => "1",
51 "#Dim" => "1",
52 "#Else" => "1",
53 "#ElseIf" => "1",
54 "#EndIf" => "1",
55 "#If" => "1",
56 "#Include" => "1",
57 "#Option" => "1",
58 "#Register" => "1",
59 "#Resource" => "1",
60 "#Segment" => "1",
61 "#Stack" => "1",
62 "$Compile" => "2",
63 "$Debug" => "2",
64 "$Dim" => "2",
65 "$Else" => "2",
66 "$ElseIf" => "2",
67 "$EndIf" => "2",
68 "$If" => "2",
69 "$Include" => "2",
70 "$Option" => "2",
71 "$Register" => "2",
72 "$Resource" => "2",
73 "$Segment" => "2",
74 "$Stack" => "2",
75 "%Def" => "3",
76 "Abs" => "4",
77 "AcceptAccess" => "4",
78 "Addr" => "4",
79 "Alias" => "4",
80 "All" => "4",
81 "And" => "4",
82 "Any" => "4",
83 "Append" => "4",
84 "Array" => "4",
85 "As" => "4",
86 "Asc" => "4",
87 "Ascend" => "4",
88 "Asciiz" => "4",
89 "Asm" => "4",
90 "At" => "4",
91 "Atn" => "4",
92 "Attach" => "4",
93 "Attrib" => "4",
94 "Base" => "4",
95 "Baud" => "4",
96 "Bdecl" => "4",
97 "Beep" => "4",
98 "Bin$" => "4",
99 "Binary" => "4",
100 "Bit" => "4",
101 "Bits%" => "4",
102 "Bits&" => "4",
103 "Bits?" => "4",
104 "Bits??" => "4",
105 "Bits???" => "4",
106 "Break" => "4",
107 "ByCopy" => "4",
108 "ByRef" => "4",
109 "Byte" => "4",
110 "ByVal" => "4",
111 "Call" => "4",
112 "Case" => "4",
113 "CByt" => "4",
114 "CCur" => "4",
115 "CCux" => "4",
116 "Cd" => "4",
117 "CDbl" => "4",
118 "Cdecl" => "4",
119 "CDwd" => "4",
120 "Ceil" => "4",
121 "Cext" => "4",
122 "ChDir" => "4",
123 "ChDrive" => "4",
124 "Chr$" => "4",
125 "CInt" => "4",
126 "CLng" => "4",
127 "Close" => "4",
128 "Cls" => "4",
129 "CodePtr" => "4",
130 "Collate" => "4",
131 "Color" => "4",
132 "Comm" => "4",
133 "Command$" => "4",
134 "Con" => "4",
135 "ConsIn" => "4",
136 "ConsName$" => "4",
137 "Console" => "4",
138 "ConsOut" => "4",
139 "Cos" => "4",
140 "CQud" => "4",
141 "Create" => "4",
142 "CSng" => "4",
143 "CtsFlow" => "4",
144 "Cur" => "4",
145 "CurDir$" => "4",
146 "Currency" => "4",
147 "CurrencyX" => "4",
148 "Cursor" => "4",
149 "CursorX" => "4",
150 "CursorY" => "4",
151 "Cux" => "4",
152 "CvByt" => "4",
153 "CvCur" => "4",
154 "CvCux" => "4",
155 "Cvd" => "4",
156 "CvDwd" => "4",
157 "Cve" => "4",
158 "Cvi" => "4",
159 "Cvl" => "4",
160 "Cvq" => "4",
161 "Cvs" => "4",
162 "CvWrd" => "4",
163 "CWrd" => "4",
164 "Data" => "4",
165 "DataCount" => "4",
166 "Date$" => "4",
167 "Declare" => "4",
168 "Decr" => "4",
169 "Default" => "4",
170 "DefByt" => "4",
171 "DefCur" => "4",
172 "DefCux" => "4",
173 "DefDbl" => "4",
174 "DefDwd" => "4",
175 "DefExt" => "4",
176 "DefInt" => "4",
177 "DefLng" => "4",
178 "DefQud" => "4",
179 "DefSng" => "4",
180 "DefStr" => "4",
181 "DefWrd" => "4",
182 "Delete" => "4",
183 "Descend" => "4",
184 "Dim" => "4",
185 "Dir$" => "4",
186 "DiskFree" => "4",
187 "DiskSize" => "4",
188 "Dll" => "4",
189 "Do" => "4",
190 "Double" => "4",
191 "Down" => "4",
192 "DseFlow" => "4",
193 "DsrSens" => "4",
194 "DtrFlow" => "4",
195 "DtrLine" => "4",
196 "Dword" => "4",
197 "Else" => "4",
198 "ElseIf" => "4",
199 "End" => "4",
200 "Environ$" => "4",
201 "Eof" => "4",
202 "Eqv" => "4",
203 "Erase" => "4",
204 "Err" => "4",
205 "ErrApi" => "4",
206 "ErrClear" => "4",
207 "Error" => "4",
208 "Exe" => "4",
209 "Exit" => "4",
210 "Exp" => "4",
211 "Exp10" => "4",
212 "Exp2" => "4",
213 "Explicit" => "4",
214 "Export" => "4",
215 "Ext" => "4",
216 "Extended" => "4",
217 "Extract$" => "4",
218 "Far" => "4",
219 "FileAttr" => "4",
220 "FileCopy" => "4",
221 "FileName$" => "4",
222 "Fix" => "4",
223 "Flush" => "4",
224 "For" => "4",
225 "Format$" => "4",
226 "FormFeed" => "4",
227 "Frac" => "4",
228 "FreeFile" => "4",
229 "From" => "4",
230 "Function" => "4",
231 "Get" => "4",
232 "Get$" => "4",
233 "GetAttr" => "4",
234 "GetStdErr" => "4",
235 "GetStdIn" => "4",
236 "GetStdOut" => "4",
237 "Global" => "4",
238 "GoSub" => "4",
239 "GoTo" => "4",
240 "Handle" => "4",
241 "Hex$" => "4",
242 "HiByt" => "4",
243 "HiWrd" => "4",
244 "Host" => "4",
245 "Idn" => "4",
246 "If" => "4",
247 "Imp" => "4",
248 "In" => "4",
249 "Incr" => "4",
250 "InKey$" => "4",
251 "Input" => "4",
252 "Input#" => "4",
253 "Input$" => "4",
254 "Insert" => "4",
255 "InShift" => "4",
256 "InStat" => "4",
257 "Instr" => "4",
258 "Int" => "4",
259 "Integer" => "4",
260 "Inv" => "4",
261 "IsFalse" => "4",
262 "IsTrue" => "4",
263 "Iterate" => "4",
264 "Kill" => "4",
265 "LBound" => "4",
266 "LCase$" => "4",
267 "Left" => "4",
268 "Left$" => "4",
269 "Len" => "4",
270 "Let" => "4",
271 "Lib" => "4",
272 "Line" => "4",
273 "LoByt" => "4",
274 "Loc" => "4",
275 "Local" => "4",
276 "Locate" => "4",
277 "Lock" => "4",
278 "Lof" => "4",
279 "Log" => "4",
280 "Log10" => "4",
281 "Log2" => "4",
282 "Long" => "4",
283 "Loop" => "4",
284 "LoWrd" => "4",
285 "Lprint" => "4",
286 "Lprint$" => "4",
287 "Lset" => "4",
288 "Ltrim$" => "4",
289 "MakDwd" => "4",
290 "MakLng" => "4",
291 "MakPtr" => "4",
292 "Mat" => "4",
293 "Max" => "4",
294 "Max$" => "4",
295 "Max%" => "4",
296 "Max&" => "4",
297 "MCase$" => "4",
298 "Mid$" => "4",
299 "Min" => "4",
300 "Min$" => "4",
301 "Min%" => "4",
302 "Min&" => "4",
303 "MkByt$" => "4",
304 "MkCur$" => "4",
305 "MkCux$" => "4",
306 "Mkd$" => "4",
307 "MkDir" => "4",
308 "MkDwd$" => "4",
309 "Mke$" => "4",
310 "Mki$" => "4",
311 "Mkl$" => "4",
312 "Mkq$" => "4",
313 "Mks$" => "4",
314 "MkWrd$" => "4",
315 "Mod" => "4",
316 "Mouse" => "4",
317 "MouseButtons" => "4",
318 "MouseStat" => "4",
319 "MouseX" => "4",
320 "MouseY" => "4",
321 "Move" => "4",
322 "Name" => "4",
323 "Next" => "4",
324 "None" => "4",
325 "Not" => "4",
326 "Notify" => "4",
327 "Null" => "4",
328 "Oct$" => "4",
329 "Of" => "4",
330 "Off" => "4",
331 "On" => "4",
332 "Open" => "4",
333 "Option" => "4",
334 "Or" => "4",
335 "Output" => "4",
336 "Page" => "4",
337 "Parity" => "4",
338 "ParityChar" => "4",
339 "ParityRepl" => "4",
340 "ParityType" => "4",
341 "Parse$" => "4",
342 "ParseCount" => "4",
343 "Pbd" => "4",
344 "PbDebug" => "4",
345 "PbMain" => "4",
346 "Pcopy" => "4",
347 "Peek" => "4",
348 "Peek$" => "4",
349 "Pointer" => "4",
350 "Poke" => "4",
351 "Poke$" => "4",
352 "Port" => "4",
353 "Preserve" => "4",
354 "Print" => "4",
355 "Print#" => "4",
356 "Private" => "4",
357 "Ptr" => "4",
358 "Put" => "4",
359 "Put$" => "4",
360 "Quad" => "4",
361 "Random" => "4",
362 "Randomize" => "4",
363 "Read" => "4",
364 "Read$" => "4",
365 "Recv" => "4",
366 "ReDim" => "4",
367 "RegExpr" => "4",
368 "Register" => "4",
369 "RegRepl" => "4",
370 "Rem" => "4",
371 "Remain$" => "4",
372 "Remove$" => "4",
373 "Repeat$" => "4",
374 "Replace" => "4",
375 "Reset" => "4",
376 "Resume" => "4",
377 "Ret16" => "4",
378 "Ret32" => "4",
379 "Ret87" => "4",
380 "Retp16" => "4",
381 "Retp32" => "4",
382 "RetPrm" => "4",
383 "Return" => "4",
384 "Rgb" => "4",
385 "Right" => "4",
386 "Right$" => "4",
387 "Ring" => "4",
388 "Rlsd" => "4",
389 "RmDir" => "4",
390 "Rnd" => "4",
391 "Rotate" => "4",
392 "Round" => "4",
393 "Rset" => "4",
394 "Rtrim$" => "4",
395 "RtsFlow" => "4",
396 "RxBuffer" => "4",
397 "RxQue" => "4",
398 "Scan" => "4",
399 "Screen" => "4",
400 "ScreenAttr" => "4",
401 "ScreenX" => "4",
402 "ScreenY" => "4",
403 "Scroll" => "4",
404 "Sdecl" => "4",
405 "Seek" => "4",
406 "Select" => "4",
407 "Send" => "4",
408 "Set" => "4",
409 "SetAttr" => "4",
410 "SetEof" => "4",
411 "Sgn" => "4",
412 "Shared" => "4",
413 "Shell" => "4",
414 "Shift" => "4",
415 "Signed" => "4",
416 "Sin" => "4",
417 "Single" => "4",
418 "SizeOf" => "4",
419 "Sleep" => "4",
420 "Sort" => "4",
421 "Space$" => "4",
422 "Spc" => "4",
423 "Sqr" => "4",
424 "Static" => "4",
425 "Status" => "4",
426 "StdCall" => "4",
427 "StdEof" => "4",
428 "StdErr" => "4",
429 "StdIn" => "4",
430 "StdOut" => "4",
431 "Step" => "4",
432 "Str$" => "4",
433 "StrDelete$" => "4",
434 "String" => "4",
435 "String$" => "4",
436 "StrInsert$" => "4",
437 "Stop" => "4",
438 "StrPtr" => "4",
439 "StrReverse$" => "4",
440 "Sub" => "4",
441 "Suspend" => "4",
442 "Swap" => "4",
443 "Tab" => "4",
444 "TagArray" => "4",
445 "Tally" => "4",
446 "Tan" => "4",
447 "Tcp" => "4",
448 "Then" => "4",
449 "Thread" => "4",
450 "Time$" => "4",
451 "TimeOut" => "4",
452 "Timer" => "4",
453 "To" => "4",
454 "Toggle" => "4",
455 "Trim$" => "4",
456 "Trn" => "4",
457 "Type" => "4",
458 "TxBuffer" => "4",
459 "TxQue" => "4",
460 "UBound" => "4",
461 "Ucase" => "4",
462 "UCase$" => "4",
463 "Udp" => "4",
464 "Union" => "4",
465 "UnLock" => "4",
466 "Until" => "4",
467 "Up" => "4",
468 "Using" => "4",
469 "Val" => "4",
470 "VarPtr" => "4",
471 "Verify" => "4",
472 "Version3" => "4",
473 "Version4" => "4",
474 "Version5" => "4",
475 "WaitKey$" => "4",
476 "WaitStat" => "4",
477 "Wend" => "4",
478 "While" => "4",
479 "Width" => "4",
480 "With" => "4",
481 "Word" => "4",
482 "Write" => "4",
483 "XinpFlow" => "4",
484 "XoutFlow" => "4",
485 "Xor" => "4",
486 "Zer" => "4");
487
488 // Special extensions
489
490 // Each category can specify a PHP function that returns an altered
491 // version of the keyword.
492
493
494
495 $this->linkscripts = array(
496 "1" => "donothing",
497 "2" => "donothing",
498 "3" => "donothing",
499 "4" => "donothing");
500 }
501
502
503 public function donothing($keywordin)
504 {
505 return $keywordin;
506 }
507 }
$BEAUT_PATH
Definition: HFile_pbasic.php:2
An exception for terminatinating execution or to throw for unit testing.
donothing($keywordin)