tapedriver_pnext      dd 0ffff0000h
tapedriver_devattr    dw 1000000000000100b 
tapedriver_strategy   dw offset _tapedriver__strategy
tapedriver_interrupt  dw offset _tapedriver__interrupt
tapedriver__device    db 'TAPEDRV$' 
 
tapedrive_table db 9
           dw cs:tapedrive_init     ; 0 - initialize driver
           dw cs:tapedrive__err     ; 1 - media change check 
           dw cs:tapedrive__err     ; 2 - build BPB
           dw cs:tapedrive__err     ; 3 - IOCTL string output
           dw cs:tapedrive__err     ; 4 - input
           dw cs:tapedrive__err     ; 5 - nondestructive input
           dw cs:tapedrive__err     ; 6 - input status
           dw cs:tapedrive__err     ; 7 - input flush
           dw cs:tapedrive__err     ; 8 - output
           dw cs:tapedrive__err     ; 9 - output w/ verify

tapedrive_:
; 

tapedrive_init proc far
       push ds


       clc
       pop  ds
       ret
_tapedriver__strategy:

        retf
_tapedriver__interrupt:

        retf
tapedrive_init endp

tapedrive__err proc far
      mov  ax, 3  ; invalid command
      ret
tapedrive__err endp
