ILIAS  release_5-3 Revision v5.3.23-19-g915713cf615
HFile_clearbasic.php
Go to the documentation of this file.
1 <?php
2 $BEAUT_PATH = realpath(".") . "/Services/COPage/syntax_highlight/php";
3 if (!isset($BEAUT_PATH)) {
4  return;
5 }
6 require_once("$BEAUT_PATH/Beautifier/HFile.php");
7  class HFile_clearbasic extends HFile
8  {
9  public function HFile_clearbasic()
10  {
11  $this->HFile();
12  /*************************************/
13  // Beautifier Highlighting Configuration File
14  // ClearBasic
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", "gray", "purple", "gray", "brown", "blue", "purple");
25  $this->quotecolour = "blue";
26  $this->blockcommentcolour = "green";
27  $this->linecommentcolour = "green";
28 
29  // Indent Strings
30 
31  $this->indent = array("Then", "Do");
32  $this->unindent = array("End", "Next", "End If", "End Select", "Loop");
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  "AppMenu" => "1",
50  "Boolean" => "1",
51  "BulkRetrieve" => "1",
52  "BulkSave" => "1",
53  "Form" => "1",
54  "Integer" => "7",
55  "List" => "1",
56  "Long" => "7",
57  "Record" => "1",
58  "SQLDB" => "1",
59  "String" => "7",
60  "AND" => "2",
61  "As" => "2",
62  "ByRef" => "2",
63  "ByVal" => "2",
64  "Case" => "2",
65  "Declare" => "2",
66  "Dim" => "2",
67  "Else" => "2",
68  "ElseIf" => "2",
69  "End" => "2",
70  "For" => "2",
71  "Function" => "2",
72  "Global" => "2",
73  "If" => "2",
74  "Next" => "2",
75  "New" => "2",
76  "NOT" => "2",
77  "OR" => "2",
78  "Sub" => "2",
79  "Select" => "2",
80  "Set" => "2",
81  "Step" => "2",
82  "To" => "2",
83  "Type" => "2",
84  "Then" => "2",
85  "While" => "2",
86  "cbAbortRetryIgnore" => "3",
87  "cbAscending" => "3",
88  "cbByRef" => "3",
89  "cbByValue" => "3",
90  "cbCloseChildren" => "3",
91  "cbCloseMessage" => "3",
92  "cbDescending" => "3",
93  "cbDefClosedWindow" => "3",
94  "cbEqual" => "3",
95  "cbFirstMessage" => "3",
96  "cbFrontIfUp" => "3",
97  "cbGreater" => "3",
98  "cbGreaterorEqual" => "3",
99  "cbIdAbort" => "3",
100  "cbIdCancel" => "3",
101  "cbIdDiscard" => "3",
102  "cbIdIgnore" => "3",
103  "cbIdNo" => "3",
104  "cbIdOK" => "3",
105  "cbIdRetry" => "3",
106  "cbIdSave" => "3",
107  "cbIdYes" => "3",
108  "cbIn" => "3",
109  "cbLess" => "3",
110  "cbLessOrEqual" => "3",
111  "cbLike" => "3",
112  "cbNoDefault" => "3",
113  "cbNotEqual" => "3",
114  "cbNotLike" => "3",
115  "cbOK" => "3",
116  "cbOKCancel" => "3",
117  "cbRefreshMessage" => "3",
118  "cbRetryCancel" => "3",
119  "cbSaveDiscardCancel" => "3",
120  "cbSoundsLike" => "3",
121  "cbYesNo" => "3",
122  "cbYesNoCancel" => "3",
123  "ebCritical" => "3",
124  "ebExclamation" => "3",
125  "ebInformation" => "3",
126  "ebQuestion" => "3",
127  "ebApplicationModal" => "3",
128  "ebSystemModal" => "3",
129  "False" => "3",
130  "True" => "3",
131  "*" => "4",
132  "+" => "4",
133  "-" => "4",
134  "." => "4",
135  "/" => "4",
136  ":" => "4",
137  "<" => "4",
138  "<=" => "4",
139  "=" => "4",
140  ">" => "4",
141  ">=" => "4",
142  "&" => "4",
143  "AddItem" => "5",
144  "AllSpaces" => "5",
145  "AllowDuplicates" => "5",
146  "AppendFilter" => "5",
147  "AppendItem" => "5",
148  "AppendSeparator" => "5",
149  "AppendSort" => "5",
150  "Caption" => "5",
151  "CancelRecord" => "5",
152  "ChangeRecord" => "5",
153  "ChangeToNew" => "5",
154  "Clear" => "5",
155  "Close" => "5",
156  "CLTransition" => "5",
157  "ColorCells" => "5",
158  "Concat" => "5",
159  "Connect" => "5",
160  "Contains" => "5",
161  "Contents" => "5",
162  "Copy" => "5",
163  "CopyFields" => "5",
164  "Count" => "5",
165  "CountByType" => "5",
166  "CreateColorScheme" => "5",
167  "DeleteRecord" => "5",
168  "DeleteRecordById" => "5",
169  "DisableControls" => "5",
170  "DisableControlsDeep" => "5",
171  "Disconnect" => "5",
172  "DoDefault" => "5",
173  "Down" => "5",
174  "EmployeeObjid" => "5",
175  "Empty" => "5",
176  "Enable" => "5",
177  "EnableControlDeep" => "5",
178  "EnableControls" => "5",
179  "EndDoc" => "5",
180  "EntryCount" => "5",
181  "Execute" => "5",
182  "ExecuteCB" => "5",
183  "ExecuteMenu" => "5",
184  "ExecuteProc" => "5",
185  "ExitApp" => "5",
186  "ExtractList" => "5",
187  "Fill" => "5",
188  "FindFirstIndex" => "5",
189  "ForceRedraw" => "5",
190  "Format" => "5",
191  "GetByIndex" => "5",
192  "GetContents" => "5",
193  "GetContext" => "5",
194  "GetControlByName" => "5",
195  "GetCurrentDB" => "5",
196  "GetField" => "5",
197  "GetFormat" => "5",
198  "GetFormInstance" => "5",
199  "GetItemByIndex" => "5",
200  "GetList" => "5",
201  "GetRecordByIndex" => "5",
202  "GetRecordList" => "5",
203  "GetRelatedRecordList" => "5",
204  "GetSelected" => "5",
205  "GetString" => "5",
206  "GetText" => "5",
207  "InputBox" => "5",
208  "InsertRecord" => "5",
209  "IsDirty" => "5",
210  "IsEnabled" => "5",
211  "IsExactly" => "5",
212  "IsNew" => "5",
213  "ItemType" => "5",
214  "ItemByIndex" => "5",
215  "Line" => "5",
216  "ListByIndex" => "5",
217  "Login" => "5",
218  "Logout" => "5",
219  "LogSQL" => "5",
220  "Move" => "5",
221  "MsgBox" => "5",
222  "NewPage" => "5",
223  "Notify" => "5",
224  "NotifyById" => "5",
225  "NotifyByKey" => "5",
226  "NotifyChild" => "5",
227  "NotifyParent" => "5",
228  "NotifyTab" => "5",
229  "NotifyTabParent" => "5",
230  "Print" => "5",
231  "RecordType" => "5",
232  "Refresh" => "5",
233  "RelateRecords" => "5",
234  "RelateRecordsFromID" => "5",
235  "RelateRecordsFromToID" => "5",
236  "RelateRecordsToID" => "5",
237  "RemoveByIndex" => "5",
238  "RemoveByItem" => "5",
239  "RemoveItem" => "5",
240  "RemoveSelected" => "5",
241  "RenameItem" => "5",
242  "ReplaceByIndex" => "5",
243  "ReplaceItem" => "5",
244  "RetrieveRecords" => "5",
245  "Save" => "5",
246  "SelectedIndexes" => "5",
247  "SelectedList" => "5",
248  "SetCellColoring" => "5",
249  "SetColorScheme" => "5",
250  "SetField" => "5",
251  "SetFocus" => "5",
252  "SetFunction" => "5",
253  "SetParent" => "5",
254  "SetRoot" => "5",
255  "SetRootById" => "5",
256  "SetSelected" => "5",
257  "SetText" => "5",
258  "SetValue" => "5",
259  "Show" => "5",
260  "ShowAttachments" => "5",
261  "ShowCase" => "5",
262  "ShowContact" => "5",
263  "ShowContract" => "5",
264  "ShowControls" => "5",
265  "ShowControlsDeep" => "5",
266  "ShowCR" => "5",
267  "ShowDebugWindow" => "5",
268  "ShowDefaultMenu" => "5",
269  "ShowEmployee" => "5",
270  "ShowFTS" => "5",
271  "ShowSelect" => "5",
272  "ShowSite" => "5",
273  "ShowSubcase" => "5",
274  "SimpleQuery" => "5",
275  "Sort" => "5",
276  "TextHeight" => "5",
277  "TextWidth" => "5",
278  "TransferPart" => "5",
279  "TraverseFromParent" => "5",
280  "TraverseFromRoot" => "5",
281  "UnrelateRecords" => "5",
282  "Unselect" => "5",
283  "Up" => "5",
284  "UpdateRecord" => "5",
285  "UserName" => "5",
286  "UserObjid" => "5",
287  "Value" => "5",
288  "App" => "6",
289  "Basic" => "6",
290  "Debug" => "6",
291  "Err" => "6",
292  "Me" => "6",
293  "Msg" => "6",
294  "Net" => "6",
295  "Printer" => "6",
296  "System" => "6",
297  "Abs" => "7",
298  "ActivateControl" => "7",
299  "AddCon" => "7",
300  "AnswerBox" => "7",
301  "AppActivate" => "7",
302  "AppClose" => "7",
303  "AppFileName" => "7",
304  "AppFind" => "7",
305  "AppGetActive" => "7",
306  "AppGetPosition" => "7",
307  "AppGetState" => "7",
308  "AppHide" => "7",
309  "AppList" => "7",
310  "AppMaximize" => "7",
311  "AppMinimize" => "7",
312  "AppMove" => "7",
313  "AppRestore" => "7",
314  "AppSetState" => "7",
315  "AppShow" => "7",
316  "AppSize" => "7",
317  "AppType" => "7",
318  "Architecture" => "7",
319  "ArrangeIcons" => "7",
320  "ArrayDims" => "7",
321  "Arrays" => "7",
322  "ArraySort" => "7",
323  "Asc" => "7",
324  "AscB" => "7",
325  "AscW" => "7",
326  "AskBox" => "7",
327  "AskPasssword" => "7",
328  "Atn" => "7",
329  "Base" => "7",
330  "BasicScript" => "7",
331  "Beep" => "7",
332  "Begin" => "7",
333  "Dialog" => "7",
334  "Browse" => "7",
335  "ButtonEnabled" => "7",
336  "ButtonExists" => "7",
337  "Call" => "7",
338  "CancelCon" => "7",
339  "Capability" => "7",
340  "Cascade" => "7",
341  "CBool" => "7",
342  "CCur" => "7",
343  "CDate" => "7",
344  "CDbl" => "7",
345  "ChDir" => "7",
346  "ChDrive" => "7",
347  "CheckBox" => "7",
348  "CheckBoxEnabled" => "7",
349  "CheckBoxExists" => "7",
350  "Choose" => "7",
351  "Chr" => "7",
352  "ChrB" => "7",
353  "ChrW" => "7",
354  "CInt" => "7",
355  "CLng" => "7",
356  "CodePage" => "7",
357  "ComboBox" => "7",
358  "ComboBoxEnabled" => "7",
359  "ComboBoxExists" => "7",
360  "Command" => "7",
361  "Comments" => "7",
362  "Compare" => "7",
363  "Const" => "7",
364  "Conversion" => "7",
365  "Cos" => "7",
366  "CreateObject" => "7",
367  "CSng" => "7",
368  "CStr" => "7",
369  "CStrings" => "7",
370  "CurDir" => "7",
371  "Currency" => "7",
372  "CVar" => "7",
373  "CVDate" => "7",
374  "CVErr" => "7",
375  "Date" => "7",
376  "DateAdd" => "7",
377  "DateDiff" => "7",
378  "DatePart" => "7",
379  "DateSerial" => "7",
380  "DateValue" => "7",
381  "Day" => "7",
382  "DDB" => "7",
383  "DDEExecute" => "7",
384  "DDEInitate" => "7",
385  "DDEPoke" => "7",
386  "DDERequest" => "7",
387  "DDESend" => "7",
388  "DDETermiateAll" => "7",
389  "DDETerminate" => "7",
390  "DDETimeOut" => "7",
391  "Default" => "7",
392  "DefBool" => "7",
393  "DefCur" => "7",
394  "DefDate" => "7",
395  "DefDbl" => "7",
396  "DefInt" => "7",
397  "DefLng" => "7",
398  "DefObj" => "7",
399  "DefSng" => "7",
400  "DefStr" => "7",
401  "DefVar" => "7",
402  "DeleteSettings" => "7",
403  "Description" => "7",
404  "Dir" => "7",
405  "DiskDrives" => "7",
406  "DiskFree" => "7",
407  "DlgBaseUnitsX" => "7",
408  "DlgBaseUnitsY" => "7",
409  "DlgCaption" => "7",
410  "DlgControlID" => "7",
411  "DlgEnable" => "7",
412  "DlgFocus" => "7",
413  "DlgListBoxArray" => "7",
414  "DlgSetPicture" => "7",
415  "DlgText" => "7",
416  "DlgValue" => "7",
417  "DlgVisible" => "7",
418  "Do" => "7",
419  "DoEvents" => "7",
420  "DoKeys" => "7",
421  "Double" => "7",
422  "DropListBox" => "7",
423  "EditEnabled" => "7",
424  "EditExists" => "7",
425  "Environ" => "7",
426  "Eof" => "7",
427  "Eoln$" => "7",
428  "Eqv" => "7",
429  "Erase" => "7",
430  "Erl" => "7",
431  "Error" => "7",
432  "Exit" => "7",
433  "Exp" => "7",
434  "Explicit" => "7",
435  "FileAttr" => "7",
436  "FileCopy" => "7",
437  "FileDateTime" => "7",
438  "FileDirs" => "7",
439  "FileExists" => "7",
440  "FileLen" => "7",
441  "FileList" => "7",
442  "FileParse" => "7",
443  "FileType" => "7",
444  "Financial" => "7",
445  "Fix" => "7",
446  "FreeFile" => "7",
447  "FreeMemory" => "7",
448  "FreeResources" => "7",
449  "FV" => "7",
450  "Get" => "7",
451  "GetAllSettings" => "7",
452  "GetAttr" => "7",
453  "GetCaps" => "7",
454  "GetCheckBox" => "7",
455  "GetComboBoxItem" => "7",
456  "GetComboBoxItemCount" => "7",
457  "GetCon" => "7",
458  "GetEditText" => "7",
459  "GetListBoxItem" => "7",
460  "GetListBoxItemCount" => "7",
461  "GetObject" => "7",
462  "GetOption" => "7",
463  "GetSetting" => "7",
464  "GoSub" => "7",
465  "Goto" => "7",
466  "GroupBox" => "7",
467  "Height" => "7",
468  "HelpContext" => "7",
469  "HelpFIle" => "7",
470  "Hex" => "7",
471  "HLine" => "7",
472  "HomeDir" => "7",
473  "Hour" => "7",
474  "HPage" => "7",
475  "HScroll" => "7",
476  "HWND" => "7",
477  "IIf" => "7",
478  "IMEStatus" => "7",
479  "Imp" => "7",
480  "Inline" => "7",
481  "Input" => "7",
482  "InputB" => "7",
483  "InStr" => "7",
484  "InStrB" => "7",
485  "Int" => "7",
486  "IPmt" => "7",
487  "IRR" => "7",
488  "Is" => "7",
489  "IsDate" => "7",
490  "IsEmpty" => "7",
491  "IsError" => "7",
492  "IsMissing" => "7",
493  "IsNull" => "7",
494  "IsNumeric" => "7",
495  "IsObject" => "7",
496  "Item" => "7",
497  "ItemCount" => "7",
498  "Kill" => "7",
499  "LastDLLError" => "7",
500  "LBound" => "7",
501  "LCase" => "7",
502  "Left" => "7",
503  "LeftB" => "7",
504  "Len" => "7",
505  "LenB" => "7",
506  "Let" => "7",
507  "Like" => "7",
508  "LineCount" => "7",
509  "ListBox" => "7",
510  "ListBoxEnabled" => "7",
511  "ListBoxExists" => "7",
512  "Loc" => "7",
513  "Locale" => "7",
514  "Lock" => "7",
515  "Lof" => "7",
516  "Log" => "7",
517  "Loop" => "7",
518  "LSet" => "7",
519  "LTrim" => "7",
520  "MacID" => "7",
521  "MacScript" => "7",
522  "Main" => "7",
523  "Mci" => "7",
524  "Menu" => "7",
525  "MenuItemChecked" => "7",
526  "MenuItemEnabled" => "7",
527  "MenuItemExists" => "7",
528  "Mid" => "7",
529  "MidB" => "7",
530  "Minute" => "7",
531  "MIRR" => "7",
532  "Miscellaneous" => "7",
533  "MkDir" => "7",
534  "Mod" => "7",
535  "Month" => "7",
536  "MouseTrails" => "7",
537  "Msg.Close" => "7",
538  "Msg.Open" => "7",
539  "Msg.SetText" => "7",
540  "Msg.SetThermometer" => "7",
541  "Name" => "7",
542  "Networks" => "7",
543  "Nothing" => "7",
544  "Now" => "7",
545  "NPer" => "7",
546  "NPV" => "7",
547  "Number" => "7",
548  "Oct" => "7",
549  "On" => "7",
550  "Open" => "7",
551  "OpenFilename" => "7",
552  "OperatingSystem" => "7",
553  "OperatingSystemVendor" => "7",
554  "OperatingSystemVersion" => "7",
555  "Option" => "7",
556  "OptionButton" => "7",
557  "OptionEnabled" => "7",
558  "OptionExists" => "7",
559  "OptionGroup" => "7",
560  "OS" => "7",
561  "PathSeparator" => "7",
562  "Picture" => "7",
563  "PictureButton" => "7",
564  "Pmt" => "7",
565  "PopupMenu" => "7",
566  "PPmt" => "7",
567  "Predefined" => "7",
568  "PrinterGetOrientation" => "7",
569  "PrinterSetOrientation" => "7",
570  "PrintFile" => "7",
571  "Printing" => "7",
572  "Private" => "7",
573  "Processor" => "7",
574  "ProcessorCount" => "7",
575  "Public" => "7",
576  "PushButton" => "7",
577  "Put" => "7",
578  "PV" => "7",
579  "QueEmpty" => "7",
580  "QueFlush" => "7",
581  "QueKeyDn" => "7",
582  "QueKeys" => "7",
583  "QueKeyUp" => "7",
584  "QueMouseClick" => "7",
585  "QueMouseDblClick" => "7",
586  "QueMouseDblDn" => "7",
587  "QueMouseDn" => "7",
588  "QueMouseMove" => "7",
589  "QueMouseMoveBatch" => "7",
590  "QueMouseUp" => "7",
591  "QueSetRelativeWindow" => "7",
592  "Raise" => "7",
593  "Random" => "7",
594  "Randomize" => "7",
595  "Rate" => "7",
596  "ReadIni" => "7",
597  "ReadIniSection" => "7",
598  "ReDim" => "7",
599  "Reset" => "7",
600  "Restart" => "7",
601  "Resume" => "7",
602  "Return" => "7",
603  "Right" => "7",
604  "RightB" => "7",
605  "RmDir" => "7",
606  "Rnd" => "7",
607  "RSet" => "7",
608  "RTrim" => "7",
609  "SaveFilename" => "7",
610  "SaveSetting" => "7",
611  "Second" => "7",
612  "Seek" => "7",
613  "statement" => "7",
614  "SelectBox" => "7",
615  "SelectButton" => "7",
616  "SelectComboBoxItem" => "7",
617  "SelectListBoxItem" => "7",
618  "SendKeys" => "7",
619  "SetAttr" => "7",
620  "SetCheckBox" => "7",
621  "SetColors" => "7",
622  "SetEditText" => "7",
623  "SetOption" => "7",
624  "SetWallpaper" => "7",
625  "Sgn" => "7",
626  "Shell" => "7",
627  "Sin" => "7",
628  "Single" => "7",
629  "Sleep" => "7",
630  "SLN" => "7",
631  "SnaHFileot" => "7",
632  "Source" => "7",
633  "Space" => "7",
634  "Spc" => "7",
635  "SQLBind" => "7",
636  "SQLClose" => "7",
637  "SQLError" => "7",
638  "SQLExecQuery" => "7",
639  "SQLGetSchema" => "7",
640  "SQLOpen" => "7",
641  "SQLRequest" => "7",
642  "SQLRetrieve" => "7",
643  "SQLRetrieveToFile" => "7",
644  "Sqr" => "7",
645  "Stop" => "7",
646  "Str" => "7",
647  "StrComp" => "7",
648  "StrConv" => "7",
649  "Switch" => "7",
650  "SYD" => "7",
651  "Tab" => "7",
652  "Tan" => "7",
653  "Text" => "7",
654  "TextBox" => "7",
655  "Tile" => "7",
656  "Time" => "7",
657  "Timer" => "7",
658  "TimeSerial" => "7",
659  "TimeValue" => "7",
660  "TotalMemory" => "7",
661  "Trim" => "7",
662  "TwipsPerPixelX" => "7",
663  "TwipsPerPixelY" => "7",
664  "UBound" => "7",
665  "UCase" => "7",
666  "Unlock" => "7",
667  "User" => "7",
668  "Val" => "7",
669  "Variants" => "7",
670  "Varient" => "7",
671  "VarType" => "7",
672  "Version" => "7",
673  "Viewport" => "7",
674  "ViewportClear" => "7",
675  "ViewportClose" => "7",
676  "ViewportOpen" => "7",
677  "VLine" => "7",
678  "VPage" => "7",
679  "VScroll" => "7",
680  "Weekday" => "7",
681  "Wend" => "7",
682  "Width" => "7",
683  "Width#" => "7",
684  "WinActivate" => "7",
685  "WinClose" => "7",
686  "WindowsDirectory" => "7",
687  "WindowsVersion" => "7",
688  "WinFind" => "7",
689  "WinList" => "7",
690  "WinMaximize" => "7",
691  "WinMinimize" => "7",
692  "WinMove" => "7",
693  "WinRestore" => "7",
694  "WinSize" => "7",
695  "Word" => "7",
696  "WordCount" => "7",
697  "Write" => "7",
698  "WriteIni" => "7",
699  "Xor" => "7",
700  "Year" => "7");
701 
702  // Special extensions
703 
704  // Each category can specify a PHP function that returns an altered
705  // version of the keyword.
706 
707 
708 
709  $this->linkscripts = array(
710  "1" => "donothing",
711  "7" => "donothing",
712  "2" => "donothing",
713  "3" => "donothing",
714  "4" => "donothing",
715  "5" => "donothing",
716  "6" => "donothing");
717  }
718 
719 
720  public function donothing($keywordin)
721  {
722  return $keywordin;
723  }
724  }
HFile_clearbasic\HFile_clearbasic
HFile_clearbasic()
Definition: HFile_clearbasic.php:9
HFile_clearbasic
Definition: HFile_clearbasic.php:7
HFile_clearbasic\donothing
donothing($keywordin)
Definition: HFile_clearbasic.php:720
array
Create styles array
The data for the language used.
Definition: 40duplicateStyle.php:19
$BEAUT_PATH
$BEAUT_PATH
Definition: HFile_clearbasic.php:2
HFile
Definition: HFile.php:21