home *** CD-ROM | disk | FTP | other *** search
/ Shareware Supreme Volume 6 #1 / swsii.zip / swsii / 167 / FILLDISK.ZIP / DSPACE.ASM < prev    next >
Assembly Source File  |  1990-10-10  |  1KB  |  55 lines
  1. PAGE 57,132
  2. TITLE   D S P A C E . A S M     (SUBROUTINE TO FILLDISK.SRC)
  3. ;
  4. ; DSPACE   DISKSPACE VIA INT 33, FUNCTION 54
  5. ;
  6. ;    IN    PARM 1, STACK   DRIVE NUMBER
  7. ;
  8. ;    OUT   PARM 2,   "     AX  SECTORS PER CLUSTER
  9. ;          PARM 3,   "     CX  BYTES PER SECTOR
  10. ;          PARM 4,   "     BX  NUMBER OF AVAILABLE CLUSTERS
  11.  
  12. PARM STRUC
  13.  
  14. SAVEBP     DW    0
  15. RETOFF     DW    0
  16. RETSEG    DW    0
  17. PARM4    DW    0
  18. PARM3    DW    0
  19. PARM2    DW    0
  20. PARM1     DW    0
  21.  
  22. PARM    ENDS
  23.  
  24. PARMSIZE EQU OFFSET PARM1 - OFFSET RETSEG
  25.  
  26.  
  27. CODE    SEGMENT BYTE PUBLIC 'CODE'
  28.     ASSUME CS:CODE
  29.  
  30. DSPACE          PROC FAR
  31.         PUBLIC DSPACE
  32.  
  33.     PUSH     BP
  34.     MOV     BP, SP
  35.     MOV     SI, [BP].PARM1
  36.     MOV     DL, [SI]
  37.  
  38.          MOV     AH, 54
  39.     INT     33
  40.  
  41.         MOV     DI, [BP].PARM2
  42.         MOV     [DI], AX
  43.         MOV     DI, [BP].PARM3
  44.         MOV     [DI], CX
  45.         MOV     DI, [BP].PARM4
  46.         MOV     [DI], BX
  47.     
  48.     POP     BP
  49.  
  50.     RET     PARMSIZE
  51.  
  52. DSPACE        ENDP
  53. CODE    ENDS
  54.     END
  55.