Rev 1010 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1723 | ataualpa | 1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
31 | halyavin | 2 | ; ; |
3 | ; Stack Configuration Tool ; |
||
4 | ; ; |
||
5 | ; Compile with FASM for Menuet ; |
||
6 | ; ; |
||
7 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
||
8 | |||
199 | heavyiron | 9 | |
10 | memsize = 100000h |
||
664 | ataualpa | 11 | org 0 |
12 | PARAMS = memsize - 1024 |
||
199 | heavyiron | 13 | |
31 | halyavin | 14 | use32 |
15 | |||
664 | ataualpa | 16 | db 'MENUET01' ; 8 byte id |
17 | dd 0x01 ; header version |
||
18 | dd START ; start of code |
||
19 | dd I_END ; size of image |
||
20 | dd memsize ; memory for app |
||
21 | dd memsize - 1024 ; esp |
||
22 | dd PARAMS , 0x0 ; I_Param , I_Icon |
||
31 | halyavin | 23 | |
24 | include 'lang.inc' |
||
1010 | hidnplayr | 25 | include '../../../macros.inc' |
485 | heavyiron | 26 | |
664 | ataualpa | 27 | START: ; start of execution |
31 | halyavin | 28 | |
1010 | hidnplayr | 29 | read_stack_setup: |
199 | heavyiron | 30 | |
1010 | hidnplayr | 31 | mov eax,52 |
32 | mov ebx,0 |
||
33 | mcall |
||
34 | mov [config],eax |
||
199 | heavyiron | 35 | |
1010 | hidnplayr | 36 | mov eax,52 |
37 | mov ebx,1 |
||
38 | mcall |
||
39 | mov dword [ip_address],eax |
||
40 | |||
41 | mov eax,52 |
||
42 | mov ebx,9 |
||
43 | mcall |
||
44 | mov dword [gateway_ip],eax |
||
45 | |||
46 | mov eax,52 |
||
47 | mov ebx,10 |
||
48 | mcall |
||
49 | mov dword [subnet_mask],eax |
||
50 | |||
51 | mov eax,52 |
||
52 | mov ebx,13 |
||
53 | mcall |
||
54 | mov dword [dns_ip],eax |
||
55 | |||
56 | mov eax,[config] ; unwrap com IRQ |
||
57 | shr eax,8 |
||
58 | and eax,0xf |
||
59 | mov [com_irq],eax |
||
60 | |||
61 | mov eax,[config] ; unwrap com PORT |
||
62 | shr eax,16 |
||
63 | and eax,0xfff |
||
64 | mov [com_add],eax |
||
65 | |||
66 | mov eax,[config] ; unwrap IRQ |
||
67 | and eax,0xf |
||
68 | mov [interface],eax |
||
69 | |||
70 | mov eax,[config] ; unwrap com PORT |
||
71 | shr eax,7 |
||
72 | and eax,1 |
||
73 | mov [assigned],eax |
||
74 | |||
485 | heavyiron | 75 | red: |
664 | ataualpa | 76 | call draw_window ; at first, draw the window |
31 | halyavin | 77 | |
78 | still: |
||
79 | |||
664 | ataualpa | 80 | mov eax,10 ; wait here for event |
485 | heavyiron | 81 | mcall |
31 | halyavin | 82 | |
664 | ataualpa | 83 | cmp eax,1 ; redraw request ? |
84 | jz red |
||
85 | cmp eax,2 ; key in buffer ? |
||
485 | heavyiron | 86 | jnz button |
31 | halyavin | 87 | |
664 | ataualpa | 88 | key: ; key |
625 | diamond | 89 | ; mov al,2 ; just read it and ignore |
485 | heavyiron | 90 | mcall |
31 | halyavin | 91 | jmp still |
92 | |||
664 | ataualpa | 93 | button: ; button |
94 | mov al,17 ; get id |
||
485 | heavyiron | 95 | mcall |
31 | halyavin | 96 | |
97 | shr eax,8 |
||
98 | |||
664 | ataualpa | 99 | dec eax ; button id=1 ? |
31 | halyavin | 100 | jne noclose |
664 | ataualpa | 101 | or eax,-1 ; close this program |
485 | heavyiron | 102 | mcall |
31 | halyavin | 103 | noclose: |
104 | |||
664 | ataualpa | 105 | dec eax |
106 | je read_stack_setup |
||
31 | halyavin | 107 | |
664 | ataualpa | 108 | dec eax |
199 | heavyiron | 109 | jne no_apply_stack_setup |
110 | call apply_stack_setup |
||
111 | jmp still |
||
31 | halyavin | 112 | |
199 | heavyiron | 113 | no_apply_stack_setup: |
664 | ataualpa | 114 | dec eax ; GET COM PORT |
625 | diamond | 115 | dec eax |
31 | halyavin | 116 | jne no_read_comport |
117 | mov [string_x],272 |
||
118 | mov [string_y],40 |
||
119 | mov [string_length],3 |
||
120 | call read_string |
||
121 | movzx eax,byte [string] |
||
122 | cmp eax,'A' |
||
664 | ataualpa | 123 | jb gcp1 |
31 | halyavin | 124 | sub eax,'A'-'9'-1 |
125 | gcp1: |
||
126 | sub eax,48 |
||
127 | shl eax,8 |
||
128 | mov ebx,eax |
||
129 | movzx eax,byte [string+1] |
||
130 | cmp eax,'A' |
||
664 | ataualpa | 131 | jb gcp2 |
31 | halyavin | 132 | sub eax,'A'-'9'-1 |
133 | gcp2: |
||
134 | sub eax,48 |
||
135 | shl eax,4 |
||
136 | add ebx,eax |
||
137 | movzx eax,byte [string+2] |
||
138 | cmp eax,'A' |
||
664 | ataualpa | 139 | jb gcp3 |
31 | halyavin | 140 | sub eax,'A'-'9'-1 |
141 | gcp3: |
||
142 | sub eax,48 |
||
143 | add ebx,eax |
||
144 | mov [com_add],ebx |
||
625 | diamond | 145 | jmp red |
31 | halyavin | 146 | no_read_comport: |
147 | |||
664 | ataualpa | 148 | dec eax ; GET COM IRQ |
31 | halyavin | 149 | jne no_read_comirq |
150 | mov [string_x],284 |
||
151 | mov [string_y],50 |
||
152 | mov [string_length],1 |
||
153 | call read_string |
||
154 | movzx eax,byte [string] |
||
155 | cmp eax,'A' |
||
664 | ataualpa | 156 | jb gci1 |
31 | halyavin | 157 | sub eax,'A'-'9'-1 |
158 | gci1: |
||
159 | sub eax,48 |
||
160 | mov [com_irq],eax |
||
625 | diamond | 161 | jmp red |
31 | halyavin | 162 | no_read_comirq: |
163 | |||
664 | ataualpa | 164 | dec eax ; GET IP |
625 | diamond | 165 | jne no_read_ip |
166 | mov [string_x],205 |
||
167 | mov [string_y],80 |
||
168 | mov [string_length],15 |
||
169 | call read_string |
||
170 | mov esi,string-1 |
||
171 | mov edi,ip_address |
||
172 | ip0: |
||
173 | xor eax,eax |
||
174 | ip1: |
||
175 | inc esi |
||
176 | cmp [esi],byte '0' |
||
664 | ataualpa | 177 | jb ip2 |
625 | diamond | 178 | cmp [esi],byte '9' |
664 | ataualpa | 179 | jg ip2 |
625 | diamond | 180 | imul eax,10 |
181 | movzx ebx,byte [esi] |
||
182 | sub ebx,48 |
||
183 | add eax,ebx |
||
184 | jmp ip1 |
||
185 | ip2: |
||
186 | stosb |
||
187 | cmp edi,ip_address+3 |
||
188 | jbe ip0 |
||
189 | jmp red |
||
190 | no_read_ip: |
||
664 | ataualpa | 191 | |
192 | dec eax ; set gateway ip |
||
31 | halyavin | 193 | jne no_set_gateway |
194 | |||
195 | mov [string_x],205 |
||
196 | mov [string_y],90 |
||
197 | mov [string_length],15 |
||
198 | call read_string |
||
199 | mov esi,string-1 |
||
200 | mov edi,gateway_ip |
||
625 | diamond | 201 | gip0: |
31 | halyavin | 202 | xor eax,eax |
203 | gip1: |
||
204 | inc esi |
||
205 | cmp [esi],byte '0' |
||
664 | ataualpa | 206 | jb gip2 |
31 | halyavin | 207 | cmp [esi],byte '9' |
664 | ataualpa | 208 | jg gip2 |
31 | halyavin | 209 | imul eax,10 |
210 | movzx ebx,byte [esi] |
||
211 | sub ebx,48 |
||
212 | add eax,ebx |
||
213 | jmp gip1 |
||
214 | gip2: |
||
625 | diamond | 215 | stosb |
31 | halyavin | 216 | cmp edi,gateway_ip+3 |
625 | diamond | 217 | jbe gip0 |
218 | jmp red |
||
31 | halyavin | 219 | |
625 | diamond | 220 | no_set_gateway: |
31 | halyavin | 221 | |
625 | diamond | 222 | dec eax |
31 | halyavin | 223 | jne no_set_subnet |
224 | |||
225 | mov [string_x],205 |
||
226 | mov [string_y],100 |
||
227 | mov [string_length],15 |
||
228 | call read_string |
||
229 | mov esi,string-1 |
||
230 | mov edi,subnet_mask |
||
625 | diamond | 231 | sip0: |
31 | halyavin | 232 | xor eax,eax |
233 | sip1: |
||
234 | inc esi |
||
235 | cmp [esi],byte '0' |
||
664 | ataualpa | 236 | jb sip2 |
31 | halyavin | 237 | cmp [esi],byte '9' |
664 | ataualpa | 238 | jg sip2 |
31 | halyavin | 239 | imul eax,10 |
240 | movzx ebx,byte [esi] |
||
241 | sub ebx,48 |
||
242 | add eax,ebx |
||
243 | jmp sip1 |
||
244 | sip2: |
||
625 | diamond | 245 | stosb |
31 | halyavin | 246 | cmp edi,subnet_mask+3 |
625 | diamond | 247 | jbe sip0 |
248 | jmp red |
||
31 | halyavin | 249 | |
250 | no_set_subnet: |
||
625 | diamond | 251 | dec eax |
31 | halyavin | 252 | jne no_set_dns |
253 | |||
254 | mov [string_x],205 |
||
255 | mov [string_y],110 |
||
256 | mov [string_length],15 |
||
257 | call read_string |
||
258 | mov esi,string-1 |
||
259 | mov edi,dns_ip |
||
625 | diamond | 260 | dip0: |
31 | halyavin | 261 | xor eax,eax |
262 | dip1: |
||
263 | inc esi |
||
264 | cmp [esi],byte '0' |
||
664 | ataualpa | 265 | jb dip2 |
31 | halyavin | 266 | cmp [esi],byte '9' |
664 | ataualpa | 267 | jg dip2 |
31 | halyavin | 268 | imul eax,10 |
269 | movzx ebx,byte [esi] |
||
270 | sub ebx,48 |
||
271 | add eax,ebx |
||
272 | jmp dip1 |
||
273 | dip2: |
||
625 | diamond | 274 | stosb |
31 | halyavin | 275 | cmp edi,dns_ip+3 |
625 | diamond | 276 | jbe dip0 |
277 | jmp red |
||
31 | halyavin | 278 | |
279 | no_set_dns: |
||
280 | |||
625 | diamond | 281 | dec eax |
664 | ataualpa | 282 | jb no_set_interface |
625 | diamond | 283 | cmp eax,14-11 |
664 | ataualpa | 284 | ja no_set_interface |
625 | diamond | 285 | mov [interface],eax |
286 | jmp red |
||
287 | no_set_interface: |
||
31 | halyavin | 288 | |
625 | diamond | 289 | sub eax,21-11 |
664 | ataualpa | 290 | jb no_ip_sf |
625 | diamond | 291 | cmp eax,22-21 |
664 | ataualpa | 292 | ja no_ip_sf |
625 | diamond | 293 | xor eax,1 |
294 | mov [assigned],eax |
||
295 | jmp red |
||
296 | no_ip_sf: |
||
297 | jmp still |
||
31 | halyavin | 298 | |
299 | apply_stack_setup: |
||
300 | |||
301 | mov eax,[com_irq] |
||
302 | shl eax,8 |
||
303 | mov ebx,[com_add] |
||
304 | shl ebx,16 |
||
305 | add eax,ebx |
||
306 | add eax,[interface] |
||
307 | mov ebx,[assigned] |
||
308 | shl ebx,7 |
||
309 | add eax,ebx |
||
310 | mov [config],eax |
||
311 | |||
312 | mov eax,52 |
||
313 | mov ebx,3 |
||
314 | mov ecx,dword [ip_address] |
||
485 | heavyiron | 315 | mcall |
31 | halyavin | 316 | |
317 | mov eax,52 |
||
318 | mov ebx,11 |
||
319 | mov ecx,dword [gateway_ip] |
||
485 | heavyiron | 320 | mcall |
31 | halyavin | 321 | |
322 | mov eax,52 |
||
323 | mov ebx,12 |
||
324 | mov ecx,dword [subnet_mask] |
||
485 | heavyiron | 325 | mcall |
31 | halyavin | 326 | |
327 | mov eax,52 |
||
328 | mov ebx,14 |
||
329 | mov ecx,dword [dns_ip] |
||
485 | heavyiron | 330 | mcall |
31 | halyavin | 331 | |
332 | mov eax,52 |
||
333 | mov ebx,2 |
||
334 | mov ecx,[config] |
||
485 | heavyiron | 335 | mcall |
31 | halyavin | 336 | |
199 | heavyiron | 337 | ret |
31 | halyavin | 338 | |
339 | |||
340 | string_length dd 16 |
||
341 | string_x dd 200 |
||
342 | string_y dd 60 |
||
343 | |||
664 | ataualpa | 344 | string db '________________' |
31 | halyavin | 345 | |
346 | |||
347 | read_string: |
||
348 | |||
349 | mov edi,string |
||
350 | mov eax,'_' |
||
351 | mov ecx,[string_length] |
||
352 | cld |
||
353 | rep stosb |
||
354 | call print_text |
||
355 | |||
356 | mov edi,string |
||
357 | f11: |
||
358 | mov eax,10 |
||
485 | heavyiron | 359 | mcall |
31 | halyavin | 360 | cmp eax,2 |
361 | jne read_done |
||
625 | diamond | 362 | ; mov eax,2 |
485 | heavyiron | 363 | mcall |
31 | halyavin | 364 | shr eax,8 |
365 | cmp eax,13 |
||
664 | ataualpa | 366 | je read_done |
31 | halyavin | 367 | cmp eax,8 |
368 | jnz nobsl |
||
369 | cmp edi,string |
||
664 | ataualpa | 370 | jz f11 |
31 | halyavin | 371 | sub edi,1 |
372 | mov [edi],byte '_' |
||
373 | call print_text |
||
374 | jmp f11 |
||
375 | nobsl: |
||
376 | cmp eax,dword 31 |
||
377 | jbe f11 |
||
378 | cmp eax,dword 95 |
||
664 | ataualpa | 379 | jb keyok |
31 | halyavin | 380 | sub eax,32 |
381 | keyok: |
||
382 | mov [edi],al |
||
383 | call print_text |
||
384 | |||
385 | inc edi |
||
386 | mov esi,string |
||
387 | add esi,[string_length] |
||
388 | cmp esi,edi |
||
389 | jnz f11 |
||
390 | |||
391 | read_done: |
||
392 | |||
393 | print_text: |
||
394 | |||
395 | pusha |
||
396 | |||
397 | mov eax,13 |
||
398 | mov ebx,[string_x] |
||
399 | shl ebx,16 |
||
400 | add ebx,[string_length] |
||
401 | imul bx,6 |
||
402 | mov ecx,[string_y] |
||
403 | shl ecx,16 |
||
404 | mov cx,8 |
||
405 | mov edx,0xffffff |
||
485 | heavyiron | 406 | mcall |
31 | halyavin | 407 | |
408 | mov eax,4 |
||
409 | mov ebx,[string_x] |
||
410 | shl ebx,16 |
||
411 | add ebx,[string_y] |
||
412 | mov ecx,0x000000 |
||
413 | mov edx,string |
||
414 | mov esi,[string_length] |
||
485 | heavyiron | 415 | mcall |
31 | halyavin | 416 | |
417 | popa |
||
418 | ret |
||
419 | |||
420 | |||
421 | |||
422 | |||
423 | |||
424 | |||
425 | |||
426 | ; ********************************************* |
||
427 | ; ******* WINDOW DEFINITIONS AND DRAW ******** |
||
428 | ; ********************************************* |
||
429 | |||
430 | |||
431 | draw_window: |
||
432 | |||
664 | ataualpa | 433 | mov eax,12 ; function 12:tell os about windowdraw |
434 | mov ebx,1 ; 1, start of draw |
||
485 | heavyiron | 435 | mcall |
31 | halyavin | 436 | |
664 | ataualpa | 437 | ; DRAW WINDOW |
438 | mov eax,0 ; function 0 : define and draw window |
||
439 | mov ebx,100*65536+330 ; [x start] *65536 + [x size] |
||
440 | mov ecx,100*65536+157 ; [y start] *65536 + [y size] |
||
441 | mov edx,0x14ffffff ; color of work area RRGGBB,8->color gl |
||
442 | mov edi,title ; WINDOW LABEL |
||
485 | heavyiron | 443 | mcall |
31 | halyavin | 444 | |
664 | ataualpa | 445 | |
446 | mov eax,8 ; BUTTON : READ SETUP |
||
31 | halyavin | 447 | mov ebx,90*65536+65 |
448 | mov ecx,127*65536+12 |
||
449 | mov edx,2 |
||
199 | heavyiron | 450 | mov esi,[button_color] |
485 | heavyiron | 451 | mcall |
31 | halyavin | 452 | |
199 | heavyiron | 453 | ;mov eax,8 ; BUTTON : APPLY SETUP |
31 | halyavin | 454 | mov ebx,163*65536+65 |
455 | mov ecx,127*65536+12 |
||
456 | mov edx,3 |
||
485 | heavyiron | 457 | mcall |
31 | halyavin | 458 | |
199 | heavyiron | 459 | ;mov eax,8 ; BUTTONS 11-14 : SELECT INTERFACE |
31 | halyavin | 460 | mov ebx,29*65536+8 |
461 | mov ecx,39*65536+8 |
||
462 | mov edx,11 |
||
463 | interface_select: |
||
485 | heavyiron | 464 | mcall |
31 | halyavin | 465 | add ecx,10*65536 |
466 | inc edx |
||
467 | cmp edx,11+4 |
||
664 | ataualpa | 468 | jb interface_select |
31 | halyavin | 469 | |
664 | ataualpa | 470 | mov ebx,[interface] ; PRINT SELECTED INTERFACE 'X' |
31 | halyavin | 471 | imul ebx,10 |
472 | add ebx,31*65536+39 |
||
473 | mov eax,4 |
||
474 | mov ecx,0xffffff |
||
475 | mov edx,xx |
||
476 | mov esi,1 |
||
485 | heavyiron | 477 | mcall |
31 | halyavin | 478 | |
664 | ataualpa | 479 | mov eax,8 ; BUTTONS 21-22 : SERVER / MANUAL IP |
31 | halyavin | 480 | mov ebx,143*65536+8 |
481 | mov ecx,69*65536+8 |
||
482 | mov edx,21 |
||
483 | mov esi,[button_color] |
||
485 | heavyiron | 484 | mcall |
199 | heavyiron | 485 | ;mov eax,8 |
31 | halyavin | 486 | mov ebx,143*65536+8 |
487 | mov ecx,79*65536+8 |
||
488 | mov edx,22 |
||
485 | heavyiron | 489 | mcall |
664 | ataualpa | 490 | mov ebx,[assigned] ; PRINT SELECTED SERVER/MANUAL 'X' |
31 | halyavin | 491 | not ebx |
492 | and ebx,1 |
||
493 | imul ebx,10 |
||
494 | add ebx,145*65536+69 |
||
495 | mov eax,4 |
||
496 | mov ecx,0xffffff |
||
497 | mov edx,xx |
||
498 | mov esi,1 |
||
485 | heavyiron | 499 | mcall |
31 | halyavin | 500 | |
664 | ataualpa | 501 | mov eax,47 ; COM ADDRESS |
31 | halyavin | 502 | mov ebx,3*65536+1*256 |
503 | mov ecx,[com_add] |
||
504 | mov edx,272*65536+40 |
||
505 | mov esi,0x000000 |
||
485 | heavyiron | 506 | mcall |
31 | halyavin | 507 | |
199 | heavyiron | 508 | ;mov eax,47 ; COM IRQ |
31 | halyavin | 509 | mov ebx,1*65536+1*256 |
510 | mov ecx,[com_irq] |
||
511 | mov edx,(266+3*6)*65536+50 |
||
512 | mov esi,0x000000 |
||
485 | heavyiron | 513 | mcall |
31 | halyavin | 514 | |
515 | mov edi,ip_address |
||
516 | mov edx,205*65536+80 |
||
517 | mov esi,0x000000 |
||
518 | mov ebx,3*65536 |
||
519 | ipdisplay: |
||
199 | heavyiron | 520 | ;mov eax,47 |
31 | halyavin | 521 | movzx ecx,byte [edi] |
485 | heavyiron | 522 | mcall |
31 | halyavin | 523 | add edx,6*4*65536 |
524 | inc edi |
||
525 | cmp edi,ip_address+4 |
||
664 | ataualpa | 526 | jb ipdisplay |
31 | halyavin | 527 | |
528 | mov edi,gateway_ip |
||
529 | mov edx,205*65536+90 |
||
530 | mov esi,0x000000 |
||
531 | mov ebx,3*65536 |
||
532 | gipdisplay: |
||
199 | heavyiron | 533 | ;mov eax,47 |
31 | halyavin | 534 | movzx ecx,byte [edi] |
485 | heavyiron | 535 | mcall |
31 | halyavin | 536 | add edx,6*4*65536 |
537 | inc edi |
||
538 | cmp edi,gateway_ip+4 |
||
664 | ataualpa | 539 | jb gipdisplay |
31 | halyavin | 540 | |
541 | mov edi,subnet_mask |
||
542 | mov edx,205*65536+100 |
||
543 | mov esi,0x000000 |
||
544 | mov ebx,3*65536 |
||
545 | sipdisplay: |
||
199 | heavyiron | 546 | ;mov eax,47 |
31 | halyavin | 547 | movzx ecx,byte [edi] |
485 | heavyiron | 548 | mcall |
31 | halyavin | 549 | add edx,6*4*65536 |
550 | inc edi |
||
551 | cmp edi,subnet_mask+4 |
||
664 | ataualpa | 552 | jb sipdisplay |
31 | halyavin | 553 | |
554 | mov edi,dns_ip |
||
555 | mov edx,205*65536+110 |
||
556 | mov esi,0x000000 |
||
557 | mov ebx,3*65536 |
||
558 | dipdisplay: |
||
199 | heavyiron | 559 | ;mov eax,47 |
31 | halyavin | 560 | movzx ecx,byte [edi] |
485 | heavyiron | 561 | mcall |
31 | halyavin | 562 | add edx,6*4*65536 |
563 | inc edi |
||
564 | cmp edi,dns_ip+4 |
||
664 | ataualpa | 565 | jb dipdisplay |
31 | halyavin | 566 | |
567 | |||
664 | ataualpa | 568 | mov eax,8 ; BUTTON 5 : SET PORT |
31 | halyavin | 569 | mov ebx,299*65536+8 |
570 | mov ecx,39*65536+8 |
||
571 | mov edx,5 |
||
572 | mov esi,[button_color] |
||
485 | heavyiron | 573 | mcall |
199 | heavyiron | 574 | ;mov eax,8 ; BUTTON 6 : SET IRQ |
31 | halyavin | 575 | mov ecx,49*65536+8 |
625 | diamond | 576 | inc edx |
485 | heavyiron | 577 | mcall |
199 | heavyiron | 578 | ;mov eax,8 ; BUTTON 7 : SET IP |
31 | halyavin | 579 | mov ecx,79*65536+8 |
625 | diamond | 580 | inc edx |
485 | heavyiron | 581 | mcall |
31 | halyavin | 582 | |
199 | heavyiron | 583 | ;mov eax,8 ; BUTTON 8 : SET gateway IP |
31 | halyavin | 584 | mov ebx,299*65536+8 |
585 | mov ecx,89*65536+8 |
||
625 | diamond | 586 | inc edx |
485 | heavyiron | 587 | mcall |
31 | halyavin | 588 | |
199 | heavyiron | 589 | ;mov eax,8 ; BUTTON 9 : SET subnet |
31 | halyavin | 590 | mov ecx,99*65536+8 |
625 | diamond | 591 | inc edx |
485 | heavyiron | 592 | mcall |
31 | halyavin | 593 | |
199 | heavyiron | 594 | ;mov eax,8 ; BUTTON 10 : SET dns ip |
31 | halyavin | 595 | mov ecx,109*65536+8 |
625 | diamond | 596 | inc edx |
485 | heavyiron | 597 | mcall |
31 | halyavin | 598 | |
664 | ataualpa | 599 | mov ebx,31*65536+40 ; draw info text with function 4 |
31 | halyavin | 600 | mov edx,text |
601 | mov esi,49 |
||
199 | heavyiron | 602 | mov eax,4 |
31 | halyavin | 603 | newline: |
604 | mov ecx,0x224466 |
||
605 | cmp [edx],byte 'w' |
||
606 | jne nowhite |
||
607 | mov ecx,0xeeeeee |
||
608 | nowhite: |
||
609 | inc edx |
||
485 | heavyiron | 610 | mcall |
31 | halyavin | 611 | add ebx,10 |
612 | add edx,49 |
||
613 | cmp [edx],byte 'x' |
||
614 | jne newline |
||
615 | |||
664 | ataualpa | 616 | mov eax,12 ; function 12:tell os about windowdraw |
617 | mov ebx,2 ; 2, end of draw |
||
485 | heavyiron | 618 | mcall |
31 | halyavin | 619 | |
620 | ret |
||
621 | |||
622 | |||
623 | ; DATA AREA |
||
624 | |||
664 | ataualpa | 625 | if lang eq ru |
626 | title db 'Настройка сетевого стека',0 |
||
31 | halyavin | 627 | text: |
664 | ataualpa | 628 | db ' Неактивный Модем на Com-порту: 0x < ' |
629 | db ' Slip Прерывание модема: 0x < ' |
||
630 | db ' PPP ' |
||
1723 | ataualpa | 631 | db ' Драйвер пакетов IP назначается сервером ' |
632 | db ' (Ethernet) Фикс.: . . . < ' |
||
664 | ataualpa | 633 | db ' Шлюз: . . . < ' |
634 | db ' Подсеть: . . . < ' |
||
635 | db ' DNS IP: . . . < ' |
||
636 | db ' ' |
||
637 | db 'w Читать Применить ' |
||
638 | |||
1723 | ataualpa | 639 | else if lang eq nl |
1010 | hidnplayr | 640 | title db 'Netwerk configuratie',0 |
641 | text: |
||
642 | db ' Niet actief Modem Com Poort: 0x < ' |
||
643 | db ' Slip Modem Com Irq: 0x < ' |
||
644 | db ' PPP ' |
||
645 | db ' Pakket Driver Door IP-server toegekend ' |
||
646 | db ' (Ethernet) Vast IP: . . . < ' |
||
647 | db ' Gateway: . . . < ' |
||
648 | db ' Subnet: . . . < ' |
||
649 | db ' DNS IP: . . . < ' |
||
650 | db ' ' |
||
651 | db 'w Vernieuw Toepassen ' |
||
652 | |||
1723 | ataualpa | 653 | else if lang eq ua |
654 | title db 'Налаштування мережi' |
||
655 | text: |
||
656 | db ' Неактивний Модем на Com-порту 0x < ' |
||
657 | db ' Slip Com-порт модема: 0x < ' |
||
658 | db ' PPP ' |
||
659 | db ' Драйвер пакетiв IP призначається сервером ' |
||
660 | db ' (Ethernet) Фiкс.: . . . < ' |
||
661 | db ' Маршрут: . . . < ' |
||
662 | db ' Маска: . . . < ' |
||
663 | db ' DNS IP . . . < ' |
||
664 | db ' ' |
||
665 | db 'w Прочитати Застосувати ' |
||
666 | |||
664 | ataualpa | 667 | else |
668 | title db 'Stack configuration',0 |
||
669 | text: |
||
31 | halyavin | 670 | db ' Not active Modem Com Port: 0x < ' |
671 | db ' Slip Modem Com Irq: 0x < ' |
||
672 | db ' PPP ' |
||
673 | db ' Packet Driver IP server assigned ' |
||
1010 | hidnplayr | 674 | db ' (Ethernet) Fixed: . . . < ' |
31 | halyavin | 675 | db ' Gateway: . . . < ' |
676 | db ' Subnet: . . . < ' |
||
677 | db ' DNS IP: . . . < ' |
||
678 | db ' ' |
||
679 | db 'w READ APPLY ' |
||
664 | ataualpa | 680 | end if |
31 | halyavin | 681 | |
199 | heavyiron | 682 | xx: db 'x' ;<- END MARKER, DONT DELETE |
31 | halyavin | 683 | |
684 | button_color dd 0x2254b9 |
||
685 | |||
686 | |||
205 | heavyiron | 687 | |
1010 | hidnplayr | 688 | ip_address dd ? |
689 | gateway_ip dd ? |
||
690 | subnet_mask dd ? |
||
691 | dns_ip dd ? |
||
31 | halyavin | 692 | |
205 | heavyiron | 693 | |
1010 | hidnplayr | 694 | com_irq dd ? ; irq for slip/ppp |
695 | com_add dd ? ; com port address for slip/ppp |
||
696 | interface dd ? ; not active,slip,ppp,packet driver |
||
697 | assigned dd ? ; get ip from server |
||
31 | halyavin | 698 | |
1010 | hidnplayr | 699 | config dd ? |
31 | halyavin | 700 | |
701 | I_END:->>>>>>>>>>>>>>>>>>>>>>>>> |