home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / sigm / vols000 / vol026 / svc.lib < prev    next >
Encoding:
Text File  |  1984-04-29  |  869 b   |  34 lines
  1. ;
  2. ; svc.lib - supervisor call macro library for sysmon
  3. ;
  4. ; invocation - simply put the line SVC nn in your program,
  5. ; where nn is the supervisor call number (call #'s / functions
  6. ; may be found in the SYSMON.ASM file).
  7. ;
  8. ; obviously, you will need MAC or M80 to use this macro definition
  9. ;
  10. false    equ    0        ;logical false value
  11. true    equ    not false    ;logical true value
  12. ;
  13. testing    equ    true        ;if testing (must match testing in sysmon)
  14. ;
  15.     if    testing
  16. svcloc    equ    02002h        ;supervisor call location
  17. super    equ    103h        ;supervisor entry point
  18.     endif
  19. ;
  20.     if    not testing
  21. svcloc    equ    0bf02h        ;supervisor call location
  22. super    equ    0e003h        ;supervisor entry point
  23.     endif
  24. ;
  25. svc    macro    scall        ;;supervisor call
  26.     push    psw        ;;save state
  27.     mvi    a,&scall    ;;store call number
  28.     sta    svcloc
  29.     pop    psw        ;;restore state
  30.     call    super        ;;do physical supervisor call
  31.     endm
  32. ;
  33. ;    (eof)
  34.