;	Install Macro for SStor
;	(C)Copyright 1985-1989 Storage Dimensions, Inc.
;
;	$Date:   06 Jun 1989 17:01:58  $
;-----------------------------------------------------------------------------
@SETEXITCODE 27@DISP 0@DISPMODE NONE@LOCK 1"ScanSurface"@LOCK 1"NoDrive"@LOCK 1"<no drive>"@LOCK 1"NoCopr"@LOCK 1"SetInterleave"@[]= 15 0@CLEARROWS 0 24 13@CLEARROWS 2 8 17@XY 0 2@LINE"           ###                            ### "@LINE"          #   #                          #   #"@LINE"          #      ###   ####  ####  ###   #      #####   ##   ###   TM"@LINE"           ###   #  #  #     #     #  #   ###     #    #  #  #  #"@LINE"              #  ###   ##    ##    #  #      #    #    #  #  ### "@LINE"          #   #  #     #     #     #  #  #   #    #    #  #  # # "@LINE"           ###   #     ####  ####  ###    ###     #     ##   #  #"@ONERROR$0368@BEGIN@:$0368@ONERROR$380d@ONESCKEY$3aa4@TRACE 0@[]= 14@APP BUFFERADDR X@[]= 32@-@*@APP OPT_GET MAXMEGS 2048 1@[]= 19$FF36@==@APP DOSOEM X 3$0415@IF@APP OPT_GET 12BITFAT$0415@[]= 19$FFFF@>@[] 32@[] 19$0435@[]= 19@[] 32@DISP 0@XY 14 9@MSG"Copyright (C) 1985-1989 Storage Dimensions, Inc."@[]= 13@BUFFER 0 20000@0= 0@0=@+@0 1@==@APPARG@0""$0519@==@APPARG@0"SysOnly"$04f9@==@APPARG@0"TraceON"$04eb@:$495@TRACE 1@:$495@REDRAWROWS 0 2@CALL$2b9d@:$3d41@XY 19 12@MSG"Which drive(s) will be installed ?"@XY 20 14@MSG"   1    Install Drive One only "@XY 20 15@MSG"   2    Install Drive Two only "@XY 20 16@MSG" 1 & 2  Install Drives 1 and 2 "@XY 11 19@MSG"Use arrow keys to point, then press <Enter> to select."@XY 11 20@MSG"Press <Esc> to abort this installation procedure"@IF@[] 13$0674@@BUFFER 3 256@1= 0@XY 20 14@CHGATTR 14 31@CALL$36ab@2=@USERKEY@2==@KEYDOWN$06ea@2==@KEYUP$0733@2==@KEYCR$077c@2==@KEYESC$3a8c@:$69a@XY 20@+@1 14@CHGATTR 13 31@1=@%@+@1 1 3@XY 20@+@1 14@CHGATTR 14 31@:$69a@XY 20@+@1 14@CHGATTR 13 31@1=@%@+@1 2 3@XY 20@+@1 14@CHGATTR 14 31@:$69a@CLEARROWS 0 24 13@REDRAWROWS 0 2@[]= 10@+ 1@1@!@IF@&$1@[] 10$07f6@1= 1@CALL$0987@1= 1@CALL$0e98@1== 0$07f6@1= 1@CALL$0c66@!@IF@&$2@[] 10$0878@1= 2@CALL$0987@[]= 31@*@*@APP HEADS X@APP SECTORS X@APP USABLECYLS X@1= 2@CALL$0e98@1== 0$0878@1= 2@CALL$0c66@[]= 16 0@[]= 17""@[]= 18""@!@IF@&$1@[] 10$08c7@1= 1@CALL$0f09@==@[] 17"S"$08ea@!@IF@&$2@[] 10$08ea@1= 2@CALL$0f09@CALL$21df@1== 0$3aa4@!@IF@& 1@[] 11$0922@1= 1@CALL$23eb@!@IF@& 2@[] 11$0945@1= 2@CALL$23eb@IF@[] 16$2555@IF@[] 17$2555@IF@[] 18$2555@SETEXITCODE 1111@:$3d41@PUSH@1@CALL$09ba@1=@POP@>@1@APP DRIVES X$987@:@POP@CALL$3366@DISP 0@!@? TYPE$0c2e TYPE@!@?@1$0c2e@1@!@?@[] 15$0a44@[] 15@PUSHCURSOR@REDRAWROWS 3 24@POPCURSOR@:$0af5@DISP 0@CALL$3366 TYPE@1@PUSHCURSOR@REDRAWROWS 3 24@DISP 1@ONESCKEY$0c2e@XY 23 7@MSG"Please pick the drive manufacturer"@POPCURSOR@INPUT@==@TITLE"Main"$380d@==@TITLE"Prep"$380d@==@TITLE"ExitProg?"$3a8c@!@==@TITLE"Models"$0baf@PUSHCURSOR@CLEARROWS 3 7 13@XY 20 4@MSG"Please pick the drive model for Drive "@MSG@1@XY 14 6@MSG"Use arrow keys to point, then press ENTER to select."@POPCURSOR@DISP 1@ONESCKEY$a2c@LEVELINPUT@CLEARROWS 3 7 13@CLEARROWS 10 24 13@DISP 0@!@? INITIALIZE$388d@CALL$364c@1== 0$0c2e@@POP@:$388d@CLEARROWS 3 7 13@CLEARROWS 10 24 13@ONESCKEY$3aa4@:@POP@CLEARROWS 10 24 13@CALL$3366@!@? DEFECTMGR$0d7d DEFECTMGR@!@? ADD$0d7d@PUSHCURSOR@CLEARROWS 10 24 13@XY 14 15@MSG"Please enter the media defect locations for drive "@MSG@1@XY 26 16@MSG"Select 'Quit' when done"@REDRAWROWS 3 10@POPCURSOR@DISP 1@ONESCKEY""@LEVELINPUT@ONESCKEY$3aa4@CLEARROWS 3 7 13@CLEARROWS 10 24 13@DISP 0@CALL$3366@:@POP@PUSH@2@PUSH@3@PUSH@4@PUSHCURSOR@CLEARROWS 3 7 13@XY 5 5@MSG"Do you wish to perform low-level initialization on drive "@MSG@1@MSG" ?"@1= 66@2= 71@3= 5@4= 1@CALL$3477@1=@4@CLEARROWS 3 7 13@POPCURSOR@4=@POP@3=@POP@2=@POP@:@POP@PUSH@2@2=@1@CALL$331d@REDRAWROWS 8 9@1=@2@CALL$db8@1==@KEYESC$3aa4@1== 0$0efc@[]= 11@|@2@[] 11@1= 1@2=@POP@:@POP@CLEARROWS 3 24 13@DISP 0@CALL$331d@XY 7@- 11 3@MSG@FMT" How do you want partitions built on drive %d ?"@1@XY 7@- 11 2@MSG"-----------------------------------------------"@[]= 21@APP USABLECYLS X@[]= 23@*@APP HEADS X@APP SECTORS X@[]= 22@[] 23@[]= 20 0@IF@APP OPT_GET BOOTALL$10d7@!@==@APP DRIVE X 1$10d7@!@==@APP HEADS X@APP BOOTHEADS X$1084@==@APP SECTORS X@APP BOOTSECS X$10d7@[]= 22@*@APP BOOTHEADS X@APP BOOTSECS X@IF@[] 22$10ce@[]= 22@[] 23@:$10d7@[]= 20 1@!@IF 23$3776@!@IF 22$3776@[]= 24@/$1000@[] 22@[]= 25@/@[] 19@[] 23@[]= 26@*@[] 24@[] 20@[]= 27@/@-@[] 21@[] 26@[] 25@[]= 30@[] 25@!@== 0@[] 27$1189@[]= 27 1@[]= 30@-@[] 21@[] 26@[]= 28@-@[] 21@*@[] 27@[] 30@[]= 29@[] 27@==@[] 28@[] 26$11d8@[]= 29@+ 1@[] 29@[]= 33@/@[] 32@[] 23@[]= 34@/@[] 21@[] 33@[]= 35@-@[] 21@*@[] 34@[] 33@[]= 36@/@-@[] 21@[] 24@[] 33@[]= 37@-@-@[] 21@[] 24@*@[] 36@[] 33@5= 0@6= 11@8= 0@!@==@APP DRIVE X 1$1420@!@>@[] 21@+@[] 25@[] 26$1420@XY 1@6@MSG@FMT"1 DOS (%d MB)"@/@+@/@*@[] 24@[] 22 200 5 10@!@IF@[] 36$130e@>@[] 36 1$1362@IF@[] 37$1362@MSG@FMT" and 1 SSTOR partition (%d MB)"@/@+@/@*@-@[] 21@[] 24@[] 23 200 5 10@:$1400@MSG@FMT", %d SSTOR "@[] 36@MSG@FMT"(%d MB) "@/@+@/@*@[] 33@[] 23 200 5 10@!@IF@[] 37$1400@MSG@FMT"and 1 SSTOR partition (%d MB)"@/@+@/@*@[] 37@[] 23 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 1@!@==@APP DRIVE X 1$14fa@!@IF@[] 20$14fa@XY 1@6@MSG@FMT"1 DOS (%d MB)"@/@+@/@*@[] 28@[] 22 200 5 10@MSG@FMT" and %d SSTOR partitions"@[] 27@MSG@FMT" (%d MB)"@/@+@/@*@[] 30@[] 23 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 2@!@==@APP DRIVE X 1$1601@!@IF@[] 20$1601@!@>@[] 21@+@[] 25@[] 24$1601@XY 1@6@MSG@FMT"1 DOS (%d MB) and "@/@+@/@*@[] 24@[] 22 200 5 10@MSG@FMT"%d SSTOR partitions"@[] 29@MSG@FMT" (%d MB)"@/@+@/@*@/@-@[] 21@[] 24@[] 29@[] 23 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 3@!@>@[] 21@[] 25$1775@!@>@[] 21@[] 25$1775@==@APP DRIVE X 2$164f@IF@[] 20$1775@XY 1@6@!@==@APP DRIVE X 1$16d1@MSG@FMT"1 DOS (%d MB)"@/@+@/@*@[] 30@[] 23 200 5 10@==@[] 27 1$1710@MSG@FMT", %d"@-@[] 27 1@:$16db@MSG@[] 27@MSG@FMT" SSTOR (%d MB)"@/@+@/@*@[] 30@[] 23 200 5 10@MSG@FMT" and 1 SSTOR partition (%d MB)"@/@+@/@*@[] 28@[] 23 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 4@!@>@[] 21@[] 25$18ce@==@APP DRIVE X 2$17ae@IF@[] 20$18ce@XY 1@6@!@==@APP DRIVE X 1$1854@MSG@FMT"1 DOS (%d MB) "@/@+@/@*@/@[] 21@[] 29@[] 23 200 5 10@MSG@FMT" and %d SSTOR partition"@-@[] 29 1@!@>@[] 29 2$1877@MSG"s"@:$1877@MSG@FMT"%d SSTOR partitions"@[] 29@MSG@FMT" (%d MB)"@/@+@/@*@/@[] 21@[] 29@[] 23 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 5@!@==@APP DRIVE X 2$1a12@!@>@[] 21@[] 25$1a12@>@[] 34 1$1a12@XY 1@6@IF@[] 34$1966@MSG@FMT"1 SSTOR partition (%d MB)"@/@+@/@*@[] 21@[] 23 200 5 10@:$19f2@MSG@FMT"%d SSTOR "@[] 34@MSG@FMT"(%d MB)"@/@+@/@*@[] 33@[] 23 200 5 10@MSG@FMT" and 1 SSTOR partition (%d MB)"@/@+@/@*@[] 35@[] 23 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 6@!@==@APP DRIVE X 1$1ab0@IF@[] 20$1ab0@>@[] 21@[] 25$1ab0@XY 1@6@MSG@FMT"1 DOS partition (%d MB)"@/@+@/@*@[] 21@[] 22 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 7@!@==@APP DRIVE X 1$1c70@IF@[] 20$1c70@!@>@[] 21@[] 25$1c70@!@>@APP DOSVERSION X 331$1c70@XY 1@6@IF@[] 34$1b69@MSG@FMT"1 Large DOS partition (%d MB)"@/@+@/@*@[] 21@[] 22 200 5 10@:$1c50@MSG@FMT"1 Large DOS partition (%d MB)"@/@+@/@*@[] 33@[] 22 200 5 10@!@>@[] 34 1$1c0b@MSG@FMT", %d SSTOR "@-@[] 34 1@MSG@FMT"(%d MB)"@/@+@/@*@[] 33@[] 22 200 5 10@MSG@FMT" and 1 SSTOR partition (%d MB)"@/@+@/@*@[] 35@[] 22 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 8@==@APP DRIVE X 1$1d2d@>@[] 21@[] 25$1d2d@>@[] 34 1$1d2d@!@IF@[] 34$1cc6@IF@[] 35$1d2d@XY 1@6@MSG@FMT"1 SSTOR partition (%d MB)"@/@+@/@*@[] 21@[] 23 200 5 10@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 9@!@==@APP DRIVE X 1$1db1@XY 1@6@MSG"Manually create/format partitions using the Partition Manager."@6=@+ 2@6@8=@+ 1@8@5=@|@<<@5 4 12@IF@APP OPT_GET BOOTALL$1f27@==@APP BOOTHEADS X@APP HEADS X$1e6a@XY 1 22@MSG@FMT"Note: Number of disk heads (%d)"@APP HEADS X@MSG@FMT" is different than BIOS value (%d)"@APP BOOTHEADS X@IF@APP OPT_GET BOOTALL$1f27@==@APP BOOTSECS X@APP SECTORS X$1f27@XY 1 23@MSG@FMT"Note: Number of disk sectors (%d)"@APP SECTORS X@MSG@FMT" is different than BIOS value (%d)"@APP BOOTSECS X@7= 0@XY 0@+ 11@* 2@7@IF@[] 13$1f58@@BUFFER 3 256@CHGATTR 14 79@CALL$36ab@4=@USERKEY@4==@KEYDOWN$1fc1@4==@KEYUP$2011@4==@KEYCR$2065@4==@KEYESC$3a8c@:$1f70@XY 0@+ 11@* 2@7@CHGATTR 13 79@7=@%@+ 1@7@8@XY 0@+ 11@* 2@7@CHGATTR 14 79@:$1f70@XY 0@+ 11@* 2@7@CHGATTR 13 79@7=@%@+@7@-@8 1@8@XY 0@+ 11@* 2@7@CHGATTR 14 79@:$1f70@9=@-@-@8@7 1@7=@&$F@>>@5@* 4@9@==@7 1$20c3@==@7 3$20c3@==@7 2$20af@:$20d0@[]= 16@[] 28@:$20d0@[]= 16@[] 24@9="M"@==@7 2$2166@==@7 4$2166@==@7 7$2166@==@7 9$2166@9="E"@==@7 3$2166@==@7 5$2166@9="L"@==@7 1$2166@==@7 6$2166@==@7 8$2166@9="Manual"@==@7 12$2166@!@==@7 8$21a8@@APP OPT_SET@APPEND"BootMegs:"@APP OPT_GET"MaxMegs"@!@==@APP DRIVE X 1$21d0@[]= 17@9@:$21d9@[]= 18@9@:@POP@PUSHCURSOR@CLEARROWS 3 24 13@XY 10 5@MSG"SpeedStor will now proceed with the automatic"@XY 10 6@MSG"installation procedure unattended. The amount of time this will"@XY 10 7@MSG"take depends on the capacity of the selected drive(s)."@CLEARROWS 10 10 4@XY 4 10@MSG"**** This is your LAST CHANCE to abort this installation procedure ****"@XY 10 12@MSG"Press <Esc> now to abort this, or ANY other key to proceed."@XY 10 12@CHGATTR 6 59@XY 69 12@CALL$36ab@1= 1@2=@USERKEY@!@2==@KEYESC$23c9@1= 0@CLEARROWS 3 24 13@POPCURSOR@:@POP@FILTER 1@DISP 0@CALL$331d@REDRAWROWS 8 9@ONESCKEY IGNORE INITIALIZE STANDARDINIT YES@!@? NO$244f NO@XY 22 15@MSG"Drive "@MSG@1@MSG" is now being initialized..."@DISP 1 INITIALIZE@!@==@TITLE"Abort?"$24d1@ONESCKEY$3aa4@INPUT@:$249e@FILTER 0@==@TITLE"Initialize"$3aa4@!@==@TITLE"Add2BTT?"$2523@CLEARROWS 3 7 13 YES@KEYSPACE Q@CLEARROWS 3 24 13@REDRAWROWS 8 9@:@POP@!@==@[] 17"Manual"$2648@CALL$33de@DISP 1@REDRAWROWS 0 23@XY 2 24@MSG"The Drive is now ready for partition creation and formatting"@CALL$36ab@ONESCKEY IGNORE@FILTER 1@KEYHOME@ONERROR IGNORE@USERKEY@!@==@TITLE"Prep"$2612@SETEXITCODE 1110@:$3d41@CLEARROWS 3 7 13@REDRAWROWS 0 2@REDRAWROWS 8 9@!@IF@&$1@[] 10$269a@1= 1@CALL$2973@!@IF@&$2@[] 10$26bd@1= 2@CALL$2973@!@IF@[] 16$2763@1= 1@CALL$32d4@REDRAWROWS 8 9@DISP 0 AUTOPART SELECTEDAREA@KEYCR@-@[] 16 1@REDRAWROWS 8 24@DISP 1 MAX32MEG@CLEARROWS 3 7 13@CLEARROWS 10 24 13@DISP 0@!@IF@[] 17$281b@1= 1@CALL$32d4@REDRAWROWS 8 9@DISP 0 AUTOPART@!@==@[] 17"S"$27c6 EVERYDRIVE@:$27d3 CURRENTDRIVE@REDRAWROWS 8 24@DISP 1@[] 17@CLEARROWS 3 7 13@CLEARROWS 10 24 13@DISP 0@!@IF@[] 18$28ae@1= 2@CALL$32d4@REDRAWROWS 8 9@DISP 0 AUTOPART CURRENTDRIVE@REDRAWROWS 8 24@DISP 1@[] 18@CLEARROWS 3 7 13@CLEARROWS 10 24 13@DISP 0@BEEP 886 100@BEEP 0 1@BEEP 886 100@BEEP 0 1500@BEEP 886 100@BEEP 0 1@BEEP 886 100@!@IF@[] 17$293a@CALL$29cc@1== 0$293a@CALL$2b9d@1== 0$293a@SETEXITCODE 1112@!@IF@[] 17$3d41@SETEXITCODE 1119@:$3ae1@CALL$32d4@DISP 0@REDRAWROWS 8 9@!@? DELETE$29b7 DELETE 1 YES@:$2984 QUIT@CALL$33de@:@POP@CLEARROWS 3 24 13@XY 8 8@MSG"Do you wish to copy the DOS system files to Drive C: ?"@XY 8 11@MSG"If you answer YES, you will be prompted to insert "@XY 8 12@MSG"a DOS system diskette into drive A: and the DOS"@XY 8 13@MSG"system files will be copied to drive C:."@XY 8 16@MSG"If you answer NO, you can copy the DOS system files to "@XY 8 17@MSG"drive C: after this installation procedure has completed."@1= 64@2= 69@3= 8@4= 1@CALL$3477@1=@4@CLEARROWS 3 24 13@:@POP@CLEARROWS 3 24 13@IF@[] 13$2bcc@@BUFFER 3 1500@XY 15 12@MSG"Please insert a DOS system diskette into drive A: "@XY 15 13@MSG"and press any key when ready..."@CALL$36ab@1=@USERKEY@CLEARROWS 3 24 13@1=@FIRSTFILE 7"A:\\*.*"@!@IF@&$4@FILEINFO 1$2cd7@1=@NEXTFILE@!@IF@&$4@FILEINFO 1$2cd7@IFEXISTS"A:\\COMMAND.COM"$2e85@XY 15 9@MSG"There are NO system files on this diskette !!"@XY 15 12@MSG"Please insert a DOS system diskette into drive A: "@XY 15 13@MSG"and press any key when ready..."@XY 15 15@MSG"or press <Esc> if you wish to SKIP this process"@CALL$36ab@1=@USERKEY@CLEARROWS 3 24 13@!@1==@KEYESC$2c50@XY 15 9@MSG"Please re-insert the SpeedStor diskette"@XY 15 10@MSG"into drive A: and press any key when ready..."@CALL$36ab@1=@USERKEY@:$32c2@1= 1@CALL$32d4@1=@FIRSTFILE 7"A:\\*.*"@XY 25 5@MSG"Copying  "@MSG@1@@APP COPY2PART@APPEND"CA:\\"@1@1=@NEXTFILE@XY 25 6@MSG"Copying  "@MSG@1@@APP COPY2PART@APPEND"CA:\\"@1@1="COMMAND.COM"@XY 25 7@MSG"Copying  "@MSG@1@@APP COPY2PART@APPEND"CA:\\"@1@XY 15 12@MSG"NOTE: A temporary file will be created on the diskette."@XY 15 13@MSG"Make sure there is NO write-protect tab on the diskette."@XY 15 9@MSG"Please re-insert the SpeedStor diskette"@XY 15 10@MSG"into drive A: and press any key when ready..."@CALL$36ab@1=@USERKEY@CLEARROWS 9 13 13@!@IF@APP PARTS_OWNED SSTOR$312a@!@IFEXISTS"A:\\SSTOR.SYS"$2f7c@1="SSTOR.SYS"@XY 25 8@MSG"Copying  "@MSG@1@@APP COPY2PART@APPEND"CA:\\"@1@1="CONFIG.SYS"@XY 25 9@MSG"Creating "@MSG@1@1=@APPEND"A:\\"@1@@DFOPEN 1@1@@DFWRITE 1"BUFFERS=8"@@DFWRITECH 1@CHR 10@@DFWRITE 1"FILES=20"@@DFWRITECH 1@CHR 10@!@IF@APP PARTS_OWNED SSTOR$3285@@DFWRITE 1"DEVICE=SSTOR.SYS "@0= 0@0=@+@0 1@==@APPARG@0""$3271@!@==@STRMID 1 1@APPARG@0"/"$320a@@DFWRITE 1@APPARG@0@@DFWRITE 1"  "@:$320a@@DFWRITECH 1@CHR 10@DFCLOSE 1@@APP COPY2PART@APPEND"C"@1@@DFDELETE@1@1= 1@:$32ce@1= 0@:$32ce@:@POP@CALL$33de@1==@APP DRIVE X$3317@!@? NEXTDRIVE$37d2 NEXTDRIVE@:$32de@:@POP@CALL$3366@1==@APP DRIVE X$3360@!@? NEXTDRIVE$37d2 NEXTDRIVE@:$3327@:@POP@ONESCKEY IGNORE@DISP 0@==@TITLE"Prep"$33d8@==@TITLE"main"$33cc@==@TITLE"ExitProg?"$3a8c@KEYESC@:$337d MANUALSETUP@:@POP@ONESCKEY IGNORE@DISP 0@==@TITLE"Part"$3471@==@TITLE"Prep"$3464@==@TITLE"main"$3458@==@TITLE"ExitProg?"$3a8c@KEYESC@:$33f5 MANUALSETUP PARTITIONMGR@:@POP@PUSH@5@4== 0$34db@XY@2@3@MSG" No "@XY@2@3@CHGATTR 13 4@XY@1@3@MSG" Yes "@XY@1@3@CHGATTR 14 5@:$3527@XY@1@3@MSG" Yes "@XY@1@3@CHGATTR 13 5@XY@2@3@MSG" No  "@XY@2@3@CHGATTR 14 4@CALL$36ab@5=@USERKEY@5==@KEYLEFT$35af@5==@KEYRIGHT$35af@5==@KEYCR$363f@5==@KEYESC$363a@==@UPSHIFT@5"Y"$362e@==@UPSHIFT@5"N"$3622@:$3531@4== 0$35ee@4= 0@XY@1@3@CHGATTR 13 5@XY@2@3@CHGATTR 14 4@:$3531@4= 1@XY@2@3@CHGATTR 13 4@XY@1@3@CHGATTR 14 5@:$3531@4= 0@:$363f@4= 1@:$363f@4=@5@5=@POP@:@POP@INTREG= 2$14@INTREG= 13$80@1=@INT86X$13@!@>@1 0$36a5@PUSH@1@1=@INTREG 2@CALL$36ce@1=@POP@:@POP@!@IFKEY$36c8@@USERKEY@:$36ab@:@POP@PUSH@2@PUSH@3@2=@ERRORSTR@1@3=""@1=@FMT"$%02X - "@1@XY 5 24@MSG"Error Code: "@MSG@1@MSG@2@XY 26 6@MSG"PRESS A KEY TO CONTINUE"@CALL$36ab@2=@USERKEY@3=@POP@2=@POP@:@POP@CLEARROWS 3 7 5@XY 20 3@MSG@FMT"Drive geometry for drive %d is unusable"@APP DRIVE X@:$381d@CLEARROWS 3 7 5@XY 28 3@MSG"Unable to select Drive"@:$381d@CLEARROWS 3 7 5@ONERROR IGNORE@ONESCKEY IGNORE@REDRAWROWS 8 24@XY 28 5@MSG"PRESS ANY KEY TO ABORT "@CALL$36ab@3=@USERKEY@:$3aa4@CLEARROWS 3 7 5@CLEARROWS 10 24 5@XY 8 12@LINE"  SpeedStor is unable to communicate to the Disk Controller,"@LINE"  This is most likely due to the use of an AT-clone"@LINE"  To Continue with the initialization:"@LINE"  1)  Place your DOS system diskette into drive A:"@LINE"  2)  Reboot the computer--press <Ctrl><Alt><Del>"@LINE"  3)  Re-insert the SpeedStor diskette into drive A:"@LINE"  4)  Restart this initialization procedure"@LINE" "@XY 1 15@CALL$36ab@3=@USERKEY@!@3==@KEYESC$3a59@DISP 0@XY 0 20@:$3aa4@CLEARROWS 0 24 0@XY 0 2@DISP 1@SETEXITCODE 27@KEYESC@KEYESC@KEYESC@KEYESC@KEYESC YES@CLEARROWS 3 24 13@XY 11 8@MSG"The selected drive(s) have been successfully installed and"@XY 11 9@MSG"the new partition(s) will become active after rebooting !!"@1== 0$3c09@XY 11 11@MSG"The system will now REBOOT from the fixed disk."@XY 11 12@MSG"Please open the door of floppy drive A:"@:$3c73@XY 11 11@MSG"The system will now REBOOT."@XY 11 12@MSG"Please insert a DOS system diskette into drive A:"@XY 11 13@MSG"and Press <Ctrl><Alt><Del> when ready..."@XY 11 15@MSG"or press <Esc> if you do not wish to reboot"@SETEXITCODE 27@IF@[] 13$3d0f@@BUFFER 3 512@CALL$36ab@==@USERKEY@KEYESC$3d41@SETEXITCODE 9999@ONERROR IGNORE@DISP 0@CLEARROWS 3 24 0@XY 0 6@KEYESC@KEYESC@KEYESC@KEYESC@KEYESC YES