HOPPIT =#=#?#WHoppit by Robert Kirtland from ZX Collection, Winter'84  63999 $h(11 ):h$(11 ,10 )  k=0  9500% 9000(#:8000@ 0:6:0: y=21:x=15 (f=0:sx=4 2 l=3 <s=0:t=0 FB0,0;"SCORE ";0,15;4;"LIVES " P23658j\,8 Z o=0 dj=411 n8j,0;1;" " xj j=13 20 8j,0;0;" " j >3,0;4;" " K3,7;3;" ";3,15;" ";3,23;" " ?14,0;7;"- - - - - - - - - - - - - - - - " ?16,0;7;"_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ " ?19,0;7;"- - - - - - - - - - - - - - - - " 'a$=" " 'b$=" " 'c$=" " 'd$=" " (18,0;0;6;a$ 15,0;0;3;b$:The inverse part was missing from the listing, so I guessed the PAPER colour. [JimG] '9 ,0;1;3;c$ '6,0;1;3;d$ 12 ,sx;" " 0y=6x=x+1:x=32 7000X 0y=9 x=x-1:x=-17000X @y,x;8;4;"" J0,6;s <.03{u\o4000 t=t+(t>0) t=204200h %a$=a$(232 )+a$(1) &b$=b$(32 )+b$(131) %c$=c$(232 )+c$(1) &d$=d$(32 )+d$(131) Asx=sx+1:sx=30sx=1:12 ,30;" " i$= i=31 i$=""i=02585 y,x;8;" " k2550 ,x=x+(i$="8"x<31)-(i$="5"x>0) <y=y+(3i$="6"y<21)-(3i$="7"y>0) 2570 2x=x+(i=1x<31)-(i=2x>0) By=y+(3i=4y<21)-(3i=8y>0) G(y,x)" "y>10 ū(y,x)=4y6y9 7000X -y=6y=9 (y,x)=" "7000X y,x;8;4;"" !y=6y=9 26102  (y,x-1)" "7000X ( (y,x+1)" "7000X 2y=32700 7y12 1500 <+y=12 ƪ(y,x-1)" "7000X F 1500 f=f+1 s=s+10 )x=oo=0:t=0:s=s+30 f=35000 y=21:x=15 1500 *o=((*3)+1)*8-1 #(3,o)=4o=0: 3,o;3;""  t=1  r t=0 |"3,o;3;8;" "  o=0  >3,0;4;" " K3,7;3;" ";3,15;" ";3,23;" " y=21:x=15 "0,20+l;4;"" s=s+20 j=-40(40(2 $.02{# =,j:.01z# =,40(-j j  f=0 P 1500 X l=l-1 ]0,21+l;" " b.5,-10 g9y=3l>0y=21:x=15:1500 lBl>0y,x;8;" ":y=21:x=15:1500 j=110 s>h(j)t=j:7300 j  6:  7400 ,"YOU HAVE A HIGH SCORE ENTER YOURNAME ";n$ -n$>10 .5,10 :7300  6: j=10 t-1 h(j+1)=h(j) h$(j+1)=h$(j) j h(t)=s  h$(t)=n$ >0,9 ;1;2;6;"HIGHEST SCORES" j=110 .2+j,9 ;٥*5;h$(j);" ";h(j) j  2 L`67C,155:120x,0:0,-90Z:-120x,0:0,90Z "Another game? y/n ";y$ y$="y"y$="Y":10  @B0:6::0,13 ;6;1;"HOPPIT" J T" You must cross the road and river to return to your lily padIf the pad has a BUTTERFLY - -on it then you will score extra points, but you must be quick itwill only stay there for a shorttime.Also watch the SNAKE on thecentral reservation." ^"Kempston Joystick? ";k$ h,k$(1)="y"k$(1)="Y"k=1 r: #(!9100#:j="a""q"+7 #2a #<j,a #Fj #P #15,18,34",127,255,255,40(,16,128,64@,32 ,254,254,255,40(,16 #127,127,127,127,127,255,21,8,254,254,254,254,255,255,64@,128 #0,248,196,196,254,254,40(,16,15,12 ,18,18,18,18,12 ,15 #255,24,0,60<,0,7,0,255,128,64@,32 ,32 ,32 ,32 ,64@,128 #96`,124|,84T,120x,127,255,254,252,0,0,3,2,15,63?,255,0,6,12 ,152,240,224,85U,255,0 #1,2,4,127,127,255,20,8,240,72H,68D,254,255,255,20,8 #O153,189,255,126~,60<,189,165,66B #G0,42*,93],73I,73I,42*,20,0 #܏0,0,0,1,67C,230,124|,568,0,0,3,195,231,102f,60<,24 # %j=110 %&h$(j)=".........." %0j %D 9710% %z=15616=16384@ %z+48384,z %z %f=6412864207 %a %f,a %f %f=6426464470 %a %f,a %f %236077\,249 % 8 %C0,126~,102f,106j,114r,126~,0 %I0,24,120x,24,24,24,126~,0 %H0,126~,2,2,126~,96`,126~,0 %F0,126~,6,62>,6,6,126~,0 &G0,96`,96`,100d,126~,4,4,0 & I0,126~,96`,96`,126~,2,126~,0 &J0,126~,96`,96`,126~,98b,126~,0 &C0,126~,6,6,6,6,6,0 &J0,126~,98b,126~,98b,98b,126~,0 & G0,126~,98b,98b,126~,2,2,0 &HI0,126~,98b,98b,126~,98b,98b,0 &MJ0,126~,98b,124|,98b,98b,126~,0 &RI0,126~,96`,96`,96`,96`,126~,0 &WI0,124|,98b,98b,98b,98b,124|,0 &\J0,126~,96`,124|,96`,96`,126~,0 &aI0,126~,96`,124|,96`,96`,96`,0 &fJ0,126~,96`,96`,102f,98b,126~,0 &kH0,98b,98b,126~,98b,98b,98b,0 &pI0,126~,24,24,24,24,126~,0 &uI0,126~,24,24,24,24,120x,0 &zL0,100d,104h,112p,104h,100d,98b,0 &H0,96`,96`,96`,96`,96`,126~,0 &M0,126~,106j,106j,106j,106j,106j,0 &H0,126~,98b,98b,98b,98b,98b,0 &I0,126~,98b,98b,98b,98b,126~,0 &I0,126~,98b,98b,126~,96`,96`,0 &K0,126~,98b,98b,106j,102f,126~,0 &K0,126~,98b,98b,126~,104h,102f,0 &H0,126~,96`,126~,2,2,126~,0 &H0,126~,24,24,24,24,24,0 &H0,98b,98b,98b,98b,98b,126~,0 &G0,98b,98b,98b,98b,524,24,0 &M0,106j,106j,106j,106j,106j,126~,0 &L0,102f,102f,24,102f,102f,102f,0 &F0,98b,98b,98b,126~,8,8,0 &I0,126~,12 ,24,480,96`,126~,0