ILIAS  release_5-3 Revision v5.3.23-19-g915713cf615
HFile_vb.php
Go to the documentation of this file.
1 <?php
2 
3 $BEAUT_PATH = realpath(".") . "/Services/COPage/syntax_highlight/php";
4 if (!isset($BEAUT_PATH)) {
5  return;
6 }
7 require_once("$BEAUT_PATH/Beautifier/HFile.php");
8  class HFile_vb extends HFile
9  {
10  public function __construct()
11  {
12  parent::__construct();
13 
14  /*************************************/
15  // Beautifier Highlighting Configuration File
16  // Visual Basic
17  /*************************************/
18  // Flags
19 
20  $this->nocase = "1";
21  $this->notrim = "0";
22  $this->perl = "0";
23 
24  // Colours
25 
26  $this->colours = array("blue", "purple", "gray", "brown", "blue", "purple");
27  $this->quotecolour = "blue";
28  $this->blockcommentcolour = "green";
29  $this->linecommentcolour = "green";
30 
31  // Indent Strings
32 
33  $this->indent = array("Private Sub", "Public Sub", "With");
34  $this->unindent = array("End Sub", "End With");
35 
36  // String characters and delimiters
37 
38  $this->stringchars = array();
39  $this->delimiters = array(" ", "(", ")", ".");
40  $this->escchar = "";
41 
42  // Comment settings
43 
44  $this->linecommenton = array("'");
45  $this->blockcommenton = array("");
46  $this->blockcommentoff = array("");
47 
48  // Keywords (keyword mapping to colour number)
49 
50  $this->keywords = array(
51  "Abs" => "1",
52  "Array" => "1",
53  "Asc" => "1",
54  "AscB" => "1",
55  "AscW" => "1",
56  "Atn" => "1",
57  "Avg" => "1",
58  "CBool" => "1",
59  "CByte" => "1",
60  "CCur" => "1",
61  "CDate" => "1",
62  "CDbl" => "1",
63  "Cdec" => "1",
64  "Choose" => "1",
65  "Chr" => "1",
66  "ChrB" => "1",
67  "ChrW" => "1",
68  "CInt" => "1",
69  "CLng" => "1",
70  "Command" => "1",
71  "Cos" => "1",
72  "Count" => "1",
73  "CreateObject" => "1",
74  "CSng" => "1",
75  "CStr" => "1",
76  "CurDir" => "1",
77  "CVar" => "1",
78  "CVDate" => "1",
79  "CVErr" => "1",
80  "Date" => "1",
81  "DateAdd" => "1",
82  "DateDiff" => "1",
83  "DatePart" => "1",
84  "DateSerial" => "1",
85  "DateValue" => "1",
86  "Day" => "1",
87  "DDB" => "1",
88  "Dir" => "1",
89  "DoEvents" => "1",
90  "Environ" => "1",
91  "EOF" => "1",
92  "Error" => "1",
93  "Exp" => "1",
94  "FileAttr" => "1",
95  "FileDateTime" => "1",
96  "FileLen" => "1",
97  "Fix" => "1",
98  "Format" => "1",
99  "FreeFile" => "1",
100  "FV" => "1",
101  "GetAllStrings" => "1",
102  "GetAttr" => "1",
103  "GetAutoServerSettings" => "1",
104  "GetObject" => "1",
105  "GetSetting" => "1",
106  "Hex" => "1",
107  "Hour" => "1",
108  "IIf" => "1",
109  "IMEStatus" => "1",
110  "Input" => "1",
111  "InputB" => "1",
112  "InputBox" => "1",
113  "InStr" => "1",
114  "InstB" => "1",
115  "Int" => "1",
116  "IPmt" => "1",
117  "IsArray" => "1",
118  "IsDate" => "1",
119  "IsEmpty" => "1",
120  "IsError" => "1",
121  "IsMissing" => "1",
122  "IsNull" => "1",
123  "IsNumeric" => "1",
124  "IsObject" => "1",
125  "LBound" => "1",
126  "LCase" => "1",
127  "Left" => "1",
128  "LeftB" => "1",
129  "Len" => "1",
130  "LenB" => "1",
131  "LoadPicture" => "1",
132  "Loc" => "1",
133  "LOF" => "1",
134  "Log" => "1",
135  "LTrim" => "1",
136  "Max" => "1",
137  "Mid" => "1",
138  "MidB" => "1",
139  "Min" => "1",
140  "Minute" => "1",
141  "MIRR" => "1",
142  "Month" => "1",
143  "MsgBox" => "1",
144  "Now" => "1",
145  "NPer" => "1",
146  "NPV" => "1",
147  "Oct" => "1",
148  "Partition" => "1",
149  "Pmt" => "1",
150  "PPmt" => "1",
151  "PV" => "1",
152  "QBColor" => "1",
153  "Rate" => "1",
154  "RGB" => "1",
155  "Right" => "1",
156  "RightB" => "1",
157  "Rnd" => "1",
158  "RTrim" => "1",
159  "Second" => "1",
160  "Seek" => "1",
161  "Sgn" => "1",
162  "Shell" => "1",
163  "Sin" => "1",
164  "SLN" => "1",
165  "Space" => "1",
166  "Spc" => "1",
167  "Sqr" => "1",
168  "StDev" => "1",
169  "StDevP" => "1",
170  "Str" => "1",
171  "StrComp" => "1",
172  "StrConv" => "1",
173  "String" => "1",
174  "Switch" => "1",
175  "Sum" => "1",
176  "SYD" => "1",
177  "Tab" => "1",
178  "Tan" => "1",
179  "Time" => "1",
180  "Timer" => "1",
181  "TimeSerial" => "1",
182  "TimeValue" => "1",
183  "Trim" => "1",
184  "TypeName" => "1",
185  "UBound" => "1",
186  "UCase" => "1",
187  "Val" => "1",
188  "Var" => "1",
189  "VarP" => "1",
190  "VarType" => "1",
191  "Weekday" => "1",
192  "Year" => "1",
193  "Accept" => "2",
194  "Activate" => "2",
195  "Add" => "2",
196  "AddCustom" => "2",
197  "AddFile" => "2",
198  "AddFromFile" => "2",
199  "AddFromTemplate" => "2",
200  "AddItem" => "2",
201  "AddNew" => "2",
202  "AddToAddInToolbar" => "2",
203  "AddToolboxProgID" => "2",
204  "Append" => "2",
205  "AppendChunk" => "2",
206  "Arrange" => "2",
207  "Assert" => "2",
208  "AsyncRead" => "2",
209  "BatchUpdate" => "2",
210  "BeginTrans" => "2",
211  "Bind" => "2",
212  "Cancel" => "2",
213  "CancelAsyncRead" => "2",
214  "CancelBatch" => "2",
215  "CancelUpdate" => "2",
216  "CanPropertyChange" => "2",
217  "CaptureImage" => "2",
218  "CellText" => "2",
219  "CellValue" => "2",
220  "Circle" => "2",
221  "Clear" => "2",
222  "ClearFields" => "2",
223  "ClearSel" => "2",
224  "ClearSelCols" => "2",
225  "Clone" => "2",
226  "Close" => "2",
227  "Cls" => "2",
228  "ColContaining" => "2",
229  "ColumnSize" => "2",
230  "CommitTrans" => "2",
231  "CompactDatabase" => "2",
232  "Compose" => "2",
233  "Connect" => "2",
234  "Copy" => "2",
235  "CopyQueryDef" => "2",
236  "CreateDatabase" => "2",
237  "CreateDragImage" => "2",
238  "CreateEmbed" => "2",
239  "CreateField" => "2",
240  "CreateGroup" => "2",
241  "CreateIndex" => "2",
242  "CreateLink" => "2",
243  "CreatePreparedStatement" => "2",
244  "CreatePropery" => "2",
245  "CreateQuery" => "2",
246  "CreateQueryDef" => "2",
247  "CreateRelation" => "2",
248  "CreateTableDef" => "2",
249  "CreateUser" => "2",
250  "CreateWorkspace" => "2",
251  "Customize" => "2",
252  "Delete" => "2",
253  "DeleteColumnLabels" => "2",
254  "DeleteColumns" => "2",
255  "DeleteRowLabels" => "2",
256  "DeleteRows" => "2",
257  "DoVerb" => "2",
258  "Drag" => "2",
259  "Draw" => "2",
260  "Edit" => "2",
261  "EditCopy" => "2",
262  "EditPaste" => "2",
263  "EndDoc" => "2",
264  "EnsureVisible" => "2",
265  "EstablishConnection" => "2",
266  "Execute" => "2",
267  "ExtractIcon" => "2",
268  "Fetch" => "2",
269  "FetchVerbs" => "2",
270  "Files" => "2",
271  "FillCache" => "2",
272  "Find" => "2",
273  "FindFirst" => "2",
274  "FindItem" => "2",
275  "FindLast" => "2",
276  "FindNext" => "2",
277  "FindPrevious" => "2",
278  "Forward" => "2",
279  "GetBookmark" => "2",
280  "GetChunk" => "2",
281  "GetClipString" => "2",
282  "GetData" => "2",
283  "GetFirstVisible" => "2",
284  "GetFormat" => "2",
285  "GetHeader" => "2",
286  "GetLineFromChar" => "2",
287  "GetNumTicks" => "2",
288  "GetRows" => "2",
289  "GetSelectedPart" => "2",
290  "GetText" => "2",
291  "GetVisibleCount" => "2",
292  "GoBack" => "2",
293  "GoForward" => "2",
294  "Hide" => "2",
295  "HitTest" => "2",
296  "HoldFields" => "2",
297  "Idle" => "2",
298  "InitializeLabels" => "2",
299  "InsertColumnLabels" => "2",
300  "InsertColumns" => "2",
301  "InsertObjDlg" => "2",
302  "InsertRowLabels" => "2",
303  "InsertRows" => "2",
304  "Item" => "2",
305  "KillDoc" => "2",
306  "Layout" => "2",
307  "Line" => "2",
308  "LinkExecute" => "2",
309  "LinkPoke" => "2",
310  "LinkRequest" => "2",
311  "LinkSend" => "2",
312  "Listen" => "2",
313  "LoadFile" => "2",
314  "LoadResData" => "2",
315  "LoadResPicture" => "2",
316  "LoadResString" => "2",
317  "LogEvent" => "2",
318  "MakeCompileFile" => "2",
319  "MakeReplica" => "2",
320  "MoreResults" => "2",
321  "Move" => "2",
322  "MoveData" => "2",
323  "MoveFirst" => "2",
324  "MoveLast" => "2",
325  "MoveNext" => "2",
326  "MovePrevious" => "2",
327  "NavigateTo" => "2",
328  "NewPage" => "2",
329  "NewPassword" => "2",
330  "NextRecordset" => "2",
331  "OLEDrag" => "2",
332  "OnAddinsUpdate" => "2",
333  "OnConnection" => "2",
334  "OnDisconnection" => "2",
335  "OnStartupComplete" => "2",
336  "Open" => "2",
337  "OpenConnection" => "2",
338  "OpenDatabase" => "2",
339  "OpenQueryDef" => "2",
340  "OpenRecordset" => "2",
341  "OpenResultset" => "2",
342  "OpenURL" => "2",
343  "Overlay" => "2",
344  "PaintPicture" => "2",
345  "Paste" => "2",
346  "PastSpecialDlg" => "2",
347  "PeekData" => "2",
348  "Play" => "2",
349  "Point" => "2",
350  "PopulatePartial" => "2",
351  "PopupMenu" => "2",
352  "Print" => "2",
353  "PrintForm" => "2",
354  "PropertyChanged" => "2",
355  "PSet" => "2",
356  "Quit" => "2",
357  "Raise" => "2",
358  "RandomDataFill" => "2",
359  "RandomFillColumns" => "2",
360  "RandomFillRows" => "2",
361  "rdoCreateEnvironment" => "2",
362  "rdoRegisterDataSource" => "2",
363  "ReadFromFile" => "2",
364  "ReadProperty" => "2",
365  "Rebind" => "2",
366  "ReFill" => "2",
367  "Refresh" => "2",
368  "RefreshLink" => "2",
369  "RegisterDatabase" => "2",
370  "Reload" => "2",
371  "Remove" => "2",
372  "RemoveAddInFromToolbar" => "2",
373  "RemoveItem" => "2",
374  "Render" => "2",
375  "RepairDatabase" => "2",
376  "Reply" => "2",
377  "ReplyAll" => "2",
378  "Requery" => "2",
379  "ResetCustom" => "2",
380  "ResetCustomLabel" => "2",
381  "ResolveName" => "2",
382  "RestoreToolbar" => "2",
383  "Resync" => "2",
384  "Rollback" => "2",
385  "RollbackTrans" => "2",
386  "RowBookmark" => "2",
387  "RowContaining" => "2",
388  "RowTop" => "2",
389  "Save" => "2",
390  "SaveAs" => "2",
391  "SaveFile" => "2",
392  "SaveToFile" => "2",
393  "SaveToolbar" => "2",
394  "SaveToOle1File" => "2",
395  "Scale" => "2",
396  "ScaleX" => "2",
397  "ScaleY" => "2",
398  "Scroll" => "2",
399  "Select" => "2",
400  "SelectAll" => "2",
401  "SelectPart" => "2",
402  "SelPrint" => "2",
403  "Send" => "2",
404  "SendData" => "2",
405  "Set" => "2",
406  "SetAutoServerSettings" => "2",
407  "SetData" => "2",
408  "SetFocus" => "2",
409  "SetOption" => "2",
410  "SetSize" => "2",
411  "SetText" => "2",
412  "SetViewport" => "2",
413  "Show" => "2",
414  "ShowColor" => "2",
415  "ShowFont" => "2",
416  "ShowHelp" => "2",
417  "ShowOpen" => "2",
418  "ShowPrinter" => "2",
419  "ShowSave" => "2",
420  "ShowWhatsThis" => "2",
421  "SignOff" => "2",
422  "SignOn" => "2",
423  "Size" => "2",
424  "Span" => "2",
425  "SplitContaining" => "2",
426  "StartLabelEdit" => "2",
427  "StartLogging" => "2",
428  "Stop" => "2",
429  "Synchronize" => "2",
430  "TextHeight" => "2",
431  "TextWidth" => "2",
432  "ToDefaults" => "2",
433  "TwipsToChartPart" => "2",
434  "TypeByChartType" => "2",
435  "Update" => "2",
436  "UpdateControls" => "2",
437  "UpdateRecord" => "2",
438  "UpdateRow" => "2",
439  "Upto" => "2",
440  "WhatsThisMode" => "2",
441  "WriteProperty" => "2",
442  "ZOrder" => "2",
443  "AccessKeyPress" => "3",
444  "AfterAddFile" => "3",
445  "AfterChangeFileName" => "3",
446  "AfterCloseFile" => "3",
447  "AfterColEdit" => "3",
448  "AfterColUpdate" => "3",
449  "AfterDelete" => "3",
450  "AfterInsert" => "3",
451  "AfterLabelEdit" => "3",
452  "AfterRemoveFile" => "3",
453  "AfterUpdate" => "3",
454  "AfterWriteFile" => "3",
455  "AmbienChanged" => "3",
456  "ApplyChanges" => "3",
457  "Associate" => "3",
458  "AsyncReadComplete" => "3",
459  "AxisActivated" => "3",
460  "AxisLabelActivated" => "3",
461  "AxisLabelSelected" => "3",
462  "AxisLabelUpdated" => "3",
463  "AxisSelected" => "3",
464  "AxisTitleActivated" => "3",
465  "AxisTitleSelected" => "3",
466  "AxisTitleUpdated" => "3",
467  "AxisUpdated" => "3",
468  "BeforeClick" => "3",
469  "BeforeColEdit" => "3",
470  "BeforeColUpdate" => "3",
471  "BeforeConnect" => "3",
472  "BeforeDelete" => "3",
473  "BeforeInsert" => "3",
474  "BeforeLabelEdit" => "3",
475  "BeforeLoadFile" => "3",
476  "BeforeUpdate" => "3",
477  "ButtonClick" => "3",
478  "ButtonCompleted" => "3",
479  "ButtonGotFocus" => "3",
480  "ButtonLostFocus" => "3",
481  "Change" => "3",
482  "ChartActivated" => "3",
483  "ChartSelected" => "3",
484  "ChartUpdated" => "3",
485  "Click" => "3",
486  "ColEdit" => "3",
487  "Collapse" => "3",
488  "ColResize" => "3",
489  "ColumnClick" => "3",
490  "Compare" => "3",
491  "ConfigChageCancelled" => "3",
492  "ConfigChanged" => "3",
493  "ConnectionRequest" => "3",
494  "DataArrival" => "3",
495  "DataChanged" => "3",
496  "DataUpdated" => "3",
497  "DblClick" => "3",
498  "Deactivate" => "3",
499  "DeviceArrival" => "3",
500  "DeviceOtherEvent" => "3",
501  "DeviceQueryRemove" => "3",
502  "DeviceQueryRemoveFailed" => "3",
503  "DeviceRemoveComplete" => "3",
504  "DeviceRemovePending" => "3",
505  "DevModeChange" => "3",
506  "Disconnect" => "3",
507  "DisplayChanged" => "3",
508  "Dissociate" => "3",
509  "DoGetNewFileName" => "3",
510  "Done" => "3",
511  "DonePainting" => "3",
512  "DownClick" => "3",
513  "DragDrop" => "3",
514  "DragOver" => "3",
515  "DropDown" => "3",
516  "EditProperty" => "3",
517  "EnterCell" => "3",
518  "EnterFocus" => "3",
519  "Event" => "4",
520  "ExitFocus" => "3",
521  "Expand" => "3",
522  "FootnoteActivated" => "3",
523  "FootnoteSelected" => "3",
524  "FootnoteUpdated" => "3",
525  "GotFocus" => "3",
526  "HeadClick" => "3",
527  "InfoMessage" => "3",
528  "Initialize" => "3",
529  "IniProperties" => "3",
530  "ItemActivated" => "3",
531  "ItemAdded" => "3",
532  "ItemCheck" => "3",
533  "ItemClick" => "3",
534  "ItemReloaded" => "3",
535  "ItemRemoved" => "3",
536  "ItemRenamed" => "3",
537  "ItemSeletected" => "3",
538  "KeyDown" => "3",
539  "KeyPress" => "3",
540  "KeyUp" => "3",
541  "LeaveCell" => "3",
542  "LegendActivated" => "3",
543  "LegendSelected" => "3",
544  "LegendUpdated" => "3",
545  "LinkClose" => "3",
546  "LinkError" => "3",
547  "LinkNotify" => "3",
548  "LinkOpen" => "3",
549  "Load" => "3",
550  "LostFocus" => "3",
551  "MouseDown" => "3",
552  "MouseMove" => "3",
553  "MouseUp" => "3",
554  "NodeClick" => "3",
555  "ObjectMove" => "3",
556  "OLECompleteDrag" => "3",
557  "OLEDragDrop" => "3",
558  "OLEDragOver" => "3",
559  "OLEGiveFeedback" => "3",
560  "OLESetData" => "3",
561  "OLEStartDrag" => "3",
562  "OnAddNew" => "3",
563  "OnComm" => "3",
564  "Paint" => "3",
565  "PanelClick" => "3",
566  "PanelDblClick" => "3",
567  "PathChange" => "3",
568  "PatternChange" => "3",
569  "PlotActivated" => "3",
570  "PlotSelected" => "3",
571  "PlotUpdated" => "3",
572  "PointActivated" => "3",
573  "PointLabelActivated" => "3",
574  "PointLabelSelected" => "3",
575  "PointLabelUpdated" => "3",
576  "PointSelected" => "3",
577  "PointUpdated" => "3",
578  "PowerQuerySuspend" => "3",
579  "PowerResume" => "3",
580  "PowerStatusChanged" => "3",
581  "PowerSuspend" => "3",
582  "QueryChangeConfig" => "3",
583  "QueryComplete" => "3",
584  "QueryCompleted" => "3",
585  "QueryTimeout" => "3",
586  "QueryUnload" => "3",
587  "ReadProperties" => "3",
588  "Reposition" => "3",
589  "RequestChangeFileName" => "3",
590  "RequestWriteFile" => "3",
591  "Resize" => "3",
592  "ResultsChanged" => "3",
593  "RowColChange" => "3",
594  "RowCurrencyChange" => "3",
595  "RowResize" => "3",
596  "RowStatusChanged" => "3",
597  "SelChange" => "3",
598  "SelectionChanged" => "3",
599  "SendComplete" => "3",
600  "SendProgress" => "3",
601  "SeriesActivated" => "3",
602  "SeriesSelected" => "3",
603  "SeriesUpdated" => "3",
604  "SettingChanged" => "3",
605  "SplitChange" => "3",
606  "StateChanged" => "3",
607  "StatusUpdate" => "3",
608  "SysColorsChanged" => "3",
609  "Terminate" => "3",
610  "TimeChanged" => "3",
611  "TitleActivated" => "3",
612  "TitleSelected" => "3",
613  "UnboundAddData" => "3",
614  "UnboundDeleteRow" => "3",
615  "UnboundGetRelativeBookmark" => "3",
616  "UnboundReadData" => "3",
617  "UnboundWriteData" => "3",
618  "Unload" => "3",
619  "UpClick" => "3",
620  "Updated" => "3",
621  "Validate" => "3",
622  "ValidationError" => "3",
623  "WillAssociate" => "3",
624  "WillChangeData" => "3",
625  "WillDissociate" => "3",
626  "WillExecute" => "3",
627  "WillUpdateRows" => "3",
628  "WithEvents" => "3",
629  "WriteProperties" => "3",
630  "AppActivate" => "4",
631  "Base" => "4",
632  "Beep" => "4",
633  "Call" => "4",
634  "Case" => "4",
635  "ChDir" => "4",
636  "ChDrive" => "4",
637  "Const" => "4",
638  "Declare" => "4",
639  "DefBool" => "4",
640  "DefByte" => "4",
641  "DefCur" => "4",
642  "DefDate" => "4",
643  "DefDbl" => "4",
644  "DefDec" => "4",
645  "DefInt" => "4",
646  "DefLng" => "4",
647  "DefObj" => "4",
648  "DefSng" => "4",
649  "DefStr" => "4",
650  "Deftype" => "4",
651  "DefVar" => "4",
652  "DeleteSetting" => "4",
653  "Dim" => "4",
654  "Do" => "4",
655  "Else" => "4",
656  "ElseIf" => "4",
657  "End" => "4",
658  "Enum" => "4",
659  "Erase" => "4",
660  "Exit" => "4",
661  "Explicit" => "4",
662  "False" => "4",
663  "FileCopy" => "4",
664  "For" => "4",
665  "ForEach" => "4",
666  "Friend" => "4",
667  "Function" => "4",
668  "Get" => "4",
669  "GoSub" => "4",
670  "GoTo" => "4",
671  "Height" => "4",
672  "If" => "4",
673  "Implements" => "4",
674  "Kill" => "4",
675  "Left" => "4",
676  "Let" => "4",
677  "LineInput" => "4",
678  "Lock" => "4",
679  "Loop" => "4",
680  "LSet" => "4",
681  "MkDir" => "4",
682  "Name" => "4",
683  "Next" => "4",
684  "Not" => "4",
685  "OnError" => "4",
686  "On" => "4",
687  "Option" => "4",
688  "Private" => "4",
689  "Property" => "4",
690  "Public" => "4",
691  "Put" => "4",
692  "RaiseEvent" => "4",
693  "Randomize" => "4",
694  "ReDim" => "4",
695  "Rem" => "4",
696  "Reset" => "4",
697  "Resume" => "4",
698  "Return" => "4",
699  "RmDir" => "4",
700  "RSet" => "4",
701  "SavePicture" => "4",
702  "SaveSetting" => "4",
703  "SendKeys" => "4",
704  "SetAttr" => "4",
705  "Static" => "4",
706  "Sub" => "4",
707  "Then" => "4",
708  "Top" => "4",
709  "True" => "4",
710  "Type" => "4",
711  "Unlock" => "4",
712  "Wend" => "4",
713  "While" => "4",
714  "Width" => "4",
715  "With" => "4",
716  "Write" => "4",
717  "&" => "5");
718 
719  // Special extensions
720 
721  // Each category can specify a PHP function that returns an altered
722  // version of the keyword.
723 
724 
725 
726  $this->linkscripts = array(
727  "1" => "donothing",
728  "2" => "donothing",
729  "3" => "donothing",
730  "4" => "donothing",
731  "5" => "donothing");
732  }
733 
734 
735 
736  public function donothing($keywordin)
737  {
738  return $keywordin;
739  }
740  }
$BEAUT_PATH
Definition: HFile_vb.php:3
Create styles array
The data for the language used.
Definition: HFile.php:21
donothing($keywordin)
Definition: HFile_vb.php:736
__construct()
Definition: HFile_vb.php:10