00NKETFSTXETSTYNPOSCBYTENHEADTRACKBODTAIFONNNCHCHSETMATMIBVBTFTFINITHUNDEBLWEAFNVVDISNPUFTBUBTBYTEGDRODRTRBLDLGRSHFREDIFTCLEAWRERASNOVEFSFSPRESBODBDSKBADISDLROTHSTFH@@ @@ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQR SSSNAKEBY CHET WALTERS (c) 1986, ANTIC PUBLISHING A@F:B2y,"A +6-R:,F:,!+ A$6-%8,!6-$ A#  6- A(06-%8,!@ &6-@ 0 A-  6- A226-%%@ $6-F:,2@p< AFF 8,8&, 8,18&,:68,-F6-AK16-%&@$+",)")"1%P% 6-%!6-%68&,-8,U+ 6-%6-!6-+68&,-8,Z6- _6-@ dR:," AnF:,!@ xG 6-&&+@&,) AG A0%@$+"@6,}KAP6-A!5-@u;? EK  6-$7-@#!( -7 @ SCORING ROUTINE1 "&@d! Ap'1 A`")"Ae6 " A@ Ap' A-36-6$< "@ !6-.6-&+!6,66-%<6-: "6-&"#- Ap0': A! "!+ 6-%%-@@#+( + !6-%A! Ap+ A $> -A#)- 86-P:',> @  A%6-%+ ,16-%+ ,76-=@$ 8,8&,$,MAKE IT 3001N@w A%7-%&N0@F:@ ,6< 6-F:,-6-%A$H:,%<F:,A; "@96-%! %90@@E8 6-&@F:,,-%8( PUT IN SOME HAZARDSH@006-%A$H:,%@HF:,")F:,"A@#$H:,A0A APA@ApA0A A`A0A@A@A0ApA@A`A@ApAApA A@A`  $  $  $6-%A$  $&@d$ 6-$HIT FENCE AND END CHECKE)!%A&# %/6-;E AE"$)R:,"$ 7A) A7 A0%$O -@)5@p9 C AO 6-%6-6-!B 6-F:, 0@0"@ *"86-%B A`&$05!@B&6-%6-%+5 Ap5$:96-&$+!,"+-A19%;   A ?167B:,%,.(*"'6-@&1 AD" (*"6-@0" AE$(+),*$ AI A0N=6-%$+%+@$&,,%6-%16-A=6-O$P$S=%@$A2)-3(}= A eXATE ALL RAINDROPS BONUS]# !A6-# Apb: 6-6-&-60 A4 :gE6-A %+76-AE@ $l--%A9F:,%-F:@ ,q'6-%%+P:F:,',,$-'(v# F:,#$H:,%@; 6-%+-%@ %;( 1 6-&$+!,+A%16-B-A06%$%*. 8 A@B @0.-A06%$%*. Y-%.( double bonusd4@6-AH-L Y>CNTRL<"A"2-AP6"%(.2   APAUSE ROUTINE86-F:,$8%@&A4)-)( press trigger ;T:,-1(@ Ӡ; A Y -( %3%@&E@wQ-Y(  $  ĠҬŠҠ*R  AP6-@01%@&A4=-R(LIVES &%/=( BONUS O:,1( BYTES  =AP4Q @ !/-@08F:,GF:@ ,K Q9[-AuA0@U$H:,%C2F:@ ,U2%@P[>T F:, ".@ E-A6?PTF:@ ,CV  '-C2RF:@ ,V H @0Rj@@3-%AH%AYM@u$+ %AW,[-jF:@ ,WG @ F:, &-@ 7(bonus :$G>CNTRL<"K"FREE SNAKE ROUTINE! 6-%!6-! A P:- ( 4%AX:I-@@a6 )6-F:,2F:,:-IF:@ ,8 F:,F:,"F:,(, 8Q67B:,%,.d-&(*6-Q( free snake$>CNTRL<"A""-6" <-9(@maximum  lives<$K-'-@d=%AH@6%CG K $COMPLETED LEVELS BONUSD6-%$+ @ ,%6-$AP-6-%;%A4D(}= -&(@2@=(youiF:@ ,@3(@made it?-@ F(K(i(@ >-@@%(bonus >%H:,$A@0F:@ ,F:,0T:,A' %6-@&' ANEW GAME & TITLE ROUTINEX'"6-F:@,%$F:@,.6-:6-F6-APR6-X_ 6. dd6-A%6-@-6-&?-G%S_U%@$A4)@@d;B7t@dAI%O!U6-O (}-6(hi score bytes=(G-%%O(I-AaAW"@:e,0,F:&,F:,9@:,I,F:&,F:&,\!AF@:j,4,F:&A,F:&A,B6-%A(HN\%@c!AH5,F:&A,F:&A,G,U%@ [c%DF:,%  A*-@ %D(Ԡپ 1 2 3U #AQ-A$6-F:,*-'96-K-@ U A eR 6-%!6-6*-@ F(choose entry stageJ"R%U")"%-@ A(Š٠MU%   A u%(@ 9-@ %[(@ i-@ %u@ "@16-6( Ӡ @ A :"@06-0( Ǡš : A  @"@&6-6(Šġ@ A %\(hit only 1 2 or 3 %3-@ BF:@ ,F R\ A E*I-6)F:@ ,/3 A%@$I6-& DRAW FENCE AND GO 6-@ 6-@'6-36-?6-K6-W6-Ae6-%Akw@(@} @5,3/@ &G/@ &@ ],@ &@ %q/@ %}/ e%@&-*(@:@+!,e(@ ž& ̾& P@ /-%%A@$7-FF:@ ,J P Y  -&' A+ Y6-AP%@$+@&,%$+@&, R-&F:,& A* 8-%R( BYTES   Q-A6+68,-%@!3%9= CK6-%Q z 8@,*6-66-<6-H6-@T6-A`6-A3p%@d$z @0ONE-TIME INITIALIZATIONS6-@6-@'6-@36-@?6-@K6-@W6-@c6-@o6-@"{6-@P6-A6-AU6-AV{6-@H6-AP'6-A36-A?6-AFK6-@W6-Aqc6-Aro6-@`{6-@P6-A6-2;@ ,9,9A,G68@,-@\68@,-@q68@,-@68@,-A68@,-Ac68@ ,-A-68@,-A<68,-AK68,-AW6-A3c6-A 9,68@,-468@,-D68@ ,-6N68,-6^68@,-6m68@,-v68,-68@,-68@,- 9,68@,-468@,-D68@,-6N68,-6^68@,-6m68@,-v68,-68@ ,-68@,-6-Ad6-AV'6-A36-A ?6-AK6-AW6-Ac6-B7po6-B7`{6-B7a6-Ap6-A6-A8''SET UP DLI & REDEFINED CHARACTERS? AF:A@,&@*+@?6-+F:A,%,$8-@#( 偁8INVERS >CNTRL< "A"\-@(%-@9( chet waltersE-@V( FOR ANTIC\+-A6AQ"!% +>-AWAX"!'42F:,:>  #AQW"6-$ 'C2M+@W APuV-@"+282F:,B%%HL V AP@Q6-F:A`,%$F:Aa,3%@'A4EAQA'BBA6-'' A DL SERVICE ROUTINE==72,169,224,141,10,212,141,9,212,169,0,141,26,208,104,64 START DISPLAY & TRACK DATAkk0,0,0,0,1,1,2,2,3,3,4,4,4,4,3,3,2,2,2,1,3,1,4,1,5,1,6,1,7,2,8,3,8,4,9,4,10,4,11,4,12,4,13,4,14,4,15,3ll16,2,16,1,15,1,14,1,15,5,12,6,13,6,14,6,15,6,16,6,15,6,14,6,13,6,12,7,11,8,12,8,13,8,14,8,15,8,16,9,16kk10,15,10,14,10,13,11,12,12,12,13,13,13,14,13,15,12,16,11,16,10,15,11,16,12,16,13,15,13,16,14,14,14,13RR14,12,14,11,14,10,14,9,14,8,14,7,14,6,14,7,14,8,14,9,14,10,14,11,14,12,14,13;;14,14,14,15,14,16,15,12,16,12,17,13,17,14,16,14,15,14kk16,15,16,16,17,16,18,16,19,15,19,14,19,13,19,12,18,12,18,12,18,13,18,14,18,15,18,16,18,17,18,18,18,19CHARACTER SET DATA0,0,0,0,0,0,0,0,064,0,0,0,0,0,0,0,060,0,0,4,142,122,49,0,0124,0,0,33,58,76,140,0,0!!43,60,110,118,255,24,24,0,0""107,60,110,118,255,24,24,0,0 50,0,0,16,56,124,246,56,56!!114,0,0,16,56,124,246,56,5612,0,0,0,0,32,48,48,076,0,0,0,0,32,48,48,0!!44,34,34,54,93,42,62,127,62""108,28,20,20,93,42,62,127,62##97,36,24,24,60,90,255,255,126!!33,0,0,24,60,90,255,255,126!!98,0,60,110,126,122,62,28,0!!34,2,63,110,126,122,62,28,0&&99,96,240,233,254,254,233,240,96&&35,96,240,232,252,252,232,240,96""100,0,28,62,122,126,110,63,2 !!36,0,28,62,122,126,110,60,0 $$101,126,255,255,90,60,24,24,36 !!37,126,255,255,90,60,24,0,0 ""102,0,56,124,94,126,118,60,0 ##38,0,56,124,94,126,118,252,64##103,6,15,151,127,127,151,15,639,6,15,23,63,63,23,15,6##40,64,252,118,126,94,124,56,0""104,0,60,118,126,94,124,56,0""41,24,60,90,231,231,90,60,24##105,24,60,90,231,231,90,60,24""42,24,60,90,231,231,90,60,24106,0,24,36,90,90,36,24,0''3,102,102,255,102,102,255,102,102((67,102,102,255,102,102,255,102,102O-1 D1:SNAKE.BAS