8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL LL !C_" %k"l" (#M8( % ) L*"m"n" (_7, )7(P0 ( @X p 8  u"!_"f"0 ~&f"0 %o"p" (,) &q"r" ( %L*")0I0hx H( +&CRONUS հհ-CRONUS.SHAPES Qհjհ,CRONUS.ALPHA հ`հ&DIGGER а: + DIG.SHAPES а: @а:  9' 9' MMSHAPES2, @2, MMSCORES )SA.LOADERR/SURPRISE.ATTACK E&SAFAST@ @,TITAN.CRONUSհհ.TRK.CURVE.DATA հ3հ3,RACE.RECORDSհ3հ3/MAKE.TRK.TABLES'%հ3 հ3*MAKE.SCENE հ4հ4-MAKE.TRK.DATAհ4հ4,MAJOR.MAYHEMM2, 9; +MAYHEM.CODERհ0㨓հ0NIBBLER.SHAPESLRհ0@հ0.FORMULA.NIBBLEN հ2 հ2,TRK.ROUTINESY հ2`հ2+TRK.SCREEN1_հ2 հ2+TRK.SCREEN2pհ2 հ3*TRK.TABLES հ3pհ3NIBBLE.YAGGA' &PRODOS }<ͰͰ,BASIC.SYSTEM&(*+'STARTUP 8 &6'NIBBLER<հ/' +NIBBLER.OBJ@ հ0`հ0&NL.BINJ >dLԡm#i㰼m#iЕOLԡȱfg hi !dLԡ憦  Ljmkm l y`2 Lԡ8(Je稽)ʈ@LLnSOS BOOT 1.1 SOS.KERNEL SOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUND%INVALID KERNEL FILE: xةw,@  ȱlmi8#)!)? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8R %Щ ߩu"L! )L! 8'  )ɀ)4,- U JNT) u"Ls"t" ( !` ^"M)Fi/ b"3   !"#$آ <B*IBGF08Lé'+8H <,``h(`@ڍL3<>=?<>CAB@?A` 1 L  <>`ڢF]PL8i m L   6< L  BLRAM' hLDLHB-9F 3"aɿ LLB Nϰ H  @h( L Lj  @`eLJCAB@=?.<ʆ>,=?BC8 é&'112``* G** c*` v* G* c*`hh8`8`***`}*`e`H)hJJ*0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <ȱȱȱȱ0]cȱeem*ȱ*ȱ**ȱ**ȱ* )* * )L(`L?* *Ll) ) L( )Ll)8e` ,$`ee` < @( )m((.(( M(i  ``) |'(j21 z& {&!` ({&z&(i({&(( CBDFGE (r&$ 3(,}&r& … 3(ŅL&JJJJ`Ϡ'8`r&h)hr')L&18|&"m11 2H22h2舌|&|&12H)M0 h10200I20h2 (`LE%12 `_'"L  <8# ȱ)ɀ  )( ` (Xp0`ŠӠֱέԠŠҬî̠ӠĮʎ1|&… (n}&Dž (\%Tz&Lc()8= (J 8'z&'{& 3((ʎ1|&|&|&3223 `BYYZLYLYLY뿭` 8!@8` %MNЩUMߩ  L 5   8 0 8  `0 / X& & +&&7&P^&  VG+ #X ɛL ' 0% '8 Jm ʈ0  0ŠϠĠ͢Š͠͠ϠŠŠϠĠخ͠ ͍B B(8 ) ɘ"    L:#:#ŠϠĠԠ  m# m# J Qڨ)̰}] нȱ ̀𩠙 i V N c ɘ\ h"i"j" e" iL X>"L;"ίΠ`v""""""*$ Fk%YeQP!/RB}QBiBB}\ }FEL,#> ȏ6 .hh@ihAiH(ؠȱ@JJJJq@)@vvȱ@Hȱ@Ah@@cve J) LL LJiB LJ) JxNhHHHHL(  ްƠx@BEOD  ް(`( C)CJJJl`B l-`J,~@~@}J@` ߩ%S @ ~`E hhhߺ0 h ߐ(     0 HϭߍLпlJHIH IL;FHGI ҭJjHIHB>IؙJJ c: QLHIHI`JKJK`FHIG ( Ȣ؝؈JL)eKM`)` J }J͢ $0 ΑJFJL8`JG ް(`(8`ؑ@`M8`8@ؐʈI묉)}8}} L LةC8`؍)@ i)}8}yJ ^ ؅F L{) +%J(a 6FإGؐ.` 6}۩ ٰ}~`JJJJ;i 묈͝ ٍ0  `H8` `ٍyٍiB0H0FG h0`FG `ϩBxED0C` }~ `ٽJJJJ`H͓hn) NjNjNjN. OH͓ ;٭ *Nۙ۰ڙک `Z8` O# 4`~ .~ .~ .~8۰*JF٥G٭'ܝ٭(ܝ`)َ 8ʈ` 0ٝ)i `8`R ꍓ}~ NمFمG < Γ0 FGL鮈0 ٭~٭}ٽ8`H8`  ,} ~ 8 S01 E8`100 e 0ʩ 谼 谷`12)1`0`Ȏi 0U`)8`ί` W G I8`FHGH hGhF܌ բFܽܕF芝ܝ 밶=> ?܅I m@IHHyHȘI Lܝ` @f@ n@Ю׍V)؍0JHi 뎈`C8` @ 3N@) S莴 ⭱i`0 e; 뮈ٝ٘ 0 W,0 .H hȑNWȮّNW8`ٍّN@`,뎕׮Б` L ` @>V)I38 Pghם`K8`@Nȱ@O@ IiNȽבN)/ȩ/N`@[ WHJjjjhA I'KIlllhh8` Qu")T'P() ɺiLG )?      `l@Hȱ@IױHXATȱH ɯȩ׍̕5H)/@a)_ .0 :A[8BJ \ FإG`BH \FإG`,H hHB؅F  ؅GxDE؍00C ް(`(8` L3J  B"L H  B 9ؙ` @ P8`K8`B8` O؈VJJJJحt) ) )Ю ЪGgF $ ᭔ع+ؠ >H  Wh8` 䮈ٽ ٬ؠ@` ( O )8`)i п`  H hхhꭋILhH),kx8 (8` ԍ`@Ae Or88`zw! NIJK,-NOPQRSu' Bɼ>K@J5 9X(K XXK تKo`V8`no` I on I9XX`) HJJJh`OeNeO࿰ 9XАO`@ȭ@` ON fNJKO`H݅G ` wͬ 밽܅F݅G ` * w% L`L뮷HH &hFhG܍ݍ 8 `FHGH & hGhF`ݹܙ݊`@OEgFhG 6%&N   & ܮ `J HH hh` 0 @ LLL w`̻Yܝ ݝ0̻ȩFG   0` ܅F׍Vgh 밑 %LȹL@ȅH@IL,0` G פֿ= eH.t)N 0 PghV)@LP8` a᮷ &֩VJKJ L䬈yٙ٭yٙ٩`K 8` @LL =@ 4ȹP8` %i` Bם0 4B B)( ȹ`8m8m@8` G8`F Pt)@N8`V)@J 4טyרםVV))ꭸJJJJ Ȣ؝I؈ >h(8H E h(8Hh(`ؑ@`@ȱ@ ` B@8ZV p鮈ٍٍٍvHٍu8ihjVJJJJV)V@` %I -t) 0@V)N ) C⬉Ȣ؝@ݡ@ʈLO KIJHȢݡ)Jn 8 λ ؍ ؍ aH8 ع؉i 8` L )߹0 )p )@ ) ȩ ؝O0QR 방 STQRFG 嬉؍i؍j؝k ؝f }V) }V )حP͝ `H@h`h``N8` IhHIhH  iع `  عiعi` )؍0CGHFHBFGx ް(8hFhG`@4͔ L @Ai ׭2` . W#ع؍0 e讈)`.@+ HI}H؊  PLKΥʱNLMO MЈMEKݸP%MEKΥL0 O, PeNNO O(` C  7 #2J}HI~HI؊ LQ  6` #A H} ع H~ ؙ؊`@Nȱ@O`؝}}I}ؐ` rؽ؝} r 1 r؝}؈` ` H  \h)N@ C; L  >$ )bJ e ) H @hL ) # )حJjI~@L>쬉8NNO 8 ؍JL`RΥʱLN1MOMEKP/MEKΥLCL-M O,p莤eNNO(`JNKOL >/  .P L8 cؑJ`L@ȱ@ )N$% LL L L >  .pJ덦 )@፩NJOK >iKKΥΥ IJΦ JФ̭JjHFIH HIGxKE ް((H hH h8`8@ȭ@   !"#$Ԡ͠ˠ(C)1983-87APPLELKL`BL Lެެެެެެެެެެެެެެެ(C)APPLE'83xLLM Mh@8nЍLޭ 0J @,,LZYL 8!9 詍` "  4"/pŠϠŠà͠ӠàԠŠ%'()*+,-./0123456789JJH !h穖tp% ;"Z/݀>">"' 1" 7"5).莀/ ;" " 6" >" 1"6"$ "g"" !"""""IzLLG ASTARTUP$#   / XXύX?klmnÍoL) "6L'?"(0`6708" = ***)<  / XʩXύX X %   % ɍRH hɛɘɉɈ $ Ld :Ldې)ɮ۰ɺ' Ld  : X ( % ɛ$ɘɉ 8V%֌&8V֌֠)HV)hH)hHIhդD?DRIDQD)҅; ?JDQD]ՎՎՎ`MY pӭY)p  ӭp`C)`BFGV 8``8LխӅ:HhHh Ո թ թ ՘VYҪҦ>:Y)Ң`;R?AJ;<ȰY)Ң`Y?)Ң`ȐҰ ;HhHh=Ң`Hh `Hh`DEiȍ0֌1֍ZԍsԍԍԍԥDEԌ8TԌ8WpԌqԠ 7I꽌ɪ꽌ɭ蠪:љVE:8`]ѾV]H)]ѾV]ҙ)]ѾT]ҙ)] >8hUD` ԝY`> Hh݌(`HCJJJJ)*h`0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` *L o % ԽYӍZӭoӝY 3Ѡ шNZ`rZLkӭZӍq8r7IZӐiZkӐk 8 ѹs ӭq ѹ| kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| ֽ ְ& .Vӈ  JJJJH 8h Ei 8EX`'8`jӍWӥC)p> pӥCYӍY 轊( ( ӈBV ( ӭp0 \BkJ ՠ@iӦ> Ӑi'j:ZH i@ioZZH h ѐȭnWǥBJ Ӱ8XӦ>` Ր+>P׽8H  ): e: y8鰕:Jjjj<)yאi8i;i(*=>hPם8`;Zx3QZYXXWV[HEVhEhH)IWHPHHHAHHHLaVEWLӿ``H06172839h` v97L75v^a ?/( va?LLLɍ$?`?a ɍɥAH93827160hH46576879h`,C bL ɍ b w,S0 @ lLޭB 鸍긍$I2 U)VJ зT)`l8`a HbIJhjǾȾɾ p٭b=aSL/id /`H) hJJJJ ɺi` M  ` ת.8 `O`S  AI-L9 ᪰B C VW>m>` _m8injkiljo풼i>?Ek?>Q>> L> \/ e>>?́?ޱ>ȥpnG @p;G=po:Q>>>̀ `` \> ̀ `e>>?́?>?Emn(>e>ȱ>e?>Q>ؠ> ie>>?`|;}=:<~:<=;`||m};>:8o>oȑ>ppȑ>> :op`G DKJپھ pHJh` D!hgt}~p `~t}p8n~ni}tpi~~tso8pinii>j?k̈́>~|p|Ii||̈́ l - `>i>L8933LΞAAJL ةޘг uv $ 8LƞaЌ>?@`>?@`B8` K  춼LK ҟ ҟ ( KK`HJJJJ8`HK)` #hhL𚾤3 @LtJ)s@J b  l`a?sa?,E30ɍФ3 E3HD F3 Ʉ%h3 bM E  lLthɍLL3`3,A0s0% Ipn DpnI:L ؅303پھ p H־Ǿh۰8L־Jjjjɾ)Ⱦ8 ѱ OLӜ ĤLLX>(F`־ؾپھ׾` bɄ KDEF vLl v lL bKɍKL?` w  vLl@$݅3`(l8L3LX>(Ƀ,`3,G0]ɾ g` H`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O ]c־Jjjj `O>0O l PODEF޾ p ޾ p($ذ v (0 ( L?ԦʚLeةީa s  lL b,FLg,DL,C0$3 >@ Ɉ 3ɾꩈL(3ɾ;Ƀ B94 l% bʽ  ՚,S` H Eо VV :$ZA@L8 `u-U -W b WW)JJ :T$K \0IDK : :5K 0.)K :쭼󬮼XK`L9L^ :K mY ܩ 8jK` J,, ( 5̪ ` J, ̪ ` J, `)a)_ͩ`0:8 `)H"H ת תh}I תhm8`0 :AG8 `) ת `..`SI-SRRX)sƬƀ#(ZZV4G_0=( A P FjL\5p-e9ABSAVERIFYBLOADELETEBYECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND6D(!쫂8 ( 8о(־Ǿ,G 8`_`W)H־Jjjjh p̭ fLᶢǾ ת..8 ۭ (8mȾȾmɾɾʾiʾ` Lpl8l:/,s`\"׾پӾؾھ pD`־ǾY׾ؾOW)ݩȾɾʾ pD`8`W)CB) 5W) =)W)@! pZ}ȾȾ󰹩 p` ־ǾҾ,G 8`׾ؾ f p vۥs׾tؾE` `޾Lp h־Ҿ,G0^W)TP) ecfdپھ׾ؾӾ p$c d pccddީ 8`ȾɾʾNfne}ȾȾI>Ie f`8` P־ǾҾ,G0C f=W)_`:_`蹀:`V)8`MN; b;`;C b N8` G)̀#:蹀:`V)R ޾,N0MHhHh p' L,N HCNh`M`M N N `9V) ` V) ޾ p`  (8` 8`8`(W)`_V)Ij!؍Í`_ FjЭW)`_ Ͼ pH Lh8`jGMоM  G)p pY)ικ`lP *,N!ǾȾɾʾ pǾ~H h8`8`,C  8` ȾɾM$ mHݓǾ phϾ pH Lh8`Ͼо־ǾҾ_` 볩Ӿ pW) "LEC`C )莼 з l6 7= /& /8Hh /` 6Y׾ؾ+پھ p|پɾʾ`HV)jh츾$-#Ͼ p о־޾Ǿ` 8` 8`ɾ)ɾ̸ ɾɾ0miȾ ;τ<:: <`:8` e eվ'OV)Jj зf Ja l ѱ&ji Ĥ Ƀ B ,  簰 ` l])Y 񩢍`Ⱦɾ0Ǿ p1׾ؾ  p p ٷ H rh(`׾ؾ` : ߭׾t8퍼mؾŰ펼t폼 L28` ˌھپLp k V)@W0!XY X6Y7` YX`X:Y) F з8` # `l׾ XYW0V)4W׾ؾ_`)0%I0)3]8X^YȰ8` 8` p Ⱦɾʾ8`پھW)@%ZȾ pSԩ p`S pLjÍ FN I 9 : ׾hؾ  p hgͺ칾`LٷV)jC mMjà Lp `VJJ°L9Lp з)< L з L緭W)8VJưϥ3 켼 `F`4W)ɐ/XYjV  kimljn` pg׾mȾXhؾmɾYtѮȾɾ aYX`8g@I5gN Oz @n[Dz @nd0,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt NLr`蠠̠͠Ǡ֠Ҡᠠΐߠ𠠠Π栠ŮԬϠ堏頩`.`/`@` {k`` g Sg ` c>`>` Sg gL`4`8`5`9`6`:`7`;`0`4`1`5`2`6`3`7`/`P  `0I)`  `0I17:7:"SCORE: ";SC;" HIGH SCORE: ";HS;:868R 15:12:"G A M E O V E R"l I12000::16368,0 16304,0:16297,0 I1250:(16384)127180 ": ,I1250:(16384)127180 6:27028 : ---CLEAR PAGE 2% :+ 1 :C ---PLAY GAMEI :T 24576Z :t ---FLIP BETWEEN TEXT AND HI-RES WHILE WAITING FOR ANOTHER KEYPRESS : SC0 X2459724606:SCSC10(X): SCHSHSSC1 LE Q:3 Z20:1:12)"LOADING SHAPES";:868\ d:(4)"BLOAD NIBBLER.SHAPES,A$1500"b m:} n---SET TABLE POINTERS o: x232,0:233,21:1 : ---WAIT FOR KEYPRESS : 20:8:"" 16368,0 16384,1;=>:13:" N I B B L E R ":13:":"13)":"{ (:12:"** COPYRIGHT 1983 BY MICROSPARC, INC. **":9:12:"BY: BRENT IVERSON" 1: 2---LOAD MACHINE LANGUAGE 3: <20:11:"LOADING OBJECT CODE" F(4)"BLOAD NIBBLER.OBJ" O: P---LOAD SHAPE TAB! **********************A * N I B B L E R *a * BY BRENT IVERSON * * COPYRIGHT (C) 1983 * * BY MICROSPARC, INC * * CONCORD, MA. 01742 * **********************::) 5:13:":"13)":"GO ON, ESC FOR MENU";:16368,0:KEY$::KEY$(27)160:Q P20(A$)2:A$:k ZA$:A$""ĺA$::90q d n4:90:70:: x10:A$"WELCOME TO ":80: A$"YOUR APPLE GAMES GALLERY":80::A$"COPYRIGHT(C) 1988":80::A$"BY MICROSPARC, INC.":( ********************************O * YOUR APPLE GAMES GALLERY *v * (C) 1988 BY MicroSPARC, INC. *( * CONCORD, MA 01742 *2 ********************************<900A:::(21):120; F24:1:"PRESS RETURN TO LLwLLL) `8` ԠŬLLʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~T)` `0<`L1a<`L1a `0<`L1a<`L1av/`0<`LaɈ<`Laɕ<`La<`Laɓ .`I.`Laɛ 0!LaɒhhLr`Ɋ/`Laɋ/`0`8)Lb1`8)Lb0`8JJJJ`1`8m`l`<`<` f <`=` c?ABCDEFGH   Ҡࠨ    頹   蠅            ̠ Ҡߠmmmmm n"n7nLnanvnnnnnnn oo3oHo]oro  `*`*`)`)` l`)`)` pp*`*`+`p )`i +`*`*`)`)```` &'`pi'`%q``[`pi (`    ɠ       pgm) pgC  0 am)Ӡ  0 a o)C  0 ao)Ӡ  0 a`` `` ` ʽ`}`i 8 ``)`,`)``)` ,` Lk,` KpLp*`*`+`p )`i+2` a``@`p  0 a``L j` kg``A`i; `E`i ` `Q` 0 a`````` vmwm`)4 `Lj `` i;` i  ` 0 a``Lxj``Lsj` @  @`JC`W`VD`X`HE`]`XF`G`H`^`_```I`J`K`L`M`(N`PO`xP`Q`e`` kg``` `m`l`` ` `` `=o!`iC`i  `o 0  ` ``` Lqi`` Lli` kg0`i;1`i 3` 0````` vmwm`)`JJJJ `````ũ `` h h h _i i 2j nj k j l fl j.`>`?` g >`8 >`Ȱ `?`>` Sg`PRUW @`P0`4`1`5`=`3`7`2`6``PA`U`B`V ?` ok-`` k k-`L#fP>`?` g >`i>`@`@` hhQT` PhhhL` `I ` kg {g` pg ug` `@`T`U`.`+?` ` g?`>`` g`0` g g`M`M0`M1`M`MM?`Mm`Mn```` ```` `` h Ph``0`L#fn`81`L#fLfp`>`LGf LIf)LGfLIfq``a`i `Y`i; ` `i` 0 am`i;n`i q` 0 a`m`A`n`E`q`Q`o`I`p`M```Lc``=o```=o` `Io``p`L#f>`!p``8m`l`p`!m`8JJJJ`n`8m`oo`Le g)`Le```V`0`m`Le1`n`Lse g)4`0`m`Le `>` `I ` ` fW`Le`1`n`Le `>` `I ` ` f#`LLe g) ` f ` `) `Le `o`m`8`A`m`E`n`I`o`M`p`Q`q`U`Y`]`a`e`i`m`U`n`]`q`e`p`"Xn`m`RY >`p`Ljdp` `)n`Xm`ɊLdLdo`omm`m`omn`n`m`m`Ldɝm`m`8)Len`8)Len`Xp` o`Io`Lem`8JJJJ`nL^cW) ` kg Ac `` I>`-` ok` k kL^c0`i;1`i  0 a`3`3`3`=`&=`o `0`m `0`=`o `1`m `1`0`0`Lcɝ0`8`i;9`i ;` 0:` a0`i;1`i 3` 02` a`=`o2```Lib=` fLib=`Lib=`<`Lib<`A=` Lib<`$ <`=` cLib<`  <`=` c0`)L^c1`)L^c0`JJJ`1`JJvmwm`)`_) ` kg b pg b `?` ok` k kLb0`i;1`i  0 a` ` `Lg   0 ̠ɟɠِ栠å堤ϠǠapfpkpppupzpppppp?333? 3??0>0?33?00?0??3??3000?3?3??3?00 $(,0$?1-$?6?$- 6Rq/7D*,,,5>67?>'?<$',$...$%,*$%,t65>67?>'?<$',$%656$$$*$$$55.67>>7?<''<$%,,%66$%,*$%,t65>67?>'?<$',$%656nln$6 $ $6 8$5$------5>?????'-----5!$$II!$$$,66666'66%$$$$$$$$4:??:???7-------%???ΣIK  $Lԅ o ɢ ILɠ-)̡ѭ 𵎡L6,ҩL  = {ڥ ٰ %LamiLS`i`?cccc?3c3333 33?3?3??337;3? ? ?333 ???3?3??0??333?337;3(1)"..PADDLE":CTRL$(2)"JOYSTICK"HN02:N203:BLK(N,N2):N2,Nx 2,128,129,130,3,132,134,135,3,136,138,139 MES$(0)" (USE ARROWS & TO SELECT)":MES$(1)" (USE PADDLE AND BUTTON TO SELECT)":MES$(2)" (USE JOYSTICK & BUTTON TO SELECT)"+FRST1:DLY100:VA1:PP0:LC1F24579,1:(SOUND FLAG)Z24597:Z,("A")128:Z1,("Z")128:(ACCEL & DECEL KEYS)Z2,("J")128:Z3,("K")128:Z4,("L")128:(STEERING KEYS)"---INTRODUCTION---,:23:16301,0:" (PRE128)::/---WAIT FOR KEYPRESS/BUTTON---AST0:D1DLYi(16384)127DDLY:ST1:16368,0(16287)127DDLY:ST1D:---DRAW FORMULA.NIBBLE LOGO---V:1:1530:" FORMULA NIBBLE ";:(16 DASHES)1550:V1:1:1550 2350+<---GET RACE RECORD INFO---DF(TEXT LINE ADDRESS)kPLNTC4L10:L1(LN8):L2LNL18ZADD2048L140L2128SC1414:d(GET INITIALS)nC$"":N02:C$C$((ADDN)128)::x(GET TIME) T$"":N410:T$T$((ADDN).RECORDS":216,0:1300K::10:"PLEASE PUT DISK WITH 'RACE.RECORDS'"~"BACK IN DISK DRIVE & PRESS ";:Z$: 16299,0:1260D$"BSAVE RACE.RECORDS,A$800,L$400"(16287)128(16384)1281310(16368,0:(16287)12713201380:1400LL1:1350CN02:ADDN,((C$,N1,1))128:kN410:ADDN,((T$,N3,1))128:rLN02:LADDN,((PC$,N1,1))128:N410:LADDN,((PT$,N3,1))128:16303,0:16299,0:20:1270D$"VERIFY RACE---";(8);(8);(8);:N$""6BZ$:Z$(13)ĺ:1150OLZ$(8)N$""1130hVZ$" "(N$)21090`Z$;:N$N$Z$:1090jZ$"-"Z$;:(N$)1N$"":1090tN$(N$,(N$)1):1090~PC$(N$"---",3):LL21220L2LL11 LL1:1350:(P2)":"(P3)(P4)"."(P5)8(CHECK IF RECORD)OL02:1350:1400fT$"00:00.0"1040{PT$T$ĂL:290LLL:LADDADD:22::16301,0$" A NEW RECORD! ";:.(24579)1āN13:25638::(SOUND)8" TYPE YOUR INITIALS (START GAME!)%(24577)0ĉ::JFRST0:(FLAG SHOWS GAME PLAYED)a(16287)127930z(24578)1EC0290(GET PLAYER'S TIME)P1((24584)16):P2(24584)P116P3((24583)16):P4(24583)P316P5(24582)!PT$(P1)PEED & CORNERING ABILITY)9>SC0Ĺ24592,218:24595,5WHSC1Ĺ24592,250:24595,5yR(SET TYPE OF CONTROL TO USE)\24587,(CC)f(SET TRACK BLOCK FACTORS)p24624,BLK(TC,0):24625,BLK(TC,1)z24626,BLK(TC,2):24627,BLK(TC,3)24704:(CC)"23:MES$(0):VA8:430>(DISPLAY RACE RECORDS)V16303,0:16299,0{(16287)128(16384)128770 16368,0:(16287)12778016300,0:430 ---START EVENT---*:24580,LC:(# OF LAPS)4(SET SKILL FACTORS: TOP S14:11(EC)670I"RACE IS ALWAYS 5 LAPS";:D11200::690e"ENTER # LAPS (1-9) ";Z$:Z(Z$):Z0Z10LCZ14:11:"# LAPS............."LC" ": 13 PER.430(CONTROL SELECTION)CCCC1:CC2CC015:23:CTRL$30 :#(TRACK SELECTION):&TCTC1:TC2TC0U011:23:TRK$(TC):430l:(SKILL SELECTION)DSC(SC):12:23:SK$(SC):430N(EVENT SELECTION)XEC(EC):13:23:EVT$(EC)bECLC5:14:30:LCl430v(# LAPS SELECTION) ";CC0450-K(16384):K128490;16368,0`K136K139VBVB25:VB0VB0K149K138VBVB25:VB255VB255K141(16287)127510VA(VB25)1:430(16287)127510VA800,430,540,570,590,630,710,430,750,4/7 PER.R|11:"EVENT......."EVT$(EC):11:"# LAPS............."LC: 7/13 PER.u11:"CONTROL....."CTRL$(CC):11:"SEE THE RACE RECORDS":11:"QUIT....QUIT....QUIT":23:MES$(CC)VA1:VA8:VB0:16368,06:" ":VA8:6:"--->SS KEY OR BUTTON FOR MENU)"/61420:ST350N@:V22:1470:1420:ST350\JFRST290{T16302,0:1420:(ST)290^---MAIN MENU---h::V4:1470:9:11:"START YOUR ENGINES!!": r11:"CIRCUIT....."TRK$(TC):11:"SKILL......."SK$(SC): 5" COPYRIGHT 1986 ";:15300V2:1:1530_" BY MICROSPARC ";:1550:4::: 16 -'SrN16:" ";:" ";:::N15::" ";:" ";:::" ";::"::12:"ERROR "(222)" IN LINE "(218)256(219):@`O````$` `%`&`*`)`"`!`````1` `X#`gL`U`tV`W`sX```` 4d 4dTRP 3b Ib #g` &d 3b Ib #g #g` &d 3b Ib #g #g @` #g@`` &d a`:$`$` Ob ` 4d ` a`%` $`^`abcdefghijklmnժժժժժժժժժժժժժժժժժժժժ*U*U*@*U*U*U*U*U*U*Uժ̙̙̙̙ժժժժժժժժժժժժժժժժժժժժժ@*U*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*U*T*U*U*U*U*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*UP*U*U*U*U*U*U*U*Uժժʙ̙ϙ̙Ъժժrrm@`ΙiΙiiiՑȩh`%`JJJJJ |ii0|ii |j j0|jjM`rrm@`ȽʽȽM`M`ɏ`M`M`uڢeM`rrm@`(M`M`hڢhM`rrm@`"$M`M`u`&` p{0it{1ix{]i|{^iM`rrm@` M`M`ɡڢM`rrm@`M`M`ɡ`iie`) g`JJJJ g`) g` g``JJJJ g`)! g`xgxgxxm@``&` 0zNh4zOh8z{h|ժժժժժժժժժժժժժժժժժժժժP*U*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ@*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժ̙𙳆̙̙ժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*T*U*U*U*U*U*U*Uժհ̙̙̙́ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0s ?c ժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժՂ0ժժժժժժժժժժժժժժժժժժժժժժժժժpC@a`pժժժժժժժժժժժժժժժժժժժժԪժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժ*T*U*U*U*U*U*U̙̙ժժժժժժժժժժժժժժժժժժժժP*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U U*U*U*U*U*U*U*U*Uժժժ̙̙̙ժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*U*U*UժՂ̙̙̙́́ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ03`33 33 3c 033ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժ*U*U*@*U*U*U*U*U*U*Uժ̙̙̙̙ժժժժժժժժժժժժժժժժժժժժժ@*U*U*U*U*U*U̙oqrstuvwxyz{|}~ժժժժժժժժժժժժժժժժժժժժ`T*U*U*U*UC@a`ժժժժժժժժժժժժժժժժժժժժժժժתժժժ0ժժժժժժժժժժժժժժժժժժժժ*U U*U*U*U*U*U*UՂ̙̙̙ժժժժժժժժժժժժժժժժժժժժU*U*U*U*U*Uժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U@*U*U*U*U*U*U*U*U*Uժժժժ̙̙ժժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*(U*U*U*U*U*U*U*Uժժ̙缀漀̙̙ժժժժժժժժժժժժժժժժժժժժժժԪժժժժժժժժժժժժժժ0333333|33ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժU*U*U*U*U `0ժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժ*U*0(U*U*U*U*U*U*Uʙ挀ϙ̙̙̙Ъժժժժժժժժժժժժժժժժժժժժ U*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*@*U*U*U*U*U*U*U*U*Uժժժժ̙ժժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*U*U*U*U*Uժժ̙̙̙ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժՂ0;sa33 333c 333ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժ U*U*U*U*U0 ժժժժժժժժժժժժժժժժժժժժԪժժժժժժժժժժ0@`pժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*Uժ̙Ԫժժժժժժժժժժժժժժժժժժժժ0(U*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*UP*U*U*U*U*U*U*U*U*Uժժժժժ̙Ԫժժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*@*U*U*U*U*U*U*U*Uժժ̙漀̙́ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0o3`33 333c 333ժժժժժժժժժժժժժժժժժժժժЪժժժժժժժժժժժժժժժՊ0ժժժժժժժժժժժժժժժժժժժժ0(U*U*U*U*U@`p̙ժժժժժժժժժժժժժժժժժժժժ჆ժժժժժժժժժՂÇ00 ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ03`33 333c 033ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*(U*U*U*U*U*U*U*U*UժժժՊ̙ϙ̙Ъժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U U*U*U*U*U*U*U*Uժժ̙̙̙Ԫժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0 `0ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0G333333c 33ժժժժժժժժժժժժժժժժժժժժ@*U*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*T*U*U*U*U*U*U*U*Uժժժ̙ρ̙́Ԫժժժժժժժժժժժժժժժժժժժժժժ*U*U*UP*U*U*U*U*U*U*Uժ̙̙̙̙̇̇ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժЪժժժժժժժժժժժժՊpժժժժժժժժժժժժժժժժժժժժժժժժժժժ0C@a`ժժժժժժժժժժժժժժժժժժժժժժժժתժժժժ0s>|ժժժժժժժժժժժժժժժժժժժժP*U*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ@*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*Uժժժ̙𙳆̙̙ժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*T*U*U*U*U*U*U*Uժհ̙̙̙́ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0s ?c ժժժժժժժժժժժժժժժժժժժժժժժժժժߪժժժժժժՂ0ժժժժժժժժժժժժժժժժժժժժժժժժժpC@a`pժժժժժժժժժժժժժժժժժժժժԪժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժ*T*U*U*U*U*U*U̙̙ժժժժժժժժժժժժժժժժժժժժP*U*U*U*U*U̙ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U U*U*U*U*U*U*U*U*Uժժժ̙̙̙ժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*U*U*U*U*UժՂ̙̙̙́́ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ03`33 33 3c 033ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժ0ժժժժժժժժժժժժժժժժժժժժP*U*U*U*UC@a`ժժժժժժժժժժժժժժժժժժժժժժժժժժՂ0ժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U*U*Ú̙̙̙ժժժժժժժժժժժժժժժժժժժժT*U*U*U*U*Ú̙ժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժժՂ0ժժժժժժժժժժժժժժժժժժժժԪժժժժժժժժժժժ  !!!""""###$$$$%%%&&&&'''(((()))****+++,,,,---....///000011122223334444555666677788ȁ{{{{{{{{||؋؋ 8((( @P`|||x?```````?g?~0|?~O?x?`````?Pzzz@z{{ЂԀԂԂԀЂʁȀ``0xxyPxyypyyyyyzp|||||||`|x| x|<~|<p|||`|x| x|<~|<~s<~?~y?~`|x| x|<~|<~s<~?~y?~~xx``?g?~0x?~O?x?<<`@ՀՂ@~?<@ԃթ~?@`x|ꁪxFA<71-)%! oic]WRMHC>94/+'# 333333  30?3000308<6300?0033333?0 33333333>03(08@HPX`hpxxxxxxxxxxxxxxxxxPPPPPP:>#'+/37p 0@|؀Ԁՠ`@eb_\ZXVTRPNLKJIHGFEDCBA@*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U~|xp`@??~|xp`@@BDFHJLNPR $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?~|yreJ??~|yreJ"&*.26:>#'+/37;?#'+/37;?@@@@@@@@@@@@@@@@а````````````````````````````````````ppppppppppppppppPPPPPPPPPPPPPPPP00000000 Š 0000000000000000````````````````````````````````````````PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP0000000000000000000000000000000000000000000000000000000000000000 @@@@@@@@@@@@@@@@PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPа00000000 ````````````````pppppppppppppppp0000000000000000000000000000 ϠƠ̠ƠɈL :Lɍ)ې)ɮ۰ɺH h 'L  ġLL ̹L)'L ȳL O'F ʻ ̹(((L $ʩ $$ $L `ީ % K@D E 85,42,85,42,84,41,82,0< 41,82,30,72,16,32,64,0Y 85,42,85,42,85,42,85,0:"POKEING WHITE CENTER LINE PATTERNS..."N07:D:29824N,D: 3,6,12,24,48,96,96,0:"POKEING TRACK EDGE PATTERN ADDRESSES..." N031:D:2947,94,60,120,112,96,64,07N 85,42,85,42,85,43,87,0TX 43,86,44,88,48,96,64,0qb 85,42,85,42,85,42,85,0l 85,42,84,40,80,32,64,0v 84,41,82,37,74,21,42,0 21,42,84,40,80,32,64,0 85,42,84,41,82,37,74,0 37,74,20,40,80,32,64,00 1,2,4,9,18,37,74,02 0,0,0,0,0,0,0,0`:"POKEING RIGHT TRACK EDGE PATTERNS..."}N0127:D:29696N,D: 127,126,124,120,112,96,64,0& 85,43,87,47,95,63,127,00 63,126,124,120,112,96,64,0: 85,42,85,43,87,47,95,0D  15,30,60,121,114,101,74,05 0,0,0,0,1,3,7,0Q 3,6,12,25,50,101,74,0g 0,0,0,0,0,0,1,0 85,42,84,41,82,37,74,0 0,1,2,5,10,21,42,0 37,42,84,41,82,37,74,0 0,0,0,1,2,5,10,0 5,10,20,41,82,37,74,0 0,0,0,0,0,1,2,629184Y,ADD(ADD256)2567@29376Y,(ADD256)=JjT:"POKEING LEFT TRACK EDGE PATTERNS..."^N0127:D:29568N,D:h 127,126,124,121,114,101,74,0r 1,3,7,15,31,63,127,0| 63,126,124,121,114,101,74,0 0,0,1,3,7,15,31,010!N02:XX1:X2562508BYT,X1:BIT,N21RBYTBYT1:BITBIT1:kX1X11:X1256X10t160:"MAKING SCRNLO & SCRNHI..."Y0191Y1(Y64)Y2((YY164)8)"Y3YY164Y28,ADD8192Y140Y2128Y31024TABLE GENERATOR":4 n:"MAKING XBYTE & XBIT..."S xX1239:BYT28672:BIT28928i BYT,X1:BYT1,X1} BIT,3:BIT1,5 X2:BYTBYTX:BITBITX:X1X11 N03:XX1:X256250 BYT,X1:BIT,N2 BYTBYT1:BITBIT1:X1X11:X1256X **********************;  * MAKE.TRK.TABLES *X  * BY COLIN FRENCH *u ( * COPYRIGHT (C) 1986 * 2 * BY MICROSPARC, INC * < * CONCORD, MA 01742 * F ********************** P3080 Z::5:35840 d5)"FORMULA.NIBBLE ԠƠŠΠӠ٠ҠΠҠթĠӠFby LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ  0h)ύh0HHHH " ׍hhhhhhh .hh8`JIMJAYKERRY&MIKE7,0,0,0,126,0(  0,63,60,0,0,0,64,1>  0,0,0,0,0,0,0,0d  176,128,176,128,140,128,140,128  140,128,140,128,131,128,131,128  131,128,131,192,131,212,131,213 & 169,213,0,0,0,0,0,0 0:"POKEING RIGHT FRONT TIRE BIT PATTERNS..."!: 3,64,31,0,0,0,0,15/ 0,60,60,0,0,0,0,96F 0,0,64,0,0,0,0,0l 128,152,128,152,128,134,128,134 128,134,192,129,192,129,192,129 192,129,192,193,192,213,128,213 130,213,0,0,0,0,0,0 0,0,127,127,127,127,127,127  0,64,127,127 J 15,12,0,0,0,0,0,127T 0,48,3,0,0,0,0,0N^ 3,0,64,0,0,0,0,0th 128,224,128,224,128,224,128,124r 128,152,128,152,128,152,128,152| 128,152,128,216,128,212,128,213 160,213,0,0,0,0,0,0 0,96,127,127,127,127,127,127:"POKEING IN TEXT LINE ADDRESSES..."E30880,208:30881,208^N27:30880N,80:v30888,58:30889,62"N27:30888N,N427:,:"POKEING LEFT FRONT TIRE BIT PATTERNS..."6N0191:D:30896N,D:@ 112,127,127,127,127,127,12,48! 63,3,3,31,48,48,51,30> 30,51,3,31,51,51,51,30X 63,48,24,12,6,6,6,6v 30,51,51,30,51,51,51,30 30,51,51,51,62,48,51,30 0,0,0,0,0,0,0,0:"POKEING IN DIGIT ADDRESSES..."N015:30848N,N84030864N,120:+,52,47,43,39,35-P 31,27,23,19,15,12,9,6TZ:"POKEING DIGIT BIT PATTERNS..."pdN087:D:30760N,D:n 30,51,51,51,51,51,51,30x 12,14,12,12,12,12,12,30 30,51,48,28,14,3,3,63 30,51,48,28,48,48,51,30 48,56,60,54,51,127,48 72,71,70,69,68,67,66,65; 75,75,74,74,73,73,72,72Y  71,71,70,70,69,69,68,68w 67,67,66,66,65,65,64,64 115,109,103,97,90,85,80,75( 70,65,60,55,49,45,41,372 33,29,25,21,16,13,10,7< 111,105,99,93,87,82,77,72F 67,62,57EING POST SIZES..."-N03:30640N,0:FN411:30640N,1:`N1219:30640N,2:zN2023:30640N,3::"POKEING POST DRAWING PARAMETERS..."N095:D:30664N,D: 102,99,96,93,91,89,87,85 83,81,79,77,76,75,74,73 15,30,60,120,112,96,64,03V 0,0,0,0,1,3,7,0N` 3,6,12,24,48,96,64,0dj 0,0,0,0,0,0,1,0t:"POKEING POST PATTERN ADDRESSES..."~N015:D:30624N,D: 96,112,128,144,119,119,119,119 104,120,136,152,119,119,119,119:"POKASS PATTERN..."N0392;30488N,42:30489N,85Al:"POKEING ROADSIDE POST PATTERNS..."N063:D:30560N,D:$ 127,126,124,120,112,96,64,0. 1,3,7,15,31,63,127,08 63,126,124,120,112,96,64,0B 0,0,1,3,7,15,31,0LV((255N)6.464717.5):VH(V256):VLVVH256X29952N,VH:30208N,VL:y:"POKEING YLIMIT TABLE..."N023:D:30464N,D: 101,98,95,92,90,88,86,84 82,80,78,76,75,74,73,72 71,70,69,68,67,66,65,64:"MAKING GR888N,2:%>N2023:29888N,3:JH:"MAKING TRACK WIDTH TABLE..."gRN039:29912N,N24:\:"MAKING PERSPEC & PERFRC TABLES..."fN0127pV((127N)6.40.5)zVH(V256):VLVVH25629952N,VH:30208N,VL:N128255832N,D:1 128,144,160,176,136,152,168,184W 192,208,224,240,200,216,232,248s 0,16,32,48,8,24,40,56  64,80,96,112,72,88,104,120:"POKEING SIZES OF TRACK SEGMENTS..." N03:29888N,0:*N411:29888N,1: 4N1219:29N0191:D:31088N,D:;!D 0,127,127,127,127,127,127,0T!N 0,126,0,0,63,0,0,0m!X 127,1,1,0,0,64,1,0!b 0,0,30,0,0,0,0,0!l 128,134,128,134,128,152,128,152!v 128,152,128,152,128,224,128,224! 128,224,130,224,170,224,170,225" 170,229,0,0,0,0,0,03" 96,127,127,127,127,127,127,3L" 0,30,0,120,0,0,0,0d" 124,1,1,0,0,3,0,0{" 0,0,30,0,0,0,0,0" 140,128,140,128,176,128,176,128" 176,128,192,129,192,129,192,129" 192,129,194,129,234,129,170,129# 170,133,0,0,0,0,0,00 N15:::0 "===== ALL FINISHED!! =====":i0 "INSERT DISK YOU WANT TO SAVE THE TABLES"0 "ON AND PRESS ";0 Z$::"SAVING TABLES..."0 (4)"BSAVE TRK.TABLES,A$7000,L$C80"0 "SAVE COMPLETED."0 &1 ::12:"ERROR "128,149,0,0,0,07/h 192,131,240,142,216,139,240,142U/r 216,139,224,130,0,0,0,0o/| 32,1,56,5,40,5,40,5/ 40,5,32,1,0,0,0,0/ :"POKEING LIGHT PATTERN ADDRESSES..."/ N015:D:31856N,D:/ 64,80,96,0,124,124,124,00 16,19,22,0,0,). 128,144,160,176,192,208,224,240@." 0,16,0,0,0,0,0,0f., 123,123,123,123,123,123,123,123.6 124,124,0,0,0,0,0,0.@ :"POKEING STARTING LIGHTS BIT PATTERNS...".J N047:D:31808N,D:.T 128,133,224,149,160,149,160,149/^ 160,149,,130,128,128,129,192,129,192D- 129,192,129,192,128,128,192,170j- 192,170,128,128,129,192,129,192- 129,192,129,192,128,128,192,130- 192,138,128,170,129,200,129,192- :"POKEING INSTRUMENT PATTERN ADDRESSES...". N031:D:31776N,D:92,192,130,192,130:, 192,130,128,128,129,192,129,192`, 193,194,193,194,192,130,192,130, 192,130,128,128,129,192,129,192, 129,202,129,202,192,130,192,130, 192,130,128,128,129,192,129,192, 129,192,129,200,128,170,192,138- 192,209,1920+P 129,192,129,192,128,128,192,130V+Z 208,130,212,128,149,192,129,192|+d 129,192,129,192,128,128,212,130+n 212,130,128,128,129,192,129,192+x 129,192,149,192,212,128,208,130+ 192,130,128,128,129,192,129,192, 209,192,209,1RN ADDRESSES...".* N015:D:31600N,D:O* 80,128,176,0,122,122,122,0o* 224,16,64,0,122,123,123,0*( :"POKEING INSTRUMENT NEEDLE BIT PATTERNS.."*2 N0159:D:31616N,D:*< 129,192,129,192,128,128,192,130 +F 192,130,192,130,209,19263,126,48,124,635) 126,79,127,63,120,127,127,63R) 96,127,7,0,96,127,31,0p) 96,127,31,0,96,127,31,0) 96,127,31,0,0,127,31,0) 0,127,31,0,0,127,31,0) 0,127,31,3,24,127,31,15) 30,127,31,15,30,127,31,63* :"POKEING-HAND PATTE,126,48,120,633(j 126,79,127,63,120,127,127,63V(t 120,127,127,63,96,127,127,15v(~ 96,127,127,15,0,127,127,3( 96,127,7,0,96,127,31,0( 96,127,31,0,96,127,31,0( 96,127,31,3,24,127,31,15( 30,127,31,15,30,127,31,63) 30,127,103, 126,127,121,63,126,127,127,15E'$ 126,127,127,15,120,127,127,3f'. 120,127,127,3,96,127,127,0'8 :"POKEING RIGHT-HAND BIT PATTERNS..."'B N0143:D:31456N,D:'L 96,127,31,3,24,127,31,15'V 30,127,31,15,30,127,31,63(` 30,127,103,63,124,127,3.& 96,124,127,3,120,124,127,12R& 120,124,127,60,126,124,127,60s& 126,115,127,60,126,15,6,63& 126,127,121,63,126,127,127,15& 96,124,127,3,120,124,127,12& 120,124,127,60,126,124,127,60& 126,115,127,60,126,15,6,63"':D:31312N,D:0% 0,112,127,3,0,124,127,3N% 0,124,127,3,0,124,127,3l% 0,124,127,3,0,124,127,0% 0,124,127,0,0,124,127,0% 96,124,127,0,120,124,127,12% 120,124,127,60,126,124,127,60% 0,112,127,3,0,124,127,3 & 0,124,127,3,04:"POKEING TIRE PATTERN ADDRESSES..."F$>N031:D:31280N,D:g$H 176,240,48,0,120,120,121,0$R 208,16,80,0,120,121,121,0$\ 112,176,240,0,121,121,121,0$f 144,208,16,0,121,121,122,0$p:"POKEING LEFT-HAND BIT PATTERNS..."%zN01430,0,0-# 120,127,127,127,127,127,127,127D# 7,6,0,24,0,0,0,0\# 0,24,1,0,96,0,0,0s# 0,0,96,0,0,0,0,0#  131,128,131,128,131,128,131,128# 140,128,140,128,140,128,140,128#  140,128,142,128,170,128,170,128#* 170,133,0,0,0,0,0,0*$(222)" IN LINE "(218)256(219): **********************; * MAKE.SCENE *X * BY COLIN FRENCH *u( * COPYRIGHT (C) 1986 *2 * BY MICROSPARC, INC *< * CONCORD, MA 01742 *F ********************** P(104)8Ĺ104,8:103,1:2048,0:(4)"RUN MAKE.S34,1391` 32,139,30,139,28,139,26,139,24,139Zj 20,139,18,139,16,139,14,139,12,139{t 10,139,8,93,6,83,4,75,2,69~ 0,63,0,59,0,55,0,51,0,47 0,45,0,41,0,39,0,35,0,33 0,29,0,27,0,25,0,21,0,19 0,17,0,15,0,13,0,11,0,9  0,7,0R LINE DATA---9$ 132,67,126,70,120,73,114,76,108,79q. 102,82,100,83,90,88,88,89,74,96,72,97,70,98,68,998---ORANGE CAR DATA---B 105,139,91,139,77,139,68,139,64,139L 60,125,56,115,54,111,50,111,48,115V 46,125,42,139,40,139,36,139,76X,104:X6238DX,105X3,105:279X,105276X,105:i:22:10)"WORKING ON SCREEN 2"(4)"BSAVE TRK.SCREEN2,A$2000,L$1FFB":22:"FINISHED HI-RES SCREENS, WORKING ON""RACE RECORDS SCREEN...":D1500::1730---CENTE"READY TO SAVE IMAGES.. INSERT THE DISK"Z"YOU WANT TO SAVE THEM ON & PRESS A KEY ";Z$::21::10)"WORKING ON SCREEN 1"(4)"BSAVE TRK.SCREEN1,A$2000,L$1FFB"---DRAW TIRE HIGHLIGHTS---7:X10278 X,104X3,104:279X,1042159X2,Y:160X1,Y160X2,Y$>3H---BOX---WR4,165107,165:172,165275,165u\4,1654,190:5,1655,190f274,165274,190:275,165275,190p4,190275,190zD1800::-PAUSE TO ADMIRE?----SAVE IMAGES---:16301,0:22*!---TEXT AT BOTTOM---1L07:ADDKX618:C:ADDX,C:fX2733:C:ADDX,C:o:3 ---STARTING LIGHTS---Y160169:X1,X2 119X1,Y119X2,Y:120X1,Y120X2,Y*139X1,Y139X2,Y:140X1,Y140X2,Y4159X1,Y2145:X1,X28v125X1,Y125X2,Y:126X1,Y126X2,Yb153X1,Y153X2,Y:154X1,Y154X2,Yh---STEERING WHEEL---Y122160:X1,X2X1,YX2,Y:279X1,Y279X2,Y:4X18:X1,Y1,X2,Y2X1,Y1X2,Y2:279X1,Y1279X2,Y2:YY1 X1,X2:X10550, XX1X24N X2,YX3,Y:278X,Y279X,Y_ :YY1:470x &4:Y144148:X1,X2 0X1,YX2,Y:279X1,Y279X2,Y : D---INSTRUMENTS--- NY133144:X X125X,Y126X,Y:153X,Y154X,Y b:7lY13140,107163,1078 112,108127,108:152,108167,108^ 112,109135,109:148,109167,109 116,110135,110:144,110163,110 140,109143,109 ---DASHBOARD--- Y128 X1,X2:X10550 XX1X24 X,YX1,Y:276X,Y277X,Y 5:Y101154:X1,X29 ,X1,YX2,Y:279X1,Y279X2,Y? 6W @---TIRE OUTLINE---^ J7o TX1,Y1,X2,Y2} ^X10380 hX1,Y1X2,Y2:279X1,Y1279X2,Y2 r340 |---NUMBER ON HOOD--- 126,106153,106:126,111153,111 116,107135,107:150 "COLOR!";:60 Y063:0,Y279,Y:F ---DRAW GRASS---Y 1:16302,0:n Y64:X13106 0,YX,Y:YY1: X148:Y64100 X,Y279,Y:XX2: ---CENTER LINE--- 3:N113:X,Y X,YX1,Y: ---CAR BODY--- "CENE" Z16384:2090' d:::21X n"=== FORMULA NIBBLE SCREEN GENERATOR ===":l x---DRAW SKY--- "DO YOU HAVE A COLOR OR A MONOCHROME" "MONITOR? (PRESS C OR M) "; Z$:Z$"M"Z$(109)ĺ"MONOCHROME";:7:180 Z$"C"Z$(99),5,0,3,0,1)---TIRE OUTLINE DATA---X 12,101,57,101,6,102,11,102,42,102,47,102 58,102,61,102,2,103,5,103,0,104,1,104 38,103,41,103,62,103,63,103,36,104,37,104 34,105,34,106,35,105,35,106,32,107,32,109 33,107,33,109,30,110,30,113,31,110,31,113B 28,114,28,117,29,114,29,117,-1,-1,-1,-1\---DASHBOARD DATA--- 96,139,84,139,76,139,72,139,64,139  60,139,56,139,52,139,48,139,48,139 44,139,40,139,36,139,36,139,32,139 28,139,24,139,24,139,20,139,20,139$E!":5 "INSERT DISK YOU WANT TO SAVE THE CURVE"_ "DATA ON AND PRESS ";:Z$: (4)"BSAVE TRK.CURVE.DATA,A$8000,L$C00" "SAVE COMPLETED.": ---MONACO DATA--- 32,16,16,64,56,0,16,208 12,176,20,96,16,0,16,96 1ATOR ===": d"WORKING ";L nADD32768:-START OF TRK.CURVE.DATA AREA-s xNL,C: -LOOP LIMIT & CURVE VALUE- NL0ĺ:160 N0NL1:ADDN,C: ADDADDNL:".";:120 ::5:ADD35840ĺ"ERROR IN DATA STATEMENTS.": "TRACKS ALL DON **********************; * MAKE.TRK.DATA *X * BY COLIN FRENCH *u( * COPYRIGHT (C) 1986 *2 * BY MICROSPARC, INC *< * CONCORD, MA 01742 *F **********************P500 Z::5:"=== FORMULA.NIBBLE TRACK GENER--DRAW LOGO--- V:1:1950B"----------------";: 16 -'SL1970^V1:1:1970x" FORMULA NIBBLE ";1950 V2:1:1950"----------------";: 16 -'S 1970:*::12:"ERROR "(222)" IN LINE "(218)256(219):"MONTREAL"=l24:" (PRESS KEY OR BUTTON FOR MENU)";Kv23::32t(4)"BSAVE RACE.RECORDS,A$400,L$400:"ALL DONE!": ---CHECKERED PATTERNS---N16:" ";:" ";:::N15::" ";:" ";:::" ";:: -";:30:"CHAMPION"*N139:".";::5N13L13:":";:27:":"XN21313:": --- 00:00.0 : --- 00:00.0"&N2,N0N112:".";::":";:N113:".";::":";DN112:".";:N11:1:"MONACO"X15:"DETROIT" b19:,51,518 14160,24,24,3,115,7,0,30,30,0,30,30,12,30Q 63,99,12,0,0,30,30q---STARTING LIGHTS DATA--- 0,1,2,3,4,5,6,7,6,7 6,7,6,7,4,5,2,3,0,1:V1:1990::14)"RECORD HOLDERS"N139:".";:::17:"ROOKIE,51,12,51,51,0,51,J 3,99,12,51,0,51,51[T 11088,24,24,19,51,0,0,51,51,0,51,51,0,51u^ 3,127,124,1,0,51,51h 12112,24,24,3,51,96,0,51,51,12,51,51,0,51r 3,99,12,48,0,51,51| 13136,24,24,3,51,96,0,51,51,12,51,51,12,51 3,99,12,48,0A---6 15056,127,25,3,115,7,0,30,30,0,30,30,0,30O 3,62,124,1,0,30,30~ 16080,24,24,71,51,0,0,51,51,0,51,51,0,51" 3,99,12,3,0,51,51, 9040 ,24,24,111,51,96,0,51,51,12,51,51,0,516 3,99,12,51,0,51,51@ 10064,24,24,59,115,97,0,518,101, 88,101,88,99,86,99,86,99,84,99T 82,99,80,101,80,103,78,103,78,103o 78,103,78,103,78,101 84,152,84,156,85,152,85,156,86,157,87,157 88,158,91,158,92,159,93,159,94,158,97,158 98,157,98,154,99,157,99,154---TEXT DAT1"x---STEERING WHEEL DATA---0 132,139^ 124,139,118,139,114,139,110,139,108,139 106,139,104,139,102,139,100,129,100,121 98,117,98,115,96,113,94,109,94,109 92,107,92,107,92,105,90,105,90,103 90,103,90,103,88,101,88,101,8( 16,139,16,36,12,32,12,28,8,28C2 8,24,4,24,4,20,0,20,0,16^< 0,16,0,12,0,12,-1,-1F 54,89,50,95,46,101,42,107,40,115P---INSTRUMENTS DATA---Z 1,3,5,5,7,7,7,7,5,5,3,1d 0,1,2,3,4,5,6,7,6,7,8,9,8,9n 8,9,8,9,6,7,6,7,4,5,2,3,0,6,0,16,144,16,112,16,80;  8,48,8,48,48,32,56,0,16,176[  8,160,8,96,8,0,8,96,8,160y  8,0,12,224,16,112,28,48 " 24,16,512,0 , ---DETROIT DATA--- 6 32,0,12,176,8,0,12,176 @ 16,16,24,0,16,80,8,0 J 16,80,48,208,8,176,24,16 T 32,240,24,176,16,80,88,0: ^ 12,176,12,80,56,0,24,176T h 16,80,8,0,8,0,24,48r r 16,144,16,32,40,0,32,16 | 32,224,8,192,16,64,8,192  56,0,256,0  ---MONTREAL DATA---  40,0,16,48,24,0,8,208  24,0,8,48,40,0,8,48  16,208,2)Ģ21:1:868::"YOU HAVE GOTTEN YOUR LAST SPIDER BITE!"::23:868:15::"GAME OVER!";:640b32768:791:I1100::32768:(16384)128(49249)128610l(49249)127620v540NUM0:I05:NUMNUM(((I1764)176)10(5I)):FI(:R1Ģ21:1:868::"YOU CAN'T MAKE IT, NOT ENOUGH ENERGY!"::23:868:15::"GAME OVER!";:640DR4Ģ24:1:868::"QUIT COMMAND--WANT TO PLAY AGAIN?";::A$:A$"Y"640:::NR2Ģ24:1:"YOU MADE IT! GET READY MAJOR...";:820bX(785:230,32:62450::230:329429XX,18:YY,137:SH,032768:J1500::32768:J1500::(16384)128(49249)128500KO,CN:WA,TT(49249)12752024:1:868781:16368,0&R(RC):R36000XX,0:YY,13:SH,1:32768g:I788790:I,0:<23:H:A$:A$" "HH15:H38H2OA$(13)410\H2460wH32İ910:23:1:3801140:21:1:"MAJORS : ENERGY BALLS:":"LEVEL : SCORE:": 6/6 SPACES23:A$"MAJOR MAYHEM":20(A$)2:A$;  :"::I12000::: 14/14 SPACESvh21:1:"DESIGNED/PROGRAMMED BY JOHN ROMERO":I11500::HC0:190r:"SELECT WITH SPACEBAR, RETURN TO CHOOSE:":|"( ) PLAY GAME ( ) SEE SCORES ( ) FIX";33090,3H2:785,3:786,LV:787,0SA1$ ,UD(1)201:LF(1)601d 636934I,SX:36954I,SY:36974I,SA:37014I,255:36994I,1 @37054I,LF:37034I,LF:37094I,UD:37074I,UD J:"GO!";:LV3Ĺ33090,LV T/^:21:13::": :":13:" MAJOR MAYHEM ":13:": BX39BX79250[ 36870I,BX:36880I,BY:36900I,BS:36890I,1::"ON YOUR MARK..."; I09:JI19:(36870I)(36870J)(36880I)(36880J)Ĺ36870J,118(36870J) J,I:"GET SET..."; "I019:SX(1)118:SYY1%((1)5):SA0:ILV228279,I28:0,I30279,I30:H1%(HC):0,I29279,I29:g I6215562:XX,0:YY,I:SH,2:32768:q 1060 24:1:(LV1)((LV1)5)50Ĺ785,(785)((785)9)::"XTRA MAJOR";: 190:I09 BX(1)119:BYY%((1)5):BS(1)13:BX(BX): LV0T I04:Y%(I):: 22,53,84,115,146:I04:Y1%(I)::20,51,82,113,144 I03:KEY:771I,KEY::136,149,193,218,160:KEY:784,KEY I09:H%(I),H1%(I)::1,1,1,0,1,2,1,3,5,5,5,6,6,3,5,2,2,3,5,0 350 I015531; H%(HC):0,IROGRAM":(4)"RUNMAJOR.MAYHEM"+ Z25088 d::"MAJOR MAYHEM":"BY JOHN ROMERO":"COPYRIGHT 1987 BY MICROSPARC, INC.":12:"MAKE SURE THE CAPS LOCK KEY IS DOWN":S(18),N$(18),L(18) n1230:1300 xCT,1:230,32:62450::TT151:CN203 16368,0 **********************; * MAJOR.MAYHEM *X * BY JOHN ROMERO *u( * COPYRIGHT (C) 1987 *2 * BY MICROSPARC, INC *< * CONCORD, MA 01742 *F ********************** P(104)68Ĺ104,68:17408,0::"RELOCATING THE P4,0,16,208,8,48.  24,0,16,208,40,80,24,0L  64,32,32,0,24,176,32,80g  24,0,24,0,16,48,24,0  24,208,80,0,40,96,16,0  32,224,256,0  -1,-1 ::12:"ERROR "(222)" IN LINE "(218)256(219):3((TT50)1))2NUMS(FI)S(FI2)S(FI1):S(FI1)S(FI):S(FI)NUM:L(FI2)L(FI1):L(FI1)L(FI):L(FI)LV1:N$(FI2)N$(FI1):N$(FI1)N$(FI):N$(FI)"":710NUMS(FI1)S(FI2)S(FI1):S(FI1)NUM:L(FI2)L(FI1):L(FI1)LV1:N$(FI2)N$(FI1):N$(FI1)"":710LNUMS(FI2)S(FI2)NUM:L(FI2)LV1:N$(FI2)"":71023::"DO YOU WANT TO PLAY AGAIN?";::Z$:Z$"Y"Ā:810::"VERY GOOD! TYPE YOUR NAME IN:":I140:"-";:2:1::"SPEED";:10:"SCORE";:18:"WHODUNNIT";:uȱ 0L?`a`(Q` eLu` @ @Rdv@@@@@@@@BAAAAAAAA   ,0` =>/CEDnop _,0 O:L!21:"RETURN TO TRY AGAIN, ESCAPE TO QUIT";:Z$::Z$(27)1300:Z$(13)(N$)1430C Z$" "1410:N$N$Z$:Z$;:(N$)161410I y E(222):EL(218)256(219):3288:216,0 :12 E6E7ĺ"MMSHAPES FILE NOT ON THIS DISK":1490 E8ĺ"I/O ERROR--CHECK DRIVE DOOR":1490!"ERROR "E" IN LINE "EL16,0:1360\FD$"OPENMMSCORES":D$"READMMSCORES":I118:S(I):N$(I):L(I)::D$"CLOSE"PXX768:YYXX1:SHYY1:KLSH1:KRKL1:KUKR1:KDKU1:KOKD1:CTRLSKO1:RCODECTRLS1ZTNRCODE1:LNTN1:S%32619dWALN1n120xN$"" Z$:TE128::BYTEBYTE256::/D$(4):1440\D$"BLOADMMSHAPES":D$"BLOADMAYHEM.CODE"g(13402D$"VERIFYMMSCORES":216,0:1350 <D$"OPENMMSCORES":D$"WRITEMMSCORES":I118:S(I)0:N$(I)"JOHN ROMERO":L(I)1:S(I):N$(I):L(I)::D$"CLOSE":2BYTE31:I03:BYTEBYTE1:J01:K07:LOCCU,BYTE(4K):CUCU1::::rLOCCU,255:CUCU1:CU2561250BYTE0:1290:BYTE40:1290:BYTE80:1290LOCCU,255:CUCU1:CU5121270 I03:J01:K07:LOCCU,BYTE:CUCU1::BYTEBYI);:35:L(I):I3(I3)āJ140:"-";:^(37)16ĺ:"PRESS RETURN FOR MORE...";:A$:j:34,0:"THAT'S ALL--PRESS RETURN";:A$::310021:1:"PROGRAMMED BY JOHN ROMERO"370"ONE MOMENT PLEASE..."MLOC24576:CU0:H02:32768:I2011:TN,I:LN,I:S%::^t::"MAJOR MAYHEM'S BEST PLAYERS:":I140:"-";:~34,2:2:1::"SPEED";:9:"SCORE";:18:"WHODUNNIT";:33:"LEVEL":I118:1((I1)3);7);:SS(I):"000000";:14((S))1:S;: 6 ZEROS+18:N$(,5:32768D.I157153:YY,I3:32768:SH,5:I2(I2)ĹSH,6{8YY,I:32768:TN,(1)201:LN,14:S%:J125:J,IB32768LYY,13:32768VI120:SH,5:I2(I2)ĹSH,6`32768:TN,(1)301:LN,12:S%:J140:J,I&j32768:YY,15:11-23:H:A$:A$" "HH16:H27H11@A$(13)960WH11CN203:1000bCN20223:1:868:"SOUND: ( ) ON ( ) OFF";:H923:H:A$:A$" "HH8:H17H9A$(13)1010H9ĹCT,1:1050CT,0 $YY,160:SH6!zYY,I:32768:J150:J,I*460e23:1:868:"LEVEL OF SPEED: 1..2..3..4..5..6";:H2623:H:A$:A$" "HH3:H32H17A$(13)920TT(H14)3:TTTT5049:WA,TT23:1:868:"CONTROL: ( ) KEYBOARD OR ( ) JOYSTICK?";:H,1:32768:I120:TN,(1)101:LN,30:S%:eRI1401:YY,I1:32768:SH,5:I2(I2)ĹSH,6\YY,I:32768:J125::TN,(1)101:LN,10:S%:f32768:J150::YY,255:32768:I150:pI2542301:YY,I1:32768:SH,5:I2(I2)ĹSH,S":D$"DELETEMMSCORES":D$"OPENMMSCORES":D$"WRITEMMSCORES"iI118:S(I):N$(I):L(I)::D$"CLOSE" 23::"DO YOU WANT TO PLAY AGAIN?";::Z$:Z$"Y"Ā*LV0:230,32:62450::3504HCHC1:HC10HC0>LVLV1.HYY,15:SH,5:32768:SH34:"LEVEL":YIFIFI2:(TT50)1;8);"000000";:16((S(I))):S(I);: 6 ZEROS18:N$(I);:35:L(I):N$(I)""VTIFI3VT:17:868:">"16)"<"LV1;:18:1400:N$(FIVT3)N$VT:35:LV1= D$"OPENMMSCORES":D$"CLOSEMMSCORE ?L Xˍiة ..PZd( $ _.ש..17...$8n .LL<|]>|pd]=X,8`,i``0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0 JOHN ROMERO 1 0hxp \ px@ `@@p8l"a```p8$%"E咈@@@ @ "  p8l"a```p@@@ 0~p dv'0hxp \ xy ժժժժժժժժժժՀЋЊ h88(       (|       (|@@@ 08~XL``0 @.`F88Z po n8LLjK, n`oo‹ _o‹ _o,on" p 0L_o‹ _oNj L 0 @GLM _.Z ZPLljZGLM _.ZB Llj 0@    ?2 2     L$%L"p``?``` ` 8`p`E`..nFLɹL``= ,a/`O`?E O`M]M]tCC9"..n.` NNN0F8Z<< Nd8dоZ P _?LY ..P.`ZZNGN _.LMZii i LL..$.`88NN _.LM8LM _.8 8$L;8LM _.8 L;@ 0  `= F`ɹ```= ` ELP @0P@0 ..n.`F( .F}FwFLWxF޾IZ}ZҐ搽I L%FZL_D`..n.`F8@Z8A .n8 $FZ _ Eiii i?LL/ D/Dk/`p`/`/`B 8@Li@iAD/8 L@AL_@A _@( D C`mB@AL_C`CL 0@PEL(@..F(8L(F$(8L6(.`=Tp``..1 .`078>=`87 >'  i 8 =` ..(.`8 $$LM8LM _.` ..PiL>i(...1PiL]i(1.D@PiLyi(@..FPiLi(F$PiLi(.` ..(8Lʄ(...1(8L(1.D@(8鰐L_L( 0` j '& j`'& 0` j  j` ..(0$ _.PZLMGLM _...1( 7 _.  _D @A _..n .`/,`ɛ,ɛ,`` ,`,`ѩ `  ? Ņ  9  . , L J  `p`  00 0  0 m mJ0L0 JOHN ROMERO 1 0 JOHN ROMERO 1  **********************9* SA.LOADER *U* BY JEFF G. COX *q(* COPYRIGHT (C) 1987 *2* BY MICROSPARC, INC.*<* CONCORD, MA 01742 *F**********************PV(10)Z260 dD$(4):D$"VERIFYSAFAST":D$"VERIFDE STARTS AT $40005 CD$;"BLOAD SAFAST,A";START%G START%81,ASp LBN%START%83: BASE ARRAY LOCATION START%87,BS I13 START%88I,128((BKEYS$,I,I)) I "LCN%START%92: CITY ARRAY LOCATION ,LDS%START%99: DIFFICULT nBKEYS$"ASD":LEFT, CENTER, RIGHT4 xDS(770)B FS(771)P PS(772)^ TS(773) TKEYS$"OK.;L":UP, LEFT, DOWN, RIGHT, STOP XS(774) YS(775) * INITIALIZE SAFAST INTERFACE CD$(4):CONTROL-D START%16384:MACHINE CO **********************9*SURPRISE.ATTACK *U*BY JEFF G. COX *q(*COPYRIGHT (C) 1987 *2*BY MICROSPARC, INC. *<*CONCORD, MA 01742 *F**********************P* INITIALIZE GAME OPTIONSZAS(768) dBS(769)&K' AND ":"'SAFAST' MUST BOTH BE ON THE DISK FOR":"THIS PROGRAM TO RUN.":22:4 CH$"J"CH$"K"CH$(106)CH$(107)200f V(6)0:LATERAL POLARITY 0=NORMAL, 1=REVERSED V(7)0:VERTICAL POLARITY 0=NORMAL, 1=REVERSED X07:768X,V(X): (4)"RUN SURPRISE.ATTACK"Q::(7):7:"THE TWO FILES 'SURPRISE.ATTAC0:CH$"Y"CH$(121)V(4)1:PAUSE SELECT 0=NO PAUSE AFTER SCORE, 1=PAUSE CH$"N"CH$"Y"CH$(110)CH$(121)180 21:"ENTER 'K' TO AIM WITH KEYBOARD OR":"'J' FOR PADDLE/JOYSTICK: ";:16368,0:CH$:V(5)0:CH$:CH$"K"CH$(107)V(5)1 LEVEL (1-9): ";:16368,0:CH$:16368,0:CH$:V(2)(CH$):V(2)1V(2)9160 15:"ENTER PUSHBUTTON NUMBER (0-1): ";:16368,0:CH$:16368,0:CH$:V(3)(CH$):V(3)0V(3)1170M 18:"PAUSE AFTER SCORE? (Y/N): ";:16368,0:CH$:16368,0:CH$:V(4)H$"C"CH$(97)CH$(99)120 9:"ENTER 'K' TO SELECT BASE WITH KEYBOARD":"OR A 'C' FOR COMPUTER CONTROL: ";:16368,0:CH$:CH$:16368,0:V(1)1:CH$"C"CH$(99)V(1)0 CH$"C"CH$"K"CH$(99)CH$(107)140O 12:"ENTER STARTINGYSURPRISE.ATTACK":216,0n n::"SURPRISE ATTACK!":"BY JEFF G. COX":"COPYRIGHT 1987 BY MICROSPARC, INC." x6:"ENTER 'A' FOR ARCADE MODE":"OR 'C' FOR CONTINUOUS MODE: ";:16368,0:CH$:16368,0:CH$:V(0)1:CH$"A"CH$(99)V(0)0# CH$"A"CY LOCATION2 6LERR%START%100: ERROR LOCATION? @LERR%,0R JSTART%101,FS] TI15 ^START%104I,128((TKEYS$,I,I)) hI rSTART%110,TS |START%114,XS LXSP%START%115: MISSILE X SPEED LOCATION START%121,YS$ LYSP%START%122: MISSILE Y SPEED LOCATIONQ LSHPE%START%140: SHAPE TABLE LOCATIONu * INITIALIZE COLORS AND SHAPES BLACK0 LIME1 WHITE3 CITY1 MISSILE2 HBYTE(LSHPE%256):HIGH BYTE LBYTELSHPE%HBYTE256:LOW BYTE 232(SPKR)(SPKR)HJ'RJ150:J.\I4fPp* INTRODUCTORY DISPLAYZz2090b:"** ALERT ** ALERT ** ALERT ** ALERT **""FROM: NORAD WARNING CENTER""TO : REGIONAL ABM COMMANDERS" "WE HAVE CONFIRMED REPO12050WHITE0!19XA124I119:YA152?RJ1(LBN%I)[X,YrMISSILEXAX,YAYyJ  0,0,5,0,10,0,15,0,20,0: ROW 1 0,4,5,4,10,4,15,4,20,4: ROW 2 * SOUND ALARM*I144J120>A(SPKR)RE &21-0"YOUR FINAL SCORE IS ";SCRE@:* PLAY AGAIN?FDfN"PLAY AGAIN (Y/N)? ";INPT$XINPT$"Y"INPT$"N"1830bINPT$"Y"570lv:* HERE ARE THE UTILITY ROUTINES* DRAW MISSILES FOR BASE I(LBN%I)DDBNI10BNI10'LBN%I,BNIB1950:* DRAW MISSILESIIS1180p* HANDLE ERROR MESSAGESERR(LERR%):ERROR NUMBER"PROGRAM ABORTED DUE TO FATAL ERROR: ";ERR2090: SOUND ALARM* DISPLAY FINAL SCOKEY$,* RESUPPLY BASES,6LBN%1,10;@LBN%2,10JJLBN%3,10ST710}^* RESUPPLY BASES FOR CONTINUOUS MODEhADD(13DA)2rI13|BNI(LBN%I)BNI0BNI101730(LCN%2I1)0BNIBNIADD(LCN%2I)0BNIBNIAITYEXTRAEXTRA500DA'I16=(LCN%I)01530KLCN%I,1_LCN%,(LCN%)1gI6"PLUS, YOU RECEIVE A BONUS CITY!"IPS0āI1500:I:159016368,0:IGNORE PREVIOUS KEYPRESSES"PRESS RETURN TO CONTINUE ";"IDA <I9F(LCN%)0SCRESCRE(LCN%)(5050AS)SP* BUMP UP DIFFICULTYjZDADA1:DA9DA9wdLDS%,DAnAS01640x* DISPLAY SCORE IN ARCADE MODE21"YOUR SCORE IS NOW ";SCREEXTRASCRE1540* ADD A BONUS CAND HIGH BYTE?LYSP%2,150: INTERCEPTOR Y SPEED LOW BYTE^LYSP%3,0: AND HIGH BYTEw* TIME TO GO DO IT!START%(LERR%)01760 (LCN%)11830 * CALCULATE SCOREI13(BNI(LBN%1)2BNI0BNI10SCRESCREBNI ,* INITIALIZE FRAME VARIABLESWLXSP%,9DA10: ICBM X SPEED LOW BYTEvLXSP%1,0: AND HIGH BYTELXSP%2,150: INTERCEPTOR X SPEED LOW BYTELXSP%3,0: AND HIGH BYTELYSP%,9DA10: ICBM Y SPEED LOW BYTELYSP%1,0: ILES APPROACHING."C"ACTIVATE DEFENSES. PREPARE TO ATTACK."\2090:* SOUND ALARMv* OPEN MISSILE DOORSI13$(LBN%I)01150.XA124I1228X15BBLACKLXAX,149VLIME`XAX6,148jJ1100:JtX~E AND MISSILESfI130p(LBN%I)0950;zBLACKLXA124I122\YA150158pXA,YAXA28,YAxYA1950:* DRAW MISSILESI* TIME TO WAKE UPALARM11050ALARM021:"RED ALERT";:": ENEMY MISS:ALARM FLAGERR0.* DRAW LANDSCAPE8::?0F1PLIMEcYA1591491t0,YA279,YA|YA * DRAW CITIESWHITE YA148*I164XA31I>I3XAXA31H(LCN%I)0ĔCITYXA,YARI\* DRAW BASXLCN%0,6: NUMBER OF CITIES LEFT1bJ16clLCN%J,1:CITY #J IS OK IF 1, DESTROYED IF 0jvJDADS:ADJUSTABLE DIFFICULTY FACTORLDS%,DASCRE0:TOTAL SCOREEXTRA500DA:SCORE REQUIRED FOR EXTRA CITY IN ARCADE MODEALARM1,LBYTE:233,HBYTE* * INITIALIZE RESTI SPKR16336:APPLE SPEAKERS 2170t &* RETURN HERE FOR EACH PLAY 0* RESET VARIABLES FIRST :LBN%1,10:# OF MISSILES AT BASE 1, DLBN%2,10: BASE 2, ANDNLBN%3,10: BASE 3; <0 IF DESTROYED&RTS THAT A"5"NUMBER OF ENEMY NUCLEAR MISSILES"a"ARE APPROACHING THE CONTINENTAL U.S.""INTELLIGENCE INDICATES A STEADILY""INCREASING ATTACK WITH SINGLE ICBM'S,""MULTIPLE ICBM'S, AND MANEUVERABLE" "CRUISE MISSILES. THE PRESIDENT HAS"3 "DECLARED DEFCON 4 (GENERAL WAR)."_ "ACTIVATE YOUR REGIONAL ABM DEFENSES."e $ "GOOD LUCK, YOUR COUNTRYMEN ARE". "DEPENDING ON YOU."8 B 16368,0L "ACKNOWLEDGE RECEIPT OF MESSAGE BY"V "PRESSING RETURN...";` ?@D٩LK04ɀ0- @ @LKD K@D&D K@D @ @D K@DLK<0 8LJȐ<=<<0Be@eA8<=8B>C? @ @LK0w@x@~@@ @ 0(MH'Hg@H '@@@g@ g@0LL     LI   )ȥ )LL%OLK0LK B@0D' @ d @o@)Pș)}))ȩ}))Șjh@0h@  c@  B@` @c@ B@00 ?@ L_H    -@d@L/M @ *@02LKLILJF=< |D<=`w@x@~@ :`w@x@~@ W`w@x@~@ `n@n@`@.@` 5G@@ |D ^B8鸍`@@ OG@@@@ OG@@u@v@|@}@p@ F A( 0` D C 5G@@ `S@0IG+C0 iLFi 8F BE, 0L3Em, LWEim B BW@}DX@|DLE|De@a0 LE  |D<= F F F|DLFS@20 LF :C|DS@ CR@kCx@lC~@` @@F BGF@w@@x@@@ BGF@~@` (B`s@t@z@{@`}Dn@< r@Iii(  y@IJiLaE}Di@LDvDwD,0L@ ]`x@ w@0 0d@hh`~@ɿ`   0d@hh`0+Cy/Cw@*x@0~@`w@jCx@kC~@lC CD/F [B BFe@@e@A BGF@<@=`<=> &e<'= 0@0d@hh`D<DjCw@<= B` 0` 0`&BN****)'BO)M'B8&O&NO8&BLMBm&B` BJ uv` B&&&8` B8/` B0%/UiUi`w@x@~@ C 5G@$%')- ?M2&6--$$??68<=8>? B ȹ d@hh` BG B/<= B BG` A< =0d@hh`   ) ȹ)  BLHLBLFDL]DLALCALCLBLBLBLFLGL(GL5GLBL~DL:CL[BL^BL DLDLAL(BLBGLOGLmCL B(ˮ@@@AA GKx %$,45>6.%%,6.$$$%.6/6/6/-$$56.$$$56.6$,56%$$%55>7-6/-$55-4o(6>'D; $--?6755- %$<<2=7..-.<-%-KEY$ j 9@ @w@Jx@J~@KmmmmD K@88 @D7 LKDR@ '@@@ / <@w@Kx@K~@K '@Jw@Jx@K~@ !@DEp@ !Kw@Kx@K~@ '@ 9@ @ !@LL 9@ @ '@@@ LL 9@w@x@~@@DGw@x@ @)S@LL0ʽ\@\@\@ R@ @ N@ @8h@0 @ 0 -@ LL -@  LH8h@B(SX,SY1)0)(DYSYB(SX,SY1(SY0))0):TYSY420~|TXSX(SXDXB(SX1,SY)0)(DXSXB(SX1(SX0),SY)0):TXSX420(7);HOLD0:TX((1)10):TY((1)10):SXTXSYTY420B(TX,TY)0(TXDX)(TYDY)2400T3822SX,812SY:X(1):X.1(DB1)TX6:TY6:340aJTX((1)12):TY((1)12):B(TX,TY)0B(TX,TY)1330TEB(TX,TY)5:PP1:PSPS^HOLD0:2822DX,812DY:B(DX,DY)0:DXTX:DYTY:200:2822DX,812DY:B(DX,DY)2:70:E270h7rTXSX:TYSY(SYDY2kE1ė:21:"TOO BAD, DIGGER, YOU JUST GOBBLED SOME DIGGERBANE. CHOKE! GASP! YOU'RE DEAD!":80q"B(SX,SY)0FS0:,3822SX,812SY:B(SX,SY)3:20::"HERE COMES SENDER! ":706(SXDX)(SYDY)1370$@M21)(M8):TYDY(M90)(M65):TX0TX11TY0(TY12(TXOXS10))230EB(TX,TY)5:SS(B(TX,TY)6):B(TX,TY)0TITI1:HOLD1:I110:B(16336):TITI1:2822DX,812DY:B(DX,DY)0:DXTX:DYTY:200:2822DX,812DY:B(DX,DY)2:DY12ECORE: "OS;:20:"HIGH SCORE: "HS:16:"LEVEL "L;:21::16368,0:|0:I812TY1912TY:822TX,I2922TX,I::3:0:Y152159:822OX,Y2922OX,Y::3:F1:(7);:HOLDHOLD0:M(16384):M128230L16368,0:MM128:TXDX(Y)11403 200:6822TX,812TY:B(TX,TY)6:T DX((1)12):B(DX,0)1160 DY0:CXDX:GXDX:SXDX:CYDY:GYDY:SYDY:E0:S0:TI0:FC0:FG0:FS0:F0:P0:TXDX:TYDY:200:2822DX,812DY OX((1)12):B(OX,11)5180DLL1:23:"YOUR S:1822TX,812TY:B(TX,TY)1::k nTX47:TY47:5822TX,812TY:B(TX,TY)5:::J1DB1:I14 xTX((1)12):TY((1)12):B(TX,TY)1(TXDXTYDY)120 5822TX,812TY:B(TX,TY)5:::K110DB TX((1)12):TY((1)12):B(TX,T0000144070000114070000192070000144070000114140025144070000114070000096140025114070000144070000192140000":50 ZMELODY$"192070000192070000144140025144070000144070000144140000":50$ d::3:I07:I,I279I,I279I,159II,159II,I::TX011:TY011JQ4,3)):770:QJ1((MELODY$,9JQ7,3))::: <ME$"152070025203035000203035000181070000203075100161070000152070000":50 FME$"181100000255150000":50n PME$"19207000019207000014414002519207000014407000011414002519207000014407000011407000019207PYRIGHT 1983 BY MICROSPARC, INC. **":(4)"BLOAD DIG.SHAPES":232,0:233,64:1:0q I770790:J:I,J::750 ( 173,48,192,136,208,5,206,1,3,240,9,202,208,245,174,0,3,76,2,3,96 3 2JQ0(MELODY$)91:768,((MELODY$,9JQ1,3)):769,((MELODY$,9 **********************= * D I G G E R *[ * BY DONALD NUTE *y * COPYRIGHT (C) 1983 * * BY MICROSPARC, INC * * CONCORD, MA. 01742 * **********************S 16672:B(12,12):::16368,0:10:"** CO d@L/MLHN h(SCI)(HSI)400 r::12:A$"CONGRATULATIONS!!!":450:A$"YOU GOT THE HIGH SCORE!":I02:HSI,(SCI): |450 ::10)"NEW ";:480(21:1:"PRESS OR BUTTON TO CONTINUE":16368,0:I012/4/26 SPACES? 9)"PRESS '";::"Q";::"' TO EXIT GAME"q :" HOLD GAME, SWITCH CONTROLS" "23:A$" TO RESTART":450 ,16:26:A$ 6A$"Q"ĉ:: @A$"K"ĹCT,1:32768:350 JA$"P"ĹCT,0:32768:350 T300$ ^"K";::"' FOR KEYBOARD, '";::"P";::"' FOR PADDLES" A$" 'A' FIRE