home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1999 mARCH / PCWK3A99.iso / Archiwiz / Tar320 / SOURCES.ZIP / PCLEVEL.ASM < prev    next >
Assembly Source File  |  1994-08-25  |  2KB  |  97 lines
  1.         include    farnear.inc
  2.  
  3. _TEXT        segment    byte public 'CODE'
  4.         assume    cs:_TEXT
  5.  
  6.     program    _getkey
  7. ;    int getkey(void)
  8. l1:        mov    ah,1
  9.         int    16h
  10.                 mov     ah,0
  11.         jz    short l2
  12.                 int     16h
  13.                 jmp     short l1
  14. l2:        int    16h
  15.         xor    ah,ah
  16.         ret
  17. _getkey        endp
  18.  
  19.     program    _diskserv
  20. ;    int diskserv(int op, int drive, int head, int track, int sector,
  21. ;             int nsects, void far *buffer)
  22.         push    bp
  23.         mov    bp,sp
  24.  
  25.         mov    ah,arglist[0]    ; operation
  26.         mov    al,arglist[10]    ; number of sectors
  27.  
  28.         mov    cx,arglist[6]    ; track number
  29. ;        and    ch,3        ; must not need for valid number
  30.         ror    ch,1
  31.         ror    ch,1
  32.         xchg    ch,cl
  33. ;        mov    dl,arglist[8]    ; sector number
  34. ;        and    dl,3fh        ; must not need for valid number
  35. ;        or    cl,dl
  36.         or      cl,arglist[8]    ; sector number
  37.  
  38.         mov     dl,arglist[2]    ; drive number
  39.         mov    dh,arglist[4]    ; head number
  40.         les    bx,arglist[12]    ; buffer address
  41.         int    13h
  42.         jc    short end
  43.         xor    ah,ah
  44. end:
  45.         mov    al,ah
  46.         xor    ah,ah
  47.         pop    bp
  48.         ret
  49. _diskserv    endp
  50.  
  51.     program    _diskspec
  52. ;    void far *diskspec(int op, int drive, int head, int track,
  53. ;             int nsects, struct BYTEREGS far *xregs)
  54.         push    bp
  55.         mov    bp,sp
  56.         push    di
  57.  
  58.         mov    ah,arglist[0]    ; operation
  59.  
  60.         mov    cx,arglist[6]    ; track number
  61. ;        and    ch,3        ; must not need for valid number
  62.         ror    ch,1
  63.         ror    ch,1
  64.         xchg    ch,cl
  65. ;        mov    dl,arglist[8]    ; last sector on a track
  66. ;        and    dl,3fh        ; must not need for valid number
  67. ;        or    cl,dl
  68.         or      cl,arglist[8]    ; last sector on a track
  69.  
  70.         mov     dl,arglist[2]    ; drive number
  71.         mov    dh,arglist[4]    ; head number
  72.  
  73.         xor    di,di        ; default pointer
  74.         mov    es,di        ; = NULL
  75.         int    13h
  76.  
  77.         push    ds
  78.         push    si
  79.         lds    si,arglist[10]  ; output buffer
  80.         mov    [si+0],ax
  81.         mov    [si+2],bx
  82.         mov    [si+4],cx
  83.         mov    [si+6],dx
  84.         pop    si
  85.         pop    ds
  86.  
  87.         mov    ax,di
  88.         mov     dx,es
  89.  
  90.         pop    di
  91.         pop    bp
  92.         ret
  93. _diskspec    endp
  94.  
  95. _TEXT        ends
  96.         end
  97.