Rev 259 | Rev 280 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
259 | mikedld | 1 | |
2 | X dd ? |
||
3 | Y dd ? |
||
4 | ends |
||
5 | |||
6 | |||
7 | Left dd ? |
||
8 | Top dd ? |
||
9 | Right dd ? |
||
10 | Bottom dd ? |
||
11 | ends |
||
12 | |||
13 | |||
14 | Top dd ? |
||
15 | Size dd ? |
||
16 | ends |
||
17 | |||
18 | |||
19 | FilePath db PATHL dup(?) |
||
20 | FileName dd ? |
||
21 | Bounds RECT |
||
22 | Lines dd ? |
||
267 | mikedld | 23 | Lines.Count dd ? |
24 | Columns.Count dd ? |
||
25 | Caret POINT |
||
259 | mikedld | 26 | SelStart POINT |
27 | TopLeft POINT |
||
28 | VScroll SCROLLBAR |
||
29 | HScroll SCROLLBAR |
||
30 | Gutter.Width dd ? |
||
31 | Gutter.Visible db ? |
||
32 | AsmMode db ? |
||
33 | Modified db ? |
||
34 | db ? |
||
35 | ends |
||
36 | |||
37 | |||
38 | Editor EDITOR |
||
39 | ends |
||
40 | |||
41 | |||
42 | Bounds RECT |
||
267 | mikedld | 43 | Items dd ? |
44 | Items.Count dd ? |
||
45 | Items.Left dd ? |
||
46 | Current TABITEM |
||
47 | Current.Ptr dd ? |
||
48 | Buttons.First dd ? |
||
49 | Buttons.Last dd ? |
||
50 | Style db ? |
||
51 | db 3 dup(?) |
||
52 | ends |
||
259 | mikedld | 53 | |
54 | |||
55 | |||
56 | |||
178 | heavyiron | 57 | POPUP: |
58 | .actions dd ? |
||
59 | .data dd ? |
||
60 | .acc_ofs dd ? |
||
61 | .size: |
||
62 | .height dw ? |
||
63 | .width dw ? |
||
64 | .pos: |
||
65 | .y dw ? |
||
66 | .x dw ? |
||
67 | end virtual |
||
68 | |||
69 | |||
70 | { |
||
71 | common |
||
72 | local s1,s2,m1,m2,c1,c2 |
||
73 | m1 = 0 |
||
74 | m2 = 0 |
||
75 | c1 = 0 |
||
76 | c2 = 0 |
||
77 | if used _name |
||
78 | dd _name#.actions |
||
79 | dd _name#.data |
||
80 | dd ? |
||
81 | dw ? ; height |
||
82 | dw ? ; width |
||
83 | dw ? ; y |
||
84 | dw ? ; x |
||
85 | _name: |
||
86 | forward |
||
87 | if (lang eq _lang) | (_lang eq @!) |
||
259 | mikedld | 88 | db 1 |
178 | heavyiron | 89 | end if |
90 | common |
||
91 | .data: |
||
92 | forward |
||
93 | if (lang eq _lang) | (_lang eq @!) |
||
259 | mikedld | 94 | if _title eq '-' |
178 | heavyiron | 95 | db 1,'-' |
96 | c2 = c2+1 |
||
97 | else |
||
98 | virtual at 0 |
||
99 | db _title |
||
100 | s1 = $ |
||
101 | end virtual |
||
102 | if m1 < s1 |
||
103 | m1 = s1 |
||
104 | end if |
||
105 | virtual at 0 |
||
106 | db _accel |
||
107 | s2 = $ |
||
108 | end virtual |
||
109 | if m2 < s2 |
||
110 | m2 = s2 |
||
111 | end if |
||
112 | db s1,_title,s2,_accel |
||
113 | c1 = c1+1 |
||
114 | end if |
||
115 | end if |
||
116 | common |
||
117 | db 0 |
||
118 | align 4 |
||
119 | .actions: |
||
120 | forward |
||
121 | if (lang eq _lang) | (_lang eq @!) |
||
259 | mikedld | 122 | if (_action eq ) |
123 | dd 0 |
||
124 | else |
||
125 | dd _name#.#_action |
||
126 | end if |
||
127 | end if |
||
178 | heavyiron | 128 | common |
129 | .size = $-_name+20 |
||
130 | .max_title = m1 |
||
131 | .max_accel = m2 |
||
132 | .cnt_item = c1 |
||
133 | .cnt_sep = c2 |
||
134 | if (m2 = 0) |
||
135 | m2 = -2 |
||
136 | end if |
||
137 | store word (m1*6+m2*6+6*8) at _name+POPUP.width |
||
138 | store word (c1*POP_IHEIGHT+c2*4+4) at _name+POPUP.height |
||
139 | store dword (((m1+2)*6-1)*65536) at _name+POPUP.acc_ofs |
||
140 | end if |
||
141 | } |
||
142 | |||
143 | |||
144 | { |
||
145 | common |
||
146 | local s,m,c,x |
||
147 | m = 0 |
||
148 | c = 0 |
||
149 | x = 2 |
||
150 | if used _name |
||
151 | _name: |
||
152 | forward |
||
153 | if lang eq _lang |
||
154 | virtual at 0 |
||
155 | db _title |
||
156 | s = $ |
||
157 | end virtual |
||
158 | if m < s |
||
159 | m = s |
||
160 | end if |
||
161 | dw (s+2)*6,x,ATOPH-1,0 |
||
162 | db s,_title |
||
163 | c = c+1 |
||
164 | x = x + (s+2)*6 |
||
165 | end if |
||
166 | common |
||
167 | db 0 |
||
168 | align 4 |
||
169 | .popups: |
||
170 | forward |
||
171 | if lang eq _lang |
||
172 | dd _popup |
||
173 | end if |
||
174 | common |
||
175 | align 4 |
||
176 | .onshow: |
||
177 | forward |
||
178 | if lang eq _lang |
||
179 | dd _onshow |
||
180 | end if |
||
181 | common |
||
182 | .size = $-_name |
||
183 | .max_title = m |
||
184 | .cnt_item = c |
||
185 | .width = x-7 |
||
186 | end if |
||
187 | } |
||
188 | |||
189 | |||
190 | |||
191 | |||
192 | OPTS_AUTOBRACES = 00000010b |
||
193 | OPTS_AUTOINDENT = 00000100b |
||
194 | OPTS_SMARTTAB = 00001000b |
||
195 | OPTS_OPTIMSAVE = 00010000b |
||
196 | OPTS_LINENUMS = 00100000b |
||
197 | |||
198 | |||
267 | mikedld | 199 | |
200 | |||
201 | MEV_LUP = 2 |
||
202 | MEV_RDOWN = 3 |
||
203 | MEV_RUP = 4 |
||
204 | MEV_MOVE = 5 |
||
205 | |||
206 | |||
178 | heavyiron | 207 | |
208 | |||
209 | KM_CTRL = 0x00020000 |
||
210 | KM_ALT = 0x00040000 |
||
211 | |||
212 | |||
213 | KM_ALTSHIFT = 0x00050000 |
||
214 | KM_CTRLALT = 0x00060000 |
||
215 | |||
216 | |||
217 | |||
218 | |||
219 | |||
220 | |||
221 | KEY_SNAPSHOT = 0x00000137 |
||
222 | KEY_PAUSE = 0x0000021D |
||
223 | |||
224 | |||
225 | KEY_F2 = 0x0000003C |
||
226 | KEY_F3 = 0x0000003D |
||
227 | KEY_F4 = 0x0000003E |
||
228 | KEY_F5 = 0x0000003F |
||
229 | KEY_F6 = 0x00000040 |
||
230 | KEY_F7 = 0x00000041 |
||
231 | KEY_F8 = 0x00000042 |
||
232 | KEY_F9 = 0x00000043 |
||
233 | KEY_F10 = 0x00000044 |
||
234 | KEY_F11 = 0x00000057 |
||
235 | KEY_F12 = 0x00000058 |
||
236 | |||
237 | |||
238 | KEY_MINUS = 0x0000000C |
||
239 | KEY_EQUAL = 0x0000000D |
||
240 | KEY_BACKSPACE = 0x0000000E |
||
241 | KEY_TAB = 0x0000000F |
||
242 | KEY_SQBRACE1 = 0x0000001A |
||
243 | KEY_SQBRACE2 = 0x0000001B |
||
244 | KEY_SLASH1 = 0x00000035 |
||
245 | KEY_SLASH2 = 0x0000002B |
||
246 | KEY_SEMICOLON = 0x00000027 |
||
247 | KEY_QUOTE = 0x00000028 |
||
248 | KEY_COMMA = 0x00000033 |
||
249 | KEY_DOT = 0x00000034 |
||
250 | KEY_SPACE = 0x00000039 |
||
251 | |||
252 | |||
253 | KEY_2 = 0x00000003 |
||
254 | KEY_3 = 0x00000004 |
||
255 | KEY_4 = 0x00000005 |
||
256 | KEY_5 = 0x00000006 |
||
257 | KEY_6 = 0x00000007 |
||
258 | KEY_7 = 0x00000008 |
||
259 | KEY_8 = 0x00000009 |
||
260 | KEY_9 = 0x0000000A |
||
261 | KEY_0 = 0x0000000B |
||
262 | |||
263 | |||
264 | KEY_B = 0x00000030 |
||
265 | KEY_C = 0x0000002E |
||
266 | KEY_D = 0x00000020 |
||
267 | KEY_E = 0x00000012 |
||
268 | KEY_F = 0x00000021 |
||
269 | KEY_G = 0x00000022 |
||
270 | KEY_H = 0x00000023 |
||
271 | KEY_I = 0x00000017 |
||
272 | KEY_J = 0x00000024 |
||
273 | KEY_K = 0x00000025 |
||
274 | KEY_L = 0x00000026 |
||
275 | KEY_M = 0x00000032 |
||
276 | KEY_N = 0x00000031 |
||
277 | KEY_O = 0x00000018 |
||
278 | KEY_P = 0x00000019 |
||
279 | KEY_Q = 0x00000010 |
||
280 | KEY_R = 0x00000013 |
||
281 | KEY_S = 0x0000001F |
||
282 | KEY_T = 0x00000014 |
||
283 | KEY_U = 0x00000016 |
||
284 | KEY_V = 0x0000002F |
||
285 | KEY_W = 0x00000011 |
||
286 | KEY_X = 0x0000002D |
||
287 | KEY_Y = 0x00000015 |
||
288 | KEY_Z = 0x0000002C |
||
289 | |||
290 | |||
291 | KEY_SCRLK = 0x00000046 |
||
292 | KEY_NUMLK = 0x00000069 |
||
293 | |||
294 | |||
295 | KEY_NUMRETURN = 0x0000011C |
||
296 | |||
297 | |||
298 | KEY_RCONTROL = 0x0000011D |
||
299 | KEY_LSHIFT = 0x0000002A |
||
300 | KEY_RSHIFT = 0x00000036 |
||
301 | KEY_LALT = 0x00000038 |
||
302 | KEY_RALT = 0x00000138 |
||
303 | |||
304 | |||
305 | KEY_RWIN = 0x0000015C |
||
306 | KEY_APPS = 0x0000015D |
||
307 | |||
308 | |||
309 | KEY_DELETE = 0x00000153 |
||
310 | KEY_HOME = 0x00000147 |
||
311 | KEY_END = 0x0000014F |
||
312 | KEY_PAGEUP = 0x00000149 |
||
313 | KEY_PAGEDOWN = 0x00000151 |
||
314 | KEY_UP = 0x00000148 |
||
315 | KEY_LEFT = 0x0000014B |
||
316 | KEY_RIGHT = 0x0000014D |
||
317 | KEY_DOWN = 0x00000150 |
||
318 | |||
319 | |||
320 | KEY_MULTIPLY = 0x00000037 |
||
321 | KEY_SUBTRACT = 0x0000004A |
||
322 | KEY_ADD = 0x0000004E |
||
323 | KEY_SEPARATOR = 0x00000053 |
||
324 | |||
325 | |||
326 | KEY_NUM2 = 0x00000050 |
||
327 | KEY_NUM3 = 0x00000051 |
||
328 | KEY_NUM4 = 0x0000004B |
||
329 | KEY_NUM5 = 0x0000004C |
||
330 | KEY_NUM6 = 0x0000004D |
||
331 | KEY_NUM7 = 0x00000047 |
||
332 | KEY_NUM8 = 0x00000048 |
||
333 | KEY_NUM9 = 0x00000049 |
||
334 | KEY_NUM0 = 0x00000052 |
||
335 | |||
336 | |||
337 | |||
338 | |||
339 | KEY_MYPICTURES = 0x00000164 |
||
340 | KEY_MYMUSIC = 0x0000013C |
||
341 | KEY_MUTE = 0x00000120 |
||
342 | KEY_PLAYPAUSE = 0x00000122 |
||
343 | KEY_STOP = 0x00000124 |
||
344 | KEY_VOLUMEUP = 0x00000130 |
||
345 | KEY_VOLUMEDOWN = 0x0000013E |
||
346 | KEY_PREVSONG = 0x00000110 |
||
347 | KEY_NEXTSONG = 0x00000119 |
||
348 | KEY_MEDIA = 0x0000016D |
||
349 | KEY_MAIL = 0x0000016C |
||
350 | KEY_WEBHOME = 0x00000132 |
||
351 | KEY_MESSENGER = 0x00000105 |
||
352 | |||
353 | |||
354 | KEY_LOGOFF = 0x00000116 |
||
355 | KEY_SLEEP = 0x0000015F>>> |
||
356 |