Rev 664 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 664 | Rev 1010 | ||
---|---|---|---|
Line 20... | Line 20... | ||
20 | dd memsize ; memory for app |
20 | dd memsize ; memory for app |
21 | dd memsize - 1024 ; esp |
21 | dd memsize - 1024 ; esp |
22 | dd PARAMS , 0x0 ; I_Param , I_Icon |
22 | dd PARAMS , 0x0 ; I_Param , I_Icon |
Line 23... | Line 23... | ||
23 | 23 | ||
24 | include 'lang.inc' |
24 | include 'lang.inc' |
Line 25... | Line 25... | ||
25 | include 'macros.inc' |
25 | include '../../../macros.inc' |
Line -... | Line 26... | ||
- | 26 | ||
- | 27 | START: ; start of execution |
|
- | 28 | ||
- | 29 | read_stack_setup: |
|
- | 30 | ||
- | 31 | mov eax,52 |
|
- | 32 | mov ebx,0 |
|
- | 33 | mcall |
|
- | 34 | mov [config],eax |
|
- | 35 | ||
26 | 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 | ||
27 | START: ; start of execution |
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 |
|
Line -... | Line 57... | ||
- | 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 |
|
28 | 68 | mov [interface],eax |
|
- | 69 | ||
Line 29... | Line 70... | ||
29 | cmp [PARAMS], dword 'BOOT' |
70 | mov eax,[config] ; unwrap com PORT |
30 | jz boot_set_settings |
71 | shr eax,7 |
Line 31... | Line 72... | ||
31 | 72 | and eax,1 |
|
Line 253... | Line 294... | ||
253 | mov [assigned],eax |
294 | mov [assigned],eax |
254 | jmp red |
295 | jmp red |
255 | no_ip_sf: |
296 | no_ip_sf: |
256 | jmp still |
297 | jmp still |
Line 257... | Line -... | ||
257 | - | ||
258 | read_stack_setup: |
- | |
259 | - | ||
260 | mov eax,52 |
- | |
261 | mov ebx,0 |
- | |
262 | mcall |
- | |
263 | mov [config],eax |
- | |
264 | - | ||
265 | mov eax,52 |
- | |
266 | mov ebx,1 |
- | |
267 | mcall |
- | |
268 | mov dword [ip_address],eax |
- | |
269 | - | ||
270 | mov eax,52 |
- | |
271 | mov ebx,9 |
- | |
272 | mcall |
- | |
273 | mov dword [gateway_ip],eax |
- | |
274 | - | ||
275 | mov eax,52 |
- | |
276 | mov ebx,10 |
- | |
277 | mcall |
- | |
278 | mov dword [subnet_mask],eax |
- | |
279 | - | ||
280 | mov eax,52 |
- | |
281 | mov ebx,13 |
- | |
282 | mcall |
- | |
283 | mov dword [dns_ip],eax |
- | |
284 | - | ||
285 | mov eax,[config] ; unwrap com IRQ |
- | |
286 | shr eax,8 |
- | |
287 | and eax,0xf |
- | |
288 | mov [com_irq],eax |
- | |
289 | - | ||
290 | mov eax,[config] ; unwrap com PORT |
- | |
291 | shr eax,16 |
- | |
292 | and eax,0xfff |
- | |
293 | mov [com_add],eax |
- | |
294 | - | ||
295 | mov eax,[config] ; unwrap IRQ |
- | |
296 | and eax,0xf |
- | |
297 | mov [interface],eax |
- | |
298 | - | ||
299 | mov eax,[config] ; unwrap com PORT |
- | |
300 | shr eax,7 |
- | |
301 | and eax,1 |
- | |
302 | mov [assigned],eax |
- | |
303 | jmp red |
- | |
304 | 298 | ||
Line 305... | Line 299... | ||
305 | apply_stack_setup: |
299 | apply_stack_setup: |
306 | 300 | ||
307 | mov eax,[com_irq] |
301 | mov eax,[com_irq] |
Line 623... | Line 617... | ||
623 | mov ebx,2 ; 2, end of draw |
617 | mov ebx,2 ; 2, end of draw |
624 | mcall |
618 | mcall |
Line 625... | Line 619... | ||
625 | 619 | ||
Line 626... | Line -... | ||
626 | ret |
- | |
627 | - | ||
628 | ;****************************************************************************** |
- | |
629 | - | ||
630 | boot_set_settings: |
- | |
631 | - | ||
632 | mov eax,52 |
- | |
633 | mov ebx,0 |
- | |
634 | mcall |
- | |
635 | mov [config],eax |
- | |
636 | - | ||
637 | shr eax,8 ; unwrap com IRQ |
- | |
638 | and eax,0xf |
- | |
639 | mov [com_irq],eax |
- | |
640 | - | ||
641 | mov eax,[config] ; unwrap com PORT |
- | |
642 | shr eax,16 |
- | |
643 | and eax,0xfff |
- | |
644 | mov [com_add],eax |
- | |
645 | - | ||
646 | call apply_stack_setup |
- | |
647 | - | ||
648 | mov eax,-1 ; close this program |
- | |
649 | mcall |
- | |
650 | - | ||
Line 651... | Line 620... | ||
651 | ;****************************************************************************** |
620 | ret |
Line 652... | Line 621... | ||
652 | 621 | ||
653 | 622 | ||
654 | ; DATA AREA |
623 | ; DATA AREA |
655 | 624 | ||
656 | if lang eq ru |
625 | if lang eq ru |
657 | title db ' áâனª á¥â¥¢®£® á⥪ ',0 |
626 | title db ' áâனª á¥â¥¢®£® á⥪ ',0 |
658 | text: |
627 | text: |
659 | db ' ¥ ªâ¨¢ë© ®¤¥¬ Com-¯®àâã: 0x < ' |
628 | db ' ¥ ªâ¨¢ë© ®¤¥¬ Com-¯®àâã: 0x < ' |
660 | db ' Slip à¥àë¢ ¨¥ ¬®¤¥¬ : 0x < ' |
629 | db ' Slip à¥àë¢ ¨¥ ¬®¤¥¬ : 0x < ' |
661 | db ' PPP ' |
630 | db ' PPP ' |
662 | db ' à ©¢¥à ¯ ª¥â®¢ IP server § ç¥ë© ' |
631 | db ' à ©¢¥à ¯ ª¥â®¢ IP server § ç¥ë© ' |
663 | db ' ¨ªá. . . . < ' |
632 | db ' (Ethernet) ¨ªá. . . . < ' |
664 | db ' «î§: . . . < ' |
633 | db ' «î§: . . . < ' |
Line -... | Line 634... | ||
- | 634 | db ' ®¤á¥âì: . . . < ' |
|
- | 635 | db ' DNS IP: . . . < ' |
|
- | 636 | db ' ' |
|
- | 637 | db 'w ¨â âì ਬ¥¨âì ' |
|
- | 638 | ||
- | 639 | elseif lang eq nl |
|
- | 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: . . . < ' |
|
665 | db ' ®¤á¥âì: . . . < ' |
648 | db ' Subnet: . . . < ' |
666 | db ' DNS IP: . . . < ' |
649 | db ' DNS IP: . . . < ' |
667 | db ' ' |
650 | db ' ' |
668 | db 'w ¨â âì ਬ¥¨âì ' |
651 | db 'w Vernieuw Toepassen ' |
669 | 652 | ||
670 | else |
653 | else |
671 | title db 'Stack configuration',0 |
654 | title db 'Stack configuration',0 |
672 | text: |
655 | text: |
673 | db ' Not active Modem Com Port: 0x < ' |
656 | db ' Not active Modem Com Port: 0x < ' |
674 | db ' Slip Modem Com Irq: 0x < ' |
657 | db ' Slip Modem Com Irq: 0x < ' |
675 | db ' PPP ' |
658 | db ' PPP ' |
676 | db ' Packet Driver IP server assigned ' |
659 | db ' Packet Driver IP server assigned ' |
677 | db ' Fixed: . . . < ' |
660 | db ' (Ethernet) Fixed: . . . < ' |
Line 685... | Line 668... | ||
685 | xx: db 'x' ;<- END MARKER, DONT DELETE |
668 | xx: db 'x' ;<- END MARKER, DONT DELETE |
Line 686... | Line 669... | ||
686 | 669 | ||
Line 687... | Line -... | ||
687 | button_color dd 0x2254b9 |
- | |
Line 688... | Line 670... | ||
688 | 670 | button_color dd 0x2254b9 |
|
689 | 671 | ||
690 | ;ENTER YOUR SETTINGS HERE: |
672 | |
691 | 673 | ||
Line 692... | Line 674... | ||
692 | ip_address db 010,005,004,175 |
674 | ip_address dd ? |
693 | gateway_ip db 010,005,000,001 |
675 | gateway_ip dd ? |
694 | subnet_mask db 255,255,000,000 |
676 | subnet_mask dd ? |
695 | dns_ip db 213,184,238,006 |
677 | dns_ip dd ? |
Line 696... | Line 678... | ||
696 | 678 | ||
Line 697... | Line 679... | ||
697 | 679 |