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
|
PAGE ,132 ;
TITLE LABELM.SAL - MESSAGE HANDLER FOR LABEL UTILITY
;*****************************************************************************
;* *
;* MODULE NAME: LABELM.SAL *
;* *
;* DESCRIPTIVE NAME: Include the DOS system MESSAGE HANDLER in the SEGMENT *
;* configuration expected by the modules of LABEL. *
;* *
;* FUNCTION: The common code of the DOS SYSTEM MESSAGE HANDLER is *
;* made a part of the LABEL module by using INCLUDE to *
;* bring in the common portion, in SYSMSG.INC. This *
;* included code contains the routines to initialize for *
;* message services, to find where a particular message *
;* is, and to display a message. *
;* *
;* ENTRY POINT: SYSDISPMSG:near *
;* SYSLOADMSG:near *
;* *
;* INPUT: ax = message number *
;* bx = handle to display to *
;* cx = number of %parms, 0 if none *
;* dx = class in high byte, input function in low *
;* si = offset in es: of sublist, or 0 if none *
;* *
;* EXIT-NORMAL: CARRY is not set *
;* *
;* EXIT-ERROR: CARRY is set *
;* Call SYSDISPMSG *
;* *
;* INTERNAL REFERENCES: *
;* Routines: SYSDISPMSG (generated by MSG_SERVICES macro) *
;* SYSLOADMSG " " " " *
;* Data Areas: INCLUDE SYSMSG.INC (permit Sys Msg handler definition) *
;* *
;* EXTERNAL REFERENCES: *
;* Routines: None *
;* Data Areas: Control blocks pointed to by input registers *
;* *
;* NOTES: This module should be processed with the SALUT pre-processor *
;* with the re-alignment not requested, as: *
;* *
;* SALUT LABELM,NUL *
;* *
;* To assemble these modules, the sequential or alphabetical *
;* ordering of segments may be used. *
;* *
;* Sample LINK command: *
;* *
;* LINK @LABEL.ARF *
;* *
;* Where the LABEL.ARF is defined as: *
;* *
;* LABEL+ *
;* LABELM *
;* *
;* These modules should be linked in this order. The load module is *
;* a COM file. It should be converted via EXE2BIN to a .COM file. *
;* *
;* REVISION HISTORY: *
;* *
;* Prolog edited 04/88 S. Maes *
;* *
;*****************************************************************************
IF1
%OUT COMPONENT=LABEL MODULE=LABELM.SAL
%OUT INCLUDING SYSMSG.INC
ENDIF
INCLUDE sysmsg.inc
MSG_UTILNAME <LABL>
CSEG segment public
assume cs:CSEG,ds:CSEG
assume es:CSEG,ss:CSEG
PUBLIC SYSDISPMSG,SYSLOADMSG
MSG_SERVICES <MSGDATA>
MSG_SERVICES <LABL.CLA,LABL.CL1,LABL.CL2> ;AN000;M Support Utility msgs
;DEFAULT=CHECK DOS VERSION
;DEFAULT=NEARmsg
;DEFAULT=INPUTmsg
;DEFAULT=NO TIMEmsg
;DEFAULT=NO DATEmsg
;DEFAULT=NO GETmsg
MSG_SERVICES <NEARmsg,DISPLAYmsg,CHARmsg,NUMmsg,INPUTmsg,LOADmsg>
CSEG ENDS ;AN000;M Access to svcs macro
include msgdcl.inc
END
|
