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
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
|
:util FORMAT
:class 1
:use EXTEND2 ;File not found
:use EXTEND4 ;Too many open files
:use EXTEND5 ;Access denied
:use EXTEND8 ;Insufficient memory
:use EXTEND15 ;Invalid drive was specified
:use EXTEND26 ;Unknown media type
:class A
;msgBadDosVersion
;"Incorrect DOS version",CR,LF,"$"
:use COMMON1
;msgCurrentTrack
;"Head: %3d Cylinder: %4d", CR, 0
;:def 2 "Head: %1 Cylinder: %2",CR
:def 2 CR,"%1 percent of disk formatted ",CR
;msgDataSpace
;"%l10d bytes available on disk",CR,LF,0
:use COMMON3
;msgFormatComplete
;"Format complete ",CR,LF,0
:def 4 CR,"Format complete ",CR,LF
;msgBadSpace
;"%l10d bytes in bad sectors", CR, LF, 0
:use COMMON5
;msgTotalDiskSpace
;"%l10d bytes total disk space", CR, LF, 0
:use COMMON6
;msgInsertDisk
;"Insert new diskette for drive %c:",CR,LF
:def 7 "Insert new diskette for drive %1:",CR,LF
;msgSystemSpace
;"%l10d bytes used by system", CR, LF, 0
:use COMMON8
;msgReInsertDisk
;"Re-insert diskette for drive %c:",0
:def 9 "Re-insert diskette for drive %1:",CR,LF
;msgLabelPrompt
;"Volume label (11 characters, ENTER for none)? ",0
:use 10 COMMON35
;msgFormatNotSupported
;"Format not supported on drive %c:", CR,LF,0
:def 11 CR,"Format not supported on drive %1:", CR,LF
;msgInvalidDeviceParameters
;"Invalid device parameters from device driver",CR,LF,0
:def 12 CR,"Invalid device parameters from device driver",CR,LF
;msgErrorInIOCTL
;"Error in IOCTL call", CR, LF, 0
:def 13 CR,"Error in IOCTL call ",CR,LF
;msgNotBlockDevice
;"Not a block device", CR, LF
:def 14 CR,"Not a block device ",CR,LF
;msgFATwriteError
;"Error writing FAT", CR, LF, 0
:def 15 CR,"Error writing FAT ",CR,LF
;msgDirectoryWriteError
;"Error writing directory ", CR, LF, 0
:def 16 CR,"Error writing directory",CR,LF
;msgAssignedDrive
;"Cannot format an ASSIGNed, SUBSTed, or JOINed drive. ", CR, LF, 0
:def 17 CR,"Cannot format an ASSIGNed, SUBSTed, or JOINed drive. ",CR,LF
;msgNoSystemFiles
;"Cannot find System Files",CR,LF,0
:def 18 CR,"Cannot find System Files",CR,LF
;msgNetDrive
;"Cannot FORMAT a Network drive", CR, LF, 0
:def 19 CR,"Cannot FORMAT a Network drive",CR,LF
;msgBadCharacters
;"Invalid characters in volume label ", CR, LF, 0
:use 20 COMMON21
:CLASS B
;msgParametersNotSupported
;"Parameters not supported",CR,LF,0
:def 21 CR,"Parameters not supported",CR,LF
;msgFormatFailure
; Note: This message must be long enough to wipe out message msgCurrentTrack
;"Format terminated ",CR,LF,0
:def 22 CR,"Format terminated ",CR,LF
;msgNotSystemDisk
;"Disk unsuitable for system disk", CR, LF, 0
:def 23 CR,"Disk unsuitable for system disk",CR,LF
;msgDiskUnusable
;"Invalid media or Track 0 bad - disk unusable", CR, LF, 0
:def 24 CR,"Invalid media or Track 0 bad - disk unusable",CR,LF
;msgBootWriteError
;"Unable to write BOOT", CR, LF, 0
:def 25 CR,"Unable to write BOOT ",CR,LF
;msgDirectoryReadError
;"Error reading directory", CR, LF, 0
:def 26 CR,"Error reading directory",CR,LF
;msgNeedDrive
;"No target drive specified",CR,LF,0
:use COMMON27
;ContinueMsg
;Press any key to continue
:def 28 CR,"and press ENTER when ready..."
;msgBadVolumeId
;"Invalid Volume ID", CR, LF, 0
:def 29 CR,"Invalid Volume ID ",CR,LF
;msgSystemTransfered
;"System transferred",CR,LF,0
:use COMMON30
;msgWhatIsVolumeId?
;"Enter current Volume Label for drive %c: ", 0
:def 31 CR,"Enter current Volume Label for drive %1: "
;msgIncompatibleParametersForHardDisk
;" with fixed disk", CR,LF,0
:def 32 CR,"Parameters not compatible",CR,LF,"with fixed disk",CR,LF
;msgPartitionTableReadError
;"Error reading partition table", CR, LF, 0
:def 35 CR,"Error reading partition table",CR,LF
;msgSerialNumber
:use COMMON36
;msgFormatBroken
;"Format Broken", CR, LF, 0
:def 37 CR,"Format Broken",CR,LF
;msgEXECFailure
:def 38 CR,"Format not available on drive %1",CR,LF
;NO_SYS_MESS:
; THIS IS A SPECIAL MESSAGE WHICH IS INCLUDED IN THE "FAKE" IBMBIO.COM
; FILE PLACED ON DISKS FORMATTED /B or /R. NOTE THAT IT IS NUL TERMINATED.
;"Non-System disk or disk error",13,10,0
:def 39 CR,"Non-System disk or disk error",CR,LF
;msgbadpartitiontable
;"Bad Partition Table", CR, LF, 0
:def 40 CR,"Bad Partition Table ",CR,LF
:CLASS C
;msgParametersNotSupportedByDrive
;"Parameters not Supported by Drive",CR, LF, 0
:def 41 CR,"Parameters not Supported by Drive",CR,LF
;msgCRLF
:def 42 CR,LF
;msgInterrupt
:def 43 CR,LF,LF
;msgInsertDosDisk db "Insert DOS disk in drive %c:", CR, LF
:def 44 CR,"Insert DOS disk in drive %1:",CR,LF
;msgHardDiskWarning db CR,LF
; db "WARNING, ALL DATA ON NON-REMOVABLE DISK",CR,LF
; db "DRIVE %c: WILL BE LOST!",CR,LF
; db "Proceed with Format (Y/N)?",0
:def 45 CR,LF,"WARNING, ALL DATA ON NON-REMOVABLE DISK",CR,LF
"DRIVE %1: WILL BE LOST!",CR,LF
"Proceed with Format (Y/N)?"
;msgFormatAnother? db "Format another (Y/N)?",0
:def 46 CR,"Format another (Y/N)?"
;msgPartitionTableReadError db "Error reading partition table", CR, LF, 0
:def 47 CR,"Error reading partition table",CR,LF
;msgPartitionTableWriteError db "Error writing partition table", CR, LF, 0
:def 48 CR,"Error writing partition table",CR,LF
;msgIncompatibleParametere forproc.sal not compatible", CR,LF
;"Parameters not compatible", CR,LF,0
:def 49 CR,"Parameters not compatible", CR,LF
;msgNumAlloc
:def 50 "%1 allocation units available on disk",CR,LF
;msgAllocSize
:def 51 "%1 bytes in each allocation unit",CR,LF
;msgPartitionTableWriteError
; "Error writing partition table", CR, LF, 0
:def 52 CR, "Error writing partition table",CR,LF
;msgSameSwitch
:def 53 CR,"Same parameter entered twice",CR,LF
;msgBad_T_N
:def 54 CR,"Must enter both /T and /N parameters",CR,LF ;AN009;
;MsgVerify
:def 55 CR,"Attempting to recover allocation unit %1 ",CR
:end
|
