summaryrefslogtreecommitdiff
path: root/v4.0/src/CMD/MODE/MODEMES.ASM
blob: 43e55a4475dd2912ed7cb474315c078a897890d1 (plain) (blame)
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
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
	  PAGE	,132	;
	  TITLE MODEMES - MESSAGES DISPLAYED ON CONSOLE BY MODE

;���������������������������������  P R O L O G  ����������������������������������������ͻ
;�											  �

;  AC001 - P3976: Need to have all pieces of messages in MODE.SKL so have to
;		  implement the SYSGETMSG method of getting addressability to
;		  the pieces.  This means that the code does a SYSGETMSG call
;		  which returns a pointer (DS:SI) to the message piece.  The
;		  address is then put in the sublist block for the message
;		  being issued.

;�											  �
;���������������������������������  P R O L O G  ����������������������������������������ͼ

PRINTF_CODE SEGMENT PUBLIC
	  ASSUME CS:PRINTF_CODE,DS:PRINTF_CODE
;
CR	  EQU	13	;CARRIAGE RETURN
LF	  EQU	10	;LINE FEED
BEEP	  EQU	7	;AUDIBLE TONE
EOM	  EQU	0	;NULL TERMINATOR, REQUIRED BY PRINTF

IF1
   %OUT including  MODESUBS.INC
   %OUT including  MODEDEFS.INC
ENDIF
INCLUDE  MODESUBS.INC
INCLUDE  MODEDEFS.INC

;
PUBLIC	 first_sublist
PUBLIC	 number_of_sublists

 PUBLIC    MOVED_MSG, ERR1, ERR2, PT80, PT80N, PT132, PT132N
 PUBLIC    PTLINES, RATEMSG, INITMSG, REDIRMSG, SHIFT_MSG, sublist_shift_msg
 PUBLIC    NOTREMSG, RETPARTO, sublist_retparto, CANT_SHIFT, sublist_cant_shift
 PUBLIC    NUMBERS, ;AC001;INF_OR_NO_ptr
 PUBLIC    Invalid_number_of_parameters, COM1_or_COM2, net_error
 PUBLIC    Invalid_parameter, not_supported, offending_parameter
 PUBLIC  offending_parameter_ptr
 PUBLIC    INITMSG, device,pbaud,pparity,pdata,pstop,pparm,pbaud,baud_19200
 PUBLIC  pstop_ptr
 PUBLIC  pparity_ptr
	       PUBLIC CPMSG1
		PUBLIC CPMSG2,CPMSGLST2DEV
		PUBLIC CPMSG3
		PUBLIC CPMSG4
		PUBLIC CPMSG5
		PUBLIC CPMSG6,CPMSGLST6CP,CPMSGLST6DEV
		PUBLIC CPMSG7,CPMSGLST7DEV
;AC001; 	PUBLIC CPMSGLST8HD
		PUBLIC sublist_cpmsg8
		PUBLIC CPMSG8
		PUBLIC CPMSG8_HW
;AC001; 	PUBLIC CPMSG8_PR
		PUBLIC CPMSG9,CPMSGLST9CP
		PUBLIC CPMSG10
		PUBLIC sublist_cpmsg10
;AC001; 	PUBLIC CPMSGLST10FUN
;AC001; 	PUBLIC CPMSG10_QUERY
;AC001; 	PUBLIC CPMSG10_DES
;AC001; 	PUBLIC CPMSG10_REFRESH
;AC001; 	PUBLIC CPMSG10_SELECT
;AC001; 	PUBLIC CPMSG10_GLOBAL
		PUBLIC CPMSG12
		PUBLIC CPMSG13
		PUBLIC CPMSGLST13CP
		PUBLIC CPMSGLST13TYP
;AC001; 	PUBLIC CPMSG13_ACT
;AC001; 	PUBLIC CPMSG13_SYS
		PUBLIC CPMSG14
		PUBLIC CPMSG15
		PUBLIC CPMSG16
		PUBLIC CPMSG17
		PUBLIC sublist_CPMSG17
;AC001; 	PUBLIC CPMSGLST17FUN
;AC001; 	PUBLIC CPMSG17_QUERY
;AC001; 	PUBLIC CPMSG17_PREP
;AC001; 	PUBLIC CPMSG17_REFRESH
;AC001; 	PUBLIC CPMSG17_ACT
;AC001; 	PUBLIC CPMSG17_WRIT
		PUBLIC CPMSG18
		PUBLIC CPMSG19
		PUBLIC CPMSG20
		PUBLIC CPMSG21
		PUBLIC dev_name_size	     ;used by invoke for msg srv
		PUBLIC stat_dev_ptr	     ;used by invoke for msg srv
		PUBLIC long_underline	     ;used by invoke for msg srv
		PUBLIC five_char_underline	  ;used by invoke for msg srv
		PUBLIC four_char_underline	  ;used by invoke for msg srv
		PUBLIC row_ptr
		PUBLIC status_for_device
		PUBLIC notredpt
;AC001; 	PUBLIC noretry
;AC001; 	PUBLIC LEFT
;AC001; 	PUBLIC RIGHT
		PUBLIC row_type
		PUBLIC lines_equal_msg		;used by analyze_and_invoke, "LINES=%1" definition
		PUBLIC	redcom
;AC001; 	PUBLIC	rightmost
;AC001; 	PUBLIC	leftmost
;AC001; 	PUBLIC	infinite
		PUBLIC	REDPT
		PUBLIC	PBAUD_PTR
;		PUBLIC BLINK_type
		PUBLIC COLUMNS_ptr
		PUBLIC COLUMNS_equal_msg
		PUBLIC columns_type
		PUBLIC delay_type
		PUBLIC delay_ptr
		PUBLIC rate_ptr
		PUBLIC rate_type
		PUBLIC function_not_supported
		PUBLIC Required_font_not_loaded
		PUBLIC ANSI_not_loaded
		PUBLIC Baud_rate_required
		PUBLIC RETRY_type_ptr
		PUBLIC RETRY_equal
		PUBLIC Baud_rate_required
		PUBLIC	not_supported_ptr
		PUBLIC	Illegal_device_ptr
		PUBLIC	syntax_error
		PUBLIC	syntax_error_ptr
		PUBLIC	rate_and_delay_together
		PUBLIC	CRLF
		PUBLIC	Invalid_switch
		PUBLIC	rightmost
		PUBLIC	leftmost
		PUBLIC	noretry
		PUBLIC	infinite
		PUBLIC	left
		PUBLIC	right
		PUBLIC	cpmsg8_pr
		PUBLIC	cpmsgxx_query
		PUBLIC	cpmsgxx_prep
		PUBLIC	cpmsgxx_select
		PUBLIC	cpmsgxx_refresh
		PUBLIC	cpmsg17_writ
		PUBLIC	cpmsg13_act
		PUBLIC	cpmsg13_sys

PRINTF_CODE	ENDS
		END