mirror of https://github.com/earok/GloomAmiga.git
21 lines
269 B
ArmAsm
21 lines
269 B
ArmAsm
|
askfordisk jsr diskreq+32
|
||
|
jsr qvwait
|
||
|
move.l d7,$dff080
|
||
|
move #0,$dff088
|
||
|
;
|
||
|
.retry move.l #'GARD',d0
|
||
|
move.l diskbuff,d1
|
||
|
move.l sibdos,a0
|
||
|
jsr (a0)
|
||
|
bne.s .got
|
||
|
;
|
||
|
move #199,d7
|
||
|
.vwloop jsr qvwait
|
||
|
dbf d7,.vwloop
|
||
|
bra.s .retry
|
||
|
;
|
||
|
.got rts
|
||
|
|
||
|
diskreq incbin loader
|
||
|
even
|