6502/xasm
1
0
Fork 0
mirror of https://github.com/pfusik/xasm.git synced 2025-02-08 07:30:55 +00:00
Code Issues Projects Releases Wiki Activity

X-BOOT 3.2.

Browse Source
This commit is contained in:
Piotr Fusik 1998-10-04 16:23:28 +02:00
parent c88b1a6165
commit 6f34469afa
1 changed files with 23 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
xboot.asm
View File

@ -63,7 +63,7 @@ nousg: mov ch, -1
je romsw je romsw
dec [romfl] dec [romfl]
mov di, 81h mov di, 81h
romsw: mov ebp, 'moc.' romsw: mov ebp, 'XBO.'
call getfil call getfil
push si push si
@ -128,7 +128,7 @@ stdld: mov cx, endlen
mov [paras], di mov [paras], di
pop di pop di
mov ebp, 'rta.' mov ebp, 'RTA.'
call getfil call getfil
fcreate fcreate
mov cx, [len] mov cx, [len]
@ -139,9 +139,9 @@ stdld: mov cx, endlen
dos 4c00h dos 4c00h
; Poetry ; Poetry
hello db 'X-BOOT 3.1 by Fox/Taquart',eot hello db 'X-BOOT 3.2 by Fox/Taquart',eot
usgtxt db 'Converts Atari 8-bit executable into .ATR disk image.',eol usgtxt db 'Converts Atari 8-bit executable into .ATR disk image.',eol
db 'Usage: XBOOT [/p] comfile atrfile',eol db 'Syntax: XBOOT [/p] obxfile atrfile',eol
db 'Use /p switch to write professional loader rather than standard.',eot db 'Use /p switch to write professional loader rather than standard.',eot
oktxt db 'O.K.',eot oktxt db 'O.K.',eot
badtxt db 'Bad format of file!',eot badtxt db 'Bad format of file!',eot
@ -157,15 +157,16 @@ endseq2 db 244,4,246,4,108,224,2
endlen = $-endseq2 endlen = $-endseq2
; Loader #2 (rom) ; Loader #2 (rom)
romlod: db 96,1,128,4,119,228,169,0,141,47,2 romlod db 96,1,128,4,119,228,169,0,141,47,2,169,82,141,200,2,165
db 169,82,141,200,2,165,20,197,20,240,252,169 db 20,197,20,240,252,169
l2runl db 128,141,224,2,169 l2runl db 128,141,224,2,169
l2runh db 4,141,225,2,160,254,169,128,141,226,2,169,4,141,227,2,162,251,149 l2runh db 4,141,225,2,160,254,169
db 72,232,134,67,76,188,4,230,68,208,2,230,69,200,16,32,238,10 db 128,141,226,2,169,4,141,227,2,162,251,149,72,232,134,67,76,188
db 3,208,3,238,11,3,169,255,141,1,211,78,14,212,88,32,83,228 db 4,230,68,208,2,230,69,200,16,32,238,10,3,208,3,238,11,3
db 56,48,170,160,0,120,140,14,212,206,1,211,185,0,4,166,67,208 db 169,255,141,1,211,78,14,212,88,32,83,228,56,48,170,120,160,0
db 200,129,68,165,68,197,70,208,200,165,69,197,71,208,194,152,72,32 db 140,14,212,206,1,211,185,0,4,166,67,208,200,129,68,165,68,197
db 253,4,104,168,16,165,108,226,2 db 70,208,200,165,69,197,71,208,194,152,72,32,253,4,104,168,16,165
db 108,226,2
; ATR Header ; ATR Header
begin dw 296h begin dw 296h
@ -174,16 +175,17 @@ paras dw 0
; Atari Boot Sector(s) ; Atari Boot Sector(s)
sect: sect:
; Loader #1 (std) ; Loader #1 (std)
db 96,1,128,7,119,228,160,215,185,30,7 db 96,1,128,7,119,228,160,215,185,30,7,145,88,200,192,226,144
db 145,88,200,192,226,144,246,169 db 246,169
l1runl db 128,141,224,2,169 l1runl db 128,141,224,2,169
l1runh db 7,141,225,2,169 l1runh db 7,141,225,2,169,7,141,5,3,160,255
db 7,141,5,3,160,255,140,1,211,136,169,128,141,226,2,169,7,141 db 140,1,211,136,169,128,141,226,2,169,7,141,227,2,162,251,149,72
db 227,2,162,251,149,72,232,134,67,76,193,7,230,68,208,2,230,69 db 232,134,67,76,193,7,230,68,208,2,230,69,200,16,16,238,10,3
db 200,16,16,238,10,3,208,3,238,11,3,32,83,228,56,48,174,160 db 208,3,238,11,3,32,83,228,56,48,174,160,0,185,0,7,166,67
db 0,185,0,7,166,67,208,216,129,68,165,68,197,70,208,216,165,69 db 208,216,129,68,165,68,197,70,208,216,165,69,197,71,208,210,152,72
db 197,71,208,210,152,72,32,242,7,104,168,16,181,108,226,2,44,111 db 32,242,7,104,168,16,181,108,226,2,44,111,97,100,105,110,103,14
db 97,100,105,110,103,14,14,14,0 db 14,14,0
beglen = $-begin beglen = $-begin
bufr db blen dup(?) bufr db blen dup(?)