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_dibol extends HFile{
00006 function HFile_dibol(){
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", "brown");
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 "AP" => "",
00046 "AR" => "",
00047 "DEF" => "",
00048 "RBP" => "",
00049 ".align" => "1",
00050 ".define" => "1",
00051 ".else" => "1",
00052 ".end" => "1",
00053 ".endc" => "1",
00054 ".function" => "1",
00055 ".ifdef" => "1",
00056 ".ifndef" => "1",
00057 ".include" => "1",
00058 ".proc" => "1",
00059 ".subroutine" => "1",
00060 "accept" => "1",
00061 "begin" => "1",
00062 "begincase" => "1",
00063 "byte" => "1",
00064 "call" => "1",
00065 "case" => "1",
00066 "clear" => "1",
00067 "close" => "1",
00068 "common" => "1",
00069 "decr" => "1",
00070 "delet" => "3",
00071 "delete" => "1",
00072 "display" => "1",
00073 "do" => "1",
00074 "else" => "1",
00075 "end" => "1",
00076 "endcase" => "1",
00077 "endglobal" => "1",
00078 "endgroup" => "1",
00079 "endusing" => "1",
00080 "exit" => "1",
00081 "exitloop" => "1",
00082 "find" => "1",
00083 "flush" => "1",
00084 "for" => "1",
00085 "forever" => "1",
00086 "forms" => "1",
00087 "freturn" => "1",
00088 "from" => "1",
00089 "function" => "1",
00090 "get" => "1",
00091 "gets" => "1",
00092 "global" => "1",
00093 "goto" => "1",
00094 "group" => "1",
00095 "if" => "1",
00096 "incr" => "1",
00097 "locase" => "1",
00098 "long" => "1",
00099 "lpque" => "1",
00100 "merge" => "1",
00101 "nextloop" => "1",
00102 "nop" => "1",
00103 "of" => "1",
00104 "offerror" => "1",
00105 "on" => "1",
00106 "onerror" => "1",
00107 "open" => "1",
00108 "proc" => "1",
00109 "purge" => "1",
00110 "put" => "1",
00111 "puts" => "1",
00112 "quad" => "1",
00113 "range" => "1",
00114 "read" => "1",
00115 "reads" => "1",
00116 "record" => "1",
00117 "renam" => "3",
00118 "repeat" => "1",
00119 "return" => "1",
00120 "send" => "1",
00121 "set" => "1",
00122 "sleep" => "1",
00123 "sort" => "1",
00124 "stop" => "1",
00125 "store" => "1",
00126 "subroutine" => "1",
00127 "then" => "1",
00128 "thru" => "1",
00129 "unlock" => "1",
00130 "until" => "1",
00131 "upcase" => "1",
00132 "using" => "1",
00133 "while" => "1",
00134 "word" => "1",
00135 "write" => "1",
00136 "writes" => "1",
00137 "xcall" => "1",
00138 "xreturn" => "1",
00139 ".and." => "2",
00140 ".band." => "2",
00141 ".bnand." => "2",
00142 ".bnot." => "2",
00143 ".bor." => "2",
00144 ".bxor." => "2",
00145 ".eq." => "2",
00146 ".eqs." => "2",
00147 ".ge." => "2",
00148 ".ges." => "2",
00149 ".gt." => "2",
00150 ".gts." => "2",
00151 ".le." => "2",
00152 ".les." => "2",
00153 ".lt." => "2",
00154 ".lts." => "2",
00155 ".ne." => "2",
00156 ".nes." => "2",
00157 ".not." => "2",
00158 ".or." => "2",
00159 ".xor." => "2",
00160 "%abs" => "3",
00161 "%atrim" => "3",
00162 "%bkstr" => "3",
00163 "%char" => "3",
00164 "%chopen" => "3",
00165 "%date" => "3",
00166 "%datecompiled" => "3",
00167 "%datetime" => "3",
00168 "%decml" => "3",
00169 "%erlin" => "3",
00170 "%ernum" => "3",
00171 "%error" => "3",
00172 "%false" => "3",
00173 "%instr" => "3",
00174 "%int" => "3",
00175 "%integer" => "3",
00176 "%len" => "3",
00177 "%line" => "3",
00178 "%rdlen" => "3",
00179 "%recnum" => "3",
00180 "%round" => "3",
00181 "%rsize" => "3",
00182 "%rvstr" => "3",
00183 "%string" => "3",
00184 "%syserr" => "3",
00185 "%tnmbr" => "3",
00186 "%trim" => "3",
00187 "%true" => "3",
00188 "%zoned" => "3",
00189 "ascii" => "3",
00190 "atrim" => "3",
00191 "cmdlin" => "3",
00192 "date" => "3",
00193 "decml" => "3",
00194 "envrn" => "3",
00195 "error" => "3",
00196 "ertxt" => "3",
00197 "exec" => "3",
00198 "execute" => "3",
00199 "fatal" => "3",
00200 "fill" => "3",
00201 "filnm" => "3",
00202 "flags" => "3",
00203 "free" => "3",
00204 "getlog" => "3",
00205 "instr" => "3",
00206 "isamc" => "3",
00207 "isclr" => "3",
00208 "iskey" => "3",
00209 "issts" => "3",
00210 "len" => "3",
00211 "randm" => "3",
00212 "shell" => "3",
00213 "size" => "3",
00214 "spawn" => "3",
00215 "time" => "3",
00216 "tnmbr" => "3",
00217 "trim" => "3",
00218 "versn" => "3",
00219 "wait" => "3",
00220 "wkday" => "3",
00221 "w_area" => "3",
00222 "w_brdr" => "3",
00223 "w_caption" => "3",
00224 "w_disp" => "3",
00225 "w_exit" => "3",
00226 "w_flds" => "3",
00227 "w_info" => "3",
00228 "w_init" => "3",
00229 "w_proc" => "3",
00230 "w_restore" => "3",
00231 "w_save" => "3",
00232 "w_updt" => "3",
00233 "^a" => "3",
00234 "^d" => "3",
00235 "^defined" => "3",
00236 "^i" => "3",
00237 "^len" => "3",
00238 "^passed" => "3",
00239 "^size" => "3",
00240 "input" => "4",
00241 "lpoff" => "4",
00242 "lpon" => "4",
00243 "lpout" => "4",
00244 "mesag" => "4",
00245 "outpt" => "4",
00246 "rdate" => "4",
00247 "terid" => "4",
00248 "vim_bad_stknum_ok" => "4",
00249 "vim_close" => "4",
00250 "vim_comp_id" => "4",
00251 "vim_delete" => "4",
00252 "vim_find" => "4",
00253 "vim_get_file" => "4",
00254 "vim_get_stknum" => "4",
00255 "vim_init" => "4",
00256 "vim_open" => "4",
00257 "vim_override_cost" => "4",
00258 "vim_read" => "4",
00259 "vim_reads" => "4",
00260 "vim_set_prompt" => "4",
00261 "vim_squeeze_key" => "4",
00262 "vim_store" => "4",
00263 "vim_unlock" => "4",
00264 "vim_vendor" => "4",
00265 "vim_write" => "4",
00266 "vim_writes" => "4",
00267 "wate" => "4");
00268
00269
00270
00271
00272
00273
00274
00275
00276 $this->linkscripts = array(
00277 "" => "donothing",
00278 "1" => "donothing",
00279 "3" => "donothing",
00280 "2" => "donothing",
00281 "4" => "donothing");
00282 }
00283
00284
00285 function donothing($keywordin)
00286 {
00287 return $keywordin;
00288 }
00289
00290 }?>