sean@ms.uky.edu (Sean Casey) (07/04/88)
F/A-18 Interceptor is a marvelous program. Unfortunately, for $50, you
have to turn a cardboard "code wheel" every 5 minutes. This is idiocy.
I refuse to be humiliated this way after I paid so much money for the
program.
Someone sent me patch instructions to use with newzap, and I incorporated
them into a program to automate the patching. I suppose someone could come
up with a better patch, but this can do for now. You still have to answer
the question, but the answer is always 0000.
Instructions:
Use a copy of your original disk.
Unshar and uudecode.
Run f18fix and put your copy in DF0: when asked.
The disk whirs a few seconds and it's done.
The code response will always be 0000 from this point on.
DISCLAIMER
I am not responsible if you trash your disks with this program. Use
it at your own risk.
If you don't like what I'm doing, or think I advocate software piracy,
get stuffed. If you do like what I'm doing, may you live a long life,
your children have the normal number of limbs, etc...
* F/A-18 Interceptor is a Trademark of Electronic Arts and probably Robert
Dinnerman too.
#! /bin/sh
: This is a shell archive, meaning:
: 1. Remove everything above the '#! /bin/sh' line.
: 2. Save the resulting text in a file.
: 3. Execute the file with /bin/sh '(not csh)' to create the files:
: 'f18fix.c'
: 'f18fix.uu'
: This archive created: 'Mon Jul 4 08:36:22 1988
'
: By: 'Sean Casey (The Leaning Tower of Patterson Office @ The Univ. of KY)'
export PATH; PATH=/bin:$PATH
echo shar: extracting "'f18fix.c'" '(565 characters)'
if test -f 'f18fix.c'
then
echo shar: will not over-write existing file "'f18fix.c'"
else
cat >'f18fix.c' <<'SHAR_EOF'
/*
* f18fix.c by Sean Casey, PUBLIC DOMAIN.
*/
#include "fcntl.h"
main()
{
char s[8], zero = 0;
char *fn = "df0:F-18 Interceptor";
int fp;
puts("Insert copy of F-18 Interceptor into DF0: and press RETURN:\n");
gets(s);
if ((fp = open(fn, O_RDWR)) < 0) {
puts("Couldn't open file \"DF0:F-18 Interceptor\"\n");
exit(-1);
}
lseek(fp, (long) 0x1cd8d, 0);
write(fp, &zero, 1);
lseek(fp, (long) 0x1cd9d, 0);
write(fp, &zero, 1);
lseek(fp, (long) 0x1cdad, 0);
write(fp, &zero, 1);
lseek(fp, (long) 0x1cdbb, 0);
write(fp, &zero, 1);
close(fp);
}
SHAR_EOF
if test 565 -ne "`wc -c < 'f18fix.c'`"
then
echo shar: error transmitting "'f18fix.c'" '(should have been 565 characters)'
fi
fi # end of overwriting check
echo shar: extracting "'f18fix.uu'" '(7035 characters)'
if test -f 'f18fix.uu'
then
echo shar: will not over-write existing file "'f18fix.uu'"
else
cat >'f18fix.uu' <<'SHAR_EOF'
begin 644 f18fix
M```#\P`````````#``````````(```1Q````A0````$```/I```$<4[Z!8).
M5?_P0BW_]T'Z`.(K2/_R2'H`[TZZ!3!83TAM__A.N@%*6$\_/``"+RW_\DZZ
M`U!<3SM`__!*0&P42'H!`DZZ!0983S\\__].N@Z.5$]"9TAY``'-C3\M__!.
MN@*24$\_/``!2&W_]S\M__!.N@V24$]"9TAY``'-G3\M__!.N@)N4$\_/``!
M2&W_]S\M__!.N@UN4$]"9TAY``'-K3\M__!.N@)*4$\_/``!2&W_]S\M__!.
MN@U*4$]"9TAY``'-NS\M__!.N@(F4$\_/``!2&W_]S\M__!.N@TF4$\_+?_P
M3KH/+E1/3EU.=61F,#I&+3$X($EN=&5R8V5P=&]R`$EN<V5R="!C;W!Y(&]F
M($8M,3@@26YT97)C97!T;W(@:6YT;R!$1C`Z(&%N9"!P<F5S<R!215154DXZ
M"@!#;W5L9&XG="!O<&5N(&9I;&4@(D1&,#I&+3$X($EN=&5R8V5P=&]R(@H`
M`$Y5``!(YP@@)&T`"$ZZ`#8X`+!\__]G#KA\``IG""!*4HH0A&#F0A*X?/__
M9A"U[0`(9@IP`$S?!!!.74YU("T`"&#R3E4``$AL@`).N@`(6$].74YU3E4`
M`$CG""`D;0`(+PI.N@`R.`"P?/__6$]G(C`$2,!@%%.2".H``P`,</],WP00
M3EU.=6#62H!G^EF`9^0P!&#J3E4``"\*)&T`""!2L>H`!&4,+PIA%EA/)%].
M74YU(%)2DA`02(#`?`#_8.Q.50``2.<(,"1M``@0*@`,P#P`&&<*</],WPP0
M3EU.=0BJ``(`#$JJ``AF""\*3KH)]EA/$"H`#$B`"```!V<P0>R``B9($"L`
M#$B`P'P`A+!\`(1F##\\__\O"TZZ"*Y<3]?\````%D'L@;JWR&76/RH`$"\J
M``@0*@`-2(`_`$ZZ`A0X`$I`4$]N%$I$9@1P"&`"<!"!*@`,</]@`/]Z,`1(
MP"2J``C0J@`()4``!"!24I(0$$B`P'P`_V``_UI.50``2.<,(#@M``A.N@N"
M,`3!_``&)$#5[('*2D1M"KAL@;IL!$J29A`Y?``"@<YP_TS?!#!.74YU,"T`
M#DC`4X`O`"\M``HO$DZZ#98J`+"\_____T_O``QF#$ZZ#3XY0('.</]@RD*G
M0J<O$DZZ#7)/[P`,8+I.50``/RT`##\\`P$O+0`(80903TY=3G5.50``2.</
M,"1M``A.N@KR)FR!RG@`8`XP!,'\``9*LP@`9PY21+AL@;IM['H&8```Q`@M
M``$`#&<P2'C__R\*3KH,WBP`4$]G("\&3KH-%B\*3KH,I$J`4$]F#DZZ#*XZ
M`+!\`,UF``",2'@#[2\*3KH,O"P`2H903V9@""T````,9@1Z`6!L2'@#[B\*
M3KH,GBP`4$]F"$ZZ#'(Z`&!42'@`(4AZ`)).N@TZ+@!03V<*+P=.N@SD6$]@
M'DAX``%(>@""+P9.N@RH2'C__T*G+P9.N@Q^3^\`&&`F,"T`#,!\!0"P?`4`
M9A@O!DZZ"_)Z!%A/.46!SG#_3-\,\$Y=3G4P!,'\``8GA@@`,`3!_``&($#1
MRS%M``P`!`@M``,`#&<02'@``4*G+P9.N@PD3^\`##`$8,)D;W,N;&EB<F%R
M>0```$Y5``!(YPP@."T`"$ZZ":PP!,'\``8D0-7L@<I*1&T*N&R!NFP$2I)F
M$#E\``*!SG#_3-\$,$Y=3G4P*@`$P'P``[!\``%F"CE\``6!SG#_8.!P`#`M
M``XO`"\M``HO$DZZ"YPJ`+"\_____T_O``QF#$ZZ"U(Y0('.</]@M"`%8+!.
M50``+PHD;0`(2A)G("!*4HH0$$B`/P!.N@2:L'S__U1/9@AP_R1?3EU.=6#<
M/SP`"DZZ!(!43V#L87!#[('&1>R!QK7)9@XR/``3:PAT`"+"4<G__"E/@=`L
M>``$*4Z!U$CG@(`(+@`$`2EG$$OZ``A.KO_B8`9"I_-?3G-#^@`@3J[^:"E`
M@=AF#"X\``.`!TZN_Y1@!$ZZ`!I03TYU9&]S+FQI8G)A<GD`2?D``'_^3G5.
M50``+PI(>0`!```P+(&ZP?P`!B\`3KH+$BE`@<I03V840J=(>0`!``!.N@K6
M4$\N;('03G4@;('*0F@`!"!L@<HQ?``!`!`@;('*,7P``0`*(&R!T"`L@="0
MJ``$4(`I0('<(&R!W""\34%.6$*G3KH*QB1`2JH`K%A/9RXO+0`,+RT`""\*
M3KH`KCE\``&!X"!L@<H`:(````0@;('*`&B````*3^\`#&!"2&H`7$ZZ"N!(
M:@!<3KH*HBE`@>(@;('B2J@`)%!/9Q`@;('B(F@`)"\13KH)F%A/+RR!XB\*
M3KH":"EL@>*!YE!/3KH)F"!L@<H@@$ZZ"<8@;('*(4``!F<62'@#[4AZ`"I.
MN@FB(&R!RB%```Q03R\L@>8_+('J3KKXX$)G3KH'LE!/)%].74YU*@!.50``
M2.<,,"1M`!`@;0`(2J@`K&<8(&T`""`H`*SE@"@`($0@*``0Y8`F0&`$)FR!
MO!`32(!(P-"M``Q4@#E`@>Q"IS`L@>Q(P"\`3KH)I"E`@>Y03V8(3-\,,$Y=
M3G40$TB`.@`_!2!+4H@O""\L@>Y.N@%^,`5(P"!`T>R![D/Z`400V6;\/RT`
M#B\*+RR![DZZ`3H@;('N0C!0`#E\``&!ZC`%2,#0K('N)D!2BR1+3^\`%!`3
M2(`Z`+!\`"!G&+I\``EG$KI\``QG#+I\``UG!KI\``IF!%*+8-@,$P`@;7H,
M$P`B9BY2BR!+4HL0$$B`.@!G'B!*4HH0A;I\`")F$`P3`")F!%*+8`9"*O__
M8`)@UF`X($M2BQ`02(`Z`&<FNGP`(&<@NGP`"6<:NGP`#&<4NGP`#6<.NGP`
M"F<(($I2BA"%8,X@2E**0A!*168"4XM2;('J8`#_6D(20J<P+('J4D!(P.6`
M+P!.N@B"*4"!YE!/9@A";('J8`#^V'H`)FR![F`D,`5(P.6`(&R!YB&+"``@
M2R`(2AAF_)'`4X@P"%)`2,#7P%)%NFR!ZFW6,`5(P.6`(&R!YD*P"`!@`/Z4
M(``P/'__8`0P+P`,(&\`!$H89OQ32")O``A30!#95\C__&<"0A`@+P`$3G5,
M[P,```0@"#(O``Q@`A#95\G__&<&4D%@`D(84<G__$YU3E4``$CG#C`D;0`(
M0J=(>@".3KH(""E`@?)03V8(3-\,<$Y=3G4@;0`,(F@`)"\I``1.N@@X*`!8
M3V=22'H`;2!$+R@`-DZZ"`HF0$J`4$]G-$AX`^TO"TZZ!PPL`%!/9R0@!N6`
M*@`@125H``@`I"5&`)Q(>`/M2'H`.$ZZ!N@E0`"@4$\O!$ZZ!]983R\L@?).
MN@<Z0JR!\EA/8(!I8V]N+FQI8G)A<GD`5TE.1$]7`"H`3E4``$AL@!@_+0`(
M3KH`"%Q/3EU.=4Y5```O!#@M``@O+0`*/P1.N@`PN'P`"EQ/9B0@;0`*$"@`
M#$B`"```!V<4/SS__R\M``I.N@#T7$\H'TY=3G5@^$Y5```O"B1M``H@4K'J
M``1E&#`M``C`?`#_/P`O"DZZ`,A<3R1?3EU.=2!24I(0+0`)$(!(@,!\`/]@
MZ$Y5```O"D'L@`(D2"!*U?P````6+PAA$%A/0>R!NK7(9>HD7TY=3G5.50``
M2.<(("1M``AX`"`*9@IP_TS?!!!.74YU2BH`#&=0""H``@`,9PP_//__+PIA
M4C@`7$\0*@`-2(`_`$ZZ!1R(0`@J``$`#%1/9PHO*@`(3KH"+EA/""H`!0`,
M9Q(O*@`23KH"P"\J`!).N@(44$]"DD*J``1"J@`(0BH`##`$8)!.5?_^2.<(
M("1M``A!^O]&*4B!]@@J``0`#&<*</],WP003EU.=0@J``(`#&<P(%*1Z@`(
M.`@_!"\J``@0*@`-2(`_`$ZZ`H"P1%!/9Q`(Z@`$``Q"DD*J``1P_V#`#&W_
M_P`,9A`(J@`"``Q"DD*J``1P`&"H2JH`"&8(+PI.N@":6$\,:@`!`!!F*AMM
M``W__S\\``%(;?__$"H`#4B`/P!.N@(BL'P``5!/9J`P+0`,8`#_:B2J``@P
M*@`02,#0J@`()4``!`CJ``(`#"!24I(0+0`-$(!(@,!\`/]@`/\^3E4``"\*
M0>R``B1(2BH`#&<8U?P````60>R!NK7(90AP`"1?3EU.=6#B0I)"J@`$0JH`
M""`*8.I.5?_\+PHD;0`(/SP$`$ZZ`,`K0/_\5$]F\``$`$"!*T?P````.
M)4@`""1?3EU.=35\!```$`CJ``$`#"5M__P`"!`J``U(@#\`3KH`XDI`5$]G
M!@`J`(``#&#.3E4``$CG`#`D;('&8!0F4B`J``10@"\`+PI.N@1X4$\D2R`*
M9NA"K('&3-\,`$Y=3G5.50``+PI!^O_&*4B!^D*G("T`"%"`+P!.N@0F)$!*
M@%!/9@AP`"1?3EU.=22L@<8E;0`(``0I2H'&(`I0@&#F3E4``'``,"T`""\`
M8;)83TY=3G5.50``2.<`,)?+)&R!QF`.(&T`"%&(L<IG$B9*)%(@"F;N</],
MWPP`3EU.=2`+9P0FDF`$*5*!QB`J``10@"\`+PI.N@/*<`!03V#83E4``"\*
M,"T`",'\``8D0-7L@<I*;0`(;0XP+0`(L&R!NFP$2I)F#CE\``*!SG#_)%].
M74YU,"T`",'\``8@;('*+S`(`$ZZ`L9*@%A/9P1P`6`"<`!@V$Y5```O+0`(
M3KH"D$J`6$]F#DZZ`IHY0('.</].74YU<`!@^$Y5``!(YPP@."T`"$ZZ`'`P
M!,'\``8D0-7L@<I*1&T*N&R!NFP$2I)F$#E\``*!SG#_3-\$,$Y=3G4P*@`$
MP'P``V8*.7P`!8'.</]@Y'``,"T`#B\`+RT`"B\23KH"D"H`L+S_____3^\`
M#&8,3KH"&CE`@<YP_V"X(`5@M$Y5__Q(>!``0J=.N@+T*T#__`@```Q03V<2
M2FR!X&8(("W__$Y=3G5.N@`&<`!@]$Y5``!(>``$2'H`'$ZZ`?XO`$ZZ`BP_
M/``!3KH`#D_O``Y.74YU7D,*`$Y5``!*K('V9P8@;('V3I`_+0`(3KH`"%1/
M3EU.=4Y5__PO!#`M``A(P"M`__Q*K('*9RAX`&`*/P1.N@#^5$]21+AL@;IM
M\#`L@;K!_``&+P`O+('*3KH"%E!/2JR!^F<&(&R!^DZ02JR!P&<*+RR!P$ZZ
M`9)83TJL@?YG""!L@?X@K(("2JR"!F<*+RR"!DZZ`:Y83TJL@@IG"B\L@@I.
MN@&>6$]*K((.9PHO+((.3KH!CEA/2JR"$F<*+RR"$DZZ`7Y83RQX``0(+@`$
M`2EG%"\-2_H`"DZN_^(J7V`&0J?S7TYS2JR!XF8P2JR![F<H,"R![$C`+P`O
M+('N3KH!;C`L@>I20$C`Y8`O`"\L@>9.N@%:3^\`$&`.3KH!2"\L@>).N@%T
M6$\@+?_\+FR!T$YU*!].74YU3E4``$CG#B`X+0`(,`3!_``&)$#5[('*2D1M
M"KAL@;IL!$J29A`Y?``"@<YP_TS?!'!.74YU""H`!P`$9@@O$DZZ``I83T*2
M<`!@XB(O``0L;('83N[_W"(O``0L;('83N[_@B(O``0L;('83N[_N"QL@=A.
M[O_*+&R!V$[N_WPB+P`$+&R!V$[N_RA,[P`&``0L;('83N[_K$SO``8`!"QL
M@=A.[O_B+&R!V$[N_\1,[P`.``0L;('83N[_UDSO``X`!"QL@=A.[O^^3OH`
M`B(O``0L;('83N[_IDSO``X`!"QL@=A.[O_02.<!!$SO((``#"QL@=1.KO^4
M3-\@@$YU3OH``B)O``0L;('43N[^8DSO``,`!"QL@=1.[O\Z(F\`!"QL@=1.
M[O[:+&R!U$[N_WPB;P`$("\`""QL@=1.[O\N(&\`!"QL@=1.[OZ,+&R!U")O
M``0@+P`(3N[]V")O``0L;('43N[^ADSO``,`!"QL@=1.[O[.(&\`!"QL@=1.
M[OZ`3.\#```$+&R!\D[N_Z`@;P`$+&R!\D[N_Z8@;P`$+&R!\D[N_[(`````
M`^P````!`````0``!?@````````#\@```^H```!Q`````````````````0``
M```!``````````````````````$!`````0`````````````````````!`@``
M``$`````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````````````````````````````````````
M````````````````````````````%`````````````````/R```#ZP````$`
#``/R
`
end
SHAR_EOF
if test 7035 -ne "`wc -c < 'f18fix.uu'`"
then
echo shar: error transmitting "'f18fix.uu'" '(should have been 7035 characters)'
fi
fi # end of overwriting check
: End of shell archive
exit 0
--
*** Sean Casey sean@ms.uky.edu, sean@ukma.bitnet
*** The IPCF Roto-Rooter man. {backbone|rutgers|uunet}!ukma!sean
*** U of K, Lexington Kentucky, USA Internet site? "talk sean@g.ms.uky.edu"
*** ``I'm not bad. I'm just drawn that way.''