v4.0/src/CMD/SYS/SYSSR.ASM

   1         INCLUDE SYSHDR.INC
   2
   3 ; include SYSMSG.INC
   4
   5 .xlist
   6 .xcref
   7
   8         include SYSMSG.INC              ;                                      ;AN000;
   9
  10 .cref
  11 .list
  12
  13         MSG_UTILNAME <SYS>              ;                                      ;AN000;
  14
  15 CODE    SEGMENT PARA PUBLIC
  16
  17 ASSUME  CS:CODE,DS:nothing,ES:nothing
  18
  19         PUBLIC  SYSDISPMSG, SYSLOADMSG, SYSPARSE
  20         PUBLIC  Data_Space
  21
  22 ;;dcl   MSG_SERVICES <MSGDATA>          ;                                     ;AN000;
  23
  24 ;  MSG_SERVICES <SYS.CL1,SYS.CL2,SYS.CLA,SYS.CLB,SYS.CLC,SYS.CLD>               ;AN000;
  25
  26 .xlist
  27 .xcref
  28
  29         MSG_SERVICES <SYS.CL1,SYS.CL2,SYS.CLA,SYS.CLB,SYS.CLC,SYS.CLD> ;       ;AN000;
  30
  31 .cref
  32 .list
  33
  34 ;  MSG_SERVICES <LOADmsg,DISPLAYmsg,INPUTmsg,CHARmsg,NOVERCHECKmsg>
  35
  36 .xlist
  37 .xcref
  38
  39         MSG_SERVICES <LOADmsg,DISPLAYmsg,INPUTmsg,CHARmsg,NOVERCHECKmsg> ;                   ;AN000;
  40
  41 .cref
  42 .list
  43
  44
  45 false   =       0                       ;                                      ;AN000;
  46
  47 DateSW  equ     false                   ;                                      ;AN000;
  48 TimeSW  equ     false                   ;                                      ;AN000;
  49 CmpxSW  equ     false                   ;                                      ;AN000;
  50 KeySW   equ     false                   ;                                      ;AN000;
  51 QusSW   equ     false                   ;                                      ;AN000;
  52 Val1SW  equ     false                   ;                                      ;AN000;
  53 Val2SW  equ     false                   ;                                      ;AN000;
  54 Val3SW  equ     false                   ;                                      ;AN000;
  55 SwSW    equ     false                   ;                                      ;AN000;
  56 NumSW   equ     false                   ;                                      ;AN000;
  57 CAPSW   equ     false                   ; Perform CAPS if specified            ;AN000;
  58
  59
  60 ASSUME  CS:CODE,DS:CODE,ES:nothing
  61
  62 ; include parse.asm
  63
  64 ;xlist
  65 ;xcref
  66
  67 include parse.asm                       ;                                      ;AN000;
  68
  69 .cref
  70 .list
  71
  72 Data_Space LABEL BYTE                   ;                                      ;AN000;
  73
  74
  75
  76 CODE    Ends
  77
  78 include msgdcl.inc
  79
  80         End
  81
  82 \1a