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 / CPM / ZCPR33 / S-Z / VTCAP11.LBR / SYSENV.LIB < prev    next >
Text File  |  2000-06-30  |  3KB  |  134 lines
  1. ; LIBRARY:  SYSENV.LIB
  2. ; AUTHOR:  Richard Conn
  3. ; Version:  1.0
  4. ; Date:  18 May 84
  5. ; Previous Versions:  None
  6. ;
  7. ;    SYSENV is the definition for my ZCPR3 environment.
  8. ;
  9. sysenv    macro
  10. ;
  11. ;  Environment Descriptor
  12. ;    If inline, there is a leading JMP just before this
  13. ;
  14. envorg1:
  15.     db    'Z3ENV'        ; Environment ID
  16.     db    2        ; class 2 environment (internal)
  17. ;
  18.     dw    expath        ; external path address
  19.     db    expaths        ; number of 2-byte elements in path
  20. ;
  21.     dw    rcp        ; RCP address
  22.     db    rcps        ; number of 128-byte blocks in RCP
  23. ;
  24.     dw    iop        ; IOP address
  25.     db    iops        ; number of 128-byte blocks in IOP
  26. ;
  27.     dw    fcp        ; FCP address
  28.     db    fcps        ; number of 128-byte blocks in FCP
  29. ;
  30.     dw    z3ndir        ; NDR address
  31.     db    z3ndirs        ; number of 18-byte entries in NDR
  32. ;
  33.     dw    z3cl        ; ZCPR3 Command Line
  34.     db    z3cls        ; number of bytes in Command Line
  35. ;
  36.     dw    z3env        ; ZCPR3 Environment Descriptor
  37.     db    z3envs        ; number of 128-byte blocks in Descriptor
  38. ;
  39.     dw    shstk        ; Shell Stack address
  40.     db    shstks        ; number of shsize-byte entires in Shell Stack
  41.     db    shsize        ; size of a Shell Stack entry
  42. ;
  43.     dw    z3msg        ; ZCPR3 Message buffer
  44. ;
  45.     dw    extfcb        ; ZCPR3 External FCB
  46. ;
  47.     dw    extstk        ; ZCPR3 External Stack
  48. ;
  49.     db    0        ; quiet flag (1=quiet, 0=not quiet)
  50. ;
  51.     dw    z3whl        ; address of Wheel Byte
  52. ;
  53.     db    4        ; Processor Speed in MHz
  54. ;
  55.     db    'B'-'@'        ; maximum disk
  56.     db    16        ; maximum user
  57. ;
  58.     db    1        ; 1=OK to accept DU, 0=not OK
  59. ;
  60.     db    0        ; CRT selection (0=CRT 0, 1=CRT 1)
  61.     db    0        ; Printer selection (n=Printer n)
  62. ;
  63.     db    80        ; width of CRT 0
  64.     db    24        ; number of lines on CRT 0
  65.     db    22        ; number of lines of text on CRT 0
  66. ;
  67.     db    80        ; width of CRT 1
  68.     db    24        ; number of lines on CRT 1
  69.     db    22        ; number of lines of text on CRT 1
  70. ;
  71.     db    132        ; width of Printer 0
  72.     db    66        ; number of lines on Printer 0
  73.     db    60        ; number of lines of text on Printer 0
  74.     db    1        ; form feed flag (0=can't formfeed, 1=can)
  75. ;
  76.     db    121        ; width of Printer 1
  77.     db    66        ; number of lines on Printer 1
  78.     db    60        ; number of lines of text on Printer 1
  79.     db    1        ; form feed flag (0=can't formfeed, 1=can)
  80. ;
  81.     db    96        ; width of Printer 2
  82.     db    66        ; number of lines on Printer 2
  83.     db    60        ; number of lines of text on Printer 2
  84.     db    1        ; form feed flag (0=can't formfeed, 1=can)
  85. ;
  86.     db    80        ; width of Printer 3
  87.     db    66        ; number of lines on Printer 3
  88.     db    60        ; number of lines of text on Printer 3
  89.     db    1        ; form feed flag (0=can't formfeed, 1=can)
  90. ;
  91.     db    'SH      '    ; shell variable filename
  92.     db    'VAR'        ; shell variable filetype
  93. ;
  94.     db    '        '    ; filename 1
  95.     db    '   '        ; filetype 1
  96. ;
  97.     db    '        '    ; filename 2
  98.     db    '   '        ; filetype 2
  99. ;
  100.     db    '        '    ; filename 3
  101.     db    '   '        ; filetype 3
  102. ;
  103.     db    '        '    ; filename 4
  104.     db    '   '        ; filetype 4
  105. ;
  106.     ds    80H-($-envorg1+3)    ; make exactly 80H bytes long
  107.                     ; (+3 compensates for leading JMP)
  108. ;
  109. ; Terminal Capabilities Data
  110. ;
  111. envorg2:
  112.     DB    'TRS80-12 P&T 2.2'    ;Name of Terminal
  113.     DB    1eh                ;Cursor UP
  114.     DB    1fh                ;Cursor DOWN
  115.     DB    1dh                ;Cursor RIGHT
  116.     DB    1ch                ;Cursor LEFT
  117.     DB    00            ;CL Delay
  118.     DB    00            ;CM Delay
  119.     DB    00            ;CE Delay
  120.     DB    0ch,0             ;CL String
  121.     DB    1bh,'Y%+ %+ ',0        ;CM String
  122.     DB    1h,0             ;CE String
  123.     DB    0eh,0            ;SO String
  124.     DB    0fh,0            ;SE String
  125.     DB    0            ;TI String
  126.     DB    0            ;TE String
  127. ;
  128.      ds    80H-($-envorg2)        ; make exactly 80H bytes long
  129. ;
  130. ;
  131. ;  End of Environment Descriptor
  132. ;
  133.     endm
  134.