home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / assemblr / mslang / as / comibas.asm < prev    next >
Encoding:
Assembly Source File  |  1985-02-28  |  532 b   |  28 lines
  1. ;
  2. ;    Serial communications port interupt intercepter        AHA 8502.27
  3. ;
  4. ;    Example:
  5. ;        call setcom(func)
  6. ;        Where func=0 to disable and func=1 to enable
  7. ;
  8. ;    Functions:
  9. ;    al=0 then Disable communications interupt vector
  10. ;    al=1 then Enable communications interupt vector
  11. ;    Issue and int 44h
  12. ;
  13. progseg segment para public 'CODE'
  14.     public    setcom
  15.     assume    cs:progseg, ds:progseg, es:progseg
  16. ;
  17. setcom    proc    far
  18.     push    bp
  19.     mov    bp,sp
  20.     mov    bx,[bp+6]
  21.     mov    al,[bx]
  22.     int    44h
  23.     pop    bp
  24.     ret    2
  25. setcom    endp
  26. progseg ends
  27.     end
  28.