mirror of
https://ranger.innolan.net/github/amiga-gloom.git
synced 2025-12-08 14:59:18 +00:00
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
|