Burger BarDEBURGER BAR  By Anthony Sherwood Sinclair Programs, Nov 84 &("a"-110n):z=("a"-110n) ::330J &n=m2-1:(z+11 ),180 (!j=m1+3 19 3 2j-1,n;" " <(j,m2)=59; ū(j,n)=59; ū(j,m2+1)=59; s=s+10 :(z+36$),70F:i=1 12 :j,n;1;a$:(z+25):i:(z+36$),128:f=1 Fe2:j,n;b$:l=1 2:(z+25):j,n;b$:(z+25):l:0:j,n;" " P&j:(z+11 ),0:s=s+5 Z8m1=1 s=s+502:c=c+1:21,n;a$ d"#0;1,12 -s;s nc=3 c=0:f=0:(z+73I):(z+11 ),100d:l=1 30:(z+4):l:(z+11 ),0:430 x9f=1 f=0:a1,a2;" ";a3,a4;" ":600X  i=1 2 m1,m2;" " .m2=m2+(="0"m2<31)-(="9"m2>0) Um1=m1+3*((="w"ƫ(m1+2,m2)=59;)-(="2"ƫ(m1-1,m2)=59;)) ](m1,m2)=58: s=s+5:m1,m2;"*":(z+4):#0;1,12 -s;s m1,m2;m$(i) i=2 250 a1,a2;" " Wa1=a1+3*((m1>a1 ƫ(a1+2,a2)=59;)-(m1a2)-(m2a3 ƫ(a3+2,a4)=59;)-(m1a4)-(m21;0,0;" B U R G E R B A R " Ts'''"YOUR JOB AT THE BURGER BAR IS TOCOLLECT THE GLASSES AND SEND THEBURGERS TO THE BOTTOM BY RUNNINGACROSS THEM." dR'''"AVOID THE BAD APPLES - THEY CAN BE DESTROYED BY DROPPING BURGERSON TO THEM." hK'''" LEFT 9 RIGHT 0 UP 2 DOWN W":610b ri="a""m"+7 | j:i,j:i 921,10 ;"PRESS A KEY":(z+4):0 ba$="":b$="":g$="":f=0:m$="":s=0:h=0:c$="...GAME OVER......."  s>h h=s c=0:s=0 @k=0 255 5:(z+11 ),k:(z+4):k I23692\,255:i=1 24:21,31::i:: 50,0;"" P1;1;3;0,0;" B U R G E R B A R " ִi=2 20 3:i,0;1;6;"":j=1 4:2;i-1,(*32 );g$(1+((*2))):j L5;6;i+1,0;"":i )e=0:i=3 18 3 3k=6 24 9 :2;i,k;b$:k .j=(*32 ):(i,j)535 510 H3;i,j;"";i-1,j;"":e=e+1:e4 510 e=0:i G#0;0,0;3;"" &H21,0;5;4;"" 0m1=19:m2=0 :L#0;1,1;"SCORE 00000";1,17;"HI SCORE 00000" D:#0;1,12 -s;s;1,31-h;h NBk=240 0 -15:(z+11 ),k:(z+4):k Xja1=3*((*7))+1:a2=31:a3=3*((*5))+1:a4=0:140 b(j=z z+102f:k:j,k:j:370r l16,61=,10 ,25,58:,72H,92\,15,15,15,30,247,243,211,254,238,16,67C,16,254,29,32 ,246,251,201,243,58:,72H,92\,15,15,15,8,38&,0,1,128,0,8,211,254,238,16,8,46.,0,85U,92\,167,237,82R,237,82R,17,254,0,25,125},148,568,1,61=,103g,61=,32 ,253,11 ,120x,177,32 ,223,251,201,243,17,16,208,38&,10 ,58:,72H,92\,31,31,31,14,254,238,16,237,121y,67C,16,254,37%,32 ,244,28,21,32 ,232,251,201 vu60<,126~,255,153,255,255,126~,60<,255,126~,231,24,231,0,0,0,568,568,16,568,124|,186,40(,68D,568,568,16,568,40(,40(,16,16,0,127,255,0,255,0,255,127,0,255,255,0,255,0,255,255,0,254,255,0,255,0,255,254,126~,66B,126~,66B,126~,66B,126~,66B,0,62>,28,8,8,8,28,0,127,255,0,255,0,255,127,0,255,255,0,255,0,255,255,0,254,255,0,255,0,255,254,0 G0,34",34",20,20,20,28,0