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 / ZCAT / SYSRCP14.LBR / SYSRCP.LZB / SYSRCP.LIB
Text File  |  2000-06-30  |  4KB  |  202 lines
  1. ;10/14/85    Added SLRMAC support
  2. ;07/22/85    Version for Wave Mate Bullet
  3.  
  4. RCPID    EQU    'A'
  5.  
  6. ;-----------------------------------------------------------------------------
  7.  
  8. ;    W H E E L    E Q U A T E S
  9.  
  10. WCP    equ    FALSE    ;Make CP   a Wheel-Oriented Command
  11. WDIR    equ    FALSE    ; "   DIR  "  "       "       "
  12. WERA    equ    FALSE    ; "   ERA  "  "       "       "
  13. WLIST    equ    FALSE    ; "   LIST "  "       "       "
  14. WPEEK    equ    FALSE    ; "   PEEK "  "       "       "
  15. WPOKE    equ    FALSE    ; "   POKE "  "       "       "
  16. WPROT    equ    FALSE    ; "   PROT "  "       "       "
  17. WREG    equ    FALSE    ; "   REG  "  "       "       "
  18. WREN    equ    FALSE    ; "   REN  "  "       "       "
  19. WTYPE    equ    FALSE    ; "   TYPE "  "       "       "
  20.  
  21. WHEEL    set    WCP OR WDIR OR WERA OR WLIST OR WPEEK OR WPOKE
  22. WHEEL    set    WHEEL OR WPROT OR WREG OR WREN OR WTYPE
  23.  
  24. ;-----------------------------------------------------------------------------
  25.  
  26. ;    C O M M A N D    E Q U A T E S
  27.  
  28. CMDLEN        EQU    4        ;length of command names
  29.  
  30. HELPCMD        MACRO            ;help command name
  31.         DB    'H   '
  32.         ENDM
  33.  
  34.  
  35. ;------------------------------  CLEAR SCREEN
  36.  
  37. CLSON        EQU    TRUE
  38.  
  39. CLSCMD        MACRO            ;name for clear screen command
  40.         DB    'CLS '
  41.         ENDM
  42.  
  43. CLSTCAP        EQU    TRUE        ;use TCAP for clear-screen string
  44.  
  45.         ;if CLSTCAP is false, the string below must be provided and
  46.         ;it must end with a character with the high bit set
  47. CLSSTR        MACRO
  48.         DB    'L'-'@'+80H    ;control-L to clear screen
  49.         ENDM
  50.  
  51. ;------------------------------  COPY COMMAND
  52.  
  53. CPON        EQU    TRUE
  54.  
  55. CPCMD        MACRO            ;name for copy command
  56.         DB    'CP  '
  57.         ENDM
  58.  
  59. CPBLOCKS    EQU    128        ;USE 16K FOR BUFFERING OF COPY
  60. COPYTOP        EQU    TRUE        ;USE TOP OF TPA AS COPY BUFFER
  61.  
  62. ;------------------------------  COPY COMMAND
  63.  
  64. DIRON        EQU    FALSE
  65.  
  66. DIRCMD        MACRO            ;name for directory command
  67.         DB    'DIR '
  68.         ENDM
  69.  
  70.  
  71. SYSFLG        EQU    'A'
  72. SOFLG        EQU    'S'
  73. SORTNT        EQU    TRUE 
  74. WIDE        EQU    TRUE 
  75. FENCE        EQU    '|'
  76.  
  77. ;------------------------------  ECHO COMMAND
  78.  
  79. ECHOON        EQU    TRUE 
  80.  
  81. ECHOCMD        MACRO            ;name for echo command
  82.         DB    'ECHO'
  83.         ENDM
  84.  
  85. ECHOLST        EQU    FALSE
  86.  
  87. ;------------------------------  ERASE COMMAND
  88.  
  89. ERAON        EQU    TRUE 
  90.  
  91. ERACMD        MACRO            ;name for erase command
  92.         DB    'ERA '
  93.         ENDM
  94.  
  95. ;------------------------------  LIST AND TYPE COMMANDS
  96.  
  97. LTON        EQU    TRUE
  98.  
  99. TYPECMD        MACRO            ;name for type command
  100.         DB    'TYPE'
  101.         ENDM
  102.  
  103. LISTON        EQU    TRUE 
  104.  
  105. LISTCMD        MACRO            ;name for list command
  106.         DB    'LIST'
  107.         ENDM
  108.  
  109. PGDFLT        EQU    TRUE 
  110. PGDFLG        EQU    'P'
  111. NLINES        EQU    24
  112.  
  113. ;------------------------------  NOTE COMMAND
  114.  
  115. NOTEON        EQU    FALSE 
  116.  
  117. NOTECMD        MACRO            ;name for note command
  118.         DB    'NOTE'
  119.         ENDM
  120.  
  121. ;------------------------------  PEEK COMMAND
  122.  
  123. PEEKON        EQU    TRUE 
  124.  
  125. PEEKCMD        MACRO            ;name for peek command
  126.         DB    'P   '
  127.         ENDM
  128.  
  129. ;------------------------------  POKE COMMAND
  130.  
  131. POKEON        EQU    TRUE 
  132.  
  133. POKECMD        MACRO            ;name for poke command
  134.         DB    'POKE'
  135.         ENDM
  136.  
  137. ;------------------------------  PROTECT COMMAND
  138.  
  139. PROTON        EQU    TRUE 
  140.  
  141. PROTCMD        MACRO            ;name for protect command
  142.         DB    'PROT'
  143.         ENDM
  144.  
  145. ;------------------------------  REGISTER COMMAND
  146.  
  147. REGON        EQU    FALSE
  148.  
  149. REGCMD        MACRO            ;name for register command
  150.         DB    'REG '
  151.         ENDM
  152.  
  153. ;------------------------------  RENAME COMMAND
  154.  
  155. RENON        EQU    FALSE
  156.  
  157. RENCMD        MACRO            ;name for rename command
  158.         DB    'REN '
  159.         ENDM
  160.  
  161. ;------------------------------  DISK RESET COMMAND
  162.  
  163. RESON        EQU    TRUE        ;reset disk system
  164.  
  165. RESETCMD    MACRO            ;name for disk reset command
  166.         DB    'R   '
  167.         ENDM
  168.  
  169. RESMSG        EQU    TRUE        ;print disk reset message
  170.  
  171. ;------------------------------  ERROR TESTING COMMAND
  172.  
  173. TSTON        EQU    TRUE        ;include program error testing
  174.  
  175. TESTCMD        MACRO            ;name for error testing command
  176.         DB    'TST '
  177.         ENDM
  178.  
  179. TESTM80        EQU    TRUE
  180. TESTF80        EQU    FALSE
  181. TESTZAS        EQU    FALSE
  182. TESTSLR        EQU    TRUE
  183.  
  184. ;------------------------------  WHEEL COMMANDS
  185.  
  186. WHLON        EQU    FALSE
  187.  
  188. WHLCMD        MACRO            ;name for wheel setting command
  189.         DB    'WHL '
  190.         ENDM
  191.  
  192. WHLQCMD        MACRO            ;name for wheel query command
  193.         DB    'WHLQ'
  194.         ENDM
  195.  
  196. WHLQUIET    EQU    TRUE        ;don't report wheel state with WHL cmd
  197.  
  198. WPASS        MACRO
  199.         DB    'SYSTEM  '
  200.         ENDM
  201.  
  202.