22%&?- O!6Sl:\@zzzzzzzzzz < <0??0 ?< ???zzz???< zzzz???< ?z*<? < <<< < <0?<< < < <zzz< < < ? < zzzz<< < < < ?<<z << ???0< << < < =zzz< < < <zzzz< < << 8L=16 N=1L:X$=X$+(9 +N):Y$=Y$+10 :N:1500:1525:10 ,10 ;6;"";5;" "(L-2):23676|\,254 <,250:OX=X$OY=Y$OX=OX+X:OY=OY+Y B~X$=OX+X$(L):Y$=OY+Y$(L):(OY,OX)2ƫ(OY,OX)68Dgi370r:GIy$(1),x$(1);2;"" F0(OY,OX)2ƫ(OY,OX)68D5000 K(OY,OX)=68D145 Pmoy,ox;6;c(head):5;OY-Y,OX-X;"":Y$(L),X$(L);2;"":GIƥ>.98 zG350^ 60< sc=sc+count:sc1=sc1+1:400:Y$(1),X$(1);2;"":(OY,OX)2gi370r:GIy$(1),x$(1);2;"" (OY,OX)25000 X$=OX+X$(L):Y$=OY+Y$(L):L=L+1:OY,OX;6;C(HEAD);5;OY-Y,OX-X;"";Y$(L),X$(L);2;"":P=1:SC1=10 COUNT=COUNT+1:5100:10 60< A$=:kema$=¿31 /OX=X$:OY=Y$:A$ =l$X=-1:Y=0 A$ =r$X=1:Y=0 "A$ =u$X=0:Y=-1 ,A$ =d$X=0:Y=1 6OX=OX+X:OY=OY+Y:head=H():ME=ME+1:#0;1,8;0;M$(MES):ME=5ME=0:MES=MES+1:MES=82RMES=1 T ^Y15906:n=*4:n<1.3&fffn>.9ffffs,t;2;1;"":gi=1 jAn<2.2 n>1.9s333s,t;5;1;"":gi=1 kAn<3.1Ffffn>2.99s,t;6;1;"":gi=1 lAn<3.4Yn>3.2Ls,t;3;1;"":gi=1 m,n>3.9ys,t;4;"":gi=1 n r;(oy,ox)=66Bsc=sc+5:400:gi=0: s<(oy,ox)=69Esc=sc+10 :400:gi=0: t<(oy,ox)=70Fsc=sc+15:400:gi=0: u<(oy,ox)=67Csc=sc+20:400:gi=0: v;(oy,ox)=4sc=sc+25:400:gi=0: w CS=1:T=0:P$="0"(5-sc)+SC:2000: M$("S","18"):"1250" *,"4";"INITIALISING PLEASE WAIT";O,O;" ";"21",O;" ":N=̰"20"2:N,O;" ";N,31;"";N+1,0;"";N+1,31;" ":N N=181Q:A$:A=10 -(A$/2):11 ,11 ;4-((N/20));" SECONDS":M$(N,A)=A$:N:11 ,11 ;"0":"6E3": "WELCOME TO SNAKE" "A FREEWARE GAME" "WHICH MEANS THAT" "YOU CAN COPY IT" "FREELY PROVIDING" "THAT THE PROGRAM" "ISN'T ALTERED IN"  "ANY WAY." "PLEASE NOTE THAT"  "I RETAIN" "COPYRIGHT ON"  "GAME."  "HI'S TO:" "DARREN, NICK" "COLIN, MARK" "AND SPECIAL"  "HI'S TO:" "EMMA, BECKY" "LORRAINE AND"  "LESLEY." "WRITTEN IN" "JANUARY 1992" "BY D MORRIS" "USING ZX BASIC" "IF YOU WANT YOU" "CAN COMPILE THE" "BASIC, BUT MAKE"  "SURE YOUR" "COMPILER ACCEPTS" "STR$. MINE DOES" "NOT WHICH IS WHY"  "I HAVEN'T" "COMPILED IT." "I'M SORRY ABOUT" "GIVING YOU CONK" "YES I THINK IT" "IS C*** TOO." "BUT DON'T BE TOO"  "HARD, IT ONLY"  "TOOK A DAY TO"  "WRITE."  "THANKS GO TO"  "BRIAN AND RON" "FOR PUBLISHING" "THIS PROGRAM." "IF YOU WANT TO" "YOU MAY NICK THE" "DOUBLE WIDTH" "FONT. IF YOU" "WRITE A MACHINE" "CODE DOUBLE" "WIDTH FONT" "PRINTER, SEND IT" "INTO OUTLET AND"  "SHARE IT." "HAS ANYONE GOT" "YOUR SPECTRUM " $"ISSUES 1,3 AND 6","IF SO CALL ME" "THANKS TO BARRY" "SPENCER FOR" "ENABLING ME TOO"  "COMPLETE MY" !"YOUR SINCLAIR" ""COLLECTION." #"DO YOU OWN A" $ "A COPY OF" % "NEBULUS" &"WHICH YOU WANT" ' "TO SELL?" ("IF SO CONTACT ME" )#"AT THE ADDRESS","IN THE PROGRAM" ,"HAS ANYONE" -"FOUND A USE FOR" .+"VAL$ ? IF SO","PLEASE TELL THE","WORLD." D"AS THE CARTOONS" E"USED TO SAY" F"THAT'S ALL FOLKS" sc1=O:P=O:X=-1:Y=O:"23676","":"2",O;"";"21",O;" ":n=320:n,O;"";n,31;"":n  7,O;"";7,31;"";8,0;"";8,31;"";12 ,0;"";12 ,31;"";13 ,0;"";13 ,31;"";17,0;"";17,31;"";18,0;"";18,31;"": 1600@:m=14:s,t,p$:2000:m:N=320:N,1;"":N:N=13+(COUNT*3):15906:S,T;"":N:N=110 :15906:S,T;"":N 6aS=(*17)+3:T=(*29)+1:S=10 T9 T10 +L15906 7(S,T)215906 ; @O,O,"SCORE ",1,O,"0"(5-SC)+SC,O,14,"LIVES "+LI,1,14,"LEVEL "+COUNT:DOUBLE WIDTH PRINTING Лs,t;:font=236077\:i=1:n=1̱p$:236077\,191:i;p$(n);:236077\,194:i;p$(n);:i=i+1:i=8i=1 n:236077\,font: i23676|\,255:n=2l:y$(n),x$(n);"":.01z# =,0:.003xD,-10 :n:n=2l:y$(n),x$(n);"":.01z# =,10 :.003xD,0:n:li=li-1:s=0:t=14:p$="LIVES "+li:2000:li=0S=10 :T=7:P$="GAME OVER":2000:1:502:6050:9000(#  10 C=70-1:N=320:C;1;1;N,1;" ";30;" ":.003xD,((N-2))*(C*.5):N:C: p"6E3" z!s$(6,7):s(6) $N=15:S$(N,),S(N):N ["TOPS",2000,"GOOD",1500,"BAD",1000,"POOR",500,"OH DEAR",200  *** HISCORE TABLE #flag=O:i=16-1 k=s(i+1) j=i1-1 scs(j)"6160" ks(j)"6140" (s(j+1)=s(j):s$(j+1)=s$(j) j j=O -s(j+1)=k:s$(j+1)=s$(i+1) i: j=1flag=1: sc < s(j-1)flag=j $ .O:O:ٰ"7"::"6060" 8 ,"12";"High Scores" BJFLAGN=4FLAG-1:S$(N+1)=S$(N):S(N+1)=S(N):N LMn=15:5+(n*2),10 ;n;s$(n);20;s(n):n VgFLAGflag;5+(flag*2),10 ;s$(6);20;sc:s(flag)=sc:"6250":"6060": ` j2y=5+(flag*2):r$(8):n=1 ti$=:i$="""6260" ~.i$=13 s$(flag)=r$(28): \i$=12 n0r$(n)=" ":N > 0n=n-1:.01z# =,-10 :"6300" Ki$32 n<8r$(n+1)=i$:n=n+1:.01z# =,10 "y,*;flag;r$(28)  "6260" @*X$="":Y$="":L=10 :n=1l:x$=x$+(9 +n):y$=y$+19:n:C(5):c(2)="":c(4)="":c(5)="":c(1)="":MES=1:ME=0:KEM=0:8300l :19,10 ;6;"";5;" "(L-2) 8170:A=5 !OX=X$OY=Y$OX=OX+X:OY=OY+Y =X$=OX+X$(L):Y$=OY+Y$(L):(OY,OX)=68D8125 Poy,ox;6;c(head):OY-Y,OX-X;"":Y$(L),X$(L);" ":8075 A$=:OX=X$:OY=Y$ (A:A=9998300l :8176 "A=1X=-1:Y=0 !A=2X=1:Y=0 "A=3X=0:Y=-1 !A=4X=0:Y=1 'OX=OX+X:OY=OY+Y:A$="1"A=5: DA$="2"kem=:L$=2:R$=1:U$=8:D$=4 /A$="3"kem=O:L$="6":R$="7":U$="9":D$="8" /A$="4"kem=O:L$="5":R$="8":U$="7":D$="6" !OA$="5"kem=O:L$=e$(1):R$=e$(2):U$=e$(3):D$=e$(4) &A$="6""9115":"8E3" 0.A$="7""6190":1:O:FLAG=:A="5" :head=3-(y*2+x): l1,1,1,1,1,1,1,1,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,999 #(1:"1500":"9030":FLAG=O:"8E3":FLAG"4" #2"9E3" #F99035K#:J=110 :S,T,P$:2000:J: #K(0,10 ,"SNAKE",1,4,"BY D MORRIS",4,9 ,"OPTIONS",6,3,"1 START GAME",8,3,"2 KEMPSTON",10 ,3,"3 SINCLAIR",12 ,3,"4 PROTEK",14,3,"5 KEYBOARD",16,3,"6 DEFINE KEYS",18,3,"7 HIGH SCORES" #N=320:7;N,1;" ";30;" ":N:S=6:T=5:P$="DEFINE KEYS":"2E3":S=9 :T=7:P$="LEFT":"2E3":"9130":e$(1)=A$:S=11 :T=7:P$="RIGHT":"2E3":"9130":e$(2)=A$:S=13 :T=7:P$="UP":"2E3":"9130":e$(3)=A$:S=15:T=7:P$="DOWN":"2E3":"9130":e$(4)=A$:1:25:N=320:N,1;" ";30;" ":N:"9030" #Bl$=e$(1):r$=e$(2):u$=e$(3):d$=e$(4): #A$=:A$="""9130" #RT=19:P$=A$:"2E3":.03{u\,10 :.03{u\,o:.06|u\,20: #I"23637+256*23638-1553"::width_  !J <<0 ?;9;\|<|\<|8x<>Uee5E5EU"U;wUw?;w???Uqڬզ@` `0P00P05?kk?5 >HP`x?/zo}!C9}?pHx??|8?۶lB$$B ?g[===ڼظ p;9?<ܜ8<  v~?GV!6#6>2!"*B"D>22F2G>G^*D~ H *B+"D>2 (6 #"D~2F>2G#18H _!~^Vnf͵:G= *D#"D:F2G$|8M|8MT:T xWWJ 1:[>> >BB<DHpHDB@~BfZBBBBbRJFB/`:Ψҩ./x/(g}<0S_ -8z<({ZW͎!\~ #5+ 6}!\ !\(.!\('~ ~_w#6#: \w#NV3w2\#6#5: \w#~B{' x!~7{:8/ O(O!(!~!)@(Z( 0^ ƥ0  !Th(80 6!09(0(ƀh!0 "( >_>@}==/O! :H\8 ?DOg z( yMM 1'4l8!\~ ^#N#Fx T# Px<%l 0 !n4ʹ38w18͔ 0"4CU45q8͙͙PYzõ  `uA$Sʉ.68I>CjsOT\i$v$:;\+bk !?!(! +>G- %/> 7;oz( n|g>7%lyx0B> <#1>z<;:H\8>8 >!? O0!+| 00>Ƹ0$ 0x0yO& 0uyO~#.>˸|gz |>= >Щ (y/O7:t\2t\͌0%(<:t\(" > 6+! 0:t\ x(  # I:t\ʊͲ(0 !:t\=(Š0%(#~w #~w #q>q(6R~ݾ 0 ! ~< yO#  y > ~( :t\=ʶnf^ V |( R8&(~ | n f:t\7 >V^ V |  nf7R8 DM~(>|(+F+N+"_\*_\*Y\+N F ~U#w#s#r#7>*Y\+"_\N F U*_\#NF "K\f| n "B\6 7>N F 67>[S\~ # +0͸, ~O*K\~(%(͸ # 0><7,  "_\͸*_\͸"_\*S\8+U#U#SS\[_\> 2v^ V >Press REC & PLAY, then any key Program: Number array: Character array: Bytes: 8i0e! _^ NW)TSR7PO_^]\[ZTS >" N > ! :\6W> e 2\N!U   y==Z>?l 2\ m  2\*Q\s#r ̀ *\W}" )DJ>8 ON >ڟ ;  $ N F C\"\C\C\"\qE"\N K\*\FK\*\NE*\8=0&G8  \G!\> Ow# ~:K{\   K6\!;\ˆ &o))) y=>! ON(yU :\8O>N(078#= %N #> _|Xg[\~Wv(W 8Wf(o w&A 8 > F; ; 0H(z> <~#(= AN xF 18f(^-(Z>{?\5R E>2\*\:\> !;\ˮ (E(A n(;>2\"\ F1!͛|XgZN q#ɀscroll 81DG*\*\M x!k\Fx*Q\ s#r#?8!*!"}\0͔ >M D*Q\ s#r6R!![N xF(1G͛>!_ ͛xx ! =!GOx $ ͈!͛xOx T]6=G $ ͈bk:\F(:H\w !|=Pgah)DM>Woz@g!@$| } o?g ![>![uFGw#0! xWT8 > 0 ^#0z *=\!s=\^!͵!8018-8:W8 7~_*[\U#p#q *[\RS[\_!^*[\ fjPp~*I\7n—n͕zʗ#N#F! DM͗*Q\>+5U4*Y\####"[\7n !I\m61~ #"[\1"=\~7͕R#DMbk# # #B 87n*I\n͕!J\͕>7~(Á0f(6^!͵0͐+"[\6^n:\nn 0R0-0 GOx* !j\>w !A\w 6޿GO>X  ^!͵6[\"=\ "\6&*a\+[Y\7n[a\*c\~~# >[\K\[8\*{\G>>?Gbk6+ R#05(5(+C\S8\"{\("\>#"{\+@C8\"\!<"6\*\6>+++"=\V!:\!\"O\+"W\#"S\"K\6#"Y\6 #6#"a\"c\"e\>82\2\2H\!#" \55!\61k 8 61͕Ͱ>  # RD (Z,X,KEYBOARD (Z,X,OKEYBOARD (Z,X,O,KEYBOARD (Z,X,O,KKEYBOARD (Z,X,O,K)KEYBOARD (Z,X,O,K) j*0scc"s"CC 8PSSsfckjjbkR,/NYUNssf""2jsc?:?XQ.>xc>>w?cYW ( ꨧ>s~>>?[<>w>w>w>O@@>@tcx?s>~>s>U1@͜!iBw;w~wc?ww>A]@X'%]tr^w?wx>>>w^w~~;UU9 £><>>??UW_wT^:*@>><ww?>>_u#l**E WUG0 U]FP @U >p9 8 cu98gк 2@CGЪw =U .gX.@ ~U_tUsU. *UU]U.t8 ـ> >>3vªP .`9*Ω0+@:#ـ`shCCa?UWOU°p  WqY. *@8<8.K٠| ?Gb@. $<":?/Pqp ٠` 88?UWz  UUu.   ٠ssjaac*u@P p. UUUQ-٠>>?>UU<~(s8s8M P P 3Ƿ3s8MW/W \Wq !v> 88888ll$H(|(|(<0< <fl0fF|8||00 8888888lD8888>> 0`||<|>>>>88<~~ <<0 ?> >&Hi, I've got 500 bytes spare so I thought I might write you a message. OK, my name is Dominic Morris, I am 17 years old (DOB 11/01/75), and have blond hair and brown eyes, I am 5'9~ and weigh 140 pounds. I live in Malvern (20 Greenhill Drive, Malvern, Worcs, WR14 2BW). This program was written in August 1991, updated April 1992 using a +3. Hi to all, especially BB, LN, ES, and L-AL. At the moment I am suffering from programmers block, any ideas greatfully received. Got to go, no room, see you soon!!! THE HEAD CHEF WAS ASLEEP ONE DAYWHILE HE WAS SUPPOSED TO BE WORKING. WHEN HE WOKE UP HE FOUND THAT ALL HIS FOOD HAD BEENSTOLEN BY THE MICE. HE MADE THE SMALLEST CHEF, DOZY, CRAWL DOWN THE MOUSE HOLE, SO HE COULD RETRIEVE THE FOOD. ONCE HE WAS DOWN THERE DOZY FOUND THAT, TO GET TO THE FOOD HE HAD TO NAVIGATE HIS WAY THROUGH MAZES AND DASH BACK TO THE EXIT BEFORETIME RUNS OUT ONCE HE HAS COLLECTED EVERYTHING.!PX!QX!RX!SX:H\:R\Gv W>z< !TX!UX!VX!WX!~#{ !0R͵| !~A# !2͵P>>  ?@ O$E|t?@ @ |DtD8 P(  B@?@?( zxP@@P( B ||88|| |88||x!X *v\p#Xw#z[ [v\RDMbk(>8x( #|[ *v\~w#p#w#z[ *v\N#X~( #z[ DM#F#~#y;:;;9;\|<|\<|8x<>Uee5E5EU"U;wUw?;w???Uqڬզ@` `0P00P05?kk?5 >HP`x?/zo}!C9}?pHx??|8?۶lB$$B ?g[===ڼظ p;9?<ܜ8<  v~?GV!6#6>2!"*B"D>22F2G>G^*D~ H *B+"D>2 (6 #"D~2F>2G#18H _!~^Vnf͵:G= *D#"D:F2GY<~v~<<~~<JJJ%B$qq[??[B$<~Z~<<~Z~<$B(DD8||8<~~<T֪T8B$z4z4֪DD}EUE}ԪUUvp P)<~v~<<~~<JJJ%B$qq[??[B$<~Z~<<~Z~<$Bz4z4 zz=yqUJ)BD)zDDB<