Subversion Repositories aysalia

Rev

Rev 10 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
9 daniel-mar 1 
 
2 
; Aysalia DOS Launcher
3 
; DOS Stub for AyDos.exe fat binary
14 daniel-mar 4 
; Revision 2018-12-05
9 daniel-mar 5 
; (C) 2018 Daniel Marschall, ViaThinkSoft
6 
 
7 
.model tiny
8 
.code
9 
org 100h
10 
 
11 
start:
12 
 
13 
jmp real_start
14 
 
15 
    exename1  db "AYDOS.MNU",0
16 
    cmdargs   db 0,'',0dh
17 
 
18 
    dummy_fcb db 36 dup(0)
19 
 
20 
    paramblk  dw 0          ; use environment of parent
21 
              dw cmdargs    ; command line arguments
22 
              dw 0          ; cmdargs_seg
23 
              dw dummy_fcb  ; fcb1
24 
              dw 0          ; fcb1_seg
25 
              dw dummy_fcb  ; fcb2
26 
              dw 0          ; fcb2_seg
27 
 
28 
 
29 
real_start:
30 
    ; Reduce size of own application to give the called applications more space
31 
    mov     ah, 4ah
14 daniel-mar 32 
    mov     bx, 32    ; 32 paragraphs a 16 bytes = 512 bytes
9 daniel-mar 33 
    int     21h
34 
 
35 
    ; Start Menu
36 
    mov     ah, 4bh   ; execute
37 
    mov     al, 00h   ; load and execute
38 
    mov     bx, paramblk
39 
    lea     dx, exename1
40 
    int     21h
41 
 
42 
    ; Return to DOS
43 
    mov     ah, 4ch
44 
    mov     al, 00h
45 
    int     21h
46 
 
47 
end start