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