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