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 / BEEHIVE / ZSUS / ZSUS009.LBR / NZFCP13.LBR / Z34CMN.LZB / Z34CMN.LIÂ
Text File  |  1990-07-14  |  3KB  |  105 lines
  1. ;
  2. ; Library:    Z34CMN.LIB
  3. ; Author:    Carson Wilson <crw>
  4. ; Version:    1.2
  5. ; Date:        16 June 1988
  6. ; Changes:    Renamed CRT0 to LINS for NZCOM compatibility.
  7. ;        Added    CUSR          "    "         "
  8.  
  9. ; Author:    Carson Wilson <crw>
  10. ; Version:    1.1
  11. ; Date:        12 June 1988
  12. ; Changes:    Added CDRV   for various Z34RCP commands. 
  13. ;        Added CRT0   for Z34RCP TYPE command.
  14. ;        Added Z3TCAP and CLRSCR for Z34RCP CLS command.
  15. ;        Added QUIET  for ZCPR34 time in prompt.
  16. ;        Added RSDMSG for ZCPR34 time in prompt.
  17.  
  18. ; Library:  Z34CMN.LIB
  19. ; Author:   Joe Wright
  20. ; Date:     23 March 1988
  21.  
  22. ; As a replacement for Z3BASE.LIB, some usual equates.
  23.  
  24. base    equ    0        ; Base Page
  25.  
  26. false    equ    0
  27. true    equ    not false
  28.  
  29. no    equ    false
  30. yes    equ    true
  31.  
  32. off    equ    false
  33. on    equ    true
  34.  
  35. ; Named COMMON declarations start here.  For compatibility, these
  36. ; are the same names used by Bridger Mitchell's JetLDR.
  37.  
  38.     common    /_ENV_/
  39. z3env:                ; Z3 Environment descriptor
  40. z3envs    equ    yes        ; There is one
  41.  
  42. expath    equ    z3env+9        ; Address of External Path
  43. expaths    equ    10        ; Maximum 10 elements for MPATH
  44.  
  45. rcp    equ    z3env+0ch    ; Address of RCP
  46. rcps    equ    yes        ; Used as existence test, not size
  47.  
  48. fcp    equ    z3env+12h    ; Address of FCB
  49. fcps    equ    yes        ; Used as existence test, not size
  50.  
  51. z3ndir    equ    z3env+15h    ; Address of NDR
  52. z3ndirs    equ    yes        ; Used as existence test, not size
  53.  
  54. quiet    equ    z3env+28h    ; Quiet flag address <crw>
  55.  
  56. z3whl    equ    z3env+29h    ; Wheel byte address
  57. z3whls    equ    yes        ; There is a wheel
  58.  
  59. lins    equ    z3env+33h    ; CRT text lines address <crw>
  60.  
  61. ccp    equ    z3env+3fh    ; CCP entry
  62. ccps    equ    z3env+41h    ; Size
  63.  
  64. dos    equ    z3env+42h    ; DOS entry (+6)
  65. doss    equ    z3env+44h    ; Size
  66.  
  67. bio    equ    z3env+45h    ; BIO entry
  68.  
  69. z3tcap    equ    z3env+80h    ; TCAP address <crw>
  70.  
  71. clrscr    equ    z3env+97h    ; Clear screen string address <crw>
  72.  
  73.     common    /_SSTK_/
  74. shstk:                ; Top of Shell stack
  75. shstks    equ    yes        ; There is a shell stack
  76.  
  77.     common    /_MSG_/
  78. z3msg:                ; Message buffer
  79. z3msgs    equ    yes        ; There is one
  80.  
  81. cusr    equ    z3msg+2eh    ; Current user
  82. cdrv    equ    z3msg+2fh    ; Current drive <crw>
  83.  
  84. rsdmsg    equ    z3msg+3ah    ; Reserved bytes <crw>
  85.  
  86.     common    /_FCB_/
  87. extfcb:                ; External file control block
  88. extfcbs    equ    yes        ; There is one
  89.  
  90.     common    /_MCL_/
  91. z3cl:                ; Multiple command line
  92. z3cls    equ    yes        ; There is one
  93.  
  94.     common    /_XSTK_/
  95. extstk:                ; External stack
  96. extstks    equ    yes        ; There is one
  97.  
  98.     common    /_BIOS_/
  99. bios:
  100.  
  101.     cseg            ; Select Code Segment
  102.  
  103. ; End of Z34CMN.LIB
  104.  
  105.