home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 5 / ctrom5b.zip / ctrom5b / PROGRAM / ASM / ALIB30B / SYS3.ASM < prev    next >
Assembly Source File  |  1994-10-15  |  2KB  |  104 lines
  1.     page    66,132
  2. ;******************************** SYS3.ASM   *********************************
  3.  
  4. LIBSEG           segment byte public "LIB"
  5.         assume cs:LIBSEG , ds:nothing
  6.  
  7. ;----------------------------------------------------------------------------
  8. .xlist
  9.     include  mac.inc
  10.     include  common.inc
  11. .list
  12. comment 
  13. ;- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -( SYSTEM  )
  14. COUNT_FLOP_DRIVES - count the number of floppy disk drives intalled
  15. ;
  16. ; inputs:    no parameters
  17. ; 
  18. ; output:    AX = number of floppy drives
  19. ; 
  20. ;* * * * * * * * * * * * * *
  21. 
  22.     public    COUNT_FLOP_DRIVES
  23. COUNT_FLOP_DRIVES    PROC    FAR
  24.      int     11h
  25.      SHR     AX,1
  26.      JB      CF_FND        ;JMP IF FLOPPY FOUND
  27.      XOR     AX,AX
  28.      RETF
  29. CF_FND:
  30.      PUSH    CX
  31.      AND     AX,0060h
  32.      MOV     CL,05
  33.      SHR     AX,CL
  34.      INC     AX
  35.      POP     CX
  36.      RETF
  37. COUNT_FLOP_DRIVES    ENDP
  38. comment 
  39. ;- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -( SYSTEM  )
  40. GET_DRV_TYPE - determine drive type
  41. ;
  42. ; inputs:    DL = drive number (0 = drive A:)
  43. ; 
  44. ; output:    AX = floppy drive type
  45. ;             0 = invalid drive number
  46. ;             1 = 360k
  47. ;             2 = 1.2M
  48. ;             3 = 720k
  49. ;             4 = 1.44M
  50. ;* * * * * * * * * * * * * *
  51. 
  52.     public    GET_DRV_TYPE
  53. GET_DRV_TYPE    PROC    FAR
  54.      APUSH   BX,CX,DX,DI,SI,ES
  55.      MOV     SI,DX
  56.      MOV     AH,08
  57.      INT     13h
  58.      JAE     gdt_2
  59.      MOV     AH,15h
  60.      MOV     DX,SI
  61.      INT     13h
  62.      JAE     gdt_1
  63.      MOV     DX,SI
  64.      INT     11h
  65.      MOV     DH,AL
  66.      XOR     AX,AX
  67.      TEST    DH,01
  68.      JZ      gdt_exit
  69.      ROL     DH,1
  70.      ROL     DH,1
  71.      AND     DH,03
  72.      INC     DH
  73.      CMP     DL,DH
  74.      RCL     AL,1
  75.      JMP     gdt_exit
  76. gdt_1:
  77.      XOR     AL,AL
  78.      XCHG    AL,AH
  79.      JMP     gdt_exit
  80. gdt_2:
  81.      JCXZ    gdt_3
  82.      ADD     AL,BL
  83.      JNZ     gdt_exit
  84.      MOV     AX,CX
  85.      MOV     CX,0005
  86.      CMP     AX,4F12h
  87.      LOOPZ   gdt_3
  88.      CMP     AX,4F09h
  89.      LOOPZ   gdt_3
  90.      CMP     AX,4F0Fh
  91.      LOOPZ   gdt_3
  92.      CMP     AX,2709h
  93.      LOOPZ   gdt_3
  94. gdt_3:
  95.      MOV     AX,CX
  96. gdt_exit:
  97.      APOP    ES,SI,DI,DX,CX,BX
  98.      RETF
  99. GET_DRV_TYPE    ENDP
  100.  
  101.  
  102. LIBSEG    ENDS
  103.     end
  104.