Home » Personal collection » Acorn hard disk » apps » SCSI » !HFORM/MESSAGES

!HFORM/MESSAGES

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn hard disk » apps » SCSI
Filename: !HFORM/MESSAGES
Read OK:
File size: 1B58 bytes
Load address: 0000
Exec address: 0000
File contents
# !HForm messages file. All lookups are done with MessageTrans_GSLookup.

Banner:|M|J|M|JH A R D   D I S C   F O R M A T T E R   (V 2.44 24 May 95)|M|J|M|J
CreatingMap:Creating map|M|J
CurrentDefects:|M|JCurrent Defects (Cylinder,Head,Sector)|M|J
DFormatDefect1:If ADFS gives an error such as 'Disc error 13 at :4/00012A00' then 00012A00 is a logical disc address. The logical to physical disc address mapping depends on the defect list.|M|J
DFormatDefect2: When these defects are added to the defect list, it is|M|J
DFormatDefect3:important that they are added in DESCENDING order BEFORE the list is changed in any other way!|M|J
Defect:defect|M|J
DefectAdd:B: add defect by cylinder, head, byte/sector|M|J
DefectAddDisc:C: add defect by disc address|M|J
DefectAddLogical:C: add defect by LOGICAL disc address (eg disc error)|M|J
DefectNoMore:A: no more changes to defect list|M|J
DefectRemove:D: remove defect|M|J
DefectTIME:defect %0|M|J
DiscIdError:Cannot read disc identity: disc error &%0|M|J
DriveDisclaim:|M|JProvision for a given drive type in this list does not imply|M|Jthat the drive is suitable for use in Acorn equipment|M|J|J
DriveIsIDE:Drive %0 is an IDE drive|M|J|J
IDEHasLBA:This drive supports the LBA (Logical Block Address) option.|M|J
DriveIsST506:Drive %0 is an ST506 drive|M|J|J
DriveNotPresent:Drive %0 is not present|M|J
Error:Error &%0|M|J
ERROR1:PROGRAM ERROR 1|M|J
ERROR2:PROGRAM ERROR 2|M|J
ERROR3:PROGRAM ERROR 3|M|J
ERROR4:PROGRAM ERROR 4|M|J
ExistingDefect:Defect already in defect list|M|J
FailedAuto:Automatic operation failed : unexpected query %0 - %1|M|J
Formatting:Formatting|M|J
FormatError: format error on this track|M|J
FullDefectList:Defect list full|M|J
HFormFailed:|M|JHFORM failed: %0 at line %1|M|J
IDEConfiguration:Configuration    : %0 cylinders, %1 heads and %2 sectors/track|M|J|J
IDEDescription:IDE drive ADFS:%0 identifies itself as :|M|JDescription      : %1|M|JFirmware version : %2|M|J
IDEHeads16:IDE drives cannot have more than 16 heads|M|J
InvalidAllocSize:Can't use this allocation size|M|J
MakeMenu:%0. %1|M|J
MissingDefect:Defect not in defect list|M|J
DefectTooBig:Defect is beyond end of disc|M|J
NoADFS:No ADFS module|M|J
NoHardDiscs:No hard discs configured|M|J
NonStandardShape:This disc was last formatted using the non-standard disc shape :|M|J
NoValidFormat:This drive does not currently have a valid ADFS format.|M|J
OpError:|" - error number &%1)|M|J
Pattern:Writing pattern &%0|M|J
PressKey:Press Return to continue<32>
PrintShape:"          %0 Cylinders, %1 Heads and %2 Sectors/Track|M|J"
PrintShape3IDE:"          Parking cylinder %0, Initialisation flag %1, LBA flag %2|M|J"
PrintShape2ST506:"          Parking cylinder %0, RWC %1, WPC %2|M|J"
Retries:%0 retries needed|M|J
SillyDiscNum:This machine has a total of %0 hard discs configured.|M|JPlease check/alter the configuration and re-run|M|Jthis program.|M|J
SoakPrompt:|M|JPRESSING THE SPACE BAR WILL CAUSE THE SOAK TEST TO END AT THE END OF THAT CYCLE|M|J
ST506Heads8:|M|JWARNING - since the drive has more than 8 heads, the computer's|M|J          'low write current/head select 3' links may need changing.|M|J
StandardShape:This disc was last formatted using the standard shape :|M|J|M|J          %0|M|J
TooSmallAlloc:Allocation unit too small|M|J
UnknownDriveMake:The drive type does not match any of the standard|M|Jdrives known by this program.|M|J
# Next one is correct to not have |M|J or <32> on the end.
UnknownDriveType:Unknown Drive type
VerifyData:|MCyl=%0 Head=%1 Sector=%2<32>
Verifying:Verifying ..|M|J
WillFormat:|M|JDisc will be formatted as :|M|J          %0|M|J
WritingDefects:Writing defect list|M|J
WritingFreeSpace:Writing free space map|M|J
WritingMap:Writing map|M|J
WritingRootDir:Writing root directory|M|J
UserQuit:|M|JESCAPE pressed - HForm stopped|M|J
DiscSizeError:This disc is greater than 512M bytes in size but this version of ADFS only supports discs upto 512M bytes.
BootDefectError:Cannot map out defect at address &%0 (on top of boot block fragment)|M|J
MapDefectError:Cannot map out defect at address &%0 (on top of free space map fragment)|M|J

# Tokens used for recognised drive types. These may be translated, as the
# english versions are held in the program as well to allow auto recognition
# of IDE drives. First the IDE drives.

TypeCP3044:Conner Peripherals 40MB - CP3044   (2SA4.53 firmware)
TypeCP2044PK:Conner Peripherals 42MB - CP2044PK (1.14 firmware)
TypeCP2064:Conner Peripherals 63MB - CP2064   (1.14 firmware)
TypeCFS210A:Conner Peripherals 210MB - CFS210A
TypeCFS270A:Conner Peripherals 270MB - CFS270A
TypeCFS420A:Conner Peripherals 420MB - CFS420A
TypeCFS425A:Conner Peripherals 425MB - CFS425A
TypeCFS850A:Conner Peripherals 850MB - CFS850A

# Now standard ST506 drives.

Type8425:20Mb Miniscribe 8425
TypeRO3065:53Mb Rodime RO3065
TypeKL320:20Mb Kalok KL320

# Finally, the unknown drive type.

TypeOTHER:OTHER

# Tokens used for FNAsk().

AllocUnitAsk:Large file allocation unit ?
CylindersAsk:Cylinders ?
DriveAsk:Format which drive (4 - 7) ?
IDEHeadsAsk:Heads ?
InitAsk:Drive parameter init flag ?
LBAAsk:Drive LBA flag ?
LowCylinderAsk:Low current cylinder ?
ParkCylinderAsk:Parking cylinder ?
PrecompCylinderAsk:Precompensation cylinder ?
SectorsAsk:Sectors per track ?
ST506HeadsAsk:Heads ?

# Tokens used for FNInputDec().

CylinderDec:Cylinder (%0 to %1) ?
HeadDec:Head (%0 to %1) ?
IndexMFMDec:Bytes from index MFM (1 to %1), or -ve for sector (0 to %0) ?
ManufacturerDec:Which make of hard disc (%0 to %1) ?
SectorDec:Sector (%0 to %1) ?

# Tokens used for FNInputHex().

DiscAddrHex:Disc address in bytes &
LogicalAddrHex:Logical disc address in bytes &

# Tokens used for FNChoose() and FNchoose_no_string_lookup(). They should
# always come in pairs, the choices being second. The translated choice
# letters should be in the same order as their english equivalents in the
# token, as the program indexes into the translated choice letters.
# So for instance "(Long/Short/None)" in french might be "(Rien/Petit/Grand)"
# which is re-ordered, but the choices line following it would have to
# be "LSN:GPR". This is not actually a restriction, as the choices string
# is never printed. It is simply used to validate key presses and to translate
# to the english choices and defaults used by the program.

ABCDChoose:A,B,C or D ?
ABCD:ABCD
FormatOrInitChoose:Format or just initialise the drive (F/I) ?
FI:FI
OldNewMapChoose:Old or New map format (O/N) ?
ON:ON
RetainShapeChoose:Do you wish to retain this shape (Y/N) ?
YN:YN
SoakTestChoose:Soak test the hard disc for defects (Long/Short/None) ?
LSN:LSN
StandardShapeChoose:Do you wish to use the standard shape for this drive (Y/N) ?
# YN:YN - already exists above
SureChoose:Are you SURE you want to do this to drive ADFS:%0 (Y/N) ?
# YN:YN - already exists above.
UseShapeChoose:Do you wish to use this shape (Y/N) ?
# YN:YN - already exists above.
BootOptChoose:Do you wish this to be a bootable disc (Y/N)?
# YN:YN - already exists above.
00000000  23 20 21 48 46 6f 72 6d  20 6d 65 73 73 61 67 65  |# !HForm message|
00000010  73 20 66 69 6c 65 2e 20  41 6c 6c 20 6c 6f 6f 6b  |s file. All look|
00000020  75 70 73 20 61 72 65 20  64 6f 6e 65 20 77 69 74  |ups are done wit|
00000030  68 20 4d 65 73 73 61 67  65 54 72 61 6e 73 5f 47  |h MessageTrans_G|
00000040  53 4c 6f 6f 6b 75 70 2e  0a 0a 42 61 6e 6e 65 72  |SLookup...Banner|
00000050  3a 7c 4d 7c 4a 7c 4d 7c  4a 48 20 41 20 52 20 44  |:|M|J|M|JH A R D|
00000060  20 20 20 44 20 49 20 53  20 43 20 20 20 46 20 4f  |   D I S C   F O|
00000070  20 52 20 4d 20 41 20 54  20 54 20 45 20 52 20 20  | R M A T T E R  |
00000080  20 28 56 20 32 2e 34 34  20 32 34 20 4d 61 79 20  | (V 2.44 24 May |
00000090  39 35 29 7c 4d 7c 4a 7c  4d 7c 4a 0a 43 72 65 61  |95)|M|J|M|J.Crea|
000000a0  74 69 6e 67 4d 61 70 3a  43 72 65 61 74 69 6e 67  |tingMap:Creating|
000000b0  20 6d 61 70 7c 4d 7c 4a  0a 43 75 72 72 65 6e 74  | map|M|J.Current|
000000c0  44 65 66 65 63 74 73 3a  7c 4d 7c 4a 43 75 72 72  |Defects:|M|JCurr|
000000d0  65 6e 74 20 44 65 66 65  63 74 73 20 28 43 79 6c  |ent Defects (Cyl|
000000e0  69 6e 64 65 72 2c 48 65  61 64 2c 53 65 63 74 6f  |inder,Head,Secto|
000000f0  72 29 7c 4d 7c 4a 0a 44  46 6f 72 6d 61 74 44 65  |r)|M|J.DFormatDe|
00000100  66 65 63 74 31 3a 49 66  20 41 44 46 53 20 67 69  |fect1:If ADFS gi|
00000110  76 65 73 20 61 6e 20 65  72 72 6f 72 20 73 75 63  |ves an error suc|
00000120  68 20 61 73 20 27 44 69  73 63 20 65 72 72 6f 72  |h as 'Disc error|
00000130  20 31 33 20 61 74 20 3a  34 2f 30 30 30 31 32 41  | 13 at :4/00012A|
00000140  30 30 27 20 74 68 65 6e  20 30 30 30 31 32 41 30  |00' then 00012A0|
00000150  30 20 69 73 20 61 20 6c  6f 67 69 63 61 6c 20 64  |0 is a logical d|
00000160  69 73 63 20 61 64 64 72  65 73 73 2e 20 54 68 65  |isc address. The|
00000170  20 6c 6f 67 69 63 61 6c  20 74 6f 20 70 68 79 73  | logical to phys|
00000180  69 63 61 6c 20 64 69 73  63 20 61 64 64 72 65 73  |ical disc addres|
00000190  73 20 6d 61 70 70 69 6e  67 20 64 65 70 65 6e 64  |s mapping depend|
000001a0  73 20 6f 6e 20 74 68 65  20 64 65 66 65 63 74 20  |s on the defect |
000001b0  6c 69 73 74 2e 7c 4d 7c  4a 0a 44 46 6f 72 6d 61  |list.|M|J.DForma|
000001c0  74 44 65 66 65 63 74 32  3a 20 57 68 65 6e 20 74  |tDefect2: When t|
000001d0  68 65 73 65 20 64 65 66  65 63 74 73 20 61 72 65  |hese defects are|
000001e0  20 61 64 64 65 64 20 74  6f 20 74 68 65 20 64 65  | added to the de|
000001f0  66 65 63 74 20 6c 69 73  74 2c 20 69 74 20 69 73  |fect list, it is|
00000200  7c 4d 7c 4a 0a 44 46 6f  72 6d 61 74 44 65 66 65  ||M|J.DFormatDefe|
00000210  63 74 33 3a 69 6d 70 6f  72 74 61 6e 74 20 74 68  |ct3:important th|
00000220  61 74 20 74 68 65 79 20  61 72 65 20 61 64 64 65  |at they are adde|
00000230  64 20 69 6e 20 44 45 53  43 45 4e 44 49 4e 47 20  |d in DESCENDING |
00000240  6f 72 64 65 72 20 42 45  46 4f 52 45 20 74 68 65  |order BEFORE the|
00000250  20 6c 69 73 74 20 69 73  20 63 68 61 6e 67 65 64  | list is changed|
00000260  20 69 6e 20 61 6e 79 20  6f 74 68 65 72 20 77 61  | in any other wa|
00000270  79 21 7c 4d 7c 4a 0a 44  65 66 65 63 74 3a 64 65  |y!|M|J.Defect:de|
00000280  66 65 63 74 7c 4d 7c 4a  0a 44 65 66 65 63 74 41  |fect|M|J.DefectA|
00000290  64 64 3a 42 3a 20 61 64  64 20 64 65 66 65 63 74  |dd:B: add defect|
000002a0  20 62 79 20 63 79 6c 69  6e 64 65 72 2c 20 68 65  | by cylinder, he|
000002b0  61 64 2c 20 62 79 74 65  2f 73 65 63 74 6f 72 7c  |ad, byte/sector||
000002c0  4d 7c 4a 0a 44 65 66 65  63 74 41 64 64 44 69 73  |M|J.DefectAddDis|
000002d0  63 3a 43 3a 20 61 64 64  20 64 65 66 65 63 74 20  |c:C: add defect |
000002e0  62 79 20 64 69 73 63 20  61 64 64 72 65 73 73 7c  |by disc address||
000002f0  4d 7c 4a 0a 44 65 66 65  63 74 41 64 64 4c 6f 67  |M|J.DefectAddLog|
00000300  69 63 61 6c 3a 43 3a 20  61 64 64 20 64 65 66 65  |ical:C: add defe|
00000310  63 74 20 62 79 20 4c 4f  47 49 43 41 4c 20 64 69  |ct by LOGICAL di|
00000320  73 63 20 61 64 64 72 65  73 73 20 28 65 67 20 64  |sc address (eg d|
00000330  69 73 63 20 65 72 72 6f  72 29 7c 4d 7c 4a 0a 44  |isc error)|M|J.D|
00000340  65 66 65 63 74 4e 6f 4d  6f 72 65 3a 41 3a 20 6e  |efectNoMore:A: n|
00000350  6f 20 6d 6f 72 65 20 63  68 61 6e 67 65 73 20 74  |o more changes t|
00000360  6f 20 64 65 66 65 63 74  20 6c 69 73 74 7c 4d 7c  |o defect list|M||
00000370  4a 0a 44 65 66 65 63 74  52 65 6d 6f 76 65 3a 44  |J.DefectRemove:D|
00000380  3a 20 72 65 6d 6f 76 65  20 64 65 66 65 63 74 7c  |: remove defect||
00000390  4d 7c 4a 0a 44 65 66 65  63 74 54 49 4d 45 3a 64  |M|J.DefectTIME:d|
000003a0  65 66 65 63 74 20 25 30  7c 4d 7c 4a 0a 44 69 73  |efect %0|M|J.Dis|
000003b0  63 49 64 45 72 72 6f 72  3a 43 61 6e 6e 6f 74 20  |cIdError:Cannot |
000003c0  72 65 61 64 20 64 69 73  63 20 69 64 65 6e 74 69  |read disc identi|
000003d0  74 79 3a 20 64 69 73 63  20 65 72 72 6f 72 20 26  |ty: disc error &|
000003e0  25 30 7c 4d 7c 4a 0a 44  72 69 76 65 44 69 73 63  |%0|M|J.DriveDisc|
000003f0  6c 61 69 6d 3a 7c 4d 7c  4a 50 72 6f 76 69 73 69  |laim:|M|JProvisi|
00000400  6f 6e 20 66 6f 72 20 61  20 67 69 76 65 6e 20 64  |on for a given d|
00000410  72 69 76 65 20 74 79 70  65 20 69 6e 20 74 68 69  |rive type in thi|
00000420  73 20 6c 69 73 74 20 64  6f 65 73 20 6e 6f 74 20  |s list does not |
00000430  69 6d 70 6c 79 7c 4d 7c  4a 74 68 61 74 20 74 68  |imply|M|Jthat th|
00000440  65 20 64 72 69 76 65 20  69 73 20 73 75 69 74 61  |e drive is suita|
00000450  62 6c 65 20 66 6f 72 20  75 73 65 20 69 6e 20 41  |ble for use in A|
00000460  63 6f 72 6e 20 65 71 75  69 70 6d 65 6e 74 7c 4d  |corn equipment|M|
00000470  7c 4a 7c 4a 0a 44 72 69  76 65 49 73 49 44 45 3a  ||J|J.DriveIsIDE:|
00000480  44 72 69 76 65 20 25 30  20 69 73 20 61 6e 20 49  |Drive %0 is an I|
00000490  44 45 20 64 72 69 76 65  7c 4d 7c 4a 7c 4a 0a 49  |DE drive|M|J|J.I|
000004a0  44 45 48 61 73 4c 42 41  3a 54 68 69 73 20 64 72  |DEHasLBA:This dr|
000004b0  69 76 65 20 73 75 70 70  6f 72 74 73 20 74 68 65  |ive supports the|
000004c0  20 4c 42 41 20 28 4c 6f  67 69 63 61 6c 20 42 6c  | LBA (Logical Bl|
000004d0  6f 63 6b 20 41 64 64 72  65 73 73 29 20 6f 70 74  |ock Address) opt|
000004e0  69 6f 6e 2e 7c 4d 7c 4a  0a 44 72 69 76 65 49 73  |ion.|M|J.DriveIs|
000004f0  53 54 35 30 36 3a 44 72  69 76 65 20 25 30 20 69  |ST506:Drive %0 i|
00000500  73 20 61 6e 20 53 54 35  30 36 20 64 72 69 76 65  |s an ST506 drive|
00000510  7c 4d 7c 4a 7c 4a 0a 44  72 69 76 65 4e 6f 74 50  ||M|J|J.DriveNotP|
00000520  72 65 73 65 6e 74 3a 44  72 69 76 65 20 25 30 20  |resent:Drive %0 |
00000530  69 73 20 6e 6f 74 20 70  72 65 73 65 6e 74 7c 4d  |is not present|M|
00000540  7c 4a 0a 45 72 72 6f 72  3a 45 72 72 6f 72 20 26  ||J.Error:Error &|
00000550  25 30 7c 4d 7c 4a 0a 45  52 52 4f 52 31 3a 50 52  |%0|M|J.ERROR1:PR|
00000560  4f 47 52 41 4d 20 45 52  52 4f 52 20 31 7c 4d 7c  |OGRAM ERROR 1|M||
00000570  4a 0a 45 52 52 4f 52 32  3a 50 52 4f 47 52 41 4d  |J.ERROR2:PROGRAM|
00000580  20 45 52 52 4f 52 20 32  7c 4d 7c 4a 0a 45 52 52  | ERROR 2|M|J.ERR|
00000590  4f 52 33 3a 50 52 4f 47  52 41 4d 20 45 52 52 4f  |OR3:PROGRAM ERRO|
000005a0  52 20 33 7c 4d 7c 4a 0a  45 52 52 4f 52 34 3a 50  |R 3|M|J.ERROR4:P|
000005b0  52 4f 47 52 41 4d 20 45  52 52 4f 52 20 34 7c 4d  |ROGRAM ERROR 4|M|
000005c0  7c 4a 0a 45 78 69 73 74  69 6e 67 44 65 66 65 63  ||J.ExistingDefec|
000005d0  74 3a 44 65 66 65 63 74  20 61 6c 72 65 61 64 79  |t:Defect already|
000005e0  20 69 6e 20 64 65 66 65  63 74 20 6c 69 73 74 7c  | in defect list||
000005f0  4d 7c 4a 0a 46 61 69 6c  65 64 41 75 74 6f 3a 41  |M|J.FailedAuto:A|
00000600  75 74 6f 6d 61 74 69 63  20 6f 70 65 72 61 74 69  |utomatic operati|
00000610  6f 6e 20 66 61 69 6c 65  64 20 3a 20 75 6e 65 78  |on failed : unex|
00000620  70 65 63 74 65 64 20 71  75 65 72 79 20 25 30 20  |pected query %0 |
00000630  2d 20 25 31 7c 4d 7c 4a  0a 46 6f 72 6d 61 74 74  |- %1|M|J.Formatt|
00000640  69 6e 67 3a 46 6f 72 6d  61 74 74 69 6e 67 7c 4d  |ing:Formatting|M|
00000650  7c 4a 0a 46 6f 72 6d 61  74 45 72 72 6f 72 3a 20  ||J.FormatError: |
00000660  66 6f 72 6d 61 74 20 65  72 72 6f 72 20 6f 6e 20  |format error on |
00000670  74 68 69 73 20 74 72 61  63 6b 7c 4d 7c 4a 0a 46  |this track|M|J.F|
00000680  75 6c 6c 44 65 66 65 63  74 4c 69 73 74 3a 44 65  |ullDefectList:De|
00000690  66 65 63 74 20 6c 69 73  74 20 66 75 6c 6c 7c 4d  |fect list full|M|
000006a0  7c 4a 0a 48 46 6f 72 6d  46 61 69 6c 65 64 3a 7c  ||J.HFormFailed:||
000006b0  4d 7c 4a 48 46 4f 52 4d  20 66 61 69 6c 65 64 3a  |M|JHFORM failed:|
000006c0  20 25 30 20 61 74 20 6c  69 6e 65 20 25 31 7c 4d  | %0 at line %1|M|
000006d0  7c 4a 0a 49 44 45 43 6f  6e 66 69 67 75 72 61 74  ||J.IDEConfigurat|
000006e0  69 6f 6e 3a 43 6f 6e 66  69 67 75 72 61 74 69 6f  |ion:Configuratio|
000006f0  6e 20 20 20 20 3a 20 25  30 20 63 79 6c 69 6e 64  |n    : %0 cylind|
00000700  65 72 73 2c 20 25 31 20  68 65 61 64 73 20 61 6e  |ers, %1 heads an|
00000710  64 20 25 32 20 73 65 63  74 6f 72 73 2f 74 72 61  |d %2 sectors/tra|
00000720  63 6b 7c 4d 7c 4a 7c 4a  0a 49 44 45 44 65 73 63  |ck|M|J|J.IDEDesc|
00000730  72 69 70 74 69 6f 6e 3a  49 44 45 20 64 72 69 76  |ription:IDE driv|
00000740  65 20 41 44 46 53 3a 25  30 20 69 64 65 6e 74 69  |e ADFS:%0 identi|
00000750  66 69 65 73 20 69 74 73  65 6c 66 20 61 73 20 3a  |fies itself as :|
00000760  7c 4d 7c 4a 44 65 73 63  72 69 70 74 69 6f 6e 20  ||M|JDescription |
00000770  20 20 20 20 20 3a 20 25  31 7c 4d 7c 4a 46 69 72  |     : %1|M|JFir|
00000780  6d 77 61 72 65 20 76 65  72 73 69 6f 6e 20 3a 20  |mware version : |
00000790  25 32 7c 4d 7c 4a 0a 49  44 45 48 65 61 64 73 31  |%2|M|J.IDEHeads1|
000007a0  36 3a 49 44 45 20 64 72  69 76 65 73 20 63 61 6e  |6:IDE drives can|
000007b0  6e 6f 74 20 68 61 76 65  20 6d 6f 72 65 20 74 68  |not have more th|
000007c0  61 6e 20 31 36 20 68 65  61 64 73 7c 4d 7c 4a 0a  |an 16 heads|M|J.|
000007d0  49 6e 76 61 6c 69 64 41  6c 6c 6f 63 53 69 7a 65  |InvalidAllocSize|
000007e0  3a 43 61 6e 27 74 20 75  73 65 20 74 68 69 73 20  |:Can't use this |
000007f0  61 6c 6c 6f 63 61 74 69  6f 6e 20 73 69 7a 65 7c  |allocation size||
00000800  4d 7c 4a 0a 4d 61 6b 65  4d 65 6e 75 3a 25 30 2e  |M|J.MakeMenu:%0.|
00000810  20 25 31 7c 4d 7c 4a 0a  4d 69 73 73 69 6e 67 44  | %1|M|J.MissingD|
00000820  65 66 65 63 74 3a 44 65  66 65 63 74 20 6e 6f 74  |efect:Defect not|
00000830  20 69 6e 20 64 65 66 65  63 74 20 6c 69 73 74 7c  | in defect list||
00000840  4d 7c 4a 0a 44 65 66 65  63 74 54 6f 6f 42 69 67  |M|J.DefectTooBig|
00000850  3a 44 65 66 65 63 74 20  69 73 20 62 65 79 6f 6e  |:Defect is beyon|
00000860  64 20 65 6e 64 20 6f 66  20 64 69 73 63 7c 4d 7c  |d end of disc|M||
00000870  4a 0a 4e 6f 41 44 46 53  3a 4e 6f 20 41 44 46 53  |J.NoADFS:No ADFS|
00000880  20 6d 6f 64 75 6c 65 7c  4d 7c 4a 0a 4e 6f 48 61  | module|M|J.NoHa|
00000890  72 64 44 69 73 63 73 3a  4e 6f 20 68 61 72 64 20  |rdDiscs:No hard |
000008a0  64 69 73 63 73 20 63 6f  6e 66 69 67 75 72 65 64  |discs configured|
000008b0  7c 4d 7c 4a 0a 4e 6f 6e  53 74 61 6e 64 61 72 64  ||M|J.NonStandard|
000008c0  53 68 61 70 65 3a 54 68  69 73 20 64 69 73 63 20  |Shape:This disc |
000008d0  77 61 73 20 6c 61 73 74  20 66 6f 72 6d 61 74 74  |was last formatt|
000008e0  65 64 20 75 73 69 6e 67  20 74 68 65 20 6e 6f 6e  |ed using the non|
000008f0  2d 73 74 61 6e 64 61 72  64 20 64 69 73 63 20 73  |-standard disc s|
00000900  68 61 70 65 20 3a 7c 4d  7c 4a 0a 4e 6f 56 61 6c  |hape :|M|J.NoVal|
00000910  69 64 46 6f 72 6d 61 74  3a 54 68 69 73 20 64 72  |idFormat:This dr|
00000920  69 76 65 20 64 6f 65 73  20 6e 6f 74 20 63 75 72  |ive does not cur|
00000930  72 65 6e 74 6c 79 20 68  61 76 65 20 61 20 76 61  |rently have a va|
00000940  6c 69 64 20 41 44 46 53  20 66 6f 72 6d 61 74 2e  |lid ADFS format.|
00000950  7c 4d 7c 4a 0a 4f 70 45  72 72 6f 72 3a 7c 22 20  ||M|J.OpError:|" |
00000960  2d 20 65 72 72 6f 72 20  6e 75 6d 62 65 72 20 26  |- error number &|
00000970  25 31 29 7c 4d 7c 4a 0a  50 61 74 74 65 72 6e 3a  |%1)|M|J.Pattern:|
00000980  57 72 69 74 69 6e 67 20  70 61 74 74 65 72 6e 20  |Writing pattern |
00000990  26 25 30 7c 4d 7c 4a 0a  50 72 65 73 73 4b 65 79  |&%0|M|J.PressKey|
000009a0  3a 50 72 65 73 73 20 52  65 74 75 72 6e 20 74 6f  |:Press Return to|
000009b0  20 63 6f 6e 74 69 6e 75  65 3c 33 32 3e 0a 50 72  | continue<32>.Pr|
000009c0  69 6e 74 53 68 61 70 65  3a 22 20 20 20 20 20 20  |intShape:"      |
000009d0  20 20 20 20 25 30 20 43  79 6c 69 6e 64 65 72 73  |    %0 Cylinders|
000009e0  2c 20 25 31 20 48 65 61  64 73 20 61 6e 64 20 25  |, %1 Heads and %|
000009f0  32 20 53 65 63 74 6f 72  73 2f 54 72 61 63 6b 7c  |2 Sectors/Track||
00000a00  4d 7c 4a 22 0a 50 72 69  6e 74 53 68 61 70 65 33  |M|J".PrintShape3|
00000a10  49 44 45 3a 22 20 20 20  20 20 20 20 20 20 20 50  |IDE:"          P|
00000a20  61 72 6b 69 6e 67 20 63  79 6c 69 6e 64 65 72 20  |arking cylinder |
00000a30  25 30 2c 20 49 6e 69 74  69 61 6c 69 73 61 74 69  |%0, Initialisati|
00000a40  6f 6e 20 66 6c 61 67 20  25 31 2c 20 4c 42 41 20  |on flag %1, LBA |
00000a50  66 6c 61 67 20 25 32 7c  4d 7c 4a 22 0a 50 72 69  |flag %2|M|J".Pri|
00000a60  6e 74 53 68 61 70 65 32  53 54 35 30 36 3a 22 20  |ntShape2ST506:" |
00000a70  20 20 20 20 20 20 20 20  20 50 61 72 6b 69 6e 67  |         Parking|
00000a80  20 63 79 6c 69 6e 64 65  72 20 25 30 2c 20 52 57  | cylinder %0, RW|
00000a90  43 20 25 31 2c 20 57 50  43 20 25 32 7c 4d 7c 4a  |C %1, WPC %2|M|J|
00000aa0  22 0a 52 65 74 72 69 65  73 3a 25 30 20 72 65 74  |".Retries:%0 ret|
00000ab0  72 69 65 73 20 6e 65 65  64 65 64 7c 4d 7c 4a 0a  |ries needed|M|J.|
00000ac0  53 69 6c 6c 79 44 69 73  63 4e 75 6d 3a 54 68 69  |SillyDiscNum:Thi|
00000ad0  73 20 6d 61 63 68 69 6e  65 20 68 61 73 20 61 20  |s machine has a |
00000ae0  74 6f 74 61 6c 20 6f 66  20 25 30 20 68 61 72 64  |total of %0 hard|
00000af0  20 64 69 73 63 73 20 63  6f 6e 66 69 67 75 72 65  | discs configure|
00000b00  64 2e 7c 4d 7c 4a 50 6c  65 61 73 65 20 63 68 65  |d.|M|JPlease che|
00000b10  63 6b 2f 61 6c 74 65 72  20 74 68 65 20 63 6f 6e  |ck/alter the con|
00000b20  66 69 67 75 72 61 74 69  6f 6e 20 61 6e 64 20 72  |figuration and r|
00000b30  65 2d 72 75 6e 7c 4d 7c  4a 74 68 69 73 20 70 72  |e-run|M|Jthis pr|
00000b40  6f 67 72 61 6d 2e 7c 4d  7c 4a 0a 53 6f 61 6b 50  |ogram.|M|J.SoakP|
00000b50  72 6f 6d 70 74 3a 7c 4d  7c 4a 50 52 45 53 53 49  |rompt:|M|JPRESSI|
00000b60  4e 47 20 54 48 45 20 53  50 41 43 45 20 42 41 52  |NG THE SPACE BAR|
00000b70  20 57 49 4c 4c 20 43 41  55 53 45 20 54 48 45 20  | WILL CAUSE THE |
00000b80  53 4f 41 4b 20 54 45 53  54 20 54 4f 20 45 4e 44  |SOAK TEST TO END|
00000b90  20 41 54 20 54 48 45 20  45 4e 44 20 4f 46 20 54  | AT THE END OF T|
00000ba0  48 41 54 20 43 59 43 4c  45 7c 4d 7c 4a 0a 53 54  |HAT CYCLE|M|J.ST|
00000bb0  35 30 36 48 65 61 64 73  38 3a 7c 4d 7c 4a 57 41  |506Heads8:|M|JWA|
00000bc0  52 4e 49 4e 47 20 2d 20  73 69 6e 63 65 20 74 68  |RNING - since th|
00000bd0  65 20 64 72 69 76 65 20  68 61 73 20 6d 6f 72 65  |e drive has more|
00000be0  20 74 68 61 6e 20 38 20  68 65 61 64 73 2c 20 74  | than 8 heads, t|
00000bf0  68 65 20 63 6f 6d 70 75  74 65 72 27 73 7c 4d 7c  |he computer's|M||
00000c00  4a 20 20 20 20 20 20 20  20 20 20 27 6c 6f 77 20  |J          'low |
00000c10  77 72 69 74 65 20 63 75  72 72 65 6e 74 2f 68 65  |write current/he|
00000c20  61 64 20 73 65 6c 65 63  74 20 33 27 20 6c 69 6e  |ad select 3' lin|
00000c30  6b 73 20 6d 61 79 20 6e  65 65 64 20 63 68 61 6e  |ks may need chan|
00000c40  67 69 6e 67 2e 7c 4d 7c  4a 0a 53 74 61 6e 64 61  |ging.|M|J.Standa|
00000c50  72 64 53 68 61 70 65 3a  54 68 69 73 20 64 69 73  |rdShape:This dis|
00000c60  63 20 77 61 73 20 6c 61  73 74 20 66 6f 72 6d 61  |c was last forma|
00000c70  74 74 65 64 20 75 73 69  6e 67 20 74 68 65 20 73  |tted using the s|
00000c80  74 61 6e 64 61 72 64 20  73 68 61 70 65 20 3a 7c  |tandard shape :||
00000c90  4d 7c 4a 7c 4d 7c 4a 20  20 20 20 20 20 20 20 20  |M|J|M|J         |
00000ca0  20 25 30 7c 4d 7c 4a 0a  54 6f 6f 53 6d 61 6c 6c  | %0|M|J.TooSmall|
00000cb0  41 6c 6c 6f 63 3a 41 6c  6c 6f 63 61 74 69 6f 6e  |Alloc:Allocation|
00000cc0  20 75 6e 69 74 20 74 6f  6f 20 73 6d 61 6c 6c 7c  | unit too small||
00000cd0  4d 7c 4a 0a 55 6e 6b 6e  6f 77 6e 44 72 69 76 65  |M|J.UnknownDrive|
00000ce0  4d 61 6b 65 3a 54 68 65  20 64 72 69 76 65 20 74  |Make:The drive t|
00000cf0  79 70 65 20 64 6f 65 73  20 6e 6f 74 20 6d 61 74  |ype does not mat|
00000d00  63 68 20 61 6e 79 20 6f  66 20 74 68 65 20 73 74  |ch any of the st|
00000d10  61 6e 64 61 72 64 7c 4d  7c 4a 64 72 69 76 65 73  |andard|M|Jdrives|
00000d20  20 6b 6e 6f 77 6e 20 62  79 20 74 68 69 73 20 70  | known by this p|
00000d30  72 6f 67 72 61 6d 2e 7c  4d 7c 4a 0a 23 20 4e 65  |rogram.|M|J.# Ne|
00000d40  78 74 20 6f 6e 65 20 69  73 20 63 6f 72 72 65 63  |xt one is correc|
00000d50  74 20 74 6f 20 6e 6f 74  20 68 61 76 65 20 7c 4d  |t to not have |M|
00000d60  7c 4a 20 6f 72 20 3c 33  32 3e 20 6f 6e 20 74 68  ||J or <32> on th|
00000d70  65 20 65 6e 64 2e 0a 55  6e 6b 6e 6f 77 6e 44 72  |e end..UnknownDr|
00000d80  69 76 65 54 79 70 65 3a  55 6e 6b 6e 6f 77 6e 20  |iveType:Unknown |
00000d90  44 72 69 76 65 20 74 79  70 65 0a 56 65 72 69 66  |Drive type.Verif|
00000da0  79 44 61 74 61 3a 7c 4d  43 79 6c 3d 25 30 20 48  |yData:|MCyl=%0 H|
00000db0  65 61 64 3d 25 31 20 53  65 63 74 6f 72 3d 25 32  |ead=%1 Sector=%2|
00000dc0  3c 33 32 3e 0a 56 65 72  69 66 79 69 6e 67 3a 56  |<32>.Verifying:V|
00000dd0  65 72 69 66 79 69 6e 67  20 2e 2e 7c 4d 7c 4a 0a  |erifying ..|M|J.|
00000de0  57 69 6c 6c 46 6f 72 6d  61 74 3a 7c 4d 7c 4a 44  |WillFormat:|M|JD|
00000df0  69 73 63 20 77 69 6c 6c  20 62 65 20 66 6f 72 6d  |isc will be form|
00000e00  61 74 74 65 64 20 61 73  20 3a 7c 4d 7c 4a 20 20  |atted as :|M|J  |
00000e10  20 20 20 20 20 20 20 20  25 30 7c 4d 7c 4a 0a 57  |        %0|M|J.W|
00000e20  72 69 74 69 6e 67 44 65  66 65 63 74 73 3a 57 72  |ritingDefects:Wr|
00000e30  69 74 69 6e 67 20 64 65  66 65 63 74 20 6c 69 73  |iting defect lis|
00000e40  74 7c 4d 7c 4a 0a 57 72  69 74 69 6e 67 46 72 65  |t|M|J.WritingFre|
00000e50  65 53 70 61 63 65 3a 57  72 69 74 69 6e 67 20 66  |eSpace:Writing f|
00000e60  72 65 65 20 73 70 61 63  65 20 6d 61 70 7c 4d 7c  |ree space map|M||
00000e70  4a 0a 57 72 69 74 69 6e  67 4d 61 70 3a 57 72 69  |J.WritingMap:Wri|
00000e80  74 69 6e 67 20 6d 61 70  7c 4d 7c 4a 0a 57 72 69  |ting map|M|J.Wri|
00000e90  74 69 6e 67 52 6f 6f 74  44 69 72 3a 57 72 69 74  |tingRootDir:Writ|
00000ea0  69 6e 67 20 72 6f 6f 74  20 64 69 72 65 63 74 6f  |ing root directo|
00000eb0  72 79 7c 4d 7c 4a 0a 55  73 65 72 51 75 69 74 3a  |ry|M|J.UserQuit:|
00000ec0  7c 4d 7c 4a 45 53 43 41  50 45 20 70 72 65 73 73  ||M|JESCAPE press|
00000ed0  65 64 20 2d 20 48 46 6f  72 6d 20 73 74 6f 70 70  |ed - HForm stopp|
00000ee0  65 64 7c 4d 7c 4a 0a 44  69 73 63 53 69 7a 65 45  |ed|M|J.DiscSizeE|
00000ef0  72 72 6f 72 3a 54 68 69  73 20 64 69 73 63 20 69  |rror:This disc i|
00000f00  73 20 67 72 65 61 74 65  72 20 74 68 61 6e 20 35  |s greater than 5|
00000f10  31 32 4d 20 62 79 74 65  73 20 69 6e 20 73 69 7a  |12M bytes in siz|
00000f20  65 20 62 75 74 20 74 68  69 73 20 76 65 72 73 69  |e but this versi|
00000f30  6f 6e 20 6f 66 20 41 44  46 53 20 6f 6e 6c 79 20  |on of ADFS only |
00000f40  73 75 70 70 6f 72 74 73  20 64 69 73 63 73 20 75  |supports discs u|
00000f50  70 74 6f 20 35 31 32 4d  20 62 79 74 65 73 2e 0a  |pto 512M bytes..|
00000f60  42 6f 6f 74 44 65 66 65  63 74 45 72 72 6f 72 3a  |BootDefectError:|
00000f70  43 61 6e 6e 6f 74 20 6d  61 70 20 6f 75 74 20 64  |Cannot map out d|
00000f80  65 66 65 63 74 20 61 74  20 61 64 64 72 65 73 73  |efect at address|
00000f90  20 26 25 30 20 28 6f 6e  20 74 6f 70 20 6f 66 20  | &%0 (on top of |
00000fa0  62 6f 6f 74 20 62 6c 6f  63 6b 20 66 72 61 67 6d  |boot block fragm|
00000fb0  65 6e 74 29 7c 4d 7c 4a  0a 4d 61 70 44 65 66 65  |ent)|M|J.MapDefe|
00000fc0  63 74 45 72 72 6f 72 3a  43 61 6e 6e 6f 74 20 6d  |ctError:Cannot m|
00000fd0  61 70 20 6f 75 74 20 64  65 66 65 63 74 20 61 74  |ap out defect at|
00000fe0  20 61 64 64 72 65 73 73  20 26 25 30 20 28 6f 6e  | address &%0 (on|
00000ff0  20 74 6f 70 20 6f 66 20  66 72 65 65 20 73 70 61  | top of free spa|
00001000  63 65 20 6d 61 70 20 66  72 61 67 6d 65 6e 74 29  |ce map fragment)|
00001010  7c 4d 7c 4a 0a 0a 23 20  54 6f 6b 65 6e 73 20 75  ||M|J..# Tokens u|
00001020  73 65 64 20 66 6f 72 20  72 65 63 6f 67 6e 69 73  |sed for recognis|
00001030  65 64 20 64 72 69 76 65  20 74 79 70 65 73 2e 20  |ed drive types. |
00001040  54 68 65 73 65 20 6d 61  79 20 62 65 20 74 72 61  |These may be tra|
00001050  6e 73 6c 61 74 65 64 2c  20 61 73 20 74 68 65 0a  |nslated, as the.|
00001060  23 20 65 6e 67 6c 69 73  68 20 76 65 72 73 69 6f  |# english versio|
00001070  6e 73 20 61 72 65 20 68  65 6c 64 20 69 6e 20 74  |ns are held in t|
00001080  68 65 20 70 72 6f 67 72  61 6d 20 61 73 20 77 65  |he program as we|
00001090  6c 6c 20 74 6f 20 61 6c  6c 6f 77 20 61 75 74 6f  |ll to allow auto|
000010a0  20 72 65 63 6f 67 6e 69  74 69 6f 6e 0a 23 20 6f  | recognition.# o|
000010b0  66 20 49 44 45 20 64 72  69 76 65 73 2e 20 46 69  |f IDE drives. Fi|
000010c0  72 73 74 20 74 68 65 20  49 44 45 20 64 72 69 76  |rst the IDE driv|
000010d0  65 73 2e 0a 0a 54 79 70  65 43 50 33 30 34 34 3a  |es...TypeCP3044:|
000010e0  43 6f 6e 6e 65 72 20 50  65 72 69 70 68 65 72 61  |Conner Periphera|
000010f0  6c 73 20 34 30 4d 42 20  2d 20 43 50 33 30 34 34  |ls 40MB - CP3044|
00001100  20 20 20 28 32 53 41 34  2e 35 33 20 66 69 72 6d  |   (2SA4.53 firm|
00001110  77 61 72 65 29 0a 54 79  70 65 43 50 32 30 34 34  |ware).TypeCP2044|
00001120  50 4b 3a 43 6f 6e 6e 65  72 20 50 65 72 69 70 68  |PK:Conner Periph|
00001130  65 72 61 6c 73 20 34 32  4d 42 20 2d 20 43 50 32  |erals 42MB - CP2|
00001140  30 34 34 50 4b 20 28 31  2e 31 34 20 66 69 72 6d  |044PK (1.14 firm|
00001150  77 61 72 65 29 0a 54 79  70 65 43 50 32 30 36 34  |ware).TypeCP2064|
00001160  3a 43 6f 6e 6e 65 72 20  50 65 72 69 70 68 65 72  |:Conner Peripher|
00001170  61 6c 73 20 36 33 4d 42  20 2d 20 43 50 32 30 36  |als 63MB - CP206|
00001180  34 20 20 20 28 31 2e 31  34 20 66 69 72 6d 77 61  |4   (1.14 firmwa|
00001190  72 65 29 0a 54 79 70 65  43 46 53 32 31 30 41 3a  |re).TypeCFS210A:|
000011a0  43 6f 6e 6e 65 72 20 50  65 72 69 70 68 65 72 61  |Conner Periphera|
000011b0  6c 73 20 32 31 30 4d 42  20 2d 20 43 46 53 32 31  |ls 210MB - CFS21|
000011c0  30 41 0a 54 79 70 65 43  46 53 32 37 30 41 3a 43  |0A.TypeCFS270A:C|
000011d0  6f 6e 6e 65 72 20 50 65  72 69 70 68 65 72 61 6c  |onner Peripheral|
000011e0  73 20 32 37 30 4d 42 20  2d 20 43 46 53 32 37 30  |s 270MB - CFS270|
000011f0  41 0a 54 79 70 65 43 46  53 34 32 30 41 3a 43 6f  |A.TypeCFS420A:Co|
00001200  6e 6e 65 72 20 50 65 72  69 70 68 65 72 61 6c 73  |nner Peripherals|
00001210  20 34 32 30 4d 42 20 2d  20 43 46 53 34 32 30 41  | 420MB - CFS420A|
00001220  0a 54 79 70 65 43 46 53  34 32 35 41 3a 43 6f 6e  |.TypeCFS425A:Con|
00001230  6e 65 72 20 50 65 72 69  70 68 65 72 61 6c 73 20  |ner Peripherals |
00001240  34 32 35 4d 42 20 2d 20  43 46 53 34 32 35 41 0a  |425MB - CFS425A.|
00001250  54 79 70 65 43 46 53 38  35 30 41 3a 43 6f 6e 6e  |TypeCFS850A:Conn|
00001260  65 72 20 50 65 72 69 70  68 65 72 61 6c 73 20 38  |er Peripherals 8|
00001270  35 30 4d 42 20 2d 20 43  46 53 38 35 30 41 0a 0a  |50MB - CFS850A..|
00001280  23 20 4e 6f 77 20 73 74  61 6e 64 61 72 64 20 53  |# Now standard S|
00001290  54 35 30 36 20 64 72 69  76 65 73 2e 0a 0a 54 79  |T506 drives...Ty|
000012a0  70 65 38 34 32 35 3a 32  30 4d 62 20 4d 69 6e 69  |pe8425:20Mb Mini|
000012b0  73 63 72 69 62 65 20 38  34 32 35 0a 54 79 70 65  |scribe 8425.Type|
000012c0  52 4f 33 30 36 35 3a 35  33 4d 62 20 52 6f 64 69  |RO3065:53Mb Rodi|
000012d0  6d 65 20 52 4f 33 30 36  35 0a 54 79 70 65 4b 4c  |me RO3065.TypeKL|
000012e0  33 32 30 3a 32 30 4d 62  20 4b 61 6c 6f 6b 20 4b  |320:20Mb Kalok K|
000012f0  4c 33 32 30 0a 0a 23 20  46 69 6e 61 6c 6c 79 2c  |L320..# Finally,|
00001300  20 74 68 65 20 75 6e 6b  6e 6f 77 6e 20 64 72 69  | the unknown dri|
00001310  76 65 20 74 79 70 65 2e  0a 0a 54 79 70 65 4f 54  |ve type...TypeOT|
00001320  48 45 52 3a 4f 54 48 45  52 0a 0a 23 20 54 6f 6b  |HER:OTHER..# Tok|
00001330  65 6e 73 20 75 73 65 64  20 66 6f 72 20 46 4e 41  |ens used for FNA|
00001340  73 6b 28 29 2e 0a 0a 41  6c 6c 6f 63 55 6e 69 74  |sk()...AllocUnit|
00001350  41 73 6b 3a 4c 61 72 67  65 20 66 69 6c 65 20 61  |Ask:Large file a|
00001360  6c 6c 6f 63 61 74 69 6f  6e 20 75 6e 69 74 20 3f  |llocation unit ?|
00001370  0a 43 79 6c 69 6e 64 65  72 73 41 73 6b 3a 43 79  |.CylindersAsk:Cy|
00001380  6c 69 6e 64 65 72 73 20  3f 0a 44 72 69 76 65 41  |linders ?.DriveA|
00001390  73 6b 3a 46 6f 72 6d 61  74 20 77 68 69 63 68 20  |sk:Format which |
000013a0  64 72 69 76 65 20 28 34  20 2d 20 37 29 20 3f 0a  |drive (4 - 7) ?.|
000013b0  49 44 45 48 65 61 64 73  41 73 6b 3a 48 65 61 64  |IDEHeadsAsk:Head|
000013c0  73 20 3f 0a 49 6e 69 74  41 73 6b 3a 44 72 69 76  |s ?.InitAsk:Driv|
000013d0  65 20 70 61 72 61 6d 65  74 65 72 20 69 6e 69 74  |e parameter init|
000013e0  20 66 6c 61 67 20 3f 0a  4c 42 41 41 73 6b 3a 44  | flag ?.LBAAsk:D|
000013f0  72 69 76 65 20 4c 42 41  20 66 6c 61 67 20 3f 0a  |rive LBA flag ?.|
00001400  4c 6f 77 43 79 6c 69 6e  64 65 72 41 73 6b 3a 4c  |LowCylinderAsk:L|
00001410  6f 77 20 63 75 72 72 65  6e 74 20 63 79 6c 69 6e  |ow current cylin|
00001420  64 65 72 20 3f 0a 50 61  72 6b 43 79 6c 69 6e 64  |der ?.ParkCylind|
00001430  65 72 41 73 6b 3a 50 61  72 6b 69 6e 67 20 63 79  |erAsk:Parking cy|
00001440  6c 69 6e 64 65 72 20 3f  0a 50 72 65 63 6f 6d 70  |linder ?.Precomp|
00001450  43 79 6c 69 6e 64 65 72  41 73 6b 3a 50 72 65 63  |CylinderAsk:Prec|
00001460  6f 6d 70 65 6e 73 61 74  69 6f 6e 20 63 79 6c 69  |ompensation cyli|
00001470  6e 64 65 72 20 3f 0a 53  65 63 74 6f 72 73 41 73  |nder ?.SectorsAs|
00001480  6b 3a 53 65 63 74 6f 72  73 20 70 65 72 20 74 72  |k:Sectors per tr|
00001490  61 63 6b 20 3f 0a 53 54  35 30 36 48 65 61 64 73  |ack ?.ST506Heads|
000014a0  41 73 6b 3a 48 65 61 64  73 20 3f 0a 0a 23 20 54  |Ask:Heads ?..# T|
000014b0  6f 6b 65 6e 73 20 75 73  65 64 20 66 6f 72 20 46  |okens used for F|
000014c0  4e 49 6e 70 75 74 44 65  63 28 29 2e 0a 0a 43 79  |NInputDec()...Cy|
000014d0  6c 69 6e 64 65 72 44 65  63 3a 43 79 6c 69 6e 64  |linderDec:Cylind|
000014e0  65 72 20 28 25 30 20 74  6f 20 25 31 29 20 3f 0a  |er (%0 to %1) ?.|
000014f0  48 65 61 64 44 65 63 3a  48 65 61 64 20 28 25 30  |HeadDec:Head (%0|
00001500  20 74 6f 20 25 31 29 20  3f 0a 49 6e 64 65 78 4d  | to %1) ?.IndexM|
00001510  46 4d 44 65 63 3a 42 79  74 65 73 20 66 72 6f 6d  |FMDec:Bytes from|
00001520  20 69 6e 64 65 78 20 4d  46 4d 20 28 31 20 74 6f  | index MFM (1 to|
00001530  20 25 31 29 2c 20 6f 72  20 2d 76 65 20 66 6f 72  | %1), or -ve for|
00001540  20 73 65 63 74 6f 72 20  28 30 20 74 6f 20 25 30  | sector (0 to %0|
00001550  29 20 3f 0a 4d 61 6e 75  66 61 63 74 75 72 65 72  |) ?.Manufacturer|
00001560  44 65 63 3a 57 68 69 63  68 20 6d 61 6b 65 20 6f  |Dec:Which make o|
00001570  66 20 68 61 72 64 20 64  69 73 63 20 28 25 30 20  |f hard disc (%0 |
00001580  74 6f 20 25 31 29 20 3f  0a 53 65 63 74 6f 72 44  |to %1) ?.SectorD|
00001590  65 63 3a 53 65 63 74 6f  72 20 28 25 30 20 74 6f  |ec:Sector (%0 to|
000015a0  20 25 31 29 20 3f 0a 0a  23 20 54 6f 6b 65 6e 73  | %1) ?..# Tokens|
000015b0  20 75 73 65 64 20 66 6f  72 20 46 4e 49 6e 70 75  | used for FNInpu|
000015c0  74 48 65 78 28 29 2e 0a  0a 44 69 73 63 41 64 64  |tHex()...DiscAdd|
000015d0  72 48 65 78 3a 44 69 73  63 20 61 64 64 72 65 73  |rHex:Disc addres|
000015e0  73 20 69 6e 20 62 79 74  65 73 20 26 0a 4c 6f 67  |s in bytes &.Log|
000015f0  69 63 61 6c 41 64 64 72  48 65 78 3a 4c 6f 67 69  |icalAddrHex:Logi|
00001600  63 61 6c 20 64 69 73 63  20 61 64 64 72 65 73 73  |cal disc address|
00001610  20 69 6e 20 62 79 74 65  73 20 26 0a 0a 23 20 54  | in bytes &..# T|
00001620  6f 6b 65 6e 73 20 75 73  65 64 20 66 6f 72 20 46  |okens used for F|
00001630  4e 43 68 6f 6f 73 65 28  29 20 61 6e 64 20 46 4e  |NChoose() and FN|
00001640  63 68 6f 6f 73 65 5f 6e  6f 5f 73 74 72 69 6e 67  |choose_no_string|
00001650  5f 6c 6f 6f 6b 75 70 28  29 2e 20 54 68 65 79 20  |_lookup(). They |
00001660  73 68 6f 75 6c 64 0a 23  20 61 6c 77 61 79 73 20  |should.# always |
00001670  63 6f 6d 65 20 69 6e 20  70 61 69 72 73 2c 20 74  |come in pairs, t|
00001680  68 65 20 63 68 6f 69 63  65 73 20 62 65 69 6e 67  |he choices being|
00001690  20 73 65 63 6f 6e 64 2e  20 54 68 65 20 74 72 61  | second. The tra|
000016a0  6e 73 6c 61 74 65 64 20  63 68 6f 69 63 65 0a 23  |nslated choice.#|
000016b0  20 6c 65 74 74 65 72 73  20 73 68 6f 75 6c 64 20  | letters should |
000016c0  62 65 20 69 6e 20 74 68  65 20 73 61 6d 65 20 6f  |be in the same o|
000016d0  72 64 65 72 20 61 73 20  74 68 65 69 72 20 65 6e  |rder as their en|
000016e0  67 6c 69 73 68 20 65 71  75 69 76 61 6c 65 6e 74  |glish equivalent|
000016f0  73 20 69 6e 20 74 68 65  0a 23 20 74 6f 6b 65 6e  |s in the.# token|
00001700  2c 20 61 73 20 74 68 65  20 70 72 6f 67 72 61 6d  |, as the program|
00001710  20 69 6e 64 65 78 65 73  20 69 6e 74 6f 20 74 68  | indexes into th|
00001720  65 20 74 72 61 6e 73 6c  61 74 65 64 20 63 68 6f  |e translated cho|
00001730  69 63 65 20 6c 65 74 74  65 72 73 2e 0a 23 20 53  |ice letters..# S|
00001740  6f 20 66 6f 72 20 69 6e  73 74 61 6e 63 65 20 22  |o for instance "|
00001750  28 4c 6f 6e 67 2f 53 68  6f 72 74 2f 4e 6f 6e 65  |(Long/Short/None|
00001760  29 22 20 69 6e 20 66 72  65 6e 63 68 20 6d 69 67  |)" in french mig|
00001770  68 74 20 62 65 20 22 28  52 69 65 6e 2f 50 65 74  |ht be "(Rien/Pet|
00001780  69 74 2f 47 72 61 6e 64  29 22 0a 23 20 77 68 69  |it/Grand)".# whi|
00001790  63 68 20 69 73 20 72 65  2d 6f 72 64 65 72 65 64  |ch is re-ordered|
000017a0  2c 20 62 75 74 20 74 68  65 20 63 68 6f 69 63 65  |, but the choice|
000017b0  73 20 6c 69 6e 65 20 66  6f 6c 6c 6f 77 69 6e 67  |s line following|
000017c0  20 69 74 20 77 6f 75 6c  64 20 68 61 76 65 20 74  | it would have t|
000017d0  6f 0a 23 20 62 65 20 22  4c 53 4e 3a 47 50 52 22  |o.# be "LSN:GPR"|
000017e0  2e 20 54 68 69 73 20 69  73 20 6e 6f 74 20 61 63  |. This is not ac|
000017f0  74 75 61 6c 6c 79 20 61  20 72 65 73 74 72 69 63  |tually a restric|
00001800  74 69 6f 6e 2c 20 61 73  20 74 68 65 20 63 68 6f  |tion, as the cho|
00001810  69 63 65 73 20 73 74 72  69 6e 67 0a 23 20 69 73  |ices string.# is|
00001820  20 6e 65 76 65 72 20 70  72 69 6e 74 65 64 2e 20  | never printed. |
00001830  49 74 20 69 73 20 73 69  6d 70 6c 79 20 75 73 65  |It is simply use|
00001840  64 20 74 6f 20 76 61 6c  69 64 61 74 65 20 6b 65  |d to validate ke|
00001850  79 20 70 72 65 73 73 65  73 20 61 6e 64 20 74 6f  |y presses and to|
00001860  20 74 72 61 6e 73 6c 61  74 65 0a 23 20 74 6f 20  | translate.# to |
00001870  74 68 65 20 65 6e 67 6c  69 73 68 20 63 68 6f 69  |the english choi|
00001880  63 65 73 20 61 6e 64 20  64 65 66 61 75 6c 74 73  |ces and defaults|
00001890  20 75 73 65 64 20 62 79  20 74 68 65 20 70 72 6f  | used by the pro|
000018a0  67 72 61 6d 2e 0a 0a 41  42 43 44 43 68 6f 6f 73  |gram...ABCDChoos|
000018b0  65 3a 41 2c 42 2c 43 20  6f 72 20 44 20 3f 0a 41  |e:A,B,C or D ?.A|
000018c0  42 43 44 3a 41 42 43 44  0a 46 6f 72 6d 61 74 4f  |BCD:ABCD.FormatO|
000018d0  72 49 6e 69 74 43 68 6f  6f 73 65 3a 46 6f 72 6d  |rInitChoose:Form|
000018e0  61 74 20 6f 72 20 6a 75  73 74 20 69 6e 69 74 69  |at or just initi|
000018f0  61 6c 69 73 65 20 74 68  65 20 64 72 69 76 65 20  |alise the drive |
00001900  28 46 2f 49 29 20 3f 0a  46 49 3a 46 49 0a 4f 6c  |(F/I) ?.FI:FI.Ol|
00001910  64 4e 65 77 4d 61 70 43  68 6f 6f 73 65 3a 4f 6c  |dNewMapChoose:Ol|
00001920  64 20 6f 72 20 4e 65 77  20 6d 61 70 20 66 6f 72  |d or New map for|
00001930  6d 61 74 20 28 4f 2f 4e  29 20 3f 0a 4f 4e 3a 4f  |mat (O/N) ?.ON:O|
00001940  4e 0a 52 65 74 61 69 6e  53 68 61 70 65 43 68 6f  |N.RetainShapeCho|
00001950  6f 73 65 3a 44 6f 20 79  6f 75 20 77 69 73 68 20  |ose:Do you wish |
00001960  74 6f 20 72 65 74 61 69  6e 20 74 68 69 73 20 73  |to retain this s|
00001970  68 61 70 65 20 28 59 2f  4e 29 20 3f 0a 59 4e 3a  |hape (Y/N) ?.YN:|
00001980  59 4e 0a 53 6f 61 6b 54  65 73 74 43 68 6f 6f 73  |YN.SoakTestChoos|
00001990  65 3a 53 6f 61 6b 20 74  65 73 74 20 74 68 65 20  |e:Soak test the |
000019a0  68 61 72 64 20 64 69 73  63 20 66 6f 72 20 64 65  |hard disc for de|
000019b0  66 65 63 74 73 20 28 4c  6f 6e 67 2f 53 68 6f 72  |fects (Long/Shor|
000019c0  74 2f 4e 6f 6e 65 29 20  3f 0a 4c 53 4e 3a 4c 53  |t/None) ?.LSN:LS|
000019d0  4e 0a 53 74 61 6e 64 61  72 64 53 68 61 70 65 43  |N.StandardShapeC|
000019e0  68 6f 6f 73 65 3a 44 6f  20 79 6f 75 20 77 69 73  |hoose:Do you wis|
000019f0  68 20 74 6f 20 75 73 65  20 74 68 65 20 73 74 61  |h to use the sta|
00001a00  6e 64 61 72 64 20 73 68  61 70 65 20 66 6f 72 20  |ndard shape for |
00001a10  74 68 69 73 20 64 72 69  76 65 20 28 59 2f 4e 29  |this drive (Y/N)|
00001a20  20 3f 0a 23 20 59 4e 3a  59 4e 20 2d 20 61 6c 72  | ?.# YN:YN - alr|
00001a30  65 61 64 79 20 65 78 69  73 74 73 20 61 62 6f 76  |eady exists abov|
00001a40  65 0a 53 75 72 65 43 68  6f 6f 73 65 3a 41 72 65  |e.SureChoose:Are|
00001a50  20 79 6f 75 20 53 55 52  45 20 79 6f 75 20 77 61  | you SURE you wa|
00001a60  6e 74 20 74 6f 20 64 6f  20 74 68 69 73 20 74 6f  |nt to do this to|
00001a70  20 64 72 69 76 65 20 41  44 46 53 3a 25 30 20 28  | drive ADFS:%0 (|
00001a80  59 2f 4e 29 20 3f 0a 23  20 59 4e 3a 59 4e 20 2d  |Y/N) ?.# YN:YN -|
00001a90  20 61 6c 72 65 61 64 79  20 65 78 69 73 74 73 20  | already exists |
00001aa0  61 62 6f 76 65 2e 0a 55  73 65 53 68 61 70 65 43  |above..UseShapeC|
00001ab0  68 6f 6f 73 65 3a 44 6f  20 79 6f 75 20 77 69 73  |hoose:Do you wis|
00001ac0  68 20 74 6f 20 75 73 65  20 74 68 69 73 20 73 68  |h to use this sh|
00001ad0  61 70 65 20 28 59 2f 4e  29 20 3f 0a 23 20 59 4e  |ape (Y/N) ?.# YN|
00001ae0  3a 59 4e 20 2d 20 61 6c  72 65 61 64 79 20 65 78  |:YN - already ex|
00001af0  69 73 74 73 20 61 62 6f  76 65 2e 0a 42 6f 6f 74  |ists above..Boot|
00001b00  4f 70 74 43 68 6f 6f 73  65 3a 44 6f 20 79 6f 75  |OptChoose:Do you|
00001b10  20 77 69 73 68 20 74 68  69 73 20 74 6f 20 62 65  | wish this to be|
00001b20  20 61 20 62 6f 6f 74 61  62 6c 65 20 64 69 73 63  | a bootable disc|
00001b30  20 28 59 2f 4e 29 3f 0a  23 20 59 4e 3a 59 4e 20  | (Y/N)?.# YN:YN |
00001b40  2d 20 61 6c 72 65 61 64  79 20 65 78 69 73 74 73  |- already exists|
00001b50  20 61 62 6f 76 65 2e 0a                           | above..|
00001b58