fseipel@hpuxa.ircc.ohio-state.edu (Frank E. Seipel) (03/06/91)
DROPZONE
by Steven Hiller
from A.N.A.L.O.G., issue #47, October 1986
"Suddenly, your scanner detects the presence of an alien. Moments later it
screams into view, charging headlong at you. In desperation, you back off,
firing salvos of raw energy bolts at your attacker. One strikes home, and the
alien pod disintegrates into scintillating dust. You were lucky that time,
but how much longer will you be able to survive in the Deathzone?
Deathzone is a fast-moving, 3-dimensional arcade game that will work on
all Atari 8-bit micros.
[You should probably rename this file AUTORUN.SYS (it may or may not
work otherwise, depending on your DOS). Also boot without BASIC, or with
BASIC disabled (i.e., hold down option on booting XL/XE machines).]
Playing Deathzone
If you followed the instructions correctly, you will now be looking at the
title page for Deathzone. Both the lowest (L) and highest (H) scores are
shown. You can start the game either by pressing the trigger of joystick 1,
or by pressing the START key. If you should wish to abort a game before
completion, either the SELECT or OPTION keys will bring you back to the title
page.
When you begin the game, you'll notice that the screen is divided into
sections. At the very top is a horizontal line whose length indicates how
close the alien is. Two sets of directional arrows at either end of the line
indicate whether the alien is to your front, left, right, or rear. The next
line is the status line, showing your score from let to right, lives
remaining and current level of play. Further down, there's a standard radar
scanner superimposed on the sky. The white central dot represents your own
position, of course.
By using the joystick, you can move in and out of the screen, or swivel
on the spot. You must do your best to avoid both the aliens themselves and
the energy bolts they fire. Each time you're hit, you'll lose a life. You'll
need to dodge, reverse away and fire rapidly, in order to destroy the aliens
before they reach you. Incidentally, you can pause the game with the SPACE
BAR and continue it by moving the joystick.
Every so often, an alien pod with rather different characteristics will
attack you. If you should succeed in destroying it, you'll receive an extra
life and move up to the next level. There are a total of six levels, each
progressively more difficult than the last. Should you complete the last
level, well...wait and see!
Last, a word of thanks to my brother for writing a "black-box" 16-bit math
package, around which the game was based"
-----------------------cut here------------------------------
begin 0666 DZONE.UUE
M__\ 'X [<'!P<'#P1P ;!W "<' &<' "<'!! !\ ET]03$U. ,M/4$Q-3@"8
M04)#1$5&1T@ B4]0A4Q-3@"/3U!3 (A)2DM%1D=( (9/4$Q-3@")04)#1$5&
M1T@ B4]0A4Q-3@"/3U!!0D-$B$5&1T@ @T]0BDQ-3D%"0T114@"$3U"#4P"$
M24I+AT5&1TA/4(5,34X @D%"0T2(149'2 "#3U"*3$U.04)#1%%2 (1/4((.
MCT544(L! @,$AE%23U"&4TE*2XX%!@<(ADQ5#H]%5%"+ 0(#!(914D]0A0P-
M#HL/'(P$C!T>A D*"YX,#0Z+#QR,!(P='K =SQV#
M555555556J5555556J5555556J5555556J555555556E6E5555555555I5I5
M555555555:5:55555555556E6E5555555FF555555FF55556:9555555595I
M5E5555555555E6E655555555595I5E5555566665 #QF;G9F/ &#@8&!A^
M \9@P8,'X 'X,& QF/ #!P\;'X, !^8'P&9CP #Q@?&9F/ ?@8,
M&# P \9CQF9CP #QF/@8,. #P\ \/ 5EEEE5555565
M95E655555555556595E6 __\ #\_/#P\/ P.#P>#P</#P\/#\_
M </'CPX, /S\\/#\_ #\_ \/ \/#P\/S\ #\_ $#
M!P\>/#P @,#@\'@\/#P\/S\\/ /#S\_#P\ #\_ P,# P _/S P,#
M P,# P,# # P,# P, /#P\/#\_ \/#P\_/P\/#P\/#P #P\/#P\
M/ _/P 0, /S\>/#@P </'CP_/P @ /S\ \?/#P\/
M\/@\/#P\/#P\/!\/ \/#P\^/ /#X_/S\_ \/#R\_/P_/3P\/#P
M /S\_'P\/ 55555555554 *I0 *I555 *I555554*I555
M55555:!:55555555 "@6E55554 H%I550 *!: "*94
M "*95550(IE5555555@&A65555554 " :%9550 @&A6 ()
M)94""265555558!@6%955555 (!@6%: @&!@6%A65@ H%I66665"J65
M95E6556J__^J________JO__________________JO__________________
M_____WX8'@ &#Q^&!@8 8&!A^/!@ !@P?C 8 & Q^#!@ @8.'@X
M& @ &!@8&!@?@ /& \!@8\ ! 8'!X<&! <'#"H!N"<&!P<'!P<'!P\/#P
MU <U( <U =5( =5 >U( >1 2!(0$!$$@(V@8:0&- )H:0"- 0)H0$BI
M!HT*U(T7T*F8A<H@3B-(J0"-%]"-"M2MP@*-&="ERCCI$(T:T(7*R3CP FA
M($XC2(T>T*7+C0K4C0C0I<B- -"ER8T2T"!.(TBIMHT*U(T7T*FRC1C0J0"-
M&M @3B-(J0^-$M"I>(T*U(T T*D!C0C0K0C0#0O0*0$-#- I#86L:$#8J4"-
M#M2I!J+DH%\@7.2I((WT JDBC2\"J0"-'="B!)T-T,H0^B D)JD2A8&I (6
MH "B#9B1@,C0^^:!RO (X /0\JE T.ZB_^B\9"; __ /Z+UD)LF;\/"9 !O(
MZ-#RJ0"-Q@*-R *%@HT$U(6[J1&-^QL@#2>I#XW% JDVC<0"J3Z-+P*I'XTQ
M JD C3 "( PFJ2:- 0*I-(T JG C0[4J8"%U:D#A<0)$(WB&_BB K6^U<&0
M$- %RA#U, FB K6^E<'*$/G8H "B K7!(!,FF5T;I:.97AO(R,H0[JD H@*5
MOLH0^ZD(C1_0K1_0R0;P#ZT0T-#T( PFK1#0\/O0#R ,)JD(C1_0K1_0R0;P
M^:D<A8&I (6 H@"@ +T7'S :T!3HO1<?*7^HJ0"1@(@0^[T7'\CP!)& J0$I
M?QAE@(6 D +F@>C@X9#1H"^I5AB9 !)I 9DP$FD!F6 2:0&9D!)I 9G $H@0
MXX3%J1Z%I*D A82I 87&(- MQJ30]:D1A:Z-;P*I#XW JG_A8J-GA2-T!2I
M@8V=%(W1%*D!A8N-"-"I>(T T*($J1B=/A3*$/JI (TO HWS JD0H :9UQN9
MG2:($/>B8H[5&\J.X!N.^1L@XC>I XT=T*D0C0?4J2"-] *I$HW$ JD,C<4"
MHB:@VJD&(%SDJ2.- 0*I78T JG C0[4J2.-,0*I((TP JD_C2\"J7"-$Q^I
M_XW\ B"N-DP!-:44Q13P_&!(*0\)$(6C:$I*2DHI#PD08*D#C0_2J0"B")T
MTLH0^F!(BDB82*2PIK&I'X6OC0K4C!C0CAG0R.C&KQ#QYK#&L:D C1C0J>"-
M"=1HJ&BJ:$ !X.&DI>CIK*WP\;2U^/F\O>3EFQ7BXZ:GZNNNK_+SMK?Z^[Z_
MYN>;-2)Y #,. "AI;&QE;IM0+ 0$! 0$! 0 H ! 0$! 0$!";9@ @C
M"0 $1D8%@ "%N86QO9P C;VUP=71I;F< ";E.'CY9O_J2.- 0*I78T
M J6"C034I? @[BRENC "QKKFJ:6IR1"0#JWS DD"C?,"J0"%J85-3%_DJ5^%
MG87AA9R%X& @,2BB$ :,)HTFCB:/!I0FE9 1I98898R%C*6798V%C9 "YH[*
MT-Y,:R@@,2BEE 65T -,%RBEE@67T -,("BB (:0AI&&DH:3I98XY92%FZ67
MY96P".@&EB:73&$G!9O0 TP,*. \"-&EV:6I90XY99(I97EETBP!&AHD =H
MA95HA90X)HXFC\K0W:(01I=FEF:39I*EE#CEEH6;2*65Y9=(D$(%F] <I9 X
MY9)(I9'EDTB0+VB%D6B%D&B%E6B%E#BP)6B%E6B%E*60..62A9"ED>63A9&P
M"*64T +&E<:4.+ %:&AH:!@FC":-RM"=3&LHZ#@FCB:/RM#Y\/*EE@67T +F
MCF"B@* I95%ES "RHB&CX2.8*6519>%FJ65$ FFE"!<*(:4A96EEQ )II8@
M7"B&EH67J0"%C(6-A8Z%CV"%F8:8J0 XY9BJJ0#EF6"EC! *YHW0!N:.T +F
MCZ6:$!"@ #BI /F, )F, ,C !-#S8#CI (64I94XZ4"%E:D A9JEE1 )II0@
M7"B&E(65I94IP/ 1J0 XY92%E*F Y96%E:G_A9H&E":5)I0FE; H)I20!.:5
M\""FE;U&*1AI 86.J0!I (6/I9H0"Z6/IHX@7"B&CH6/8*D A8Z%CV"I (6:
MII2EE1 %A9H@7"B]1BI(O48KJFBDFA #(%PHA8^&CF"FC^C@ K /RHI%CC )
MI8Z%CZ6-A8Y@HG^@_Z6/, 6&CX2.8.C(\/?_______________[^_O[^_O[]
M_?W]_?S\_/S[^_O[^OKZ^?GY^/CX]_?W]O;U]?3T]//S\O+Q\?#P[^[N[>WL
M[.OJZNGHZ.?FYN7DY./BXN'@W]_>W=S;V]K9V-?6UM74T]+1T,_.SLW,R\K)
MR,?&Q<3#PL' O[Z]O+NYN+>VM;2SLK&PKJVLJZJIIZ:EI*.AH)^>G)N:F9>6
ME922D9"/C8R+B8B'A82#@8!_?7QZ>7AV=71R<6]N;&MJ:&=E9&)A8%Y=6UI8
M5U544E%/3DQ+24A&14-"0#\]/#HY-S8T,C$O+BPK*2@F)2,A(!X=&QH8%Q43
M$A /#0P*" <%! (! $! 0$! 0(" @(" @,# P,# P,$! 0$! 0%
M!04%!04&!@8&!@8&!P<'!P<'" @(" @(" D)"0D)"0D*"@H*"@H+"PL+"PL+
M# P,# P,# T-#0T-#0T.#@X.#@X.#P\/#P\/#P\0$! 0$! 0$1$1$1$1$1$2
M$A(2$A(2$Q,3$Q,3$Q,4%!04%!04%!05%145%145%186%A86%A86%A<7%Q<7
M%Q<7%Q@8&!@8&!@8&!D9&1D9&1D9&1H:&AH:&AH:&AH;&QL;&QL;&QL;&QP<
M'!P<'!P<'!P='1T='1T='1T='1T>'AX>'AX>'AX>'A\?'Q\?'Q\?'Q\?'P I
M47JCS/0=1F^7P.D1.F*+M-P%+59^I\_W($APF<'I$3EAB;'9 2E1>*#([Q<^
M9HVUW ,J47B?QNT4.V&(KM7[(DANE+K@!BQ1=YW"YPTR5WRAQNL0-%E]HL;J
M#S-6>I["Y0DL4'.6N=S_(41GB:O.\!(T5G>9N]S]'T!A@J/#Y 4E16:&IL;F
M!25$9(.BP>#_'CU;>IBWU?,1+TQJB*7"X/T:-U1PC:K&XOX;-U-NBJ;!W?@3
M+DED?YJTS^D$'CA2;(:?N=/L!1\X46J#G+3-Y?X6+D9>=HZFOM7M!!LS2F%X
MCJ6\T^G_%BQ"6&Z$FK#%V_ &&S!%6F^$F:[#U^RI 87BK0#3R?_0!*D \#8I
M"- #(*\LK0#3*030 R"/+*T TRD"T @@#RW&XB"H+:T TRD!T @@ RWFXB"H
M+:E0C0+2J2*- ])@IH+@ ] ,HO^L,R/0 J!0B(3PZ(:"YLCFR*D HH!,SRRF
M@M .H@2L,R/ 3] "H/_(A/#*AH+&R,;(J0"B@"!<*(6C)+H0&(H899Z%GJ6?
M9:.%GXH89=Z%WJ7?9:.%WV"-,R.-.2.-/R-)@(TV(XT\(XU"(V"I 2#0+2"/
M+:D \ JI_R#0+2"/+:F A: DNA#CI=R%E*7=A94@FB@@N2VECZ:.)* P R!<
M*(6CBAAEVH7:I:-EVX7;I=R%E*7=A94@DR@@N2VEVH66I=N%EZ6.A92ECX65
M($(G(!\II8Z%E*6/A94@^RBFCJ6/)* 0 R!<*(6CBAAEW(7<I=UEHX7=8*D
MA;:I 86WI9R%VJ6=A=NEGH7<I9^%W6"EW(6>I=V%GZ7:A9REVX6=8*6.A92E
MCX65I;:%EJ6WA9<@&"<@'RE@A8/%QO ,A<:EQ4E5A<6I (6#I80898,P#LD4
MD!*EQ4E5A<6I / (I<5)587%J1.%A*JEQ9W*(DE5J(I*JIB=P"**2JJ8G;0B
MH@"EA,D#D 7I ^C0]Z7%G;DBH@"EA,D%D 7I!>C0]Z7%G; B8,:+T!"I H6+
MI8H0&:T0T/ $(*HN8*D/A8JI X7+J7"%R*D0A8D@JBZEBJI*&*D/A<G@#M +
MJ0&%RZ7(&&D(A<C@#- +J0"%RZ7(&&D$A<BI HT&TJ2)\ *(B(2)C ?2J12%
M@:D A8 @MR[&BF"I *"?F0 4R,#0D/A@J0&%AN ,D!?P$XHXZ0VJO/@NO?LN
MA8:]_BZJT JB#XI*2?\8:;BHAJ2]%C*JI8:%B+V.,9& R,:(T/GHQJ00[6"L
MJ)\" @0+#PNEG3 AR6"0#*6?28"%GZE?A9V%G*6=R0*0"Z7A,!#) I ,3+0O
MJ0*%G(6=(+0OJ0"%Y2"'-(6)C0?2(/8TJ?^%BB"J+B D)J(FI12%HZ $K0K2
MF1;0P 30 8B($/*M"M*-$M"M"M*-&="-%-"-%="M"M*-$] )$(T!TJ44Q:/P
MS<H0QB -)\;$T 5H:$SB(\[B&R D)B"C+Z7NT ,@XC=,KC:I *+?RIT %9T
M%IT %]#T8""C+Z:=X *0#:6<$ 'HX$"0!:D A=E@O3XQA=FJX!"P+J6E./U^
M,8T"T*D C0K0AJ2*2H6CJ;<XY:,XY="HO18RJKV.,9D %LCHQJ00]&#@%K!C
MBCCI$*J&J*6E./TF,HT"T!AI"(T#T*D C0K0C0O0O3(R..70J+TL,H6FO<DR
MJKTX,O <F0 7AJ.B (:GIJ9*)J?*$/JFHZ6GF0 6R.C0WZ:HI:4X_;HS2+RT
M,[W ,ZIH3!(QBCCI%JJ&J+W/,HT+T+W7,HT,T+W3,HT*T*6E./W?,HT'T!A]
MVS*-!M!]VS*-!=!]VS*-!-!]XS*- M!]YS*- ]"\I#.]ZS(XY="JN>\R\!^%
MI+GP,IT $[GQ,IT %KGR,IT %^C&I-#IR,C(R-#<B(B(B+GO,O ?A:2Y\#*=
M !.Y\3*= !:Y\C*= !?HX-_P!L:DT.7PV*:HO*@SI:48?:PS2+VP,ZIHC0'0
MK<("&&D"C1/0C<$"AJ28..70J*D C0G0O18RJKV.,9D %<CHQJ00]& !D8
M%Q85%!,2$1 /#@T,"PH*"0D(" <'!P8&!@8%!04%!00$! 0$ P,# P," @("
M @(! 0$! 0$ !04$! 4%! 0%!00$!04$! @("!@8&!@8&!@('!P<
M" @<'!P<"!@8/#P\&!@8&#P\/#P8& @<'#X^/AP<" @<'#X^/CX<' @8/#Q^
M?GY^?CP\&!@\/'Y^?GY^?CP\&!P^/G]_?W]_?W\^/AP</CY_?W]_?W]_?SX^
M'!@\?G[_________?GX\&!@\?GY^________?GY^/!@ 0,&"@\5'"0M-T).
M6VEX"0@)" @(!@<&!P<'KZZMJZJGP.#@\/#P^/CX^/CP\/#@X, P.#@\/#P
M^/CX^/CX^/#P\.#@P " X/#P^/CX_/S\_/S\_/CX^/#PX( @.#@\/#X^/C\
M_/S\_/S\_/CX^/#PX." (#@\/CX_/S\_O[^_O[^_O[^_O[\_/SX^/#@@ "
M\/CX_/S^_O[^_________________O[^_OS\^/CP@ 2)CQ5<0 $ $!
M 50(" @0-#! 8 @("! @($!"EH)B( $ /@ ! '\ 0#_@ $!_\ "
M __@ P?_\ 0/__@&'__\ $ ?@ ! /\ 0'_@ $#_\ !!__@ @__\ (?
M__@#/__\!7___@?___\ 0 8 $ / " 'X 0#_ $!_X " __ @?_
MX ,/__ #'__X S___ 9___X'____ $ / ! 'X @#_ (!_X " __
M P?_X ,/__ $'__X!3___ I___X/____ 0H5(BKIZ"7_P ! @D+#0^SLK&P
MKZT# P,# @$" P0%!@>I83CEG86C*0>JI:-*2DJHO=DTC=L@C=P@O>(TC=,@
MC=0@A*NB%ZD?F;@;G: ;RH@0]J2KJ1N=H1NI&IFX&ZD F;D;G: ;RLC #Y#T
MI9\8:2 J*BHI ZK0$Z6?&&D@R3:0!*(!T ;)#+ "H@.\ZS2Y\S2@ YFD&X@0
M^KSO-+GS-* #F<@;B!#ZIIVEG! !Z. &D#JB ""8-$IFEH67(!@G(!\IJ7\8
M98^%\:(!()@TA9<@&"<@'RFI0#CECX6N8*D#I*Z9_Q*9 !.9 1-@J0"%KF"E
MGX65I9Z%E. !\ 8@DRA,K30@FBBECH64I8^%E:6<A9:EG4IFEDIFEF 8:2#)
M0+ -A96EGJ(&1I5JRM#Z8*D 8 ! P</'S]__P" P.#P^/S^_P$! ! @(!
MX #CHB^I )V@&\H0^F @#":I *+?RIT $]#ZC0S0I;H0#*6N\ BE\8T$T""%
M-" !+R!>-2 ]+B!&+*6Z$!X@G38@9C4@QC.M_ +)(= .I!,@)":M -/)__#Y
MA!.I_XW\ JT?T,D'\*9,XB.EGR#"-(6E8*6L\!NEBDD/A:.EG4I*..6C&&D"
MR0*0#! %K<("T *I#X7)8.;MJ0 @AS0@)"8@]C2%B87JJ?^%BB"J+JD>A>^M
MP@*%QR"T+R!>-:F'..70J+D $RT*TID $[D %2T*TID %;D %BT*TID %KD
M%RT*TID %\C WY#7I>]*JH6CD 2I / &I<<I\ 6CH *9P0*9$]"($/>*"8"-
M =**2@F C072J8"- -*-!-(@1BREG<D"L :I H6=A9S&[_ &( PF3*LU("0F
M( TGI>[0'2#B-Z6[R060"JD&C1,?:&A,XB/FN^[[&^;$[N(;^*T*TBEP\/@8
M9;Z%OJ6_9;N%OZ7 :0"%P-BB J M;X@$R:9UQN9G2;(I:.9UQN9G2;(RA#H
M3*XVK0K2*?#)L/#W"0:-P@*-PP)@I>[0 TS<.,D!T -,.3E,%3>I+86ZI>W%
M[) #3,<WK0K2Q=6P TSM-Z75&&D*A=6I (6TA;6DNZT*TBD#R0/P]X6\R0+P
M$:D!OJDW+ K2, ,@7"B%M8:T((LVI;S0!, "L BM"M(I'SCI#X6?( TGJ0"%
MGJD"A>Y@I+NEG#CYHS>%G*6=Z0&%G:6\\$.EGQ #()TWV:\WD!^EO,D!\ F^
MNS>YP3=,23>^J3>I 22?, ,@7"B&M(6UI;S) M 2I9\0 R"=-]FU-[ &J0"%
MM(6UI9X89;2%GJ6?9;6%GZD$C0C2J6 899V- -(XZ0&-!-*I8#CEG4I*2@F@
MC0'2C0728$G_&&D!8"@X2%!H< ($! 0 @,$! 0$ 0&" P/#X# V "
M 0$" B#M-[G<-X6]J?^%YX6?A>NI (7N8 8%! ,# ZD,A>RI (7MA=!@((LV
MI+NM"M(I#QAYLCB%O:D A1.%G(6>J4N%G:T*TH6?("<X($HX('\XJ0&%[JD#
MA>2EU3CI"H758*T*TBF A=*DNZT*TCF^.-G$.+#UA;2I (6UK0K2.;@XA=-@
MK0K2*8"%T:2[K0K2.=8XA;.M"M(YN#B%U, $D JE[O &J0"%LZ #K0K2.<HX
MV= XL/6%LF"DNZT*TCF9.!AI 87FN9\XA><@I3BI (7E8/]__W\_'P$!
M *D HH^= !7HX-^0^& /#0L)!P;__W]_?W\_?W____] 8("@P/]_?___/S]@
M@,#_($ 0&EJ= )K<("&&D0()8VI-FY33N%E:D A92%E^;KI>O),I $
MJ0"%Z\D9D 2I,>7KJKUG.XT TCCI!(T$TJE@C0C2I=E*&&D""2"- =*-!=*]
M-#N%EB 8)R ?*:6/A="DNZ7ET""E$\6]D!JI_X7FI9PX^:,WA9REG>D!A9VE
M[O #('DW8,;3T ^E[M (I>OP!.;3T ,@)SBEGQ #()TWV08[D BEGRF 28"%
MTL;4T ^E[M (I>OP!.;4T ,@2CBEG<7DL 2I / 'V0P[D 2I@(71QN;0!J7G
M\ G&YZD#A>1,F#KFYJ7ET""I#X7DA>K%G;#MI9V%X:6<A>"EGH7>I9^%WX7H
MJ2B%Y<;ET D@I3@@?SA,F#JEZO $QNH)@(T%TJD*C032IN+@ ? +I>@8:4 0
M!(I) JJ&MZE A;:EX(7:I>&%VZ7>A=REWX7=I>@8:4 I@" 9+:7:A>"EVX7A
MI=R%WJ7=A=\@PC2%Z:7A$ 2I 87AR6"0#2"E.*D A>4@?SA,F#K)0+ U2DH@
MG3<8:0^JH +9*SNP X@0^*7I./DN.XT!T+DQ.XT)T*D/C<$"C1/0J16%@:D
MA8 @MRZET? 0I9PXY;*%G*6=Y;.%G4RY.J6<&&6RA9REG66SA9VETO 0I9XX
MY;2%GJ6?Y;6%GTS:.J6>&&6TA9ZEGV6UA9^E[O GQM@0(Z;7I=E*"6"- =*I
M0(T(TKT2.XT TKT>.X78Z. ,D *B (;78!@@*#! 8$9+4%5:7Y:"AY:1H(*'
MEH*,D0," P0#! 4$ @,$ @ #0\$"! 0, .$A99G)]AY&:HJJQN;_&S=/9
MW^7K\/;[ P0("@P.$!0:'B$D)RHM,#,Y/$)(3E5D>&[PZ.#8T,C N+"HH)B0
MB(!X<&QH9&!>7%Q< . "X0+B(PT-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-
M#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-
L#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-#0T-
end