home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / archives / packetdrivers.tar.gz / pd.tar / src / intchk.asm < prev    next >
Assembly Source File  |  1995-06-25  |  438b  |  19 lines
  1. ;put into the public domain by Russell Nelson, nelson@clutx.clarkson.edu
  2.  
  3. signature    db    'PKT DRVR',0
  4. signature_len    equ    $-signature
  5.  
  6.     public    chk_int
  7. chk_int:
  8. ;enter with al = interrupt number
  9. ;exit with es:bx -> interrupt handler, zr if there's a packet driver there,
  10. ;exit with nz if no packet driver there.
  11.     mov    ah,35h            ;get their packet interrupt.
  12.     int    21h
  13.     lea    di,3[bx]
  14.     mov    si,offset signature
  15.     mov    cx,signature_len
  16.     repe    cmpsb
  17.     ret
  18.  
  19.