7 {
9
10
11
12
13
14
15$this->nocase = "0";
16$this->notrim = "0";
17$this->perl = "0";
18
19
20
21$this->colours = array("blue", "purple", "gray", "brown");
22$this->quotecolour = "blue";
23$this->blockcommentcolour = "green";
24$this->linecommentcolour = "green";
25
26
27
28$this->indent = array("do", "global function", "if");
29$this->unindent = array("end if", "end while", "end for", "end function", "end procedure", "end type");
30
31
32
33$this->stringchars = array("\"");
34$this->delimiters = array("~", "@", "%", "^", "&", "*", "(", ")", "-", "+", "|", "\\", "{", "}", "[", "]", ":", ";", "\"", "'", "<", ">", " ", ",", " ");
35$this->escchar = "\\";
36
37
38
39$this->linecommenton = array("--");
40$this->blockcommenton = array("");
41$this->blockcommentoff = array("");
42
43
44
45$this->keywords = array(
46 "and" => "1",
47 "by" => "1",
48 "constant" => "1",
49 "do" => "1",
50 "else" => "1",
51 "elsif" => "1",
52 "end" => "1",
53 "exit" => "1",
54 "for" => "1",
55 "function" => "1",
56 "global" => "1",
57 "if" => "1",
58 "include" => "1",
59 "not" => "1",
60 "or" => "1",
61 "procedure" => "1",
62 "return" => "1",
63 "then" => "1",
64 "to" => "1",
65 "type" => "1",
66 "while" => "1",
67 "with" => "1",
68 "without" => "1",
69 "xor" => "1",
70 "atom" => "2",
71 "integer" => "2",
72 "object" => "2",
73 "sequence" => "2",
74 "?" => "3",
75 "append" => "3",
76 "arcsin" => "3",
77 "arccos" => "3",
78 "arctan" => "3",
79 "and_bits" => "3",
80 "allow_break" => "3",
81 "abort" => "3",
82 "all_palette" => "3",
83 "allocate" => "3",
84 "allocate_low" => "3",
85 "allocate_string" => "3",
86 "atom_to_float64" => "3",
87 "atom_to_float32" => "3",
88 "bk_color" => "3",
89 "bytes_to_int" => "3",
90 "bits_to_int" => "3",
91 "compare" => "3",
92 "custom_sort" => "3",
93 "cos" => "3",
94 "close" => "3",
95 "current_dir" => "3",
96 "chdir" => "3",
97 "check_break" => "3",
98 "command_line" => "3",
99 "clear_screen" => "3",
100 "cursor" => "3",
101 "call" => "3",
102 "crash_file" => "3",
103 "crash_message" => "3",
104 "call_proc" => "3",
105 "call_func" => "3",
106 "c_proc" => "3",
107 "c_func" => "3",
108 "call_back" => "3",
109 "dir" => "3",
110 "date" => "3",
111 "display_text_image" => "3",
112 "draw_line" => "3",
113 "display_image" => "3",
114 "dos_interrupt" => "3",
115 "define_c_proc" => "3",
116 "define_c_func" => "3",
117 "define_c_var" => "3",
118 "equal" => "3",
119 "ellipse" => "3",
120 "find" => "3",
121 "floor" => "3",
122 "flush" => "3",
123 "free" => "3",
124 "free_low" => "3",
125 "float64_to_atom" => "3",
126 "float32_to_atom" => "3",
127 "free_console" => "3",
128 "get" => "3",
129 "getc" => "3",
130 "gets" => "3",
131 "get_bytes" => "3",
132 "get_key" => "3",
133 "get_mouse" => "3",
134 "getenv" => "3",
135 "get_position" => "3",
136 "graphics_mode" => "3",
137 "get_all_palette" => "3",
138 "get_active_page" => "3",
139 "get_display_page" => "3",
140 "get_screen_char" => "3",
141 "get_pixel" => "3",
142 "get_vector" => "3",
143 "int_to_bytes" => "3",
144 "int_to_bits" => "3",
145 "instance" => "3",
146 "length" => "3",
147 "lower" => "3",
148 "log" => "3",
149 "lock_file" => "3",
150 "lock_memory" => "3",
151 "match" => "3",
152 "mouse_events" => "3",
153 "mouse_pointer" => "3",
154 "machine_func" => "3",
155 "machine_proc" => "3",
156 "mem_copy" => "3",
157 "mem_set" => "3",
158 "message_box" => "3",
159 "not_bits" => "3",
160 "or_bits" => "3",
161 "open" => "3",
162 "open_dll" => "3",
163 "PI" => "3",
164 "prepend" => "3",
165 "power" => "3",
166 "print" => "3",
167 "printf" => "3",
168 "puts" => "3",
169 "prompt_string" => "3",
170 "prompt_number" => "3",
171 "platform" => "3",
172 "profile" => "3",
173 "position" => "3",
174 "palette" => "3",
175 "put_screen_char" => "3",
176 "pixel" => "3",
177 "polygon" => "3",
178 "peek" => "3",
179 "peek4s" => "3",
180 "peek4u" => "3",
181 "poke" => "3",
182 "poke4" => "3",
183 "rand" => "3",
184 "repeat" => "3",
185 "reverse" => "3",
186 "remainder" => "3",
187 "read_bitmap" => "3",
188 "register_block" => "3",
189 "routine_id" => "3",
190 "sin" => "3",
191 "sort" => "3",
192 "sqrt" => "3",
193 "sprintf" => "3",
194 "seek" => "3",
195 "system" => "3",
196 "system_exec" => "3",
197 "sleep" => "3",
198 "scroll" => "3",
199 "save_bitmap" => "3",
200 "set_active_page" => "3",
201 "set_display_page" => "3",
202 "sound" => "3",
203 "save_text_image" => "3",
204 "save_screen" => "3",
205 "save_image" => "3",
206 "set_vector" => "3",
207 "set_rand" => "3",
208 "tan" => "3",
209 "time" => "3",
210 "tick_rate" => "3",
211 "trace" => "3",
212 "text_color" => "3",
213 "text_rows" => "3",
214 "upper" => "3",
215 "unlock_file" => "3",
216 "unregister_block" => "3",
217 "use_vesa" => "3",
218 "value" => "3",
219 "video_config" => "3",
220 "wildcard_match" => "3",
221 "wildcard_file" => "3",
222 "wait_key" => "3",
223 "where" => "3",
224 "walk_dir" => "3",
225 "wrap" => "3",
226 "xor_bits" => "3",
227 "<" => "4",
228 "<=" => "4",
229 ">" => "4",
230 ">=" => "4",
231 "=" => "4",
232 "!=" => "4",
233 "+" => "4",
234 "+=" => "4",
235 "-" => "4",
236 "-=" => "4",
237 "*" => "4",
238 "*=" => "4",
239 "//" => "4",
240 "/" => "4",
241 "/=" => "4",
242 ".." => "4",
243 "&" => "4",
244 "&=" => "4");
245
246
247
248
249
250
251
252
253$this->linkscripts = array(
254 "1" => "donothing",
255 "2" => "donothing",
256 "3" => "donothing",
257 "4" => "donothing");
258
259}