source goes here:
opendev:
lea trddevname,a0
lea diskio,a1
moveq #0,d0 ; unit = 0
moveq #0,d1 ; no flags (?)
move.l 4,a6
jsr -444(a6) ; OpenDevice()
rts
closedev:
lea diskio,a1
move.l 4,a6
jsr -450(a6) ; CloseDevice()
rts
motoron:
moveq #1,d0 ; motor on
bra motOnOff
motoroff:
moveq #0,d0 ; motor off
bra motOnOff
motOnOff:
lea diskio,a1
move.w #9,28(a1) ; command: motor..
move.l d0,36(a1) ; ..on/off
bra sendio
read:
lea diskio,a1
move.w #2,28(a1) ; command: read
move.l #512*2,36(a1) ; length
move.l #readbuff,40(a1) ; pointer to read-buffer
move.l #512*0,44(a1) ; disk offset
bra sendio
sendio:
move.l 4,a6
jsr -462(a6) ; sendIo()
rts
trddevname:
dc.b 'trackdisk.device',0
even
diskio:
blk.l 20,0
readbuff:
blk.b 512*2
** END_OF_CODE **
it's ment to be an include file !