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 / ZSYS / ZNODE-12 / I / IOPH19.LBR / SYSDEF.LZB / SYSDEF.LIÂ
Text File  |  2000-06-30  |  4KB  |  154 lines
  1. ;LIBRARY OF COMMONLY USED DEFINITIONS
  2. ;Use of this library will make assembly language
  3. ;programs easier to read and maintain.
  4. ;
  5. ;The following definitions were collected by
  6. ;simply extracting them from ZCPR3 utilities.
  7. ;Please feel free to add to this list and to
  8. ;comment on the preferred definition where
  9. ;there are several equivalent ones. Bump the
  10. ;revision # and send it back for coordination.
  11. ;
  12. ;Version 1.0 - 31 Jan 1986
  13. ;Al Hawley, Z-Node #2, (213) 670-9465
  14.  
  15. ;----------------------------------------------
  16. ;Logic Definitions
  17.  
  18. FALSE   EQU     0               ;these all seem to be
  19. TRUE    EQU     NOT FALSE       ;..appropriate in
  20. YES     EQU     TRUE            ;..different contexts.
  21. NO      EQU     FALSE
  22.  
  23. ;----------------------------------------------
  24. ; System Functions
  25. ;
  26. RDCONF          EQU     1
  27. WRCONF          EQU     2
  28. RDRF            EQU     3
  29. PUNCHF          EQU     4
  30. LISTF           EQU     5
  31. DIRCONF         EQU     6
  32. PRBUFF          EQU     9
  33. RDBUFF          EQU     10
  34. CONSTF          EQU     11
  35. VERNOF          EQU     12
  36. RESETDKF        EQU     13
  37. LOGINF          EQU     14
  38. OPENF           EQU     15
  39. CLOSEF          EQU     16
  40. SRCHFF          EQU     17
  41. SRCHNF          EQU     18
  42. ERASEF          EQU     19
  43. READF           EQU     20
  44. WRITEF          EQU     21
  45. MAKEF           EQU     22
  46. RENF            EQU     23
  47. INQDISKF        EQU     25
  48. SETDMAF         EQU     26
  49. INQALCF         EQU     27
  50. ATTRF           EQU     30
  51. GETPARMF        EQU     31
  52. SGUSERF         EQU     32
  53. GETF            EQU     0FFH            ;get user area e-reg value
  54. COMPSZF         EQU     35
  55. SETRRF          EQU     36
  56.  
  57.  
  58. ;----------------------------------------------
  59. ; System Addresses
  60. ;
  61. OS$BASE EQU     000H            ;system base..
  62. CCPLEN  EQU     800H            ;..and 'CCP' length in bytes.
  63. WBOOT   EQU     OS$BASE+0
  64. IOBYTE  EQU     OS$BASE+03H
  65. UDFLAG  EQU     OS$BASE+04H
  66. BDOS    EQU     OS$BASE+05H
  67.  
  68. FCB     EQU     OS$BASE+5CH
  69. TFCB    EQU     OS$BASE+5CH
  70. FCB1    EQU     OS$BASE+5CH     ;preferred (AEH)
  71.  
  72. FCB2    EQU     OS$BASE+6CH
  73.  
  74. FCBEXT  EQU     FCB+12
  75. FCBRNO  EQU     FCB+32
  76.  
  77. TBUF    EQU     OS$BASE+80H
  78. TBUFF   EQU     OS$BASE+80H
  79.  
  80. TPA     EQU     OS$BASE+100H
  81.  
  82. ;----------------------------------------------
  83. ; ASCII Definitions
  84. ;
  85. CTRLA   EQU     'A'-'@'
  86. CTRLB   EQU     'B'-'@'
  87. CTRLC   EQU     'C'-'@'         ;..control-C..
  88. CTRLD   EQU     'D'-'@'
  89. CTRLE   EQU     'E'-'@'
  90. CTRLF   EQU     'F'-'@'
  91. CTRLG   EQU     'G'-'@'
  92. CTRLH   EQU     'H'-'@'
  93. CTRLI   EQU     'I'-'@'
  94. CTRLJ   EQU     'J'-'@'
  95. CTRLK   EQU     'K'-'@'
  96. CTRLL   EQU     'L'-'@'
  97. CTRLM   EQU     'M'-'@'
  98. CTRLN   EQU     'N'-'@'
  99. CTRLO   EQU     'O'-'@'
  100. CTRLP   EQU     'P'-'@'
  101. CTRLQ   EQU     'Q'-'@'
  102. CTRLR   EQU     'R'-'@'
  103. CTRLS   EQU     'S'-'@'
  104. CTRLT   EQU     'T'-'@'
  105. CTRLU   EQU     'U'-'@'
  106. CTRLV   EQU     'V'-'@'
  107. CTRLW   EQU     'W'-'@'
  108. CTRLX   EQU     'X'-'@'
  109. CTRLY   EQU     'Y'-'@'
  110. CTRLZ   EQU     'Z'-'@'
  111. BS      EQU     08H             ;..backspace..
  112. TAB     EQU     09H             ;..tab..
  113. LF      EQU     0AH             ;..linefeed..
  114. FF      EQU     0CH             ;..formfeed..
  115. CR      EQU     0DH             ;..carriage return..
  116. CAN     EQU     18H             ;..cancel..
  117. EOF     EQU     1Ah             ;..End-of-file
  118. EOFCHAR EQU     1AH             ;..end-of-file..
  119. ESC     EQU     1BH             ;..escape character.
  120. SPC     EQU     20H             ;..space
  121.  
  122. ;----------------------------------------------
  123. ;for TCAP screen functions
  124. ;
  125. DIM     EQU     1               ;for highlighting use
  126. BRIGHT  EQU     2               ;opposite of dim
  127. CL      EQU     CTRLZ           ;clear screen, home cursor
  128. CRUP    EQU     CTRLE           ;cursor up
  129. CRDN    EQU     CTRLX           ;cursor down
  130. CURSL   EQU     CTRLS           ;cursor left
  131. CURSR   EQU     CTRLD           ;cursor right
  132. 
  133.  
  134.  
  135.  
  136.  
  137.  
  138.  
  139.  
  140.  
  141.  
  142.  
  143.  
  144.  
  145.  
  146.  
  147.  
  148.  
  149.  
  150.  
  151.  
  152.  
  153.  
  154. 3