00001 <?php
00002
00003 $BEAUT_PATH = realpath(".")."/syntax_highlight/php";
00004 if (!isset ($BEAUT_PATH)) return;
00005 require_once("$BEAUT_PATH/Beautifier/HFile.php");
00006 class HFile_vbscript extends HFile{
00007 function HFile_vbscript(){
00008 $this->HFile();
00009
00010
00011
00012
00013
00014
00015
00016 $this->nocase = "0";
00017 $this->notrim = "0";
00018 $this->perl = "0";
00019
00020
00021
00022 $this->colours = array("blue", "purple", "brown", "gray", "blue", "purple");
00023 $this->quotecolour = "blue";
00024 $this->blockcommentcolour = "green";
00025 $this->linecommentcolour = "green";
00026
00027
00028
00029 $this->indent = array("Sub", "Private Sub", "Public Sub");
00030 $this->unindent = array("End Sub");
00031
00032
00033
00034 $this->stringchars = array();
00035 $this->delimiters = array(".", "(", ")", ",", "-", "+", "=", "|", "\\", "/", "{", "}", "[", "]", ":", ";", "\"", "'", "<", " ", ">", " ");
00036 $this->escchar = "";
00037
00038
00039
00040 $this->linecommenton = array("'");
00041 $this->blockcommenton = array("");
00042 $this->blockcommentoff = array("");
00043
00044
00045
00046 $this->keywords = array(
00047 "And" => "1",
00048 "As" => "1",
00049 "Call" => "1",
00050 "Case" => "1",
00051 "Class" => "1",
00052 "Const" => "1",
00053 "Dim" => "1",
00054 "Do" => "1",
00055 "Each" => "1",
00056 "Else" => "1",
00057 "ElseIf" => "1",
00058 "Empty" => "1",
00059 "End" => "1",
00060 "Eqv" => "1",
00061 "Erase" => "1",
00062 "Error" => "1",
00063 "Execute" => "1",
00064 "Exit" => "1",
00065 "Explicit" => "1",
00066 "For" => "1",
00067 "Function" => "1",
00068 "Get" => "1",
00069 "Goto" => "1",
00070 "If" => "1",
00071 "Imp" => "1",
00072 "Is" => "1",
00073 "Let" => "1",
00074 "Loop" => "1",
00075 "Mod" => "1",
00076 "Next" => "1",
00077 "New" => "1",
00078 "Not" => "1",
00079 "Nothing" => "1",
00080 "Null" => "1",
00081 "On" => "1",
00082 "Option" => "1",
00083 "Or" => "1",
00084 "Private" => "1",
00085 "Property" => "1",
00086 "Public" => "1",
00087 "Randomize" => "1",
00088 "ReDim" => "1",
00089 "Rem" => "1",
00090 "Resume" => "1",
00091 "Select" => "1",
00092 "Set" => "1",
00093 "Stop" => "1",
00094 "Sub" => "1",
00095 "Then" => "1",
00096 "To" => "1",
00097 "Until" => "1",
00098 "Wend" => "1",
00099 "While" => "1",
00100 "With" => "1",
00101 "Abs" => "2",
00102 "Array" => "2",
00103 "Asc" => "2",
00104 "Atn" => "2",
00105 "CBool" => "2",
00106 "CByte" => "2",
00107 "CCur" => "2",
00108 "CDate" => "2",
00109 "CDbl" => "2",
00110 "Chr" => "2",
00111 "CInt" => "2",
00112 "CLng" => "2",
00113 "Cos" => "2",
00114 "CSng" => "2",
00115 "CStr" => "2",
00116 "Date" => "2",
00117 "DateAddFunction" => "2",
00118 "DateDiff" => "2",
00119 "DatePart" => "2",
00120 "DateSerial" => "2",
00121 "DateValue" => "2",
00122 "Day" => "2",
00123 "Eval" => "2",
00124 "Exp" => "2",
00125 "Filter" => "2",
00126 "Fix" => "2",
00127 "FormatCurrency" => "2",
00128 "FormatDateTime" => "2",
00129 "FormatNumber" => "2",
00130 "FormatPercent" => "2",
00131 "GetObject" => "2",
00132 "GetRef" => "2",
00133 "Hex" => "2",
00134 "Hour" => "2",
00135 "InputBox" => "2",
00136 "InStr" => "2",
00137 "InStrRev" => "2",
00138 "Int" => "2",
00139 "IsArray" => "2",
00140 "IsDate" => "2",
00141 "IsEmpty" => "2",
00142 "IsNull" => "2",
00143 "IsNumeric" => "2",
00144 "IsObject" => "2",
00145 "Join" => "2",
00146 "LBound" => "2",
00147 "LCase" => "2",
00148 "Left" => "2",
00149 "Len" => "2",
00150 "LoadPicture" => "2",
00151 "Log" => "2",
00152 "LTrim" => "2",
00153 "Mid" => "2",
00154 "Minute" => "2",
00155 "Month" => "2",
00156 "MonthName" => "2",
00157 "MsgBox" => "2",
00158 "Now" => "2",
00159 "Oct" => "2",
00160 "Replace" => "4",
00161 "RGB" => "2",
00162 "Right" => "2",
00163 "Rnd" => "2",
00164 "Round" => "2",
00165 "RTrim" => "2",
00166 "ScriptEngine" => "2",
00167 "ScriptEngineBuildVersion" => "2",
00168 "ScriptEngineMajorVersion" => "2",
00169 "ScriptEngineMinorVersion" => "2",
00170 "Second" => "2",
00171 "Sgn" => "2",
00172 "Sin" => "2",
00173 "Space" => "2",
00174 "Split" => "2",
00175 "Sqr" => "2",
00176 "StrComp" => "2",
00177 "String" => "2",
00178 "StrReverse" => "2",
00179 "Tan" => "2",
00180 "Time" => "2",
00181 "Timer" => "2",
00182 "TimeSerial" => "2",
00183 "TimeValue" => "2",
00184 "Trim" => "2",
00185 "TypeName" => "2",
00186 "UBound" => "2",
00187 "UCase" => "2",
00188 "VarType" => "2",
00189 "Weekday" => "2",
00190 "WeekdayName" => "2",
00191 "Year" => "2",
00192 "AccountDisabled" => "3",
00193 "AccountExpirationDate" => "3",
00194 "Application" => "3",
00195 "Arguments" => "3",
00196 "AtEndOfLine" => "3",
00197 "AtEndOfStream" => "3",
00198 "Attributes" => "3",
00199 "AutoUnlockInterval" => "3",
00200 "AvailableSpace" => "3",
00201 "BadPasswordAttempts" => "3",
00202 "Column" => "3",
00203 "CompareMode" => "3",
00204 "ComputerName" => "3",
00205 "Count" => "3",
00206 "DateCreated" => "3",
00207 "DateLastAccessed" => "3",
00208 "DateLastModified" => "3",
00209 "Description" => "3",
00210 "Drive" => "3",
00211 "DriveLetter" => "3",
00212 "DriveType" => "3",
00213 "Drives" => "3",
00214 "Environment" => "3",
00215 "FileSystem" => "3",
00216 "Files" => "3",
00217 "FirstIndex" => "3",
00218 "FreeSpace" => "3",
00219 "FullName" => "3",
00220 "Global" => "3",
00221 "HelpContext" => "3",
00222 "HelpFile" => "3",
00223 "HomeDirDrive" => "3",
00224 "HomeDirectory" => "3",
00225 "HotKey" => "3",
00226 "IconLocation" => "3",
00227 "IgnoreCase" => "3",
00228 "Interactive" => "3",
00229 "IsAccountLocked" => "3",
00230 "IsReady" => "3",
00231 "IsRootFolder" => "3",
00232 "Item" => "3",
00233 "Key" => "3",
00234 "LastLogin" => "3",
00235 "LastLogoff" => "3",
00236 "Length" => "3",
00237 "Line" => "3",
00238 "LockoutObservationInterval" => "3",
00239 "LoginHours" => "3",
00240 "LoginScript" => "3",
00241 "LoginWorkstations" => "3",
00242 "MaxBadPasswordsAllowed" => "3",
00243 "MaxLogins" => "3",
00244 "MaxPasswordAge" => "3",
00245 "MaxStorage" => "3",
00246 "MinPasswordAge" => "3",
00247 "MinPasswordLength" => "3",
00248 "Name" => "3",
00249 "Number" => "3",
00250 "ObjectSid" => "3",
00251 "Parameters" => "3",
00252 "ParentFolder" => "3",
00253 "PasswordAge" => "3",
00254 "PasswordExpirationDate" => "3",
00255 "PasswordExpired" => "3",
00256 "PasswordHistoryLength" => "3",
00257 "Path" => "3",
00258 "Pattern" => "3",
00259 "PrimaryGroupID" => "3",
00260 "Profile" => "3",
00261 "Remove" => "3",
00262 "RootFolder" => "3",
00263 "ScriptFullName" => "3",
00264 "ScriptName" => "3",
00265 "SerialNumber" => "3",
00266 "ShareName" => "3",
00267 "ShortName" => "3",
00268 "ShortPath" => "3",
00269 "Size" => "3",
00270 "Source" => "3",
00271 "SpecialFolders" => "3",
00272 "Subfolders" => "3",
00273 "TargetPath" => "3",
00274 "TotalSize" => "3",
00275 "Type" => "3",
00276 "UserDomain" => "3",
00277 "UserFlags" => "3",
00278 "UserName" => "3",
00279 "Value" => "3",
00280 "Version" => "3",
00281 "VolumeName" => "3",
00282 "WindowStyle" => "3",
00283 "WorkingDirectory" => "3",
00284 "Add" => "4",
00285 "AddPrinterConnection" => "4",
00286 "AddWindowsPrinterConnection" => "4",
00287 "AppActivate" => "4",
00288 "BuildPath" => "4",
00289 "Clear" => "4",
00290 "Close" => "4",
00291 "ConnectObject" => "4",
00292 "Copy" => "4",
00293 "CopyFile" => "4",
00294 "CopyFolder" => "4",
00295 "CreateFolder" => "4",
00296 "CreateObject" => "4",
00297 "CreateShortcut" => "4",
00298 "CreateTextFile" => "4",
00299 "Delete" => "4",
00300 "DeleteFile" => "4",
00301 "DeleteFolder" => "4",
00302 "DisconnectObject" => "4",
00303 "DriveExists" => "4",
00304 "Echo" => "4",
00305 "EnumNetworkDrives" => "4",
00306 "EnumPrinterConnections" => "4",
00307 "Exists" => "4",
00308 "ExpandEnvironmentStrings" => "4",
00309 "FileExists" => "4",
00310 "FolderExists" => "4",
00311 "GetAbsolutePathName" => "4",
00312 "GetBaseName" => "4",
00313 "GetDrive" => "4",
00314 "GetDriveName" => "4",
00315 "GetExtensionName" => "4",
00316 "GetFile" => "4",
00317 "GetFileName" => "4",
00318 "GetFolder" => "4",
00319 "GetParentFolderName" => "4",
00320 "GetResource" => "4",
00321 "GetSpecialFolder" => "4",
00322 "GetTempName" => "4",
00323 "Items" => "4",
00324 "Keys" => "4",
00325 "LogEvent" => "4",
00326 "MapNetworkDrive" => "4",
00327 "Move" => "4",
00328 "MoveFile" => "4",
00329 "MoveFolder" => "4",
00330 "OpenAsTextStream" => "4",
00331 "OpenTextFile" => "4",
00332 "Popup" => "4",
00333 "Put" => "4",
00334 "Quit" => "4",
00335 "Raise" => "4",
00336 "Read" => "4",
00337 "ReadAll" => "4",
00338 "ReadLine" => "4",
00339 "RegDelete" => "4",
00340 "RegRead" => "4",
00341 "RegWrite" => "4",
00342 "RemoveAll" => "4",
00343 "RemoveNetworkDrive" => "4",
00344 "RemovePrinterConnection" => "4",
00345 "Run" => "4",
00346 "Save" => "4",
00347 "SendKeys" => "4",
00348 "SetDefaultPrinter" => "4",
00349 "Skip" => "4",
00350 "SkipLine" => "4",
00351 "Sleep" => "4",
00352 "SetInfo" => "4",
00353 "Test" => "4",
00354 "Write" => "4",
00355 "WriteBlankLines" => "4",
00356 "WriteLine" => "4",
00357 "Dictionary" => "5",
00358 "Err" => "5",
00359 "File" => "5",
00360 "FileSystemObject" => "5",
00361 "Folder" => "5",
00362 "Match" => "5",
00363 "RegExp" => "5",
00364 "TextStream" => "5",
00365 "Wscript" => "5",
00366 "WshNetwork" => "5",
00367 "WshShell" => "5",
00368 "False" => "6",
00369 "FALSE" => "6",
00370 "True" => "6",
00371 "TRUE" => "6",
00372 "vbAbort" => "6",
00373 "vbAbortRetryIgnore" => "6",
00374 "vbApplicationModal" => "6",
00375 "vbArray" => "6",
00376 "vbBinaryCompare" => "6",
00377 "vbBlack" => "6",
00378 "vbBlue" => "6",
00379 "vbBoolean" => "6",
00380 "vbByte" => "6",
00381 "vbCancel" => "6",
00382 "vbCr" => "6",
00383 "vbCritical" => "6",
00384 "vbCrLf" => "6",
00385 "vbCurrency" => "6",
00386 "vbCyan" => "6",
00387 "vbDataObject" => "6",
00388 "vbDate" => "6",
00389 "vbDecimal" => "6",
00390 "vbDefaultButton1" => "6",
00391 "vbDefaultButton2" => "6",
00392 "vbDefaultButton3" => "6",
00393 "vbDefaultButton4" => "6",
00394 "vbDouble" => "6",
00395 "vbEmpty" => "6",
00396 "vbError" => "6",
00397 "vbExclamation" => "6",
00398 "vbFirstFourDays" => "6",
00399 "vbFirstFullWeek" => "6",
00400 "vbFirstJan1" => "6",
00401 "vbFormFeed" => "6",
00402 "vbFriday" => "6",
00403 "vbGeneralDate" => "6",
00404 "vbGreen" => "6",
00405 "vbIgnore" => "6",
00406 "vbInformation" => "6",
00407 "vbInteger" => "6",
00408 "vbLf" => "6",
00409 "vbLong" => "6",
00410 "vbLongDate" => "6",
00411 "vbLongTime" => "6",
00412 "vbMagenta" => "6",
00413 "vbMonday" => "6",
00414 "vbNewLine" => "6",
00415 "vbNo" => "6",
00416 "vbNull" => "6",
00417 "vbNullChar" => "6",
00418 "vbNullString" => "6",
00419 "vbObject" => "6",
00420 "vbObjectError" => "6",
00421 "vbOK" => "6",
00422 "vbOKCancel" => "6",
00423 "vbOKOnly" => "6",
00424 "vbQuestion" => "6",
00425 "vbRed" => "6",
00426 "vbRetry" => "6",
00427 "vbRetryCancel" => "6",
00428 "vbSaturday" => "6",
00429 "vbShortDate" => "6",
00430 "vbShortTime" => "6",
00431 "vbSingle" => "6",
00432 "vbString" => "6",
00433 "vbSunday" => "6",
00434 "vbSystemModal" => "6",
00435 "vbTab" => "6",
00436 "vbTextCompare" => "6",
00437 "vbThursday" => "6",
00438 "vbTuesday" => "6",
00439 "vbUseSystem" => "6",
00440 "vbUseSystemDayOfWeek" => "6",
00441 "vbVariant" => "6",
00442 "vbVerticalTab" => "6",
00443 "vbWednesday" => "6",
00444 "vbWhite" => "6",
00445 "vbYellow" => "6",
00446 "vbYes" => "6",
00447 "vbYesNo" => "6",
00448 "vbYesNoCancel" => "6");
00449
00450
00451
00452
00453
00454
00455
00456
00457 $this->linkscripts = array(
00458 "1" => "donothing",
00459 "2" => "donothing",
00460 "4" => "donothing",
00461 "3" => "donothing",
00462 "5" => "donothing",
00463 "6" => "donothing");
00464
00465 }
00466
00467
00468
00469 function donothing($keywordin)
00470 {
00471 return $keywordin;
00472 }
00473
00474 }
00475
00476 ?>
