summaryrefslogtreecommitdiff
path: root/v4.0/src/SELECT/INPUT.ASM
diff options
context:
space:
mode:
Diffstat (limited to 'v4.0/src/SELECT/INPUT.ASM')
-rw-r--r--v4.0/src/SELECT/INPUT.ASM1737
1 files changed, 1737 insertions, 0 deletions
diff --git a/v4.0/src/SELECT/INPUT.ASM b/v4.0/src/SELECT/INPUT.ASM
new file mode 100644
index 0000000..59996a7
--- /dev/null
+++ b/v4.0/src/SELECT/INPUT.ASM
@@ -0,0 +1,1737 @@
1PAGE 60,132 ;AN000;
2NAME SELECT ;AN000;
3TITLE INPUT.ASM - DOS SELECT.EXE ;AN000;
4SUBTTL input.asm ;AN000;
5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6;
7;
8; INPUT.ASM: Copyright 1988 Microsoft
9;
10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
11 ;
12DATA SEGMENT BYTE PUBLIC 'DATA' ;AN000; Define Dummy data segment
13 PUBLIC WR_ICBVEC ;AN000;
14 PUBLIC KD_BACKSPACE ;AN000;
15 ;
16 INCLUDE PCEQUATE.INC ;AN000;
17 ;
18SND_FREQ EQU 440 ;AN000; ;frequency of error beep
19;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
20;
21; Input Field Control Block Vector
22;
23;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
24WR_ICBVEC DW DATA,WR_ICB1 ;AN000;ICB 1 segment,offset STR_DOS_LOC
25 DW DATA,WR_ICB2 ;AN000;ICB 2 segment,offset STR_EXT_PARMS
26 DW DATA,WR_ICB3 ;AN000;ICB 3 segment,offset STR_DOS_PATH
27 DW DATA,WR_ICB4 ;AN000;ICB 4 segment,offset STR_DOS_APPEND
28 DW DATA,WR_ICB5 ;AN000;ICB 5 segment,offset STR_DOS_PROMPT
29 DW DATA,WR_ICB6 ;AN000;ICB 6 segment,offset STR_SHELL
30 DW DATA,WR_ICB7 ;AN000;ICB 7 segment,offset STR_KSAM
31 DW DATA,WR_ICB8 ;AN000;ICB 8 segment,offset STR_FASTOPEN
32 DW DATA,WR_ICB9 ;AN000;ICB 9 segment,offset STR_SHARE
33 DW DATA,WR_ICB10 ;AN000;ICB 10 segment,offset STR_GRAPHICS
34 DW DATA,WR_ICB11 ;AN000;ICB 11 segment,offset STR_XMAEM
35 DW DATA,WR_ICB12 ;AN000;ICB 12 segment,offset STR_XMA2EMS
36 DW DATA,WR_ICB13 ;AN000;ICB 13 segment,offset STR_VDISK
37 DW DATA,WR_ICB14 ;AN000;ICB 14 segment,offset STR_BREAK
38 DW DATA,WR_ICB15 ;AN000;ICB 15 segment,offset STR_BUFFERS
39 DW DATA,WR_ICB16 ;AN000;ICB 16 segment,offset STR_DOS_APPEND_P JW
40 DW DATA,WR_ICB17 ;AN000;ICB 17 segment,offset STR_FCBS
41 DW DATA,WR_ICB18 ;AN000;ICB 18 segment,offset STR_FILES
42 DW DATA,WR_ICB19 ;AN000;ICB 19 segment,offset STR_LASTDRIVE
43 DW DATA,WR_ICB20 ;AN000;ICB 20 segment,offset STR_STACKS
44 DW DATA,WR_ICB21 ;AN000;ICB 21 segment,offset STR_VERIFY
45 DW DATA,WR_ICB22 ;AN000;ICB 23 segment,offset NUM_PRINTER
46 DW DATA,WR_ICB23 ;AN000;ICB 23 segment,offset NUM_EXT_DISK
47 DW DATA,WR_ICB24 ;AN000;ICB 24 segment,offset NUM_YEAR
48 DW DATA,WR_ICB25 ;AN000;ICB 25 segment,offset NUM_MONTH
49 DW DATA,WR_ICB26 ;AN000;ICB 26 segment,offset NUM_DAY
50 DW DATA,WR_ICB27 ;AN000;ICB 27 segment,offset NUM_HOUR
51 DW DATA,WR_ICB28 ;AN000;ICB 28 segment,offset NUM_MINUTE
52 DW DATA,WR_ICB29 ;AN000;ICB 29 segment,offset NUM_SECOND
53 DW DATA,WR_ICB30 ;AN000;ICB 29 segment,offset DEF_CP
54 DW DATA,WR_ICB31 ;AN000;ICB 29 segment,offset SWISS_KEYB
55;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
56;
57; ICB 1 STR_DOS_LOC
58;
59;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
60WR_ICB1 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
61 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
62 DW ICB_HOR ;AC069;SEH ;AN000;option word three
63 DW 0 ;AN000;option word four
64 DW 8 ;AN000;**;upper left corner field row
65 DW 33 ;AN000;**;upper left corner field column
66 DW 40 ;AN000;**;number of chars before wrapping
67 DW 1 ;AN000;color index number assigned
68 DW 0 ;AN000;default change/minus status
69 DW 1 ;AN000;**;cursor character pos in field
70 DW 1 ;AN000;**;NEW ADD Hor scroll support
71 DW SND_FREQ ;AN000;frequency of error beep
72 DW 0 ;AN000;ASCII code of the key returned
73 DW 0 ;AN000;length of data entered into fld
74 DW 40 ;AC069;SEH ;AN000;**;length of input field
75 DW 0 ;AN000;??;offset of input field
76 DW 0 ;AN000;??;segment of input field
77 DW 0 ;AN000;offset of color attribute buffer
78 DW 0 ;AN000;segment of color attr buffer
79 DW 0 ;AN000;length of field's default value
80 DW 0 ;AN000;offset field's default value
81 DW 0 ;AN000;segment field's default value
82 DW 0 ;AN000;length of return string
83 DW 0 ;AN000;offset of return string
84 DW 0 ;AN000;segment of return string
85 DW WR_PATH_CHAR_LEN ;AN000;length of allow chars
86 DW WR_PATH_CHAR ;AN000;offset of allow chars
87 DW DATA ;AN000;segment of allow chars
88 DW 0 ;AN000;length of skip chars
89 DW 0 ;AN000;offset of skip chars
90 DW 0 ;AN000;segment of skip chars
91 DW 0 ;AN000;length of allow once chars
92 DW 0 ;AN000;offset of allow once chars
93 DW 0 ;AN000;segment of allow once chars
94 DW 2 ;AN000;precision of decimal point
95 DW 0 ;AN000;low numeric range (low intrgr)
96 DW 0 ;AN000;low numeric range (high intrgr)
97 DW 0 ;AN000;high numeric range (low intrgr)
98 DW 0 ;AN000;high numeric range (high intrgr)
99 DW 0 ;AN000;beginning row of minus and plus
100 DW 0 ;AN000;beginning col of minus & plus
101 DW 0 ;AN000;length of minus sign string
102 DW 0 ;AN000;offset of minus sign string
103 DW 0 ;AN000;segment of minus sign string
104 DW 0 ;AN000;length of plus sign string
105 DW 0 ;AN000;offset of plus sign string
106 DW 0 ;AN000;segment of plus sign string
107 ;
108WR_PATH_CHAR DB "'",',0-9,,a-z,,A-Z,,�-�, $!"#%&()-.@\`_{}~^,,,' ;AN000;
109WR_PATH_CHAR_LEN EQU ($-WR_PATH_CHAR) ;AN000;
110;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
111;
112; ICB 2 STR_EXT_PARMS
113;
114;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
115WR_ICB2 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
116 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
117 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
118 DW 0 ;AN000;option word four
119 DW 7 ;AN000;**;upper left corner field row
120 DW 44 ;AN000;**;upper left corner field column
121 DW 75 ;;AN000;35 ;**;number of chars before wrapping
122 DW 1 ;AN000;color index number assigned
123 DW 0 ;AN000;default change/minus status
124 DW 1 ;AN000;**;cursor character pos in field
125 DW 1 ;AN000;**;NEW ADD Hor scroll support
126 DW SND_FREQ ;AN000;frequency of error beep
127 DW 0 ;AN000;ASCII code of the key returned
128 DW 0 ;AN000;length of data entered into fld
129 DW 0 ;AN000;**;length of input field
130 DW 0 ;AN000;??;offset of input field
131 DW 0 ;AN000;??;segment of input field
132 DW 0 ;AN000;offset of color attribute buffer
133 DW 0 ;AN000;segment of color attr buffer
134 DW 0 ;AN000;length of field's default value
135 DW 0 ;AN000;offset field's default value
136 DW 0 ;AN000;segment field's default value
137 DW 0 ;AN000;length of return string
138 DW 0 ;AN000;offset of return string
139 DW 0 ;AN000;segment of return string
140 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
141 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
142 DW DATA ;AN000;segment of allow chars
143 DW 0 ;AN000;length of skip chars
144 DW 0 ;AN000;offset of skip chars
145 DW 0 ;AN000;segment of skip chars
146 DW 0 ;AN000;length of allow once chars
147 DW 0 ;AN000;offset of allow once chars
148 DW 0 ;AN000;segment of allow once chars
149 DW 2 ;AN000;precision of decimal point
150 DW 0 ;AN000;low numeric range (low intrgr)
151 DW 0 ;AN000;low numeric range (high intrgr)
152 DW 0 ;AN000;high numeric range (low intrgr)
153 DW 0 ;AN000;high numeric range (high intrgr)
154 DW 0 ;AN000;beginning row of minus and plus
155 DW 0 ;AN000;beginning col of minus & plus
156 DW 0 ;AN000;length of minus sign string
157 DW 0 ;AN000;offset of minus sign string
158 DW 0 ;AN000;segment of minus sign string
159 DW 0 ;AN000;length of plus sign string
160 DW 0 ;AN000;offset of plus sign string
161 DW 0 ;AN000;segment of plus sign string
162;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
163;
164; ICB 3 STR_DOS_PATH
165;
166;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
167WR_ICB3 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
168 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
169 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
170 DW 0 ;AN000;option word four
171 DW 8 ;AN000;**;upper left corner field row
172 DW 30 ;AN000;**;upper left corner field column
173 DW 40 ;AN000;**;number of chars before wrapping
174 DW 1 ;AN000;color index number assigned
175 DW 0 ;AN000;default change/minus status
176 DW 1 ;AN000;**;cursor character pos in field
177 DW 1 ;AN000;**;NEW ADD Hor scroll support
178 DW SND_FREQ ;AN000;frequency of error beep
179 DW 0 ;AN000;ASCII code of the key returned
180 DW 0 ;AN000;length of data entered into fld
181 DW 0 ;AN000;**;length of input field
182 DW 0 ;AN000;??;offset of input field
183 DW 0 ;AN000;??;segment of input field
184 DW 0 ;AN000;offset of color attribute buffer
185 DW 0 ;AN000;segment of color attr buffer
186 DW 0 ;AN000;length of field's default value
187 DW 0 ;AN000;offset field's default value
188 DW 0 ;AN000;segment field's default value
189 DW 0 ;AN000;length of return string
190 DW 0 ;AN000;offset of return string
191 DW 0 ;AN000;segment of return string
192 DW WR_APPEND_CHAR_LEN ;AN000;length of allow chars
193 DW WR_APPEND_CHAR ;AN000;offset of allow chars
194 DW DATA ;AN000;segment of allow chars
195 DW 0 ;AN000;length of skip chars
196 DW 0 ;AN000;offset of skip chars
197 DW 0 ;AN000;segment of skip chars
198 DW 0 ;AN000;length of allow once chars
199 DW 0 ;AN000;offset of allow once chars
200 DW 0 ;AN000;segment of allow once chars
201 DW 2 ;AN000;precision of decimal point
202 DW 0 ;AN000;low numeric range (low intrgr)
203 DW 0 ;AN000;low numeric range (high intrgr)
204 DW 0 ;AN000;high numeric range (low intrgr)
205 DW 0 ;AN000;high numeric range (high intrgr)
206 DW 0 ;AN000;beginning row of minus and plus
207 DW 0 ;AN000;beginning col of minus & plus
208 DW 0 ;AN000;length of minus sign string
209 DW 0 ;AN000;offset of minus sign string
210 DW 0 ;AN000;segment of minus sign string
211 DW 0 ;AN000;length of plus sign string
212 DW 0 ;AN000;offset of plus sign string
213 DW 0 ;AN000;segment of plus sign string
214 ;;;
215 ;
216WR_APPEND_CHAR DB "'",',0-9,,a-z,,A-Z,,�-�, ;$!"#%&()-.:@\`_{}~^,,,' ;AN000;
217WR_APPEND_CHAR_LEN EQU ($-WR_APPEND_CHAR) ;AN000;
218;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
219;
220; ICB 4 STR_DOS_APPEND
221;
222;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
223WR_ICB4 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
224 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
225 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
226 DW 0 ;AN000;option word four
227 DW 12 ;AN000;**;upper left corner field row
228 DW 30 ;AN000;**;upper left corner field column
229 DW 40 ;AN000;**;number of chars before wrapping
230 DW 1 ;AN000;color index number assigned
231 DW 0 ;AN000;default change/minus status
232 DW 1 ;AN000;**;cursor character pos in field
233 DW 1 ;AN000;**;NEW ADD Hor scroll support
234 DW SND_FREQ ;AN000;frequency of error beep
235 DW 0 ;AN000;ASCII code of the key returned
236 DW 0 ;AN000;length of data entered into fld
237 DW 0 ;AN000;**;length of input field
238 DW 0 ;AN000;??;offset of input field
239 DW 0 ;AN000;??;segment of input field
240 DW 0 ;AN000;offset of color attribute buffer
241 DW 0 ;AN000;segment of color attr buffer
242 DW 0 ;AN000;length of field's default value
243 DW 0 ;AN000;offset field's default value
244 DW 0 ;AN000;segment field's default value
245 DW 0 ;AN000;length of return string
246 DW 0 ;AN000;offset of return string
247 DW 0 ;AN000;segment of return string
248 DW WR_APPEND_CHAR_LEN ;AN000;length of allow chars
249 DW WR_APPEND_CHAR ;AN000;offset of allow chars
250 DW DATA ;AN000;segment of allow chars
251 DW 0 ;AN000;length of skip chars
252 DW 0 ;AN000;offset of skip chars
253 DW 0 ;AN000;segment of skip chars
254 DW 0 ;AN000;length of allow once chars
255 DW 0 ;AN000;offset of allow once chars
256 DW 0 ;AN000;segment of allow once chars
257 DW 2 ;AN000;precision of decimal point
258 DW 0 ;AN000;low numeric range (low intrgr)
259 DW 0 ;AN000;low numeric range (high intrgr)
260 DW 0 ;AN000;high numeric range (low intrgr)
261 DW 0 ;AN000;high numeric range (high intrgr)
262 DW 0 ;AN000;beginning row of minus and plus
263 DW 0 ;AN000;beginning col of minus & plus
264 DW 0 ;AN000;length of minus sign string
265 DW 0 ;AN000;offset of minus sign string
266 DW 0 ;AN000;segment of minus sign string
267 DW 0 ;AN000;length of plus sign string
268 DW 0 ;AN000;offset of plus sign string
269 DW 0 ;AN000;segment of plus sign string
270;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
271;
272; ICB 5 STR_DOS_PROMPT
273;
274;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
275WR_ICB5 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
276 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
277 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
278 DW 0 ;AN000;option word four
279 DW 15 ;AN000;**;upper left corner field row
280 DW 30 ;AN000;**;upper left corner field column
281 DW 30 ;AN000;**;number of chars before wrapping
282 DW 1 ;AN000;color index number assigned
283 DW 0 ;AN000;default change/minus status
284 DW 1 ;AN000;**;cursor character pos in field
285 DW 1 ;AN000;**;NEW ADD Hor scroll support
286 DW SND_FREQ ;AN000;frequency of error beep
287 DW 0 ;AN000;ASCII code of the key returned
288 DW 0 ;AN000;length of data entered into fld
289 DW 0 ;AN000;**;length of input field
290 DW 0 ;AN000;??;offset of input field
291 DW 0 ;AN000;??;segment of input field
292 DW 0 ;AN000;offset of color attribute buffer
293 DW 0 ;AN000;segment of color attr buffer
294 DW 0 ;AN000;length of field's default value
295 DW 0 ;AN000;offset field's default value
296 DW 0 ;AN000;segment field's default value
297 DW 0 ;AN000;length of return string
298 DW 0 ;AN000;offset of return string
299 DW 0 ;AN000;segment of return string
300 DW WR_PROMPT_CHAR_LEN ;AN000;length of allow chars
301 DW WR_PROMPT_CHAR ;AN000;offset of allow chars
302 DW DATA ;AN000;segment of allow chars
303 DW 0 ;AN000;length of skip chars
304 DW 0 ;AN000;offset of skip chars
305 DW 0 ;AN000;segment of skip chars
306 DW 0 ;AN000;length of allow once chars
307 DW 0 ;AN000;offset of allow once chars
308 DW 0 ;AN000;segment of allow once chars
309 DW 2 ;AN000;precision of decimal point
310 DW 0 ;AN000;low numeric range (low intrgr)
311 DW 0 ;AN000;low numeric range (high intrgr)
312 DW 0 ;AN000;high numeric range (low intrgr)
313 DW 0 ;AN000;high numeric range (high intrgr)
314 DW 0 ;AN000;beginning row of minus and plus
315 DW 0 ;AN000;beginning col of minus & plus
316 DW 0 ;AN000;length of minus sign string
317 DW 0 ;AN000;offset of minus sign string
318 DW 0 ;AN000;segment of minus sign string
319 DW 0 ;AN000;length of plus sign string
320 DW 0 ;AN000;offset of plus sign string
321 DW 0 ;AN000;segment of plus sign string
322 ;;;;;;;;;;;;;
323 ;
324WR_PROMPT_CHAR DB "'",',0-9,,a-z,,A-Z,,�-�,\/ $!"#%()*+-.;@`[]_{}~,,,' ;AN000;
325WR_PROMPT_CHAR_LEN EQU ($-WR_PROMPT_CHAR) ;AN000;
326;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
327;
328; ICB 6 STR_SHELL
329;
330;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
331WR_ICB6 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
332 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
333 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
334 DW 0 ;AN000;option word four
335 DW 8 ;AN000;**;upper left corner field row
336 DW 38 ;AN000;**;upper left corner field column
337 DW 15 ;AN000;**;number of chars before wrapping
338 DW 1 ;AN000;color index number assigned
339 DW 0 ;AN000;default change/minus status
340 DW 1 ;AN000;**;cursor character pos in field
341 DW 1 ;AN000;**;NEW ADD Hor scroll support
342 DW SND_FREQ ;AN000;frequency of error beep
343 DW 0 ;AN000;ASCII code of the key returned
344 DW 0 ;AN000;length of data entered into fld
345 DW 0 ;AN000;**;length of input field
346 DW 0 ;AN000;??;offset of input field
347 DW 0 ;AN000;??;segment of input field
348 DW 0 ;AN000;offset of color attribute buffer
349 DW 0 ;AN000;segment of color attr buffer
350 DW 0 ;AN000;length of field's default value
351 DW 0 ;AN000;offset field's default value
352 DW 0 ;AN000;segment field's default value
353 DW 0 ;AN000;length of return string
354 DW 0 ;AN000;offset of return string
355 DW 0 ;AN000;segment of return string
356 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
357 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
358 DW DATA ;AN000;segment of allow chars
359 DW 0 ;AN000;length of skip chars
360 DW 0 ;AN000;offset of skip chars
361 DW 0 ;AN000;segment of skip chars
362 DW 0 ;AN000;length of allow once chars
363 DW 0 ;AN000;offset of allow once chars
364 DW 0 ;AN000;segment of allow once chars
365 DW 2 ;AN000;precision of decimal point
366 DW 0 ;AN000;low numeric range (low intrgr)
367 DW 0 ;AN000;low numeric range (high intrgr)
368 DW 0 ;AN000;high numeric range (low intrgr)
369 DW 0 ;AN000;high numeric range (high intrgr)
370 DW 0 ;AN000;beginning row of minus and plus
371 DW 0 ;AN000;beginning col of minus & plus
372 DW 0 ;AN000;length of minus sign string
373 DW 0 ;AN000;offset of minus sign string
374 DW 0 ;AN000;segment of minus sign string
375 DW 0 ;AN000;length of plus sign string
376 DW 0 ;AN000;offset of plus sign string
377 DW 0 ;AN000;segment of plus sign string
378;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
379;
380; ICB 7 STR_KSAM
381;
382; This field will not be used with the shipped version
383; of SELECT.
384;
385;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
386WR_ICB7 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
387 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
388 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
389 DW 0 ;AN000;option word four
390 DW 7 ;AN000;**;upper left corner field row
391 DW 36 ;AN000;**;upper left corner field column
392 DW 40 ;AN000;**;number of chars before wrapping
393 DW 1 ;AN000;color index number assigned
394 DW 0 ;AN000;default change/minus status
395 DW 1 ;AN000;**;cursor character pos in field
396 DW 1 ;AN000;**;NEW ADD Hor scroll support
397 DW SND_FREQ ;AN000;frequency of error beep
398 DW 0 ;AN000;ASCII code of the key returned
399 DW 0 ;AN000;length of data entered into fld
400 DW 0 ;AN000;**;length of input field
401 DW 0 ;AN000;??;offset of input field
402 DW 0 ;AN000;??;segment of input field
403 DW 0 ;AN000;offset of color attribute buffer
404 DW 0 ;AN000;segment of color attr buffer
405 DW 0 ;AN000;length of field's default value
406 DW 0 ;AN000;offset field's default value
407 DW 0 ;AN000;segment field's default value
408 DW 0 ;AN000;length of return string
409 DW 0 ;AN000;offset of return string
410 DW 0 ;AN000;segment of return string
411 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
412 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
413 DW DATA ;AN000;segment of allow chars
414 DW 0 ;AN000;length of skip chars
415 DW 0 ;AN000;offset of skip chars
416 DW 0 ;AN000;segment of skip chars
417 DW 0 ;AN000;length of allow once chars
418 DW 0 ;AN000;offset of allow once chars
419 DW 0 ;AN000;segment of allow once chars
420 DW 2 ;AN000;precision of decimal point
421 DW 0 ;AN000;low numeric range (low intrgr)
422 DW 0 ;AN000;low numeric range (high intrgr)
423 DW 0 ;AN000;high numeric range (low intrgr)
424 DW 0 ;AN000;high numeric range (high intrgr)
425 DW 0 ;AN000;beginning row of minus and plus
426 DW 0 ;AN000;beginning col of minus & plus
427 DW 0 ;AN000;length of minus sign string
428 DW 0 ;AN000;offset of minus sign string
429 DW 0 ;AN000;segment of minus sign string
430 DW 0 ;AN000;length of plus sign string
431 DW 0 ;AN000;offset of plus sign string
432 DW 0 ;AN000;segment of plus sign string
433;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
434;
435; ICB 8 STR_FASTOPEN
436;
437;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
438WR_ICB8 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
439 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
440 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
441 DW 0 ;AN000;option word four
442 DW 8 ;AN000;**;upper left corner field row
443 DW 40 ;AN000;**;upper left corner field column
444 DW 40 ;AN000;**;number of chars before wrapping
445 DW 1 ;AN000;color index number assigned
446 DW 0 ;AN000;default change/minus status
447 DW 1 ;AN000;**;cursor character pos in field
448 DW 1 ;AN000;**;NEW ADD Hor scroll support
449 DW SND_FREQ ;AN000;frequency of error beep
450 DW 0 ;AN000;ASCII code of the key returned
451 DW 0 ;AN000;length of data entered into fld
452 DW 0 ;AN000;**;length of input field
453 DW 0 ;AN000;??;offset of input field
454 DW 0 ;AN000;??;segment of input field
455 DW 0 ;AN000;offset of color attribute buffer
456 DW 0 ;AN000;segment of color attr buffer
457 DW 0 ;AN000;length of field's default value
458 DW 0 ;AN000;offset field's default value
459 DW 0 ;AN000;segment field's default value
460 DW 0 ;AN000;length of return string
461 DW 0 ;AN000;offset of return string
462 DW 0 ;AN000;segment of return string
463 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
464 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
465 DW DATA ;AN000;segment of allow chars
466 DW 0 ;AN000;length of skip chars
467 DW 0 ;AN000;offset of skip chars
468 DW 0 ;AN000;segment of skip chars
469 DW 0 ;AN000;length of allow once chars
470 DW 0 ;AN000;offset of allow once chars
471 DW 0 ;AN000;segment of allow once chars
472 DW 2 ;AN000;precision of decimal point
473 DW 0 ;AN000;low numeric range (low intrgr)
474 DW 0 ;AN000;low numeric range (high intrgr)
475 DW 0 ;AN000;high numeric range (low intrgr)
476 DW 0 ;AN000;high numeric range (high intrgr)
477 DW 0 ;AN000;beginning row of minus and plus
478 DW 0 ;AN000;beginning col of minus & plus
479 DW 0 ;AN000;length of minus sign string
480 DW 0 ;AN000;offset of minus sign string
481 DW 0 ;AN000;segment of minus sign string
482 DW 0 ;AN000;length of plus sign string
483 DW 0 ;AN000;offset of plus sign string
484 DW 0 ;AN000;segment of plus sign string
485;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
486;
487; ICB 9 STR_SHARE
488;
489;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
490WR_ICB9 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
491 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
492 DW ICB_HOR ;AC069;SEH ;AN000;option word three
493 DW 0 ;AN000;option word four
494 DW 8 ;AN000;**;upper left corner field row
495 DW 36 ;AN000;**;upper left corner field column
496 DW 40 ;AN000;**;number of chars before wrapping
497 DW 1 ;AN000;color index number assigned
498 DW 0 ;AN000;default change/minus status
499 DW 1 ;AN000;**;cursor character pos in field
500 DW 1 ;AN000;**;NEW ADD Hor scroll support
501 DW SND_FREQ ;AN000;frequency of error beep
502 DW 0 ;AN000;ASCII code of the key returned
503 DW 0 ;AN000;length of data entered into fld
504 DW 40 ;AC069;SEH ;AN000;**;length of input field
505 DW 0 ;AN000;??;offset of input field
506 DW 0 ;AN000;??;segment of input field
507 DW 0 ;AN000;offset of color attribute buffer
508 DW 0 ;AN000;segment of color attr buffer
509 DW 0 ;AN000;length of field's default value
510 DW 0 ;AN000;offset field's default value
511 DW 0 ;AN000;segment field's default value
512 DW 0 ;AN000;length of return string
513 DW 0 ;AN000;offset of return string
514 DW 0 ;AN000;segment of return string
515 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
516 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
517 DW DATA ;AN000;segment of allow chars
518 DW 0 ;AN000;length of skip chars
519 DW 0 ;AN000;offset of skip chars
520 DW 0 ;AN000;segment of skip chars
521 DW 0 ;AN000;length of allow once chars
522 DW 0 ;AN000;offset of allow once chars
523 DW 0 ;AN000;segment of allow once chars
524 DW 2 ;AN000;precision of decimal point
525 DW 0 ;AN000;low numeric range (low intrgr)
526 DW 0 ;AN000;low numeric range (high intrgr)
527 DW 0 ;AN000;high numeric range (low intrgr)
528 DW 0 ;AN000;high numeric range (high intrgr)
529 DW 0 ;AN000;beginning row of minus and plus
530 DW 0 ;AN000;beginning col of minus & plus
531 DW 0 ;AN000;length of minus sign string
532 DW 0 ;AN000;offset of minus sign string
533 DW 0 ;AN000;segment of minus sign string
534 DW 0 ;AN000;length of plus sign string
535 DW 0 ;AN000;offset of plus sign string
536 DW 0 ;AN000;segment of plus sign string
537;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
538;
539; ICB 10 STR_GRAPHICS
540;
541;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
542WR_ICB10 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
543 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
544 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
545 DW 0 ;AN000;option word four
546 DW 8 ;AN000;**;upper left corner field row
547 DW 34 ;AN000;**;upper left corner field column
548 DW 40 ;AN000;**;number of chars before wrapping
549 DW 1 ;AN000;color index number assigned
550 DW 0 ;AN000;default change/minus status
551 DW 1 ;AN000;**;cursor character pos in field
552 DW 1 ;AN000;**;NEW ADD Hor scroll support
553 DW SND_FREQ ;AN000;frequency of error beep
554 DW 0 ;AN000;ASCII code of the key returned
555 DW 0 ;AN000;length of data entered into fld
556 DW 0 ;AN000;**;length of input field
557 DW 0 ;AN000;??;offset of input field
558 DW 0 ;AN000;??;segment of input field
559 DW 0 ;AN000;offset of color attribute buffer
560 DW 0 ;AN000;segment of color attr buffer
561 DW 0 ;AN000;length of field's default value
562 DW 0 ;AN000;offset field's default value
563 DW 0 ;AN000;segment field's default value
564 DW 0 ;AN000;length of return string
565 DW 0 ;AN000;offset of return string
566 DW 0 ;AN000;segment of return string
567 DW WR_GRAPHIC_CHAR_LEN ;AN000;length of allow chars
568 DW WR_GRAPHIC_CHAR ;AN000;offset of allow chars
569 DW DATA ;AN000;segment of allow chars
570 DW 0 ;AN000;length of skip chars
571 DW 0 ;AN000;offset of skip chars
572 DW 0 ;AN000;segment of skip chars
573 DW 0 ;AN000;length of allow once chars
574 DW 0 ;AN000;offset of allow once chars
575 DW 0 ;AN000;segment of allow once chars
576 DW 2 ;AN000;precision of decimal point
577 DW 0 ;AN000;low numeric range (low intrgr)
578 DW 0 ;AN000;low numeric range (high intrgr)
579 DW 0 ;AN000;high numeric range (low intrgr)
580 DW 0 ;AN000;high numeric range (high intrgr)
581 DW 0 ;AN000;beginning row of minus and plus
582 DW 0 ;AN000;beginning col of minus & plus
583 DW 0 ;AN000;length of minus sign string
584 DW 0 ;AN000;offset of minus sign string
585 DW 0 ;AN000;segment of minus sign string
586 DW 0 ;AN000;length of plus sign string
587 DW 0 ;AN000;offset of plus sign string
588 DW 0 ;AN000;segment of plus sign string
589WR_GRAPHIC_CHAR DB "'",',0-9,,a-z,,A-Z,\ !"#%()*+-.;@`[]_{}~/,,,' ;AN000;
590WR_GRAPHIC_CHAR_LEN EQU ($-WR_GRAPHIC_CHAR) ;AN000;
591;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
592;
593; ICB 11 STR_XMAEM
594;
595;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
596WR_ICB11 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
597 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
598 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
599 DW 0 ;AN000;option word four
600 DW 8 ;AN000;**;upper left corner field row
601 DW 36 ;AN000;**;upper left corner field column
602 DW 40 ;AN000;**;number of chars before wrapping
603 DW 1 ;AN000;color index number assigned
604 DW 0 ;AN000;default change/minus status
605 DW 1 ;AN000;**;cursor character pos in field
606 DW 1 ;AN000;**;NEW ADD Hor scroll support
607 DW SND_FREQ ;AN000;frequency of error beep
608 DW 0 ;AN000;ASCII code of the key returned
609 DW 0 ;AN000;length of data entered into fld
610 DW 0 ;AN000;**;length of input field
611 DW 0 ;AN000;??;offset of input field
612 DW 0 ;AN000;??;segment of input field
613 DW 0 ;AN000;offset of color attribute buffer
614 DW 0 ;AN000;segment of color attr buffer
615 DW 0 ;AN000;length of field's default value
616 DW 0 ;AN000;offset field's default value
617 DW 0 ;AN000;segment field's default value
618 DW 0 ;AN000;length of return string
619 DW 0 ;AN000;offset of return string
620 DW 0 ;AN000;segment of return string
621 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
622 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
623 DW DATA ;AN000;segment of allow chars
624 DW 0 ;AN000;length of skip chars
625 DW 0 ;AN000;offset of skip chars
626 DW 0 ;AN000;segment of skip chars
627 DW 0 ;AN000;length of allow once chars
628 DW 0 ;AN000;offset of allow once chars
629 DW 0 ;AN000;segment of allow once chars
630 DW 2 ;AN000;precision of decimal point
631 DW 0 ;AN000;low numeric range (low intrgr)
632 DW 0 ;AN000;low numeric range (high intrgr)
633 DW 0 ;AN000;high numeric range (low intrgr)
634 DW 0 ;AN000;high numeric range (high intrgr)
635 DW 0 ;AN000;beginning row of minus and plus
636 DW 0 ;AN000;beginning col of minus & plus
637 DW 0 ;AN000;length of minus sign string
638 DW 0 ;AN000;offset of minus sign string
639 DW 0 ;AN000;segment of minus sign string
640 DW 0 ;AN000;length of plus sign string
641 DW 0 ;AN000;offset of plus sign string
642 DW 0 ;AN000;segment of plus sign string
643;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
644;
645; ICB 12 STR_XMA2EMS
646;
647;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
648WR_ICB12 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
649 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
650 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
651 DW 0 ;AN000;option word four
652 DW 11 ;AN000;**;upper left corner field row
653 DW 36 ;AN000;**;upper left corner field column
654 DW 40 ;AN000;**;number of chars before wrapping
655 DW 1 ;AN000;color index number assigned
656 DW 0 ;AN000;default change/minus status
657 DW 1 ;AN000;**;cursor character pos in field
658 DW 1 ;AN000;**;NEW ADD Hor scroll support
659 DW SND_FREQ ;AN000;frequency of error beep
660 DW 0 ;AN000;ASCII code of the key returned
661 DW 0 ;AN000;length of data entered into fld
662 DW 0 ;AN000;**;length of input field
663 DW 0 ;AN000;??;offset of input field
664 DW 0 ;AN000;??;segment of input field
665 DW 0 ;AN000;offset of color attribute buffer
666 DW 0 ;AN000;segment of color attr buffer
667 DW 0 ;AN000;length of field's default value
668 DW 0 ;AN000;offset field's default value
669 DW 0 ;AN000;segment field's default value
670 DW 0 ;AN000;length of return string
671 DW 0 ;AN000;offset of return string
672 DW 0 ;AN000;segment of return string
673 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
674 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
675 DW DATA ;AN000;segment of allow chars
676 DW 0 ;AN000;length of skip chars
677 DW 0 ;AN000;offset of skip chars
678 DW 0 ;AN000;segment of skip chars
679 DW 0 ;AN000;length of allow once chars
680 DW 0 ;AN000;offset of allow once chars
681 DW 0 ;AN000;segment of allow once chars
682 DW 2 ;AN000;precision of decimal point
683 DW 0 ;AN000;low numeric range (low intrgr)
684 DW 0 ;AN000;low numeric range (high intrgr)
685 DW 0 ;AN000;high numeric range (low intrgr)
686 DW 0 ;AN000;high numeric range (high intrgr)
687 DW 0 ;AN000;beginning row of minus and plus
688 DW 0 ;AN000;beginning col of minus & plus
689 DW 0 ;AN000;length of minus sign string
690 DW 0 ;AN000;offset of minus sign string
691 DW 0 ;AN000;segment of minus sign string
692 DW 0 ;AN000;length of plus sign string
693 DW 0 ;AN000;offset of plus sign string
694 DW 0 ;AN000;segment of plus sign string
695;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
696;
697; ICB 13 STR_VDISK
698;
699;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
700WR_ICB13 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
701 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
702 DW ICB_HOR ;AC069;SEH ;AN000;option word three
703 DW 0 ;AN000;option word four
704 DW 8 ;AN000;**;upper left corner field row
705 DW 36 ;AN000;**;upper left corner field column
706 DW 40 ;AN000;**;number of chars before wrapping
707 DW 1 ;AN000;color index number assigned
708 DW 0 ;AN000;default change/minus status
709 DW 1 ;AN000;**;cursor character pos in field
710 DW 1 ;AN000;**;NEW ADD Hor scroll support
711 DW SND_FREQ ;AN000;frequency of error beep
712 DW 0 ;AN000;ASCII code of the key returned
713 DW 0 ;AN000;length of data entered into fld
714 DW 40 ;AC069;SEH ;AN000;**;length of input field
715 DW 0 ;AN000;??;offset of input field
716 DW 0 ;AN000;??;segment of input field
717 DW 0 ;AN000;offset of color attribute buffer
718 DW 0 ;AN000;segment of color attr buffer
719 DW 0 ;AN000;length of field's default value
720 DW 0 ;AN000;offset field's default value
721 DW 0 ;AN000;segment field's default value
722 DW 0 ;AN000;length of return string
723 DW 0 ;AN000;offset of return string
724 DW 0 ;AN000;segment of return string
725 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
726 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
727 DW DATA ;AN000;segment of allow chars
728 DW 0 ;AN000;length of skip chars
729 DW 0 ;AN000;offset of skip chars
730 DW 0 ;AN000;segment of skip chars
731 DW 0 ;AN000;length of allow once chars
732 DW 0 ;AN000;offset of allow once chars
733 DW 0 ;AN000;segment of allow once chars
734 DW 2 ;AN000;precision of decimal point
735 DW 0 ;AN000;low numeric range (low intrgr)
736 DW 0 ;AN000;low numeric range (high intrgr)
737 DW 0 ;AN000;high numeric range (low intrgr)
738 DW 0 ;AN000;high numeric range (high intrgr)
739 DW 0 ;AN000;beginning row of minus and plus
740 DW 0 ;AN000;beginning col of minus & plus
741 DW 0 ;AN000;length of minus sign string
742 DW 0 ;AN000;offset of minus sign string
743 DW 0 ;AN000;segment of minus sign string
744 DW 0 ;AN000;length of plus sign string
745 DW 0 ;AN000;offset of plus sign string
746 DW 0 ;AN000;segment of plus sign string
747;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
748;
749; ICB 14 STR_BREAK
750;
751;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
752WR_ICB14 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;;+ICB_CLR ;option word one
753 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
754 DW ICB_HOR ;AC069;SEH ;AN000;option word three
755 DW 0 ;AN000;option word four
756 DW 8 ;AN000;**;upper left corner field row
757 DW 26 ;AN000;**;upper left corner field column
758 DW 3 ;AN000;**;number of chars before wrapping
759 DW 1 ;AN000;color index number assigned
760 DW 0 ;AN000;default change/minus status
761 DW 1 ;AN000;**;cursor character pos in field
762 DW 1 ;AN000;**;NEW ADD Hor scroll support
763 DW SND_FREQ ;AN000;frequency of error beep
764 DW 0 ;AN000;ASCII code of the key returned
765 DW 0 ;AN000;length of data entered into fld
766 DW 3 ;AC069;SEH ;AN000;**;length of input field
767 DW 0 ;AN000;??;offset of input field
768 DW 0 ;AN000;??;segment of input field
769 DW 0 ;AN000;offset of color attribute buffer
770 DW 0 ;AN000;segment of color attr buffer
771 DW 0 ;AN000;length of field's default value
772 DW 0 ;AN000;offset field's default value
773 DW 0 ;AN000;segment field's default value
774 DW 0 ;AN000;length of return string
775 DW 0 ;AN000;offset of return string
776 DW 0 ;AN000;segment of return string
777 DW WR_ON_OFF_CHAR_LEN ;AN000;length of allow chars
778 DW WR_ON_OFF_CHAR ;AN000;offset of allow chars
779 DW DATA ;AN000;segment of allow chars
780 DW 0 ;AN000;length of skip chars
781 DW 0 ;AN000;offset of skip chars
782 DW 0 ;AN000;segment of skip chars
783 DW 0 ;AN000;length of allow once chars
784 DW 0 ;AN000;offset of allow once chars
785 DW 0 ;AN000;segment of allow once chars
786 DW 2 ;AN000;precision of decimal point
787 DW 0 ;AN000;low numeric range (low intrgr)
788 DW 0 ;AN000;low numeric range (high intrgr)
789 DW 0 ;AN000;high numeric range (low intrgr)
790 DW 0 ;AN000;high numeric range (high intrgr)
791 DW 0 ;AN000;beginning row of minus and plus
792 DW 0 ;AN000;beginning col of minus & plus
793 DW 0 ;AN000;length of minus sign string
794 DW 0 ;AN000;offset of minus sign string
795 DW 0 ;AN000;segment of minus sign string
796 DW 0 ;AN000;length of plus sign string
797 DW 0 ;AN000;offset of plus sign string
798 DW 0 ;AN000;segment of plus sign string
799WR_ON_OFF_CHAR DB ' OFNofn' ;AN000;
800WR_ON_OFF_CHAR_LEN EQU ($-WR_ON_OFF_CHAR) ;AN000;
801;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
802;
803; ICB 15 STR_BUFFERS
804;
805;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
806WR_ICB15 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
807 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
808 DW ICB_HOR ;AC069;SEH ;AN000;option word three
809 DW 0 ;AN000;option word four
810 DW 9 ;AN000;**;upper left corner field row
811 DW 26 ;AN000;**;upper left corner field column
812 DW 7 ;AN000;**;number of chars before wrapping
813 DW 1 ;AN000;color index number assigned
814 DW 0 ;AN000;default change/minus status
815 DW 1 ;AN000;**;cursor character pos in field
816 DW 1 ;AN000;**;NEW ADD Hor scroll support
817 DW SND_FREQ ;AN000;frequency of error beep
818 DW 0 ;AN000;ASCII code of the key returned
819 DW 0 ;AN000;length of data entered into fld
820 DW 7 ;AC069;SEH ;AN000;**;length of input field
821 DW 0 ;AN000;??;offset of input field
822 DW 0 ;AN000;??;segment of input field
823 DW 0 ;AN000;offset of color attribute buffer
824 DW 0 ;AN000;segment of color attr buffer
825 DW 0 ;AN000;length of field's default value
826 DW 0 ;AN000;offset field's default value
827 DW 0 ;AN000;segment field's default value
828 DW 0 ;AN000;length of return string
829 DW 0 ;AN000;offset of return string
830 DW 0 ;AN000;segment of return string
831 DW WR_BUFFERS_LEN ;AN000;length of allow chars
832 DW WR_BUFFERS ;AN000;offset of allow chars
833 DW DATA ;AN000;segment of allow chars
834 DW 0 ;AN000;length of skip chars
835 DW 0 ;AN000;offset of skip chars
836 DW 0 ;AN000;segment of skip chars
837 DW 0 ;AN000;length of allow once chars
838 DW 0 ;AN000;offset of allow once chars
839 DW 0 ;AN000;segment of allow once chars
840 DW 2 ;AN000;precision of decimal point
841 DW 0 ;AN000;low numeric range (low intrgr)
842 DW 0 ;AN000;low numeric range (high intrgr)
843 DW 0 ;AN000;high numeric range (low intrgr)
844 DW 0 ;AN000;high numeric range (high intrgr)
845 DW 0 ;AN000;beginning row of minus and plus
846 DW 0 ;AN000;beginning col of minus & plus
847 DW 0 ;AN000;length of minus sign string
848 DW 0 ;AN000;offset of minus sign string
849 DW 0 ;AN000;segment of minus sign string
850 DW 0 ;AN000;length of plus sign string
851 DW 0 ;AN000;offset of plus sign string
852 DW 0 ;AN000;segment of plus sign string
853 ;
854WR_BUFFERS DB ' ,0-9,,,,' ;AN000;
855WR_BUFFERS_LEN EQU $-WR_BUFFERS ;AN000;
856;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
857;
858; ICB 16 STR_DOS_APPEND_P formerly STR_CPSW ;AC000;JW
859;
860;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
861WR_ICB16 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
862 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
863 DW ICB_HOR+ICB_WHM+ICB_WEN+ICB_WDL+ICB_WAR+ICB_WBS ;AN000;option word three
864 DW 0 ;AN000;option word four
865 DW 11 ;AN000;**;upper left corner field row
866 DW 30 ;AN000;**;upper left corner field column
867 DW 40 ;AN000;**;number of chars before wrapping
868 DW 1 ;AN000;color index number assigned
869 DW 0 ;AN000;default change/minus status
870 DW 1 ;AN000;**;cursor character pos in field
871 DW 1 ;AN000;**;NEW ADD Hor scroll support
872 DW SND_FREQ ;AN000;frequency of error beep
873 DW 0 ;AN000;ASCII code of the key returned
874 DW 0 ;AN000;length of data entered into fld
875 DW 0 ;AN000;**;length of input field
876 DW 0 ;AN000;??;offset of input field
877 DW 0 ;AN000;??;segment of input field
878 DW 0 ;AN000;offset of color attribute buffer
879 DW 0 ;AN000;segment of color attr buffer
880 DW 0 ;AN000;length of field's default value
881 DW 0 ;AN000;offset field's default value
882 DW 0 ;AN000;segment field's default value
883 DW 0 ;AN000;length of return string
884 DW 0 ;AN000;offset of return string
885 DW 0 ;AN000;segment of return string
886 DW WR_ALLOW_CHAR_LEN ;AN000;length of allow chars
887 DW WR_ALLOW_CHAR ;AN000;offset of allow chars
888 DW DATA ;AN000;segment of allow chars
889 DW 0 ;AN000;length of skip chars
890 DW 0 ;AN000;offset of skip chars
891 DW 0 ;AN000;segment of skip chars
892 DW 0 ;AN000;length of allow once chars
893 DW 0 ;AN000;offset of allow once chars
894 DW 0 ;AN000;segment of allow once chars
895 DW 2 ;AN000;precision of decimal point
896 DW 0 ;AN000;low numeric range (low intrgr)
897 DW 0 ;AN000;low numeric range (high intrgr)
898 DW 0 ;AN000;high numeric range (low intrgr)
899 DW 0 ;AN000;high numeric range (high intrgr)
900 DW 0 ;AN000;beginning row of minus and plus
901 DW 0 ;AN000;beginning col of minus & plus
902 DW 0 ;AN000;length of minus sign string
903 DW 0 ;AN000;offset of minus sign string
904 DW 0 ;AN000;segment of minus sign string
905 DW 0 ;AN000;length of plus sign string
906 DW 0 ;AN000;offset of plus sign string
907 DW 0 ;AN000;segment of plus sign string
908;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
909;
910; ICB 17 STR_FCBS
911;
912;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
913WR_ICB17 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
914 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
915 DW ICB_HOR ;AC069;SEH ;AN000;option word three
916 DW 0 ;AN000;option word four
917 DW 10 ;AC000;JW ;**;upper left corner field row
918 DW 26 ;AN000;**;upper left corner field column
919 DW 7 ;AN000;**;number of chars before wrapping
920 DW 1 ;AN000;color index number assigned
921 DW 0 ;AN000;default change/minus status
922 DW 1 ;AN000;**;cursor character pos in field
923 DW 1 ;AN000;**;NEW ADD Hor scroll support
924 DW SND_FREQ ;AN000;frequency of error beep
925 DW 0 ;AN000;ASCII code of the key returned
926 DW 0 ;AN000;length of data entered into fld
927 DW 7 ;AC069;SEH ;AN000;**;length of input field
928 DW 0 ;AN000;??;offset of input field
929 DW 0 ;AN000;??;segment of input field
930 DW 0 ;AN000;offset of color attribute buffer
931 DW 0 ;AN000;segment of color attr buffer
932 DW 0 ;AN000;length of field's default value
933 DW 0 ;AN000;offset field's default value
934 DW 0 ;AN000;segment field's default value
935 DW 0 ;AN000;length of return string
936 DW 0 ;AN000;offset of return string
937 DW 0 ;AN000;segment of return string
938 DW WR_FCBS_LEN ;AN000;length of allow chars
939 DW WR_FCBS ;AN000;offset of allow chars
940 DW DATA ;AN000;segment of allow chars
941 DW 0 ;AN000;length of skip chars
942 DW 0 ;AN000;offset of skip chars
943 DW 0 ;AN000;segment of skip chars
944 DW 0 ;AN000;length of allow once chars
945 DW 0 ;AN000;offset of allow once chars
946 DW 0 ;AN000;segment of allow once chars
947 DW 2 ;AN000;precision of decimal point
948 DW 0 ;AN000;low numeric range (low intrgr)
949 DW 0 ;AN000;low numeric range (high intrgr)
950 DW 0 ;AN000;high numeric range (low intrgr)
951 DW 0 ;AN000;high numeric range (high intrgr)
952 DW 0 ;AN000;beginning row of minus and plus
953 DW 0 ;AN000;beginning col of minus & plus
954 DW 0 ;AN000;length of minus sign string
955 DW 0 ;AN000;offset of minus sign string
956 DW 0 ;AN000;segment of minus sign string
957 DW 0 ;AN000;length of plus sign string
958 DW 0 ;AN000;offset of plus sign string
959 DW 0 ;AN000;segment of plus sign string
960 ;
961WR_FCBS DB ' ,0-9,,,,' ;AN000;
962WR_FCBS_LEN EQU ($-WR_FCBS) ;AN000;
963;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
964;
965; ICB 18 STR_FILES
966;
967;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
968WR_ICB18 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
969 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
970 DW ICB_HOR ;AC069;SEH ;AN000;option word three
971 DW 0 ;AN000;option word four
972 DW 11 ;AC000;JW ;**;upper left corner field row
973 DW 26 ;AN000;**;upper left corner field column
974 DW 3 ;AN000;**;number of chars before wrapping
975 DW 1 ;AN000;color index number assigned
976 DW 0 ;AN000;default change/minus status
977 DW 1 ;AN000;**;cursor character pos in field
978 DW 1 ;AN000;**;NEW ADD Hor scroll support
979 DW SND_FREQ ;AN000;frequency of error beep
980 DW 0 ;AN000;ASCII code of the key returned
981 DW 0 ;AN000;length of data entered into fld
982 DW 3 ;AC069;SEH ;AN000;**;length of input field
983 DW 0 ;AN000;??;offset of input field
984 DW 0 ;AN000;??;segment of input field
985 DW 0 ;AN000;offset of color attribute buffer
986 DW 0 ;AN000;segment of color attr buffer
987 DW 0 ;AN000;length of field's default value
988 DW 0 ;AN000;offset field's default value
989 DW 0 ;AN000;segment field's default value
990 DW 0 ;AN000;length of return string
991 DW 0 ;AN000;offset of return string
992 DW 0 ;AN000;segment of return string
993 DW WR_BUFFERS_LEN ;AN000;length of allow chars
994 DW WR_BUFFERS ;AN000;offset of allow chars
995 DW DATA ;AN000;segment of allow chars
996 DW 0 ;AN000;length of skip chars
997 DW 0 ;AN000;offset of skip chars
998 DW 0 ;AN000;segment of skip chars
999 DW 0 ;AN000;length of allow once chars
1000 DW 0 ;AN000;offset of allow once chars
1001 DW 0 ;AN000;segment of allow once chars
1002 DW 2 ;AN000;precision of decimal point
1003 DW 0 ;AN000;low numeric range (low intrgr)
1004 DW 0 ;AN000;low numeric range (high intrgr)
1005 DW 0 ;AN000;high numeric range (low intrgr)
1006 DW 0 ;AN000;high numeric range (high intrgr)
1007 DW 0 ;AN000;beginning row of minus and plus
1008 DW 0 ;AN000;beginning col of minus & plus
1009 DW 0 ;AN000;length of minus sign string
1010 DW 0 ;AN000;offset of minus sign string
1011 DW 0 ;AN000;segment of minus sign string
1012 DW 0 ;AN000;length of plus sign string
1013 DW 0 ;AN000;offset of plus sign string
1014 DW 0 ;AN000;segment of plus sign string
1015;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1016;
1017; ICB 19 STR_LASTDRIVE
1018;
1019;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1020WR_ICB19 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
1021 DW ICB_DEL+ICB_UPC+ICB_CSW ;AN000;option word two
1022 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1023 DW 0 ;AN000;option word four
1024 DW 12 ;AC000;JW ;**;upper left corner field row
1025 DW 26 ;AN000;**;upper left corner field column
1026 DW 1 ;AN000;**;number of chars before wrapping
1027 DW 1 ;AN000;color index number assigned
1028 DW 0 ;AN000;default change/minus status
1029 DW 1 ;AN000;**;cursor character pos in field
1030 DW 1 ;AN000;**;NEW ADD Hor scroll support
1031 DW SND_FREQ ;AN000;frequency of error beep
1032 DW 0 ;AN000;ASCII code of the key returned
1033 DW 0 ;AN000;length of data entered into fld
1034 DW 1 ;AC069;SEH ;AN000;**;length of input field
1035 DW 0 ;AN000;??;offset of input field
1036 DW 0 ;AN000;??;segment of input field
1037 DW 0 ;AN000;offset of color attribute buffer
1038 DW 0 ;AN000;segment of color attr buffer
1039 DW 0 ;AN000;length of field's default value
1040 DW 0 ;AN000;offset field's default value
1041 DW 0 ;AN000;segment field's default value
1042 DW 0 ;AN000;length of return string
1043 DW 0 ;AN000;offset of return string
1044 DW 0 ;AN000;segment of return string
1045 DW WR_ASCII_CHAR_LEN ;AN000;length of allow chars
1046 DW WR_ASCII_CHAR ;AN000;offset of allow chars
1047 DW DATA ;AN000;segment of allow chars
1048 DW 0 ;AN000;length of skip chars
1049 DW 0 ;AN000;offset of skip chars
1050 DW 0 ;AN000;segment of skip chars
1051 DW 0 ;AN000;length of allow once chars
1052 DW 0 ;AN000;offset of allow once chars
1053 DW 0 ;AN000;segment of allow once chars
1054 DW 2 ;AN000;precision of decimal point
1055 DW 0 ;AN000;low numeric range (low intrgr)
1056 DW 0 ;AN000;low numeric range (high intrgr)
1057 DW 0 ;AN000;high numeric range (low intrgr)
1058 DW 0 ;AN000;high numeric range (high intrgr)
1059 DW 0 ;AN000;beginning row of minus and plus
1060 DW 0 ;AN000;beginning col of minus & plus
1061 DW 0 ;AN000;length of minus sign string
1062 DW 0 ;AN000;offset of minus sign string
1063 DW 0 ;AN000;segment of minus sign string
1064 DW 0 ;AN000;length of plus sign string
1065 DW 0 ;AN000;offset of plus sign string
1066 DW 0 ;AN000;segment of plus sign string
1067WR_ASCII_CHAR DB ' ,a-z,,A-Z,' ;AN000;
1068WR_ASCII_CHAR_LEN EQU ($-WR_ASCII_CHAR) ;AN000;
1069;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1070;
1071; ICB 20 STR_STACKS
1072;
1073;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1074WR_ICB20 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
1075 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1076 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1077 DW 0 ;AN000;option word four
1078 DW 13 ;AC000;JW ;**;upper left corner field row
1079 DW 26 ;AN000;**;upper left corner field column
1080 DW 6 ;AN000;**;number of chars before wrapping
1081 DW 1 ;AN000;color index number assigned
1082 DW 0 ;AN000;default change/minus status
1083 DW 1 ;AN000;**;cursor character pos in field
1084 DW 1 ;AN000;**;NEW ADD Hor scroll support
1085 DW SND_FREQ ;AN000;frequency of error beep
1086 DW 0 ;AN000;ASCII code of the key returned
1087 DW 0 ;AN000;length of data entered into fld
1088 DW 6 ;AC069;SEH ;AN000;**;length of input field
1089 DW 0 ;AN000;??;offset of input field
1090 DW 0 ;AN000;??;segment of input field
1091 DW 0 ;AN000;offset of color attribute buffer
1092 DW 0 ;AN000;segment of color attr buffer
1093 DW 0 ;AN000;length of field's default value
1094 DW 0 ;AN000;offset field's default value
1095 DW 0 ;AN000;segment field's default value
1096 DW 0 ;AN000;length of return string
1097 DW 0 ;AN000;offset of return string
1098 DW 0 ;AN000;segment of return string
1099 DW WR_FCBS_LEN ;AN000;length of allow chars
1100 DW WR_FCBS ;AN000;offset of allow chars
1101 DW DATA ;AN000;segment of allow chars
1102 DW 0 ;AN000;length of skip chars
1103 DW 0 ;AN000;offset of skip chars
1104 DW 0 ;AN000;segment of skip chars
1105 DW 0 ;AN000;length of allow once chars
1106 DW 0 ;AN000;offset of allow once chars
1107 DW 0 ;AN000;segment of allow once chars
1108 DW 2 ;AN000;precision of decimal point
1109 DW 0 ;AN000;low numeric range (low intrgr)
1110 DW 0 ;AN000;low numeric range (high intrgr)
1111 DW 0 ;AN000;high numeric range (low intrgr)
1112 DW 0 ;AN000;high numeric range (high intrgr)
1113 DW 0 ;AN000;beginning row of minus and plus
1114 DW 0 ;AN000;beginning col of minus & plus
1115 DW 0 ;AN000;length of minus sign string
1116 DW 0 ;AN000;offset of minus sign string
1117 DW 0 ;AN000;segment of minus sign string
1118 DW 0 ;AN000;length of plus sign string
1119 DW 0 ;AN000;offset of plus sign string
1120 DW 0 ;AN000;segment of plus sign string
1121;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1122;
1123; ICB 21 STR_VERIFY
1124;
1125;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1126WR_ICB21 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1127 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1128 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1129 DW 0 ;AN000;option word four
1130 DW 14 ;AC000;JW ;**;upper left corner field row
1131 DW 26 ;AN000;**;upper left corner field column
1132 DW 3 ;AN000;**;number of chars before wrapping
1133 DW 1 ;AN000;color index number assigned
1134 DW 0 ;AN000;default change/minus status
1135 DW 1 ;AN000;**;cursor character pos in field
1136 DW 1 ;AN000;**;NEW ADD Hor scroll support
1137 DW SND_FREQ ;AN000;frequency of error beep
1138 DW 0 ;AN000;ASCII code of the key returned
1139 DW 0 ;AN000;length of data entered into fld
1140 DW 3 ;AC069;SEH ;AN000;**;length of input field
1141 DW 0 ;AN000;??;offset of input field
1142 DW 0 ;AN000;??;segment of input field
1143 DW 0 ;AN000;offset of color attribute buffer
1144 DW 0 ;AN000;segment of color attr buffer
1145 DW 0 ;AN000;length of field's default value
1146 DW 0 ;AN000;offset field's default value
1147 DW 0 ;AN000;segment field's default value
1148 DW 0 ;AN000;length of return string
1149 DW 0 ;AN000;offset of return string
1150 DW 0 ;AN000;segment of return string
1151 DW WR_ON_OFF_CHAR_LEN ;AN000;length of allow chars
1152 DW WR_ON_OFF_CHAR ;AN000;offset of allow chars
1153 DW DATA ;AN000;segment of allow chars
1154 DW 0 ;AN000;length of skip chars
1155 DW 0 ;AN000;offset of skip chars
1156 DW 0 ;AN000;segment of skip chars
1157 DW 0 ;AN000;length of allow once chars
1158 DW 0 ;AN000;offset of allow once chars
1159 DW 0 ;AN000;segment of allow once chars
1160 DW 2 ;AN000;precision of decimal point
1161 DW 0 ;AN000;low numeric range (low intrgr)
1162 DW 0 ;AN000;low numeric range (high intrgr)
1163 DW 0 ;AN000;high numeric range (low intrgr)
1164 DW 0 ;AN000;high numeric range (high intrgr)
1165 DW 0 ;AN000;beginning row of minus and plus
1166 DW 0 ;AN000;beginning col of minus & plus
1167 DW 0 ;AN000;length of minus sign string
1168 DW 0 ;AN000;offset of minus sign string
1169 DW 0 ;AN000;segment of minus sign string
1170 DW 0 ;AN000;length of plus sign string
1171 DW 0 ;AN000;offset of plus sign string
1172 DW 0 ;AN000;segment of plus sign string
1173;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1174;
1175; ICB 22 NUM_PRINTER
1176;
1177;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1178WR_ICB22 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
1179 DW ICB_DEL+ICB_CSW ;AN000;option word two
1180 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1181 DW 0 ;AN000;option word four
1182 DW 6 ;AN000;**;upper left corner field row
1183 DW 50 ;AN000;**;upper left corner field column
1184 DW 1 ;AN000;**;number of chars before wrapping
1185 DW 1 ;AN000;color index number assigned
1186 DW 0 ;AN000;default change/minus status
1187 DW 1 ;AN000;**;cursor character pos in field
1188 DW 1 ;AN000;**;NEW ADD Hor scroll support
1189 DW SND_FREQ ;AN000;frequency of error beep
1190 DW 0 ;AN000;ASCII code of the key returned
1191 DW 0 ;AN000;length of data entered into fld
1192 DW 1 ;AC069;SEH ;AN000;**;length of input field
1193 DW 0 ;AN000;??;offset of input field
1194 DW 0 ;AN000;??;segment of input field
1195 DW 0 ;AN000;offset of color attribute buffer
1196 DW 0 ;AN000;segment of color attr buffer
1197 DW 0 ;AN000;length of field's default value
1198 DW 0 ;AN000;offset field's default value
1199 DW 0 ;AN000;segment field's default value
1200 DW 0 ;AN000;length of return string
1201 DW 0 ;AN000;offset of return string
1202 DW 0 ;AN000;segment of return string
1203 DW WR_NUM_PTR_LEN ;AN000;length of allow chars
1204 DW WR_NUM_PTR ;AN000;offset of allow chars
1205 DW DATA ;AN000;segment of allow chars
1206 DW 0 ;AN000;length of skip chars
1207 DW 0 ;AN000;offset of skip chars
1208 DW 0 ;AN000;segment of skip chars
1209 DW 0 ;AN000;length of allow once chars
1210 DW 0 ;AN000;offset of allow once chars
1211 DW 0 ;AN000;segment of allow once chars
1212 DW 2 ;AN000;precision of decimal point
1213 DW 0 ;AN000;low numeric range (low intrgr)
1214 DW 0 ;AN000;low numeric range (high intrgr)
1215 DW 0 ;AN000;high numeric range (low intrgr)
1216 DW 0 ;AN000;high numeric range (high intrgr)
1217 DW 0 ;AN000;beginning row of minus and plus
1218 DW 0 ;AN000;beginning col of minus & plus
1219 DW 0 ;AN000;length of minus sign string
1220 DW 0 ;AN000;offset of minus sign string
1221 DW 0 ;AN000;segment of minus sign string
1222 DW 0 ;AN000;length of plus sign string
1223 DW 0 ;AN000;offset of plus sign string
1224 DW 0 ;AN000;segment of plus sign string
1225 ;
1226WR_NUM_PTR DB ' ,0-7,' ;AN000;
1227WR_NUM_PTR_LEN EQU ($-WR_NUM_PTR) ;AN000;
1228;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1229;
1230; ICB 23 NUM_EXT_DISK
1231;
1232;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1233WR_ICB23 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;AN000;option word one
1234 DW ICB_DEL+ICB_CSW ;AN000;option word two
1235 DW 0 ;AN000;option word three
1236 DW 0 ;AN000;option word four
1237 DW 5 ;AN000;**;upper left corner field row
1238 DW 55 ;AN000;**;upper left corner field column
1239 DW 1 ;AN000;**;number of chars before wrapping
1240 DW 1 ;AN000;color index number assigned
1241 DW 0 ;AN000;default change/minus status
1242 DW 1 ;AN000;**;cursor character pos in field
1243 DW 1 ;AN000;**;NEW ADD Hor scroll support
1244 DW SND_FREQ ;AN000;frequency of error beep
1245 DW 0 ;AN000;ASCII code of the key returned
1246 DW 0 ;AN000;length of data entered into fld
1247 DW 0 ;AN000;**;length of input field
1248 DW 0 ;AN000;??;offset of input field
1249 DW 0 ;AN000;??;segment of input field
1250 DW 0 ;AN000;offset of color attribute buffer
1251 DW 0 ;AN000;segment of color attr buffer
1252 DW 0 ;AN000;length of field's default value
1253 DW 0 ;AN000;offset field's default value
1254 DW 0 ;AN000;segment field's default value
1255 DW 0 ;AN000;length of return string
1256 DW 0 ;AN000;offset of return string
1257 DW 0 ;AN000;segment of return string
1258 DW WR_NUM_EXT_LEN ;AN000;length of allow chars
1259 DW WR_NUM_EXT ;AN000;offset of allow chars
1260 DW DATA ;AN000;segment of allow chars
1261 DW 0 ;AN000;length of skip chars
1262 DW 0 ;AN000;offset of skip chars
1263 DW 0 ;AN000;segment of skip chars
1264 DW 0 ;AN000;length of allow once chars
1265 DW 0 ;AN000;offset of allow once chars
1266 DW 0 ;AN000;segment of allow once chars
1267 DW 2 ;AN000;precision of decimal point
1268 DW 0 ;AN000;low numeric range (low intrgr)
1269 DW 0 ;AN000;low numeric range (high intrgr)
1270 DW 0 ;AN000;high numeric range (low intrgr)
1271 DW 0 ;AN000;high numeric range (high intrgr)
1272 DW 0 ;AN000;beginning row of minus and plus
1273 DW 0 ;AN000;beginning col of minus & plus
1274 DW 0 ;AN000;length of minus sign string
1275 DW 0 ;AN000;offset of minus sign string
1276 DW 0 ;AN000;segment of minus sign string
1277 DW 0 ;AN000;length of plus sign string
1278 DW 0 ;AN000;offset of plus sign string
1279 DW 0 ;AN000;segment of plus sign string
1280 ;
1281WR_NUM_EXT DB ' 012' ;AN000;
1282WR_NUM_EXT_LEN EQU ($-WR_NUM_EXT) ;AN000;
1283;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1284;
1285; ICB 24 NUM_YEAR
1286;
1287;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1288WR_ICB24 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000; +ICB_CLR ;option word one
1289 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1290 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1291 DW 0 ;AN000;option word four
1292 DW 6 ;AN000;**;upper left corner field row
1293 DW 24 ;AN000;**;upper left corner field column
1294 DW 4 ;AN000;**;number of chars before wrapping
1295 DW 1 ;AN000;color index number assigned
1296 DW 0 ;AN000;default change/minus status
1297 DW 1 ;AN000;**;cursor character pos in field
1298 DW 1 ;AN000;**;NEW ADD Hor scroll support
1299 DW SND_FREQ ;AN000;frequency of error beep
1300 DW 0 ;AN000;ASCII code of the key returned
1301 DW 0 ;AN000;length of data entered into fld
1302 DW 4 ;AC069;SEH ;AN000;**;length of input field
1303 DW 0 ;AN000;??;offset of input field
1304 DW 0 ;AN000;??;segment of input field
1305 DW 0 ;AN000;offset of color attribute buffer
1306 DW 0 ;AN000;segment of color attr buffer
1307 DW 0 ;AN000;length of field's default value
1308 DW 0 ;AN000;offset field's default value
1309 DW 0 ;AN000;segment field's default value
1310 DW 0 ;AN000;length of return string
1311 DW 0 ;AN000;offset of return string
1312 DW 0 ;AN000;segment of return string
1313 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1314 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1315 DW DATA ;AN000;segment of allow chars
1316 DW 0 ;AN000;length of skip chars
1317 DW 0 ;AN000;offset of skip chars
1318 DW 0 ;AN000;segment of skip chars
1319 DW 0 ;AN000;length of allow once chars
1320 DW 0 ;AN000;offset of allow once chars
1321 DW 0 ;AN000;segment of allow once chars
1322 DW 2 ;AN000;precision of decimal point
1323 DW 0 ;AN000;low numeric range (low intrgr)
1324 DW 0 ;AN000;low numeric range (high intrgr)
1325 DW 0 ;AN000;high numeric range (low intrgr)
1326 DW 0 ;AN000;high numeric range (high intrgr)
1327 DW 0 ;AN000;beginning row of minus and plus
1328 DW 0 ;AN000;beginning col of minus & plus
1329 DW 0 ;AN000;length of minus sign string
1330 DW 0 ;AN000;offset of minus sign string
1331 DW 0 ;AN000;segment of minus sign string
1332 DW 0 ;AN000;length of plus sign string
1333 DW 0 ;AN000;offset of plus sign string
1334 DW 0 ;AN000;segment of plus sign string
1335;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1336;
1337; ICB 25 NUM_MONTH
1338;
1339;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1340WR_ICB25 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1341 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1342 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1343 DW 0 ;AN000;option word four
1344 DW 8 ;AN000;**;upper left corner field row
1345 DW 24 ;AN000;**;upper left corner field column
1346 DW 2 ;AN000;**;number of chars before wrapping
1347 DW 1 ;AN000;color index number assigned
1348 DW 0 ;AN000;default change/minus status
1349 DW 1 ;AN000;**;cursor character pos in field
1350 DW 1 ;AN000;**;NEW ADD Hor scroll support
1351 DW SND_FREQ ;AN000;frequency of error beep
1352 DW 0 ;AN000;ASCII code of the key returned
1353 DW 0 ;AN000;length of data entered into fld
1354 DW 2 ;AC069;SEH ;AN000;**;length of input field
1355 DW 0 ;AN000;??;offset of input field
1356 DW 0 ;AN000;??;segment of input field
1357 DW 0 ;AN000;offset of color attribute buffer
1358 DW 0 ;AN000;segment of color attr buffer
1359 DW 0 ;AN000;length of field's default value
1360 DW 0 ;AN000;offset field's default value
1361 DW 0 ;AN000;segment field's default value
1362 DW 0 ;AN000;length of return string
1363 DW 0 ;AN000;offset of return string
1364 DW 0 ;AN000;segment of return string
1365 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1366 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1367 DW DATA ;AN000;segment of allow chars
1368 DW 0 ;AN000;length of skip chars
1369 DW 0 ;AN000;offset of skip chars
1370 DW 0 ;AN000;segment of skip chars
1371 DW 0 ;AN000;length of allow once chars
1372 DW 0 ;AN000;offset of allow once chars
1373 DW 0 ;AN000;segment of allow once chars
1374 DW 2 ;AN000;precision of decimal point
1375 DW 0 ;AN000;low numeric range (low intrgr)
1376 DW 0 ;AN000;low numeric range (high intrgr)
1377 DW 0 ;AN000;high numeric range (low intrgr)
1378 DW 0 ;AN000;high numeric range (high intrgr)
1379 DW 0 ;AN000;beginning row of minus and plus
1380 DW 0 ;AN000;beginning col of minus & plus
1381 DW 0 ;AN000;length of minus sign string
1382 DW 0 ;AN000;offset of minus sign string
1383 DW 0 ;AN000;segment of minus sign string
1384 DW 0 ;AN000;length of plus sign string
1385 DW 0 ;AN000;offset of plus sign string
1386 DW 0 ;AN000;segment of plus sign string
1387;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1388;
1389; ICB 26 NUM_DAY
1390;
1391;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1392WR_ICB26 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1393 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1394 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1395 DW 0 ;AN000;option word four
1396 DW 10 ;AN000;**;upper left corner field row
1397 DW 24 ;AN000;**;upper left corner field column
1398 DW 2 ;AN000;**;number of chars before wrapping
1399 DW 1 ;AN000;color index number assigned
1400 DW 0 ;AN000;default change/minus status
1401 DW 1 ;AN000;**;cursor character pos in field
1402 DW 1 ;AN000;**;NEW ADD Hor scroll support
1403 DW SND_FREQ ;AN000;frequency of error beep
1404 DW 0 ;AN000;ASCII code of the key returned
1405 DW 0 ;AN000;length of data entered into fld
1406 DW 2 ;AC069;SEH ;AN000;**;length of input field
1407 DW 0 ;AN000;??;offset of input field
1408 DW 0 ;AN000;??;segment of input field
1409 DW 0 ;AN000;offset of color attribute buffer
1410 DW 0 ;AN000;segment of color attr buffer
1411 DW 0 ;AN000;length of field's default value
1412 DW 0 ;AN000;offset field's default value
1413 DW 0 ;AN000;segment field's default value
1414 DW 0 ;AN000;length of return string
1415 DW 0 ;AN000;offset of return string
1416 DW 0 ;AN000;segment of return string
1417 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1418 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1419 DW DATA ;AN000;segment of allow chars
1420 DW 0 ;AN000;length of skip chars
1421 DW 0 ;AN000;offset of skip chars
1422 DW 0 ;AN000;segment of skip chars
1423 DW 0 ;AN000;length of allow once chars
1424 DW 0 ;AN000;offset of allow once chars
1425 DW 0 ;AN000;segment of allow once chars
1426 DW 2 ;AN000;precision of decimal point
1427 DW 0 ;AN000;low numeric range (low intrgr)
1428 DW 0 ;AN000;low numeric range (high intrgr)
1429 DW 0 ;AN000;high numeric range (low intrgr)
1430 DW 0 ;AN000;high numeric range (high intrgr)
1431 DW 0 ;AN000;beginning row of minus and plus
1432 DW 0 ;AN000;beginning col of minus & plus
1433 DW 0 ;AN000;length of minus sign string
1434 DW 0 ;AN000;offset of minus sign string
1435 DW 0 ;AN000;segment of minus sign string
1436 DW 0 ;AN000;length of plus sign string
1437 DW 0 ;AN000;offset of plus sign string
1438 DW 0 ;AN000;segment of plus sign string
1439;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1440;
1441; ICB 27 NUM_HOUR
1442;
1443;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1444WR_ICB27 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1445 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1446 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1447 DW 0 ;AN000;option word four
1448 DW 16 ;AN000;**;upper left corner field row
1449 DW 24 ;AN000;**;upper left corner field column
1450 DW 2 ;AN000;**;number of chars before wrapping
1451 DW 1 ;AN000;color index number assigned
1452 DW 0 ;AN000;default change/minus status
1453 DW 1 ;AN000;**;cursor character pos in field
1454 DW 1 ;AN000;**;NEW ADD Hor scroll support
1455 DW SND_FREQ ;AN000;frequency of error beep
1456 DW 0 ;AN000;ASCII code of the key returned
1457 DW 0 ;AN000;length of data entered into fld
1458 DW 2 ;AC069;SEH ;AN000;**;length of input field
1459 DW 0 ;AN000;??;offset of input field
1460 DW 0 ;AN000;??;segment of input field
1461 DW 0 ;AN000;offset of color attribute buffer
1462 DW 0 ;AN000;segment of color attr buffer
1463 DW 0 ;AN000;length of field's default value
1464 DW 0 ;AN000;offset field's default value
1465 DW 0 ;AN000;segment field's default value
1466 DW 0 ;AN000;length of return string
1467 DW 0 ;AN000;offset of return string
1468 DW 0 ;AN000;segment of return string
1469 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1470 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1471 DW DATA ;AN000;segment of allow chars
1472 DW 0 ;AN000;length of skip chars
1473 DW 0 ;AN000;offset of skip chars
1474 DW 0 ;AN000;segment of skip chars
1475 DW 0 ;AN000;length of allow once chars
1476 DW 0 ;AN000;offset of allow once chars
1477 DW 0 ;AN000;segment of allow once chars
1478 DW 2 ;AN000;precision of decimal point
1479 DW 0 ;AN000;low numeric range (low intrgr)
1480 DW 0 ;AN000;low numeric range (high intrgr)
1481 DW 0 ;AN000;high numeric range (low intrgr)
1482 DW 0 ;AN000;high numeric range (high intrgr)
1483 DW 0 ;AN000;beginning row of minus and plus
1484 DW 0 ;AN000;beginning col of minus & plus
1485 DW 0 ;AN000;length of minus sign string
1486 DW 0 ;AN000;offset of minus sign string
1487 DW 0 ;AN000;segment of minus sign string
1488 DW 0 ;AN000;length of plus sign string
1489 DW 0 ;AN000;offset of plus sign string
1490 DW 0 ;AN000;segment of plus sign string
1491;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1492;
1493; ICB 28 NUM_MINUTE
1494;
1495;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1496WR_ICB28 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1497 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1498 DW ICB_HOR ;AC069;SEH ;AN000;option word three
1499 DW 0 ;AN000;option word four
1500 DW 18 ;AN000;**;upper left corner field row
1501 DW 24 ;AN000;**;upper left corner field column
1502 DW 2 ;AN000;**;number of chars before wrapping
1503 DW 1 ;AN000;color index number assigned
1504 DW 0 ;AN000;default change/minus status
1505 DW 1 ;AN000;**;cursor character pos in field
1506 DW 1 ;AN000;**;NEW ADD Hor scroll support
1507 DW SND_FREQ ;AN000;frequency of error beep
1508 DW 0 ;AN000;ASCII code of the key returned
1509 DW 0 ;AN000;length of data entered into fld
1510 DW 2 ;AC069;SEH ;AN000;**;length of input field
1511 DW 0 ;AN000;??;offset of input field
1512 DW 0 ;AN000;??;segment of input field
1513 DW 0 ;AN000;offset of color attribute buffer
1514 DW 0 ;AN000;segment of color attr buffer
1515 DW 0 ;AN000;length of field's default value
1516 DW 0 ;AN000;offset field's default value
1517 DW 0 ;AN000;segment field's default value
1518 DW 0 ;AN000;length of return string
1519 DW 0 ;AN000;offset of return string
1520 DW 0 ;AN000;segment of return string
1521 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1522 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1523 DW DATA ;AN000;segment of allow chars
1524 DW 0 ;AN000;length of skip chars
1525 DW 0 ;AN000;offset of skip chars
1526 DW 0 ;AN000;segment of skip chars
1527 DW 0 ;AN000;length of allow once chars
1528 DW 0 ;AN000;offset of allow once chars
1529 DW 0 ;AN000;segment of allow once chars
1530 DW 2 ;AN000;precision of decimal point
1531 DW 0 ;AN000;low numeric range (low intrgr)
1532 DW 0 ;AN000;low numeric range (high intrgr)
1533 DW 0 ;AN000;high numeric range (low intrgr)
1534 DW 0 ;AN000;high numeric range (high intrgr)
1535 DW 0 ;AN000;beginning row of minus and plus
1536 DW 0 ;AN000;beginning col of minus & plus
1537 DW 0 ;AN000;length of minus sign string
1538 DW 0 ;AN000;offset of minus sign string
1539 DW 0 ;AN000;segment of minus sign string
1540 DW 0 ;AN000;length of plus sign string
1541 DW 0 ;AN000;offset of plus sign string
1542 DW 0 ;AN000;segment of plus sign string
1543;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1544;
1545; ICB 29 NUM_SECOND
1546;
1547;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1548WR_ICB29 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1549 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1550 DW ICB_HOR ;AC0O69;SEH ;AN000;option word three
1551 DW 0 ;AN000;option word four
1552 DW 20 ;AN000;**;upper left corner field row
1553 DW 24 ;AN000;**;upper left corner field column
1554 DW 2 ;AN000;**;number of chars before wrapping
1555 DW 1 ;AN000;color index number assigned
1556 DW 0 ;AN000;default change/minus status
1557 DW 1 ;AN000;**;cursor character pos in field
1558 DW 1 ;AN000;**;NEW ADD Hor scroll support
1559 DW SND_FREQ ;AN000;frequency of error beep
1560 DW 0 ;AN000;ASCII code of the key returned
1561 DW 0 ;AN000;length of data entered into fld
1562 DW 2 ;AC069;SEH ;AN000;**;length of input field
1563 DW 0 ;AN000;??;offset of input field
1564 DW 0 ;AN000;??;segment of input field
1565 DW 0 ;AN000;offset of color attribute buffer
1566 DW 0 ;AN000;segment of color attr buffer
1567 DW 0 ;AN000;length of field's default value
1568 DW 0 ;AN000;offset field's default value
1569 DW 0 ;AN000;segment field's default value
1570 DW 0 ;AN000;length of return string
1571 DW 0 ;AN000;offset of return string
1572 DW 0 ;AN000;segment of return string
1573 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1574 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1575 DW DATA ;AN000;segment of allow chars
1576 DW 0 ;AN000;length of skip chars
1577 DW 0 ;AN000;offset of skip chars
1578 DW 0 ;AN000;segment of skip chars
1579 DW 0 ;AN000;length of allow once chars
1580 DW 0 ;AN000;offset of allow once chars
1581 DW 0 ;AN000;segment of allow once chars
1582 DW 2 ;AN000;precision of decimal point
1583 DW 0 ;AN000;low numeric range (low intrgr)
1584 DW 0 ;AN000;low numeric range (high intrgr)
1585 DW 0 ;AN000;high numeric range (low intrgr)
1586 DW 0 ;AN000;high numeric range (high intrgr)
1587 DW 0 ;AN000;beginning row of minus and plus
1588 DW 0 ;AN000;beginning col of minus & plus
1589 DW 0 ;AN000;length of minus sign string
1590 DW 0 ;AN000;offset of minus sign string
1591 DW 0 ;AN000;segment of minus sign string
1592 DW 0 ;AN000;length of plus sign string
1593 DW 0 ;AN000;offset of plus sign string
1594 DW 0 ;AN000;segment of plus sign string
1595;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1596;
1597; ICB 30 PRIMARY_CP
1598;
1599;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1600WR_ICB30 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1601 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1602 DW ICB_WIN ;AN000;option word three
1603 DW 0 ;AN000;option word four
1604 DW 20 ;AN000;**;upper left corner field row
1605 DW 24 ;AN000;**;upper left corner field column
1606 DW 2 ;AN000;**;number of chars before wrapping
1607 DW 1 ;AN000;color index number assigned
1608 DW 0 ;AN000;default change/minus status
1609 DW 1 ;AN000;**;cursor character pos in field
1610 DW 1 ;AN000;**;NEW ADD Hor scroll support
1611 DW SND_FREQ ;AN000;frequency of error beep
1612 DW 0 ;AN000;ASCII code of the key returned
1613 DW 0 ;AN000;length of data entered into fld
1614 DW 0 ;AN000;**;length of input field
1615 DW 0 ;AN000;??;offset of input field
1616 DW 0 ;AN000;??;segment of input field
1617 DW 0 ;AN000;offset of color attribute buffer
1618 DW 0 ;AN000;segment of color attr buffer
1619 DW ICB_DEFBUF30_L+2 ;AN000;length of field's default value
1620 DW ICB_DEFBUF30 ;AN000;offset field's default value
1621 DW DATA ;AN000;segment field's default value
1622 DW 0 ;AN000;length of return string
1623 DW 0 ;AN000;offset of return string
1624 DW 0 ;AN000;segment of return string
1625 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1626 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1627 DW DATA ;AN000;segment of allow chars
1628 DW 0 ;AN000;length of skip chars
1629 DW 0 ;AN000;offset of skip chars
1630 DW 0 ;AN000;segment of skip chars
1631 DW 0 ;AN000;length of allow once chars
1632 DW 0 ;AN000;offset of allow once chars
1633 DW 0 ;AN000;segment of allow once chars
1634 DW 2 ;AN000;precision of decimal point
1635 DW 0 ;AN000;low numeric range (low intrgr)
1636 DW 0 ;AN000;low numeric range (high intrgr)
1637 DW 0 ;AN000;high numeric range (low intrgr)
1638 DW 0 ;AN000;high numeric range (high intrgr)
1639 DW 0 ;AN000;beginning row of minus and plus
1640 DW 0 ;AN000;beginning col of minus & plus
1641 DW 0 ;AN000;length of minus sign string
1642 DW 0 ;AN000;offset of minus sign string
1643 DW 0 ;AN000;segment of minus sign string
1644 DW 0 ;AN000;length of plus sign string
1645 DW 0 ;AN000;offset of plus sign string
1646 DW 0 ;AN000;segment of plus sign string
1647 ;
1648ICB_DEFBUF30 DW ICB_DEFBUF30_L ;AN000;Define default buffer ASCIIN
1649 DB '850' ;AN000;Define default buffer
1650ICB_DEFBUF30_L EQU $-ICB_DEFBUF30-2 ;AN000;
1651;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1652;
1653; ICB 31 COUNTRY_LANG
1654;
1655;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1656WR_ICB31 DW ICB_BEN+ICB_RTA+ICB_LFA+ICB_BKS ;;AN000;+ICB_CLR ;option word one
1657 DW ICB_INS+ICB_DEL+ICB_HOM+ICB_END+ICB_UPC ;AN000;option word two
1658 DW ICB_WIN ;AN000;option word three
1659 DW 0 ;AN000;option word four
1660 DW 20 ;AN000;**;upper left corner field row
1661 DW 24 ;AN000;**;upper left corner field column
1662 DW 2 ;AN000;**;number of chars before wrapping
1663 DW 1 ;AN000;color index number assigned
1664 DW 0 ;AN000;default change/minus status
1665 DW 1 ;AN000;**;cursor character pos in field
1666 DW 1 ;AN000;**;NEW ADD Hor scroll support
1667 DW SND_FREQ ;AN000;frequency of error beep
1668 DW 0 ;AN000;ASCII code of the key returned
1669 DW 0 ;AN000;length of data entered into fld
1670 DW 0 ;AN000;**;length of input field
1671 DW 0 ;AN000;??;offset of input field
1672 DW 0 ;AN000;??;segment of input field
1673 DW 0 ;AN000;offset of color attribute buffer
1674 DW 0 ;AN000;segment of color attr buffer
1675 DW ICB_DEFBUF31_L+2 ;AN000;??;length of field's default value
1676 DW ICB_DEFBUF31 ;AN000;??;offset field's default value
1677 DW DATA ;AN000;??;segment field's default value
1678 DW 0 ;AN000;length of return string
1679 DW 0 ;AN000;offset of return string
1680 DW 0 ;AN000;segment of return string
1681 DW WR_ALLOW_NUM_LEN ;AN000;length of allow chars
1682 DW WR_ALLOW_NUM ;AN000;offset of allow chars
1683 DW DATA ;AN000;segment of allow chars
1684 DW 0 ;AN000;length of skip chars
1685 DW 0 ;AN000;offset of skip chars
1686 DW 0 ;AN000;segment of skip chars
1687 DW 0 ;AN000;length of allow once chars
1688 DW 0 ;AN000;offset of allow once chars
1689 DW 0 ;AN000;segment of allow once chars
1690 DW 2 ;AN000;precision of decimal point
1691 DW 0 ;AN000;low numeric range (low intrgr)
1692 DW 0 ;AN000;low numeric range (high intrgr)
1693 DW 0 ;AN000;high numeric range (low intrgr)
1694 DW 0 ;AN000;high numeric range (high intrgr)
1695 DW 0 ;AN000;beginning row of minus and plus
1696 DW 0 ;AN000;beginning col of minus & plus
1697 DW 0 ;AN000;length of minus sign string
1698 DW 0 ;AN000;offset of minus sign string
1699 DW 0 ;AN000;segment of minus sign string
1700 DW 0 ;AN000;length of plus sign string
1701 DW 0 ;AN000;offset of plus sign string
1702 DW 0 ;AN000;segment of plus sign string
1703 ;
1704ICB_DEFBUF31 DW ICB_DEFBUF31_L ;AN000;Define default buffer ASCIIN
1705 DB 'SG' ;AN000;
1706ICB_DEFBUF31_L EQU $-ICB_DEFBUF31-2 ;AN000;
1707;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1708;
1709; Table of Key Definitions
1710;
1711;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1712KD_BACKSPACE DB 8,0 ;AN000;ASCII backspace
1713KD_UNDOKEY DB 0,59 ;AN000;ASCII code replace default key
1714KD_SWCHKEY DB 0,60 ;AN000;ASCII code switch char direction
1715KD_DEL DB 0,83 ;AN000;extended ASCII delete key
1716KD_CTRLEND DB 0,117 ;AN000;extended ASCII Control-End key
1717KD_HOME DB 0,71 ;AN000;extended ASCII home key
1718KD_END DB 0,79 ;AN000;extended ASCII end key
1719KD_INS DB 0,82 ;AN000;extended ASCII insert key
1720KD_LARROW DB 0,75 ;AN000;extended ASCII left arrow
1721KD_RARROW DB 0,77 ;AN000;extended ASCII right arrow
1722KD_UARROW DB 0,72 ;AN000;extended ASCII up arrow
1723KD_DARROW DB 0,80 ;AN000;extended ASCII down arrow
1724KD_MINUS DB 45,0 ;AN000;ASCII minus sign
1725KD_PLUS DB 43,0 ;AN000;ASCII plus sign
1726;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1727;
1728; Define Buffers and Strings
1729;
1730;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1731WR_ALLOW_CHAR DB ', -�,' ;AN000;
1732WR_ALLOW_CHAR_LEN EQU ($-WR_ALLOW_CHAR) ;AN000;
1733WR_ALLOW_NUM DB ' ,0-9,' ;AN000;
1734WR_ALLOW_NUM_LEN EQU ($-WR_ALLOW_NUM) ;AN000;
1735;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1736DATA ENDS ;AN000;
1737 END ;AN000;
HIC SVNT DRACONES