; reads first sector of module 31 on head 0

reset
waitnbsy
regs = $45 $0b $00 $44 $57 $a0 $80
waitnbsy

regs = $d6 $01 $be $4f $c2 $a0 $b0
waitnbsy
checkdrq
sectorsfrom = rd31h0s1.bin

regs = $d5 $01 $bf $4f $c2 $a0 $b0
waitnbsy
checkdrq
sectorsto = mod3101.bin

; end 
; rd31h0s1.bin -- 0C 00 01 00 FE FF FF FF 00 00 42 01 01 00 00 00