home *** CD-ROM | disk | FTP | other *** search
/ ftp.update.uu.se / ftp.update.uu.se.2014.03.zip / ftp.update.uu.se / pub / rainbow / msdos / latrobe / b / biodif.arc / HDINIT.DIF < prev    next >
Text File  |  1987-06-20  |  1KB  |  50 lines
  1.  
  2. ----------HDINIT.OLD
  3.     EXTRN    HREAD:NEAR, HWRITE:NEAR, HWRITEV:NEAR
  4.     EXTRN    HFORMAT:NEAR, HINIT:NEAR, HMCHK:NEAR
  5.  
  6. ----------HDINIT.ASM
  7.     EXTRN    HREAD_PHYS:NEAR, HWRITE_PHYS:NEAR            ;RGT
  8.     EXTRN    HFORMAT:NEAR, HINIT:NEAR, HMCHK:NEAR
  9.  
  10. -----------------------------------------------
  11.  
  12. ----------HDINIT.OLD
  13.     AND    AL,AL            ;Check if cluster size is specified
  14.  
  15. ----------HDINIT.ASM
  16.     LODSW                ;Get extra word in table    ;RGT
  17.     AND    AL,AL            ;Check if cluster size is specified
  18.  
  19. -----------------------------------------------
  20.  
  21. ----------HDINIT.OLD
  22.     CALL    HREAD            ;Read sector from hard disk
  23.     MOV    AL,1            ;Assume hard error
  24.  
  25. ----------HDINIT.ASM
  26.     CALL    HREAD_PHYS        ;Read sector from hard disk    ;RGT
  27.     MOV    AL,1            ;Assume hard error
  28.  
  29. -----------------------------------------------
  30.  
  31. ----------HDINIT.OLD
  32.     CALL    HWRITE            ;Update bad bit on disk
  33.     POP    CX            ;Restore saved write parameters
  34.  
  35. ----------HDINIT.ASM
  36.     CALL    HWRITE_PHYS        ;Update bad bit on disk        ;RGT
  37.     POP    CX            ;Restore saved write parameters
  38.  
  39. -----------------------------------------------
  40.  
  41. ----------HDINIT.OLD
  42.     JMP    HWRITE            ;Update the bad bit and return
  43. ;
  44.  
  45. ----------HDINIT.ASM
  46.     JMP    HWRITE_PHYS        ;Update the bad bit and return    ;RGT
  47. ;
  48.  
  49. -----------------------------------------------
  50.