AWARI AWARI 6:9 :1: 9000(#  5000 .;1;"DO YOU WANT TO GO FIRST(Y/N)?";x$ #c=6:8000@ (x$="y"x$="Y"200 2210:400 STATUS 210:300, 9 :1 J=17 %7,((4*j)-3);" " Ea(15-j)>07,((4*J)-3);a(15-j) J J=17  E14,(1+(4*J));" " 4a(j)>014,(1+(4*J));A(J) J " ,Xh=0:x=16:h=h+a(x):x:h=0c=1:1000:400 1!z=6750:340T 6%;1;"ENTER CUP NUMBER(1-6)";c @&21,0;"YOU CHOSE CUP ";c J c=0 N C>6C<1300, T 1000 ^ 210 COMPUTERS TURN  Z=1z=6700 Z=2600X Z=3408 Z=4800  Z=5900 MOVE LEVEL 3 J=16 "A(14-J)0440 J  460 C=14-J 502:21,17;"SPECTRUM CUP ";1;7-J:100d:21,0;" "  1000 T=0:X=16:T=T+A(X):X:T=0A(7)>24:4,6;"A W A R I LEVEL ";z;10 ,7;1;"YOU WIN ";A(7);" TO ";480-A(7):500 T=0:X=813 :T=T+A(X):T=0A(14)>24:4,6;"A W A R I LEVEL ";z;10 ,8;1;"I WIN ";A(14);" ";480-A(14):500 |A(7)+A(14)=480:4,6;"A W A R I LEVEL ";z;10 ,12 ;1;"A DRAW":500  200  -;1;"PRESS ENTER TO PLAY AGAIN.";x$: XMOVE LEVEL 2 ] H=0 bJ=16 dA(14-J)=J440 g"A(14-J)>HH=A(14-J) lJ vJ=16 {A(14-J)=H440 J  MOVE LEVEL 1  H=0 J=16 2(A(14-J)+(14-J))14440 "A(14-J)>HH=A(14-J) J J=16 A(14-J)=H440 J   AUTO MOVE c=61-1 A(c)+c7795 c  c=16 A(c)>0795 c /21,0;"YOU MOVE CUP ";c:502   MOVE LEVEL 4 *J=(*6)+1 4"A(14-J)0440 >4h=0:x=16:h=h+a(14-x):x Hh>0810* R 440  LEVEL 5 J=C  8204 MOVE USING CUP C A(C)=0  8000@ J=C+1A(C)+C K=J J>14K=J-14 A(K)=A(K)+1 J $A(C)=0 .(A(K)=1K=7K=14 8A(K)=A(K)+A(14-K) BA(14-K)=0 L  BOARD  51,5;" A W A R I.";20;"LEVEL ";Z  6000p A4,1;1;1;"ST 6 5 4 3 2 1" #a$=" " #b$=" " #c$=" " 6,0;3;1;a$;7,0;b$;8,0;c$;13 ,4;a$;14,4;b$;15,4;c$ F17,1;;1;1;"CUP 1 2 3 4 5 6 ST"  A(14) J=114 "J=7J=145130  A(J)=4  J o p SET UP UDG zDf=06:g=07:a:(144+f)+g,a:g:f J96`,144,16,16,16,16,16,16 I16,16,16,16,16,16,16,16 G16,16,16,16,16,16,8,7 A6,9 ,8,8,8,8,8,8 D8,8,8,8,8,8,16,224 A8,8,8,8,8,8,8,8 C0,0,0,0,0,0,0,255  @sound JP.1}L,(c*3)-4:.1}L,c*3:.1}L,(c*3)+4 T #(LEVEL OF PLAY #2 #<913 ,0;1;"PLEASE ENTER LEVEL OF PLAY" #F16,3;"1-HARD" #P17,3;"2-EASY" #Z%18,3;"3-EVEN EASIER" #_-19,3;"4-BEAT THE MONKEY LEVEL" #a-20,3;"5-BEAT THE ZOMBIE LEVEL" #b%21,3;"6-DEMONSTRATION" #dZ #h!Z<1Z>69000(# #lc=z:8000@ #n & & &"AWARI"2 z zzaA B C IXnhkt