mirror of
https://github.com/pfusik/xasm.git
synced 2024-06-15 18:29:31 +00:00
X-BOOT 4.1.-9.
This commit is contained in:
parent
83d6d7d0ac
commit
6a5daaff83
17
xboot.asm
17
xboot.asm
|
@ -266,19 +266,16 @@ skff:
|
||||||
|
|
||||||
firs: mov cx, [head+2]
|
firs: mov cx, [head+2]
|
||||||
sub cx, [head]
|
sub cx, [head]
|
||||||
jb einva
|
|
||||||
inc cx
|
inc cx
|
||||||
cmp cx, blen
|
cmp cx, blen
|
||||||
ja einva
|
jbe okhead
|
||||||
mov dx, offset blok
|
mov cx, blen
|
||||||
|
okhead: mov dx, offset blok
|
||||||
call xread
|
call xread
|
||||||
jb trunc
|
jb trunc
|
||||||
call xwrihd
|
call xwrihd
|
||||||
jmp skff
|
jmp skff
|
||||||
|
|
||||||
einva: mov dx, offset e_head
|
|
||||||
jmp error
|
|
||||||
|
|
||||||
chtrun: test ax, ax
|
chtrun: test ax, ax
|
||||||
jnz trunca
|
jnz trunca
|
||||||
jmp finfil
|
jmp finfil
|
||||||
|
@ -293,7 +290,7 @@ trunc: test ax, ax
|
||||||
call xwrihd
|
call xwrihd
|
||||||
|
|
||||||
trunca: mov dx, offset w_trunc
|
trunca: mov dx, offset w_trunc
|
||||||
call warni
|
warfin: call warni
|
||||||
finfil: mov dx, offset endseq1
|
finfil: mov dx, offset endseq1
|
||||||
test [flags], m_pro
|
test [flags], m_pro
|
||||||
jz endst
|
jz endst
|
||||||
|
@ -408,7 +405,7 @@ printz: lodsb
|
||||||
jnz pnam1
|
jnz pnam1
|
||||||
ret
|
ret
|
||||||
|
|
||||||
hello db 'X-BOOT 4.0 by Fox/Taquart',eot
|
hello db 'X-BOOT 4.1.-9 by Fox/Taquart',eot
|
||||||
usgtxt db 'XBOOT [/p] obxfile [atrfile]',eol
|
usgtxt db 'XBOOT [/p] obxfile [atrfile]',eol
|
||||||
db ' Convert single Atari 8-bit executable into .ATR disk image.',eol
|
db ' Convert single Atari 8-bit executable into .ATR disk image.',eol
|
||||||
db 'XBOOT [/p] obxfiles [atrpath]',eol
|
db 'XBOOT [/p] obxfiles [atrpath]',eol
|
||||||
|
@ -423,14 +420,14 @@ w_mem db eol,' WARNING: Memory conflict$'
|
||||||
w_prof db eol,' WARNING: Professional loader needed$'
|
w_prof db eol,' WARNING: Professional loader needed$'
|
||||||
w_trunc db eol,' WARNING: File is truncated$'
|
w_trunc db eol,' WARNING: File is truncated$'
|
||||||
e_nota db eol,' ERROR: Not Atari executable$'
|
e_nota db eol,' ERROR: Not Atari executable$'
|
||||||
e_head db eol,' ERROR: Invalid header$'
|
|
||||||
e_open db eol,' ERROR: Can''t open file$'
|
e_open db eol,' ERROR: Can''t open file$'
|
||||||
e_read db eol,' ERROR: Disk read error$'
|
e_read db eol,' ERROR: Disk read error$'
|
||||||
e_creat db eol,' ERROR: Can''t create file$'
|
e_creat db eol,' ERROR: Can''t create file$'
|
||||||
e_write db eol,' ERROR: Disk write error$'
|
e_write db eol,' ERROR: Disk write error$'
|
||||||
|
|
||||||
; ATR Header
|
; ATR Header
|
||||||
begin dw 296h,0,80h,5 dup(0)
|
begin dw 296h,0,80h,4 dup(0)
|
||||||
|
db 0,1
|
||||||
beglen = $-begin
|
beglen = $-begin
|
||||||
|
|
||||||
; Loader #1 (std)
|
; Loader #1 (std)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user