summaryrefslogtreecommitdiff
path: root/v4.0/src/CMD/DISKCOPY/DCPYMACR.INC
diff options
context:
space:
mode:
Diffstat (limited to 'v4.0/src/CMD/DISKCOPY/DCPYMACR.INC')
-rw-r--r--v4.0/src/CMD/DISKCOPY/DCPYMACR.INC164
1 files changed, 164 insertions, 0 deletions
diff --git a/v4.0/src/CMD/DISKCOPY/DCPYMACR.INC b/v4.0/src/CMD/DISKCOPY/DCPYMACR.INC
new file mode 100644
index 0000000..da247a5
--- /dev/null
+++ b/v4.0/src/CMD/DISKCOPY/DCPYMACR.INC
@@ -0,0 +1,164 @@
1 IF1 ;AN000;
2 %OUT COMPONENT=DISKCOPY, INCLUDING DCPYMACR.INC...;AN000;
3 ENDIF ;AN000;
4;***************************************************************************;
5; MACRO DEFINITION ;
6;***************************************************************************;
7
8HEADER MACRO TEXT ;AN000;
9.XLIST ;AN000;
10 SUBTTL &TEXT ;AN000;
11.LIST ;AN000;
12 PAGE ;AN000;
13 ENDM ;AN000;
14; = = = = = = = = =
15; $SALUT (0,36,40,44)
16DOSCALL MACRO FUNC,SUBFUNC ;;AN000;
17 IFNB <FUNC> ;;AN000;IS THERE ANY PARMS AT ALL?
18 IFNB <SUBFUNC> ;;AN000;
19 MOV AX,(FUNC SHL 8)+SUBFUNC ;;AN000;FUNC TO AH,SUBFUNC TO AL
20 ELSE ;;AN000;SINCE THERE IS NO SUBFUNC
21 MOV AH,FUNC ;;AN000;
22 ENDIF ;;AN000;
23 ENDIF ;;AN000;
24 INT 21H ;;AN000;
25 ENDM ;;AN000;
26; = = = = = = = = =
27PRINT MACRO MESSAGE;;AN000;
28 MOV DI,OFFSET MESSAGE ;;AC000;
29 CALL SENDMSG ;;AC000;
30 ENDM ;;AN000;
31; = = = = = = = = =
32; $SALUT (0,16,22,36)
33MY_TRACKLAYOUT MACRO ;AN000;
34 LOCAL CSECT_F ;AN000;
35CSECT_F DW 0 ;;AN000;# OF SECTORS IN A TRACK. Currently 18 is max.
36 ;; THE REST IS FOR FUTURE MEDIA
37 DW 1 ;;AN000;1 ST SECTOR
38 DW 512 ;;AN000;# OF BYTES
39 DW 2 ;;AN000;
40 DW 512 ;;AN000;
41 DW 3 ;;AN000;
42 DW 512 ;;AN000;
43 DW 4 ;;AN000;
44 DW 512 ;;AN000;
45 DW 5 ;;AN000;
46 DW 512 ;;AN000;
47 DW 6 ;;AN000;
48 DW 512 ;;AN000;
49 DW 7 ;;AN000;
50 DW 512 ;;AN000;
51 DW 8 ;;AN000;
52 DW 512 ;;AN000;
53 DW 9 ;;AN000;
54 DW 512 ;;AN000;
55 DW 10 ;;AN000;
56 DW 512 ;;AN000;
57 DW 11 ;;AN000;
58 DW 512 ;;AN000;
59 DW 12 ;;AN000;
60 DW 512 ;;AN000;
61 DW 13 ;;AN000;
62 DW 512 ;;AN000;
63 DW 14 ;;AN000;
64 DW 512 ;;AN000;
65 DW 15 ;;AN000;
66 DW 512 ;;AN000;
67 DW 16 ;;AN000;
68 DW 512 ;;AN000;
69 DW 17 ;;AN000;
70 DW 512 ;;AN000;
71 DW 18 ;;AN000;
72 DW 512 ;;AN000;CURRENTLY 18 SECTORS/TRACK IS MAXIMUM
73 DW 19 ;;AN000;BELOW IS FOR THE FUTURE MEDIA.
74 DW 512 ;;AN000;
75 DW 20 ;;AN000;
76 DW 512 ;;AN000;
77 DW 21 ;;AN000;
78 DW 512 ;;AN000;
79 DW 22 ;;AN000;
80 DW 512 ;;AN000;
81 DW 23 ;;AN000;
82 DW 512 ;;AN000;
83 DW 24 ;;AN000;
84 DW 512 ;;AN000;
85 DW 25 ;;AN000;
86 DW 512 ;;AN000;
87 DW 26 ;;AN000;
88 DW 512 ;;AN000;
89 DW 27 ;;AN000;
90 DW 512 ;;AN000;
91 DW 28 ;;AN000;
92 DW 512 ;;AN000;
93 DW 29 ;;AN000;
94 DW 512 ;;AN000;
95 DW 30 ;;AN000;
96 DW 512 ;;AN000;
97 DW 31 ;;AN000;
98 DW 512 ;;AN000;
99 DW 32 ;;AN000;
100 DW 512 ;;AN000;
101 DW 33 ;;AN000;
102 DW 512 ;;AN000;
103 DW 34 ;;AN000;
104 DW 512 ;;AN000;
105 DW 35 ;;AN000;
106 DW 512 ;;AN000;
107 DW 36 ;;AN000;
108 DW 512 ;;AN000;
109 DW 37 ;;AN000;
110 DW 512 ;;AN000;
111 DW 38 ;;AN000;
112 DW 512 ;;AN000;
113 DW 39 ;;AN000;
114 DW 512 ;;AN000;
115 DW 40 ;;AN000;
116 DW 512 ;;AN000;
117 DW 41 ;;AN000;
118 DW 512 ;;AN000;
119 DW 42 ;;AN000;
120 DW 512 ;;AN000;
121 DW 43 ;;AN000;
122 DW 512 ;;AN000;
123 DW 44 ;;AN000;
124 DW 512 ;;AN000;
125 DW 45 ;;AN000;
126 DW 512 ;;AN000;
127 DW 46 ;;AN000;
128 DW 512 ;;AN000;
129 DW 47 ;;AN000;
130 DW 512 ;;AN000;
131 DW 48 ;;AN000;
132 DW 512 ;;AN000;
133 DW 49 ;;AN000;
134 DW 512 ;;AN000;
135 DW 50 ;;AN000;
136 DW 512 ;;AN000;
137 DW 51 ;;AN000;
138 DW 512 ;;AN000;
139 DW 52 ;;AN000;
140 DW 512 ;;AN000;
141 DW 53 ;;AN000;
142 DW 512 ;;AN000;
143 DW 54 ;;AN000;
144 DW 512 ;;AN000;
145 DW 55 ;;AN000;
146 DW 512 ;;AN000;
147 DW 56 ;;AN000;
148 DW 512 ;;AN000;
149 DW 57 ;;AN000;
150 DW 512 ;;AN000;
151 DW 58 ;;AN000;
152 DW 512 ;;AN000;
153 DW 59 ;;AN000;
154 DW 512 ;;AN000;
155 DW 60 ;;AN000;
156 DW 512 ;;AN000;
157 DW 61 ;;AN000;
158 DW 512 ;;AN000;
159 DW 62 ;;AN000;
160 DW 512 ;;AN000;
161 DW 63 ;;AN000;
162 DW 512 ;;AN000;
163 ENDM ;AN000;
164 \ No newline at end of file
HIC SVNT DRACONES