;:::::::::::::::::::::::::::::::::::::::::
;:      Sito:  www.byteman.it  OpenWeb  ::
;:  Raccolta:  Particelle PAS+ASM       ::
;:    Autore:  Salvo Rosta aka byteman  ::
;:    Titolo:  XDISKRS.ASM              ::
;: Revisione:  04-04-1993               ::
;:::::::::::::::::::::::::::::::::::::::::

;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
;:        XDISKRS.ASM - Versione: 04-04-1993, a cura di Salvo Rosta.        ::
;:                                                                          ::
;: Function  XDiskReset(Drive);    Reset Lettore Disco                      ::
;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 

CODE      SEGMENT BYTE PUBLIC
          ASSUME  CS:CODE
          PUBLIC  XDiskReset

Drive     EQU     BYTE PTR [BP+6]

ProcUno   PROC    FAR

XDiskReset:
          PUSH    BP
          MOV     BP,SP
          MOV     DL,Drive            ; Drive
          MOV     AH,0
          INT     13h
          JC      XDErr
          SUB     AH,AH
XDErr:    MOV     AL,AH
          POP     BP
          RET     2                   ; Uscita

ProcUno   ENDP

CODE      ENDS
          END