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_foxpro extends HFile{
00006 function HFile_foxpro(){
00007 $this->HFile();
00008
00009
00010
00011
00012
00013
00014 $this->nocase = "1";
00015 $this->notrim = "0";
00016 $this->perl = "0";
00017
00018
00019
00020 $this->colours = array("blue", "gray", "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("*");
00039 $this->blockcommenton = array("&&");
00040 $this->blockcommentoff = array("");
00041
00042
00043
00044 $this->keywords = array(
00045 "ACCEPT" => "1",
00046 "ACTIVATE" => "1",
00047 "ALTERNATIVE" => "1",
00048 "AMERICAN" => "1",
00049 "AND" => "3",
00050 "ANSI" => "1",
00051 "APPEND" => "1",
00052 "ARRAY" => "1",
00053 "AUTOSAVE" => "1",
00054 "AVERAGE" => "1",
00055 "BAR" => "2",
00056 "BELL" => "1",
00057 "BLANK" => "1",
00058 "BLICK" => "1",
00059 "BLOCKSIZE" => "1",
00060 "BOX" => "1",
00061 "BORDER" => "1",
00062 "BROWSE" => "1",
00063 "BRSTATUS" => "1",
00064 "BUILD" => "1",
00065 "EXE" => "1",
00066 "PROJECT" => "1",
00067 "CALCULATE" => "1",
00068 "CALL" => "1",
00069 "CANCEL" => "1",
00070 "CARRY" => "1",
00071 "CASE" => "1",
00072 "CENTURY" => "1",
00073 "CHANGE" => "1",
00074 "CLEAR" => "1",
00075 "CLOCK" => "1",
00076 "CLOSE" => "1",
00077 "COLLATE" => "1",
00078 "COLOR" => "1",
00079 "COMMAND" => "1",
00080 "COMPILE" => "1",
00081 "COMPATABLE" => "1",
00082 "CONFIRM" => "1",
00083 "CONSOLE" => "1",
00084 "CONTINUE" => "1",
00085 "COPY" => "1",
00086 "COUNT" => "1",
00087 "CPCOMPILE" => "1",
00088 "CPDIALOG" => "1",
00089 "CREATE" => "1",
00090 "CURRENCY" => "1",
00091 "CURSOR" => "1",
00092 "DATABASES" => "1",
00093 "DATE" => "2",
00094 "DEACTIVATE" => "1",
00095 "DEBUG" => "1",
00096 "DECIMALS" => "1",
00097 "DECLARE" => "1",
00098 "DEFAULT" => "1",
00099 "DEFINE" => "1",
00100 "DELETE" => "1",
00101 "DELETED" => "2",
00102 "DELIMITERS" => "1",
00103 "DEVELOPMENT" => "1",
00104 "DEVICE" => "1",
00105 "DIMENSION" => "1",
00106 "DIR" => "1",
00107 "DIRECTORY" => "1",
00108 "DISPLAY" => "1",
00109 "DO" => "1",
00110 "DOHISTORY" => "1",
00111 "ECHO" => "1",
00112 "EDIT" => "1",
00113 "EJECT" => "1",
00114 "ELSE" => "1",
00115 "ENDCASE" => "1",
00116 "ENDDO" => "1",
00117 "ENDFOR" => "1",
00118 "ENDSCAN" => "1",
00119 "ENDTEXT" => "1",
00120 "ENDIF" => "1",
00121 "ENDPRINTJOB" => "1",
00122 "ERASE" => "1",
00123 "ERROR" => "2",
00124 "ESCAPE" => "1",
00125 "EXACT" => "1",
00126 "EXCLUSIVE" => "1",
00127 "EXIT" => "1",
00128 "EXPORT" => "1",
00129 "EXTENDED" => "1",
00130 "EXTERNAL" => "1",
00131 "FIELDS" => "1",
00132 "FILES" => "1",
00133 "FILER" => "1",
00134 "FILL" => "1",
00135 "FILTER" => "2",
00136 "FIND" => "1",
00137 "FIXED" => "1",
00138 "FORMAT" => "1",
00139 "FLUSH" => "1",
00140 "FOR" => "2",
00141 "FROM" => "1",
00142 "FULLPATH" => "2",
00143 "FUNCTION" => "1",
00144 "GATHER" => "1",
00145 "GENERAL" => "1",
00146 "GET" => "1",
00147 "GETS" => "1",
00148 "GETEXPR" => "1",
00149 "GO" => "1",
00150 "GOTO" => "1",
00151 "HEADINGS" => "1",
00152 "HELP" => "1",
00153 "HELPFILTER" => "1",
00154 "HIDE" => "1",
00155 "HOURS" => "1",
00156 "IF" => "1",
00157 "IMPORT" => "1",
00158 "INDEX" => "1",
00159 "INDEXES" => "1",
00160 "INPUT" => "1",
00161 "INSERT" => "1",
00162 "INTENSITY" => "1",
00163 "JOIN" => "1",
00164 "KEY" => "2",
00165 "KEYBOARD" => "1",
00166 "KEYCOMP" => "1",
00167 "LABEL" => "1",
00168 "LIBRARY" => "1",
00169 "LIST" => "1",
00170 "LOAD" => "1",
00171 "LOCATE" => "1",
00172 "LOCK" => "2",
00173 "LOGERRORS" => "1",
00174 "MACKEY" => "1",
00175 "MACRO" => "1",
00176 "MARGIN" => "1",
00177 "MARK" => "1",
00178 "MEMO" => "1",
00179 "MEMOWIDTH" => "1",
00180 "MENU" => "2",
00181 "MESSAGE" => "2",
00182 "MODIFY" => "1",
00183 "MODULE" => "1",
00184 "MOUSE" => "1",
00185 "MOVE" => "1",
00186 "MULTILOCKS" => "1",
00187 "NEAR" => "1",
00188 "NOCPTRANS" => "1",
00189 "NORMALIZE" => "1",
00190 "NOTE" => "1",
00191 "NOTIFY" => "1",
00192 "OBJECT" => "1",
00193 "ODOMETER" => "1",
00194 "OFF" => "1",
00195 "ON" => "2",
00196 "OPTIMIZE" => "1",
00197 "ORDER" => "2",
00198 "OTHERWISE" => "1",
00199 "PAD" => "2",
00200 "PAGE" => "1",
00201 "PALETTE" => "1",
00202 "PARAMETERS" => "2",
00203 "PATH" => "1",
00204 "PDSETUP" => "1",
00205 "PICTURE" => "1",
00206 "PLAY" => "1",
00207 "POINT" => "1",
00208 "POP" => "1",
00209 "POPUP" => "2",
00210 "PRINTER" => "1",
00211 "PRINTJOB" => "1",
00212 "PRIVATE" => "1",
00213 "PROCEDURE" => "1",
00214 "PROMPT" => "2",
00215 "PUBLIC" => "1",
00216 "PUSH" => "1",
00217 "QUERY" => "1",
00218 "READ" => "1",
00219 "READBORDER" => "1",
00220 "READERROR" => "1",
00221 "RECALL" => "1",
00222 "REGIONAL" => "1",
00223 "REINDEX" => "1",
00224 "RELEASE" => "1",
00225 "RENAME" => "1",
00226 "REPLACE" => "1",
00227 "REPORT" => "1",
00228 "RESTORE" => "1",
00229 "RESUME" => "1",
00230 "RETRY" => "1",
00231 "RETURN" => "1",
00232 "REFRESH" => "1",
00233 "RELATION" => "2",
00234 "REPROCESS" => "1",
00235 "RESOURCE" => "1",
00236 "RUN" => "1",
00237 "SAFETY" => "1",
00238 "SAVE" => "1",
00239 "SAY" => "1",
00240 "SCAN" => "1",
00241 "SCATTER" => "1",
00242 "SCHEME" => "2",
00243 "SCOREBOARD" => "1",
00244 "SCREEN" => "1",
00245 "SEEK" => "2",
00246 "SELECT" => "2",
00247 "SELECTION" => "1",
00248 "SEPERATOR" => "1",
00249 "SET" => "2",
00250 "SHADOWS" => "1",
00251 "SHOW" => "1",
00252 "SHUTDOWN" => "1",
00253 "SIZE" => "2",
00254 "SKIP" => "1",
00255 "SORT" => "1",
00256 "STATUS" => "1",
00257 "STICKY" => "1",
00258 "STEP" => "1",
00259 "STORE" => "1",
00260 "STRUCTURE" => "1",
00261 "SUM" => "1",
00262 "SUSPEND" => "1",
00263 "SYSMENU" => "1",
00264 "SQL" => "1",
00265 "TABLE" => "1",
00266 "TAG" => "2",
00267 "TALK" => "1",
00268 "TEXTMERGE" => "1",
00269 "TEXT" => "1",
00270 "TO" => "1",
00271 "TOPIC" => "1",
00272 "TOTAL" => "1",
00273 "TRBETWEEN" => "1",
00274 "TYPE" => "2",
00275 "TYPEAHEAD" => "1",
00276 "UDFPARAMS" => "1",
00277 "UNIQUE" => "1",
00278 "UNLOCK" => "1",
00279 "UPDATE" => "1",
00280 "USE" => "1",
00281 "VIEW" => "1",
00282 "WAIT" => "1",
00283 "WHILE" => "1",
00284 "WINDOW" => "1",
00285 "WITH" => "1",
00286 "ZAP" => "1",
00287 "ZOOM" => "1",
00288 "ABS" => "2",
00289 "ACOPY" => "2",
00290 "ACOS" => "2",
00291 "ADEL" => "2",
00292 "ADIR" => "2",
00293 "AELEMENT" => "2",
00294 "AFIELDS" => "2",
00295 "AFONT" => "2",
00296 "AINS" => "2",
00297 "ALEN" => "2",
00298 "ALIAS" => "2",
00299 "ALLTRIM" => "2",
00300 "ANSITOOEM" => "2",
00301 "ASC" => "2",
00302 "ASCAN" => "2",
00303 "ASIN" => "2",
00304 "ASORT" => "2",
00305 "ASUBSCRIPT" => "2",
00306 "AT" => "2",
00307 "ATAN" => "2",
00308 "ATC" => "2",
00309 "ATCLINE" => "2",
00310 "ATLINE" => "2",
00311 "ATN2" => "2",
00312 "BETWEEN" => "2",
00313 "BOF" => "2",
00314 "CAPSLOCK" => "2",
00315 "CDOW" => "2",
00316 "CDX" => "2",
00317 "CEILING" => "2",
00318 "CHR" => "2",
00319 "CHRSAW" => "2",
00320 "CHRTRAN" => "2",
00321 "CMONTH" => "2",
00322 "CNTBAR" => "2",
00323 "CNTPAD" => "2",
00324 "COL" => "2",
00325 "COS" => "2",
00326 "CPCONVERT" => "2",
00327 "CPCURRENT" => "2",
00328 "CPDBF" => "2",
00329 "CTOD" => "2",
00330 "CURDIR" => "2",
00331 "DAY" => "2",
00332 "DBF" => "2",
00333 "DDE" => "2",
00334 "DDEAbortTrans" => "2",
00335 "DDEAdvise" => "2",
00336 "DDEEnabled" => "2",
00337 "DDEExecute" => "2",
00338 "DDEInitiate" => "2",
00339 "DDELastError" => "2",
00340 "DDEPoke" => "2",
00341 "DDERequest" => "2",
00342 "DDESetOption" => "2",
00343 "DDESetService" => "2",
00344 "DDESetTopic" => "2",
00345 "DDETerminate" => "2",
00346 "DESCENDING" => "2",
00347 "DIFFERENCE" => "2",
00348 "DISKSPACE" => "2",
00349 "DMY" => "2",
00350 "DOW" => "2",
00351 "DTOC" => "2",
00352 "DTOR" => "2",
00353 "DTOS" => "2",
00354 "EMPTY" => "2",
00355 "EOF" => "2",
00356 "EVALUATE" => "2",
00357 "EXP" => "2",
00358 "FCHSIZE" => "2",
00359 "FCLOSE" => "2",
00360 "FCOUNT" => "2",
00361 "FCREATE" => "2",
00362 "FEOF" => "2",
00363 "FERROR" => "2",
00364 "FFLUSH" => "2",
00365 "FGETS" => "2",
00366 "FIELD" => "2",
00367 "FILE" => "2",
00368 "FKLABEL" => "2",
00369 "FKMAX" => "2",
00370 "FLOCK" => "2",
00371 "FLOOR" => "2",
00372 "FONTMETRIC" => "2",
00373 "FOPEN" => "2",
00374 "FOUND" => "2",
00375 "FPUTS" => "2",
00376 "FREAD" => "2",
00377 "FSEEK" => "2",
00378 "FSIZE" => "2",
00379 "FV" => "2",
00380 "FWRITE" => "2",
00381 "GETBAR" => "2",
00382 "GETDIR" => "2",
00383 "GETENV" => "2",
00384 "GETFILE" => "2",
00385 "GETFONT" => "2",
00386 "GETPAD" => "2",
00387 "GOMONTH" => "2",
00388 "HEADER" => "2",
00389 "HOME" => "2",
00390 "IDXCOLLATE" => "2",
00391 "IIF" => "2",
00392 "INKEY" => "2",
00393 "INLIST" => "2",
00394 "INSMODE" => "2",
00395 "INT" => "2",
00396 "ISALPHA" => "2",
00397 "ISBLANK" => "2",
00398 "ISCOLOR" => "2",
00399 "ISDIGIT" => "2",
00400 "ISLOWER" => "2",
00401 "ISREADONLY" => "2",
00402 "ISUPPER" => "2",
00403 "KEYMATCH" => "2",
00404 "LASTKEY" => "2",
00405 "LEFT" => "2",
00406 "LEN" => "2",
00407 "LIKE" => "2",
00408 "LINENO" => "2",
00409 "LOCFILE" => "2",
00410 "LOG" => "2",
00411 "LOG10" => "2",
00412 "LOOKUP" => "2",
00413 "LOWER" => "2",
00414 "LTRIM" => "2",
00415 "LUPDATE" => "2",
00416 "MAX" => "2",
00417 "MCOL" => "2",
00418 "MDOWN" => "2",
00419 "MDX" => "2",
00420 "MDY" => "2",
00421 "MEMLINES" => "2",
00422 "MEMORY" => "2",
00423 "MIN" => "2",
00424 "MLINE" => "2",
00425 "MOD" => "2",
00426 "MONTH" => "2",
00427 "MRKBAR" => "2",
00428 "MRKPAD" => "2",
00429 "MROW(" => "2",
00430 "MWINDOW" => "2",
00431 "NDX" => "2",
00432 "NUMLOCK" => "2",
00433 "OBJNUM" => "2",
00434 "OBJVAR" => "2",
00435 "OCCURS" => "2",
00436 "OEMTOANSI" => "2",
00437 "OS" => "2",
00438 "PACK" => "2",
00439 "PADC" => "2",
00440 "PADL" => "2",
00441 "PADR" => "2",
00442 "PAYMENT" => "2",
00443 "PCOL" => "2",
00444 "PI" => "2",
00445 "PRINTSTATUS" => "2",
00446 "PRMBAR" => "2",
00447 "PRMPAD" => "2",
00448 "PROGRAM" => "2",
00449 "PROPER" => "2",
00450 "PROW" => "2",
00451 "PRTINFO PUTFILE" => "2",
00452 "PV" => "2",
00453 "QUIT" => "2",
00454 "RAND" => "2",
00455 "RAT" => "2",
00456 "RATLINE" => "2",
00457 "RDLEVEL" => "2",
00458 "READKEY" => "2",
00459 "RECCOUNT" => "2",
00460 "RECNO" => "2",
00461 "RECSIZE" => "2",
00462 "REPLICATE" => "2",
00463 "RGBSCHEME" => "2",
00464 "RIGHT" => "2",
00465 "RLOCK" => "2",
00466 "ROUND" => "2",
00467 "ROW" => "2",
00468 "RTOD" => "2",
00469 "RTRIM" => "2",
00470 "SCOLS" => "2",
00471 "SCROLL" => "2",
00472 "SECONDS" => "2",
00473 "SIGN" => "2",
00474 "SIN" => "2",
00475 "SKPBAR" => "2",
00476 "SKPPAD" => "2",
00477 "SOUNDEX" => "2",
00478 "SPACE" => "2",
00479 "SQRT" => "2",
00480 "SROWS" => "2",
00481 "STR" => "2",
00482 "STRTRAN" => "2",
00483 "STUFF" => "2",
00484 "SUBSTR" => "2",
00485 "SYS" => "2",
00486 "SYS(0)" => "2",
00487 "SYS(1)" => "2",
00488 "SYS(2)" => "2",
00489 "SYS(3)" => "2",
00490 "SYS(5)" => "2",
00491 "SYS(6)" => "2",
00492 "SYS(7)" => "2",
00493 "SYS(9)" => "2",
00494 "SYS(10)" => "2",
00495 "SYS(11)" => "2",
00496 "SYS(12)" => "2",
00497 "SYS(13)" => "2",
00498 "SYS(14)" => "2",
00499 "SYS(15)" => "2",
00500 "SYS(16)" => "2",
00501 "SYS(17)" => "2",
00502 "SYS(18)" => "2",
00503 "SYS(20)" => "2",
00504 "SYS(21)" => "2",
00505 "SYS(22)" => "2",
00506 "SYS(23)" => "2",
00507 "SYS(24)" => "2",
00508 "SYS(100)" => "2",
00509 "SYS(101)" => "2",
00510 "SYS(102)" => "2",
00511 "SYS(103)" => "2",
00512 "SYS(1001)" => "2",
00513 "SYS(1016)" => "2",
00514 "SYS(1037)" => "2",
00515 "SYS(2000)" => "2",
00516 "SYS(2001)" => "2",
00517 "SYS(2002)" => "2",
00518 "SYS(2003)" => "2",
00519 "SYS(2004)" => "2",
00520 "SYS(2005)" => "2",
00521 "SYS(2006)" => "2",
00522 "SYS(2007)" => "2",
00523 "SYS(2008)" => "2",
00524 "SYS(2009)" => "2",
00525 "SYS(2010)" => "2",
00526 "SYS(2011)" => "2",
00527 "SYS(2012)" => "2",
00528 "SYS(2013)" => "2",
00529 "SYS(2014)" => "2",
00530 "SYS(2015)" => "2",
00531 "SYS(2016)" => "2",
00532 "SYS(2017)" => "2",
00533 "SYS(2018)" => "2",
00534 "SYS(2019)" => "2",
00535 "SYS(2020)" => "2",
00536 "SYS(2021)" => "2",
00537 "SYS(2022)" => "2",
00538 "SYS(2023)" => "2",
00539 "SYSMETRIC(" => "2",
00540 "TAN" => "2",
00541 "TARGET" => "2",
00542 "TIME" => "2",
00543 "TRANSFORM" => "2",
00544 "TRIM" => "2",
00545 "TXTWIDTH" => "2",
00546 "UPDATED" => "2",
00547 "UPPER" => "2",
00548 "USED" => "2",
00549 "VAL" => "2",
00550 "VALID" => "2",
00551 "VARREAD" => "2",
00552 "VERSION" => "2",
00553 "WBORDER" => "2",
00554 "WCHILD" => "2",
00555 "WCOLS" => "2",
00556 "WEXIST" => "2",
00557 "WFONT" => "2",
00558 "WLAST" => "2",
00559 "WLCOL" => "2",
00560 "WLROW" => "2",
00561 "WMAXIMUM" => "2",
00562 "WMINIMUM" => "2",
00563 "WONTOP" => "2",
00564 "WOUTPUT" => "2",
00565 "WPARENT" => "2",
00566 "WREAD" => "2",
00567 "WROWS" => "2",
00568 "WTITLE" => "2",
00569 "WVISIBLE" => "2",
00570 "YEAR" => "2",
00571 ".AND." => "3",
00572 ".F." => "3",
00573 ".NOT." => "3",
00574 ".OR." => "3",
00575 ".T." => "3",
00576 "NOT" => "3",
00577 "OR" => "3");
00578
00579
00580
00581
00582
00583
00584
00585
00586 $this->linkscripts = array(
00587 "1" => "donothing",
00588 "3" => "donothing",
00589 "2" => "donothing");
00590 }
00591
00592
00593 function donothing($keywordin)
00594 {
00595 return $keywordin;
00596 }
00597
00598 }?>
