00001 <?php
00002 $BEAUT_PATH = realpath(".")."/syntax_highlight/php";
00003 if (!isset ($BEAUT_PATH)) return;
00004 require_once("$BEAUT_PATH/Beautifier/HFile.php");
00005 class HFile_opl extends HFile{
00006 function HFile_opl(){
00007 $this->HFile();
00008
00009
00010
00011
00012
00013
00014 $this->nocase = "0";
00015 $this->notrim = "0";
00016 $this->perl = "0";
00017
00018
00019
00020 $this->colours = array("blue", "purple");
00021 $this->quotecolour = "blue";
00022 $this->blockcommentcolour = "green";
00023 $this->linecommentcolour = "green";
00024
00025
00026
00027 $this->indent = array();
00028 $this->unindent = array();
00029
00030
00031
00032 $this->stringchars = array();
00033 $this->delimiters = array("~", "!", "@", "^", "*", "(", ")", "-", "+", "=", "|", "\\", "/", "{", "}", "[", "]", ":", ";", "\"", "'", "<", ">", " ", ",", " ", ".", "?");
00034 $this->escchar = "";
00035
00036
00037
00038 $this->linecommenton = array("rem");
00039 $this->blockcommenton = array("");
00040 $this->blockcommentoff = array("");
00041
00042
00043
00044 $this->keywords = array(
00045 "abs" => "1",
00046 "acos" => "1",
00047 "addr" => "1",
00048 "adjustalloc" => "1",
00049 "alert" => "1",
00050 "alloc" => "1",
00051 "and" => "1",
00052 "app" => "1",
00053 "append" => "1",
00054 "asc" => "1",
00055 "asin" => "1",
00056 "at" => "1",
00057 "atan" => "1",
00058 "back" => "1",
00059 "beep" => "1",
00060 "begintrans" => "1",
00061 "bookmark" => "1",
00062 "break" => "1",
00063 "busy" => "1",
00064 "cancel" => "1",
00065 "caption" => "1",
00066 "chr$" => "1",
00067 "clearflags" => "1",
00068 "cls" => "1",
00069 "close" => "1",
00070 "cmd$" => "1",
00071 "committrans" => "1",
00072 "compact" => "1",
00073 "compress" => "1",
00074 "const" => "1",
00075 "continue" => "1",
00076 "copy" => "1",
00077 "count" => "1",
00078 "cos" => "1",
00079 "create" => "1",
00080 "cursor" => "1",
00081 "daystodate" => "1",
00082 "datetosecs" => "1",
00083 "datim$" => "1",
00084 "day" => "1",
00085 "dayname$" => "1",
00086 "days" => "1",
00087 "dButtons" => "1",
00088 "dCheckbox" => "1",
00089 "dChoice" => "1",
00090 "dDate" => "1",
00091 "declare" => "1",
00092 "dEdit" => "1",
00093 "dEditmulti" => "1",
00094 "defaultwin" => "1",
00095 "deg" => "1",
00096 "delete" => "1",
00097 "dFile" => "1",
00098 "dFloat" => "1",
00099 "dialog" => "1",
00100 "dInit" => "1",
00101 "dir$" => "1",
00102 "dLong" => "1",
00103 "do" => "1",
00104 "dow" => "1",
00105 "dPosition" => "1",
00106 "dText" => "1",
00107 "dTime" => "1",
00108 "dXinput" => "1",
00109 "else" => "1",
00110 "elseif" => "1",
00111 "enda" => "1",
00112 "endif" => "1",
00113 "endv" => "1",
00114 "endp" => "1",
00115 "endwh" => "1",
00116 "eof" => "1",
00117 "erase" => "1",
00118 "err" => "1",
00119 "err$" => "1",
00120 "errx$" => "1",
00121 "escape" => "1",
00122 "eval" => "1",
00123 "exist" => "1",
00124 "exp" => "1",
00125 "ext" => "1",
00126 "external" => "1",
00127 "find" => "1",
00128 "findfield" => "1",
00129 "first" => "1",
00130 "fix$" => "1",
00131 "flags" => "1",
00132 "flt" => "1",
00133 "font" => "1",
00134 "freealloc" => "1",
00135 "gAt" => "1",
00136 "gBorder" => "1",
00137 "gBox" => "1",
00138 "gButton" => "1",
00139 "gCircle" => "1",
00140 "gClock" => "1",
00141 "gClose" => "1",
00142 "gCls" => "1",
00143 "gColor" => "1",
00144 "gCopy" => "1",
00145 "gCreate" => "1",
00146 "gCreatebit" => "1",
00147 "gEllipse" => "1",
00148 "gen$" => "1",
00149 "get" => "1",
00150 "get$" => "1",
00151 "getcmd$" => "1",
00152 "getdoc$" => "1",
00153 "getevent" => "1",
00154 "getevent32" => "1",
00155 "geteventa32" => "1",
00156 "geteventc" => "1",
00157 "gFill" => "1",
00158 "gFont" => "1",
00159 "gGmode" => "1",
00160 "gGrey" => "1",
00161 "gHeight" => "1",
00162 "gIdentity" => "1",
00163 "gInfo32" => "1",
00164 "gInvert" => "1",
00165 "giprint" => "1",
00166 "gLoadbit" => "1",
00167 "gLoadfont" => "1",
00168 "gLineby" => "1",
00169 "gLineto" => "1",
00170 "global" => "1",
00171 "gMove" => "1",
00172 "gOrder" => "1",
00173 "gOriginx" => "1",
00174 "gOriginY" => "1",
00175 "goto" => "1",
00176 "gotomark" => "1",
00177 "gPatt" => "1",
00178 "gPeekline" => "1",
00179 "gPoly" => "1",
00180 "gPrint" => "1",
00181 "gPrintb" => "1",
00182 "gPrintclip" => "1",
00183 "gRank" => "1",
00184 "gSavebit" => "1",
00185 "gScroll" => "1",
00186 "gSetpenwidth" => "1",
00187 "gSetwin" => "1",
00188 "gStyle" => "1",
00189 "gTmode" => "1",
00190 "gTwidth" => "1",
00191 "gUnloadfont" => "1",
00192 "gUpdate" => "1",
00193 "gUse" => "1",
00194 "gVisible" => "1",
00195 "gWidth" => "1",
00196 "gX" => "1",
00197 "gXborder" => "1",
00198 "gXprint" => "1",
00199 "gY" => "1",
00200 "hex$" => "1",
00201 "hour" => "1",
00202 "iabs" => "1",
00203 "icon" => "1",
00204 "if" => "1",
00205 "include" => "1",
00206 "input" => "1",
00207 "insert" => "1",
00208 "int" => "1",
00209 "intf" => "1",
00210 "intrans" => "1",
00211 "ioa" => "1",
00212 "ioc" => "1",
00213 "iocancel" => "1",
00214 "ioopen" => "1",
00215 "ioclose" => "1",
00216 "ioread" => "1",
00217 "ioseek" => "1",
00218 "iosignal" => "1",
00219 "iow" => "1",
00220 "iowait" => "1",
00221 "iowaitstat" => "1",
00222 "iowaitstat32" => "1",
00223 "iowrite" => "1",
00224 "ioyield" => "1",
00225 "key" => "1",
00226 "keya" => "1",
00227 "keyc" => "1",
00228 "key$" => "1",
00229 "killmark" => "1",
00230 "kmod" => "1",
00231 "last" => "1",
00232 "lclose" => "1",
00233 "left$" => "1",
00234 "len" => "1",
00235 "lenalloc" => "1",
00236 "ln" => "1",
00237 "loadm" => "1",
00238 "loc" => "1",
00239 "local" => "1",
00240 "lock" => "1",
00241 "log" => "1",
00242 "lopen" => "1",
00243 "lower$" => "1",
00244 "lprint" => "1",
00245 "max" => "1",
00246 "mCard" => "1",
00247 "mCasc" => "1",
00248 "mean" => "1",
00249 "menu" => "1",
00250 "mid$" => "1",
00251 "min" => "1",
00252 "mInit" => "1",
00253 "minute" => "1",
00254 "mkdir" => "1",
00255 "modify" => "1",
00256 "month" => "1",
00257 "month$" => "1",
00258 "mPopup" => "1",
00259 "next" => "1",
00260 "not" => "1",
00261 "num$" => "1",
00262 "off" => "1",
00263 "on" => "1",
00264 "onerr" => "1",
00265 "open" => "1",
00266 "openr" => "1",
00267 "or" => "1",
00268 "parse$" => "1",
00269 "path" => "1",
00270 "pause" => "1",
00271 "peek" => "1",
00272 "pi" => "1",
00273 "pointerfilter" => "1",
00274 "poke" => "1",
00275 "pos" => "1",
00276 "position" => "1",
00277 "print" => "1",
00278 "proc" => "1",
00279 "put" => "1",
00280 "raise" => "1",
00281 "rad" => "1",
00282 "randomize" => "1",
00283 "realloc" => "1",
00284 "recsize" => "1",
00285 "rename" => "1",
00286 "rept$" => "1",
00287 "return" => "1",
00288 "right$" => "1",
00289 "rmdir" => "1",
00290 "rnd" => "1",
00291 "rollback" => "1",
00292 "sci$" => "1",
00293 "screen" => "1",
00294 "screeninfo" => "1",
00295 "second" => "1",
00296 "secstodate" => "1",
00297 "setdoc" => "1",
00298 "setflags" => "1",
00299 "setpath" => "1",
00300 "sin" => "1",
00301 "space" => "1",
00302 "sqr" => "1",
00303 "std" => "1",
00304 "stop" => "1",
00305 "style" => "1",
00306 "sum" => "1",
00307 "tan" => "1",
00308 "testevent" => "1",
00309 "trap" => "1",
00310 "type" => "1",
00311 "uadd" => "1",
00312 "unloadm" => "1",
00313 "until" => "1",
00314 "update" => "1",
00315 "upper$" => "1",
00316 "use" => "1",
00317 "usub" => "1",
00318 "val" => "1",
00319 "var" => "1",
00320 "vector" => "1",
00321 "week" => "1",
00322 "while" => "1",
00323 "year" => "1",
00324 "backlighton&" => "2",
00325 "backupbatterystatus&" => "2",
00326 "bitmapdisplaymode&" => "2",
00327 "bitmapload&" => "2",
00328 "bitmapunload" => "2",
00329 "cancelcapturekey" => "2",
00330 "capturekey&" => "2",
00331 "checkuid$" => "2",
00332 "claimpointergrab" => "2",
00333 "createfiledialog$" => "2",
00334 "DBaddfield" => "2",
00335 "DBaddfieldtrunc" => "2",
00336 "DBcreateindex" => "2",
00337 "DBdeletekey" => "2",
00338 "DBdropindex" => "2",
00339 "DBgetfieldcount&" => "2",
00340 "DBgetfieldname$" => "2",
00341 "DBgetfieldtype&" => "2",
00342 "DBisdamaged&" => "2",
00343 "DBisunique&" => "2",
00344 "DBmakeunique" => "2",
00345 "DBnewkey&" => "2",
00346 "DBrecover" => "2",
00347 "DBsetcomparison" => "2",
00348 "DTdatetimediff" => "2",
00349 "DTday&" => "2",
00350 "DTdaynoinweek&" => "2",
00351 "DTdaysdiff&" => "2",
00352 "DTdaysinmonth&" => "2",
00353 "DTdeletedatetime" => "2",
00354 "DThour&" => "2",
00355 "DThoursdiff&" => "2",
00356 "DTmicro&" => "2",
00357 "DTmicrosdiff&" => "2",
00358 "DTminute&" => "2",
00359 "DTminutesdiff&" => "2",
00360 "DTmonth&" => "2",
00361 "DTmonthsdiff&" => "2",
00362 "DTnewdatetime&" => "2",
00363 "DTnow&" => "2",
00364 "DTsecond&" => "2",
00365 "DTsecondsdiff&" => "2",
00366 "DTsetday&" => "2",
00367 "DTsethometime" => "2",
00368 "DTsethour&" => "2",
00369 "DTsetmicro&" => "2",
00370 "DTsetminute&" => "2",
00371 "DTsetmonth&" => "2",
00372 "DTsetsecond&" => "2",
00373 "DTsetyear&" => "2",
00374 "DTweeknoinyear&" => "2",
00375 "DTyear&" => "2",
00376 "DTyearsdiff&" => "2",
00377 "displaytasklist" => "2",
00378 "endtask&" => "2",
00379 "false%" => "2",
00380 "getfiletime" => "2",
00381 "getnextwindowgroupname$" => "2",
00382 "getnextwindowid&" => "2",
00383 "getthreadidfromappuid&" => "2",
00384 "getthreadidfromopendoc&" => "2",
00385 "initialiseparaformat" => "2",
00386 "insertbitmap" => "2",
00387 "insertnewpara" => "2",
00388 "insertscaledbitmap" => "2",
00389 "insertspecialchar" => "2",
00390 "insertstring" => "2",
00391 "irdaconnecttoreceive" => "2",
00392 "irdaconnecttosend&" => "2",
00393 "irdadisconnect" => "2",
00394 "irdaread$" => "2",
00395 "irdareada" => "2",
00396 "irdawaitfordisconnect" => "2",
00397 "irdawrite" => "2",
00398 "isbacklightpresent&" => "2",
00399 "insystem&" => "2",
00400 "ishidden&" => "2",
00401 "isreadonly&" => "2",
00402 "killcurrentprocess" => "2",
00403 "killprocess" => "2",
00404 "killtask&" => "2",
00405 "LCclockformat&" => "2",
00406 "LCcountrycode&" => "2",
00407 "LCdecimalseparator$" => "2",
00408 "LCsetclockformat" => "2",
00409 "LCstartofweek&" => "2",
00410 "LCthousandsseparator$" => "2",
00411 "loadrsc&" => "2",
00412 "logontothread" => "2",
00413 "machinename$" => "2",
00414 "machineuniqueid" => "2",
00415 "mainbatterystatus&" => "2",
00416 "maxdisplaycontrast&" => "2",
00417 "mediatype&" => "2",
00418 "mod&" => "2",
00419 "openfiledialog$" => "2",
00420 "pagesetupdialog" => "2",
00421 "playsound" => "2",
00422 "playsounda" => "2",
00423 "printdialog" => "2",
00424 "printerdoclength&" => "2",
00425 "printpreviewdialog" => "2",
00426 "printrangedialog" => "2",
00427 "readrsc$" => "2",
00428 "readrsclong&" => "2",
00429 "removespecificcharformat" => "2",
00430 "removespecificparaformat" => "2",
00431 "resetautoswitchofftimer" => "2",
00432 "resetprinting" => "2",
00433 "runapp&" => "2",
00434 "runexe&" => "2",
00435 "saveasfiledialog$" => "2",
00436 "sendbitmaptoprinter" => "2",
00437 "sendbuffertoprinter" => "2",
00438 "sendscaledbitmaptoprinter" => "2",
00439 "sendnewparatoprinter" => "2",
00440 "sendrichtexttoprinter" => "2",
00441 "sendspecialchartoprinter" => "2",
00442 "sendstringtoprinter" => "2",
00443 "setactive" => "2",
00444 "setautoswitchoffbehavior" => "2",
00445 "setautoswitchofftime" => "2",
00446 "setalignment" => "2",
00447 "setbackground" => "2",
00448 "setbackgroundbythread&" => "2",
00449 "setbacklighton" => "2",
00450 "setbacklightbehavior" => "2",
00451 "setbacklightontime" => "2",
00452 "setcomputemode" => "2",
00453 "setdisplaycontrast" => "2",
00454 "setfiletime" => "2",
00455 "setfontheight" => "2",
00456 "setfontname" => "2",
00457 "setfontposition" => "2",
00458 "setfontposture" => "2",
00459 "setfontstrikethrough" => "2",
00460 "setfontunderline" => "2",
00461 "setfontweight" => "2",
00462 "setforeground" => "2",
00463 "setforegroundbythread&" => "2",
00464 "setglobalcharformat" => "2",
00465 "setglobalparaformat" => "2",
00466 "sethiddenfile" => "2",
00467 "setkeyclickenabled" => "2",
00468 "setlocalparaformat" => "2",
00469 "setpointercapture" => "2",
00470 "setpointerclickenabled" => "2",
00471 "setpointergrabon" => "2",
00472 "setreadonly" => "2",
00473 "setsounddriverenabled" => "2",
00474 "setsoundenabled" => "2",
00475 "setsystemfile" => "2",
00476 "spriteappend" => "2",
00477 "spritechange" => "2",
00478 "spritedelete" => "2",
00479 "spritecreate&" => "2",
00480 "spritedraw" => "2",
00481 "spritepos" => "2",
00482 "spriteuse" => "2",
00483 "stopsound&" => "2",
00484 "switchoff" => "2",
00485 "tbarbutt" => "2",
00486 "tbarhide" => "2",
00487 "tbarinit" => "2",
00488 "tbarlatch" => "2",
00489 "tbarlink" => "2",
00490 "tbaroffer%" => "2",
00491 "tbarsettitle" => "2",
00492 "tbarshow" => "2",
00493 "terminatecurrentprocess" => "2",
00494 "terminateprocess" => "2",
00495 "true%" => "2",
00496 "unloadrsc" => "2",
00497 "volumesize&" => "2",
00498 "volumespacefree&" => "2",
00499 "volumeuniqueid&" => "2",
00500 "xo" => "2");
00501
00502
00503
00504
00505
00506
00507
00508
00509 $this->linkscripts = array(
00510 "1" => "donothing",
00511 "2" => "donothing");
00512 }
00513
00514
00515 function donothing($keywordin)
00516 {
00517 return $keywordin;
00518 }
00519
00520 }?>