]> wirehaze git hosting - MS-DOS.git/blob - v4.0/src/CMD/CHKDSK/CHKMACRO.INC

wirehaze git hosting

MZ is back!
[MS-DOS.git] / v4.0 / src / CMD / CHKDSK / CHKMACRO.INC
1
2 BREAK MACRO subtitle
3 SUBTTL subtitle
4 PAGE
5 ENDM
6
7
8 ;
9 ;******************************************************************************
10 ; Message Macro Definitions
11 ;******************************************************************************
12 ;
13
14 EXTRN Display_Interface:near
15
16
17 ;-----------------------------------------------------------------------------
18
19 Message macro Message_Name ; ;AN000;
20 ;
21 mov dx,offset dg:Message_Name ; ;AN000;
22 call Display_Interface ; ;AN000;
23 ;
24 endm ; ;AN000;
25
26 ;-----------------------------------------------------------------------------
27
28 Parse_Message macro ; ;AN000;
29
30 ;
31 push ds
32 mov dx,dg
33 mov ds,dx
34 mov word ptr Parse_Error_Msg,ax ; ;AN000;
35 mov dx,offset dg:Parse_Error_Msg ; ;AN000;
36 call Display_Interface ; ;AN000;
37 pop ds ;
38 endm ; ;AN000;
39
40 ;-----------------------------------------------------------------------------
41
42 Extended_Message macro ; ;AN000;
43 ;
44
45 push ds
46 mov dx,dg
47 mov ds,dx
48 mov word ptr Extended_Error_Msg,ax ; ;AN000;
49 mov dx,offset dg:Extended_Error_Msg ; ;AN000;
50 call Display_Interface ; ;AN000;
51 pop ds
52 endm ; ;AN000;
53 ;
54 ;*****************************************************************************
55 ; General Macro's
56 ;*****************************************************************************
57 ;
58
59 Procedure macro Proc_Name,Seg_Name ; ;AN000;
60 ;
61 Public Proc_Name ; ;AN000;
62 Proc_Name proc ; ;AN000;
63
64 endm ; ;AN000;
65 ;-----------------------------------------------------------------------------
66
67 DOS_Call macro Function ; ;AN000;
68 ;
69 mov ah,Function ; ;AN000;
70 int 21h ; ;AN000;
71 ;
72 endm ; ;AN000;
73
74 ;-----------------------------------------------------------------------------
75
76 Popff macro
77
78 Assume cs:DG
79
80 jmp $+3
81 iret
82 push cs
83 call $-2
84
85 Assume cs:code
86
87 endm
88
89 ;-----------------------------------------------------------------------------
90
91 Set_Data_Segment macro
92
93 push ax
94 mov ax,dg ;Point to data segment
95 mov ds,ax ;
96 push ds
97 pop es
98 pop ax
99
100 .LALL
101 assume ds:dg,es:dg
102 .XALL
103 endm
104
105 \1a