Smiler WSmiler by Redvers Stringer from Sinclair User, Sep'83 3 2 l=0 < 5000 FAn=119:a=(*6):a;8*n;"SMILER":n Z#.2~L,7:.15~,7:.1}L,8:.1}L,7:.1}L,12 :.1}L,11 :.1}L,9 :.3,7:.2~L,5:.1}L,5:.2~L,4:.1}L,4:.1}L,2:.1}L,0:.1}L,2:.3,4 _ 200: d3v=3:s=0:j=s:x=10 :y=15 x0,13 ;" " }2g=(*18)+2:h=(*30)+1 [a=16:(*18)+2,(*30)+1;4;"":a:502 "r=0:j=0:z=90Z 8000@ ;(*18)+2,(*30)+1;2;"" x,y;" " Sr=10 g,h;" ":g=(*17)+3:h=(*28)+2:r=0 j<400x,y;"" x,y;" " .x=x+(="6")-(="7")+(x<2)-(x>20) .y=y+(="8")-(="5")+(y<1)-(y>30) z89Y1000 vj=400.2~L,14:.2~L,12 :.2~L,11 :.2~L,9 :.8L,7:1000 (x,y)=58:7000X /(x,y)=60<s=s+100d:j=j+100d 0,0;"SCORE= ";s g,h;"" ,-j<400x=gy=hr=10 :7000X @dj400x=gy=h1,10 ;"BONUS TIME":f=10 20:.1}L,f:f:900 Xj<400x,y;"" l r=r+1 j400x,y;""  140 z=z-1:8600! Cz11,10 ;" ":r=10 :140 s=s+10 0,0;"SCORE= ";s  900 (x,y)=58:2000 z=z-1:8600! z=0130  240 'z=z-1:s=s+20:8600! z=0130  240 #f=07:x:"a"+f,x:f 00011000,00111100<,01111110~,11100111,11100111,01111110~,00111100<,00011000 P#f=07:x:"b"+f,x:f s01100110f,01100110f,0,0,11000011,01100110f,00111100<,00011000 #f=07:x:"c"+f,x:f |00011000,00111100<,01111110~,11111111,11111111,00011000,00011000,00111100< #f=07:x:"d"+f,x:f Dl10010010,01010100T,0,11000110,0,01010100T,10010010,0 p X x,y;"" \.5,4:.5,6:.25~,7:.25~,6:.5,4  v=v-1 %&v=20,13 ;" " *v=07300 /&v=10,13 ;" " 4 140  s>ll=s L:3,2;"YOUR SCORE ";s;5,2;"HI SCORE ";l;17,0;"DO YOU WISH TO PLAY AGAIN (N/Y)":9 ,9 ;"GAME OVER";10 ,9 ;"GAME OVER" [ 30 ]="y":100d `="Y":100d j*="N":10 ,13 ;"GOOD BYE": t*="n":10 ,13 ;"GOOD BYE": ~ 7517] !4 q=0 !H)163+q,175:0,-7 !Ra=(*30):.008zn,a !\ q=q+1 !pq=90Z ! 8520H! !4163+z,175:1;0,-6: ro\in