home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / JSAGE / ZSUS / PROGPACK / SYSDEF.LIB < prev    next >
Text File  |  2000-06-30  |  3KB  |  125 lines
  1.  
  2. ;
  3. ; LIBRARY OF COMMONLY USED DEFINITIONS
  4. ; Use of this library will make assembly language programs easier
  5. ; to read and maintain.
  6. ;
  7. ; The following definitions were collected by simply extracting
  8. ; them from ZCPR3 utilities.  Please feel free to add to this
  9. ; list and to comment on the preferred definition where there
  10. ; are several equivalent ones. Bump the revision # and send it
  11. ; back for coordination.
  12. ;
  13. ; Rev   1.1 - 10 Feb 1988    Joe Silvia
  14. ;     Changed OS$BASE to BASE for uniformity with Z3BASE.LIB
  15. ;    * added equates
  16. ;
  17. ; Version 1.0 - 31 Jan 1986
  18. ; Al Hawley, Z-Node #2, (213) 670-9465
  19.  
  20. ;----------------------------------------------
  21. ; Logic Definitions
  22.  
  23. FALSE    EQU    0        ;..these all seem to be
  24. TRUE    EQU    NOT FALSE    ;..appropriate in
  25. NO    EQU    FALSE        ;..different contexts.
  26. YES    EQU    TRUE
  27.  
  28. ;----------------------------------------------
  29. ; System Functions
  30. ;
  31. RDCONF        EQU    1
  32. WRCONF        EQU    2
  33. RDRF        EQU    3
  34. PUNCHF        EQU    4
  35. LISTF        EQU    5
  36. DIRCONF        EQU    6
  37. PRBUFF        EQU    9
  38. RDBUFF        EQU    10
  39. CONSTF        EQU    11
  40. VERNOF        EQU    12
  41. RESETDKF    EQU    13
  42. LOGINF        EQU    14
  43. OPENF        EQU    15
  44. CLOSEF        EQU    16
  45. SRCHFF        EQU    17
  46. SRCHNF        EQU    18
  47. ERASEF        EQU    19
  48. READF        EQU    20
  49. WRITEF        EQU    21
  50. MAKEF        EQU    22
  51. RENF        EQU    23
  52. INQDISKF    EQU    25
  53. SETDMAF        EQU    26
  54. INQALCF        EQU    27
  55. ATTRF        EQU    30
  56. GETPARMF    EQU    31
  57. SGUSERF        EQU    32
  58. GETF        EQU    0FFH        ;...get user area e-reg value...
  59. COMPSZF        EQU    35
  60. SETRRF        EQU    36
  61.  
  62.  
  63. ;----------------------------------------------
  64. ; System Addresses
  65. ;
  66. CCPLEN    EQU    800H        ;..'CCP' length in bytes.
  67. BASE    EQU    000H        ;..system base..
  68. WBOOT    EQU    BASE+0
  69. IOBYTE    EQU    BASE+03H
  70. UDFLAG    EQU    BASE+04H
  71. BDOS    EQU    BASE+05H
  72.  
  73. FCB    EQU    BASE+5CH
  74. TFCB    EQU    BASE+5CH
  75. FCB1    EQU    BASE+5CH    ;..preferred (AEH)..
  76. FCB2    EQU    BASE+6CH
  77.  
  78. FCBEXT    EQU    FCB+12
  79. FCBRNO    EQU    FCB+32
  80.  
  81. TBUF    EQU    BASE+80H
  82. TBUFF    EQU    BASE+80H
  83.  
  84. TPA    EQU    BASE+100H
  85.  
  86. ;----------------------------------------------
  87. ; ASCII Definitions
  88. ;
  89. CTRLA    EQU    'A'-'@'
  90. CTRLC    EQU    'C'-'@'        ;..control-C..
  91. CTRLD    EQU    'D'-'@'
  92. CTRLE    EQU    'E'-'@'
  93. CTRLF    EQU    'F'-'@'
  94. CTRLK    EQU    'K'-'@'
  95. CTRLQ    EQU    'Q'-'@'        ;..XON..        * added 1.1
  96. CTRLR    EQU    'R'-'@'
  97. CTRLS    EQU    'S'-'@'        ;..XOFF..
  98. CTRLX    EQU    'X'-'@'
  99. CTRLZ    EQU    'Z'-'@'
  100.  
  101. BELL    EQU    07H        ;..console bell..    * added 1.1
  102. BS    EQU    08H        ;..backspace..
  103. TAB    EQU    09H        ;..tab..
  104. LF    EQU    0AH        ;..linefeed..
  105. FF    EQU    0CH        ;..formfeed..
  106. CR    EQU    0DH        ;..carriage return..
  107. CAN    EQU    18H        ;..cancel..
  108. EOF    EQU    1Ah        ;..End-of-file..
  109. EOFCHAR    EQU    1AH        ;..end-of-file..
  110. ESC    EQU    1BH        ;..escape character..
  111. SPC    EQU    20H        ;..space..
  112.  
  113. ;----------------------------------------------
  114. ; for TCAP screen functions
  115. ;
  116. DIM    EQU    1        ;..for highlighting use..
  117. BRIGHT    EQU    2        ;..opposite of dim..
  118. CL    EQU    CTRLZ        ;..clear screen, home cursor..
  119. CRUP    EQU    CTRLE        ;..cursor up..
  120. CRDN    EQU    CTRLX        ;..cursor down..
  121. CURSL    EQU    CTRLS        ;..cursor left..
  122. CURSR    EQU    CTRLD        ;..cursor right..
  123.  
  124. ; end sysdef.lib
  125. ..................... ... ...-....1200 N81N         ......................... ... ...-....1200 N81N         ............