Jam ,,f.DJAM SANDWICH  By Alan Thomson  Sinclair Programs, Nov 84 .5::0:3003 :instructions 4000:UDG ."SKILL LEVEL 1-5 (5-HARDEST)";skl:3: 7skl<1 skl>5 0.1}L,1:5 1000:initialise 2000:screen ( mainloop 2x=(*8)+7 <n=6 x Fsc,sl;" " P 900 Z55,5;2;"":5,5;" " d14,n;2;"":4,n-1;" " nn xn=4 18 }sc,sl+5;" " %n,x;2;"":n-1,x;" " 900 sc,sl;" " (x=sl+1 n=sc-1 300, n 600X ,a=(*10 )+8 1x=skl+8 18 6 900 @sc,sl;" " Esc-1,sl;2;" " J%x,a;1;"":x-1,a;" " O18,a;" " T#sl=17 x,a;" ":400 YHsl+1=a sc=x sl+2=a sc=x sl+3=a sc=x 600X ^x h 300, 317,17;" ";16,18;" " !15,20;2;"" 15,20;"" 16,20;"" 17,20;"" 0.01z# =,20 914,20;2;"":14,20;" " 913 ,21;2;"":13 ,21;" " x=22 sa 312 ,x;2;"":12 ,x-1;" " x sa=sa-1 jam=jam+1 312 ,x-1;" ":13 ,x;2;"" b=15 17 b,20;" " b jam=10 700  40( XL4,6;"HARD LUCK TRY AGAIN!!":y=1 200:y:7 )8,22;5;" " )9 ,22;5;" " *11 ,22;7;" " *12 ,22;7;" " *13 ,22;2;" " qskl=skl+1:skl=6 11 ,6;"YOU'RE TOO GOOD";12 ,6;" AT THIS GAME":760 t4,6;"HAPPY EATING"'"THE SKILL LEVEL NOW GETS HIGHER":z=-15 39':0.02{# =,z:z:0 #"PRESS ANY KEY":0:7  wsl=sl+(="8")-(="5")+(sl<7)-(sl>17):17,7;" ";17,21;" ";16,7;" "; ="h"0   jam=0 sl=17:sc=17  sa=30 :5::3  screen set up n=6 16 2;n,0;"" n N18,25;2;4;"Skill-";skl;18,0;"H-Hold" f$="" 8,22;7;f$  9 ,22;7;f$  14,22;7;f$  15,22;7;f$ *+10 ,1;7;0;"JAM" 0,0;7;j$:1,0;2;1;" JAM SANDWICH ":2,0;7;j$ 19,0;7;j$:20,0;2;1;" JAM SANDWICH ":21,0;7;j$  'j$="" 2;j$:1;0;" JAM SANDWICH ":2;j$:19,0;2;j$:1;0;" JAM SANDWICH ":2;j$ 6,0;7;j$ ²8,0;2;" USING THE KEY'S (5)&(8) YOU MUST CATCH THE JAM SO AS TO FILL YOUR SANDWICH. BUT BEWARE"'" THE JAM SNATCHERS ARE ABOUT." 15,0;7;j$ 600X:  5080  f="a""f"+7:a:f,a:f G255,127,63?,30,0,0,0,0 E255,255,0,0,0,0,0,0 E1,3,7,15,15,15,15,7 A3,3,3,3,3,3,3,3 jam M24,24,60<,60<,126~,126~,255,255 L24,60<,252,60<,82R,82R,129,129