home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / MNUM416D.SZH / DISK_ASM.ASM < prev    next >
Assembly Source File  |  1990-03-08  |  4KB  |  164 lines
  1. ;
  2. ;                          Message Base Renumberer
  3. ;
  4. ;              This module was originally written by Bob Hartman
  5. ;                       Sysop of FidoNet node 1:132/101
  6. ;
  7. ;   Spark Software, 427-3 Amherst St, CS 2032, Suite 232, Nashua, NH 03061
  8. ;
  9. ; This program source code is being released with the following provisions:
  10. ;
  11. ; 1.  You are  free to make  changes to this source  code for use on your own
  12. ; machine,  however,  altered source files may not be distributed without the 
  13. ; consent of Spark Software.
  14. ;
  15. ; 2.  You may distribute "patches"  or  "diff" files for any changes that you
  16. ; have made, provided that the "patch" or "diff" files are also sent to Spark
  17. ; Software for inclusion in future releases of the entire package.   A "diff"
  18. ; file for the source archives may also contain a compiled version,  provided
  19. ; it is  clearly marked as not  being created  from the original source code.
  20. ; No other  executable  versions may be  distributed without  the  consent of
  21. ; Spark Software.
  22. ;
  23. ; 3.  You are free to include portions of this source code in any program you
  24. ; develop, providing:  a) Credit is given to Spark Software for any code that
  25. ; may is used, and  b) The resulting program is free to anyone wanting to use
  26. ; it, including commercial and government users.
  27. ;
  28. ; 4.  There is  NO  technical support  available for dealing with this source
  29. ; code, or the accompanying executable files.  This source  code  is provided
  30. ; as is, with no warranty expressed or implied (I hate legalease).   In other
  31. ; words, if you don't know what to do with it,  don't use it,  and if you are
  32. ; brave enough to use it, you're on your own.
  33. ;
  34. ; Spark Software may be contacted by modem at (603) 888-8179 (node 1:132/101)
  35. ; on the public FidoNet network, or at the address given above.
  36. ;
  37.  
  38. .xlist
  39.         page    64,132
  40.         
  41.         title   DiskIO
  42.         subttl  by Bob Hartman
  43.         
  44.         name    DiskIO
  45.         ;
  46.         ;
  47.         ;
  48.         ; The following macro files come with the MicroSoft "C" compiler
  49.         ;
  50.         include version.inc
  51.         include msdos.inc
  52.         include cmacros.inc
  53.         
  54.         .sall
  55. .list
  56.  
  57. sBegin   code
  58.  
  59.         assumes  cs,code
  60.         assumes  ds,data
  61.  
  62. cProc   read_sect,<PUBLIC>
  63.  
  64.         parmDP  sect_ptr
  65.         parmW   sector
  66.         parmW   disk
  67.  
  68. cBegin
  69.  
  70.         mov     ax,disk
  71.         mov     cx,1
  72.         mov     dx,sector
  73.         mov     bx,sect_ptr
  74.         push    bp
  75.         int     25h
  76.         jc      rs_exit
  77.         xor     ax,ax
  78.  
  79. rs_exit:
  80.         add     sp,2
  81.         pop     bp
  82.  
  83. cEnd
  84.  
  85. cProc   write_sect,<PUBLIC>
  86.  
  87.         parmDP  sect_ptr
  88.         parmW   sector
  89.         parmW   disk
  90.  
  91. cBegin
  92.  
  93.         mov     ax,disk
  94.         mov     cx,1
  95.         mov     dx,sector
  96.         mov     bx,sect_ptr
  97.         push    bp
  98.         int     26h
  99.         jc      ws_exit
  100.         xor     ax,ax
  101.  
  102. ws_exit:
  103.         add     sp,2
  104.         pop     bp
  105.  
  106. cEnd
  107.  
  108. cProc   get_dir_entry,<PUBLIC>
  109.  
  110.         parmDP  extfcb
  111.         parmDP  dta
  112.  
  113. cBegin
  114.  
  115.         mov     ah,1ah
  116.         mov     dx,dta
  117.         int     21h
  118.         jc      gde_exit
  119.  
  120.         mov     ah,11h
  121.         mov     dx,extfcb
  122.         int     21h
  123.         or      al,al
  124.         jnz     gde_exit
  125.         xor     ax,ax
  126.  
  127. gde_exit:
  128.         xor     ah,ah
  129.  
  130. cEnd
  131.  
  132. cProc   curr_drive,<PUBLIC>
  133.  
  134. cBegin
  135.  
  136.         mov     ah,19h
  137.         int     21h
  138.  
  139. cEnd
  140.  
  141. cProc   disk_reset,<PUBLIC>
  142.  
  143. cBegin
  144.  
  145.         mov     ah,0dh
  146.         int     21h
  147.  
  148. cEnd
  149.  
  150. cProc   fcb_delete,<PUBLIC>
  151.  
  152.         parmDP  fcb
  153.  
  154. cBegin
  155.  
  156.         mov     ah,13h
  157.         mov     dx,fcb
  158.         int     21h
  159.  
  160. cEnd
  161.  
  162. sEnd
  163.         end
  164.