ZXTape!AndroidNim9d9u;d:2000:5000:"Press any key to play":0 n:6000p xj.521,0;2;1;"YOU TO START ":100d:190 S21,0;2;1;"SPECTRUM TO START ":100d 21,0;2;1;"SPECTRUM'S MOVE ":d=1:e=a(d):7000X:a=1+(6*):ca(a)b=1:180 c140 Id=16:e=a(d)-10-1:7000X:ce:d a=d:b=a(a)-e 8000@:9000(#:a=0:n=16:a=a+a(n):n:a=021,0;1;1;"SPECTRUM IS THE WINNER ":"Press enter to play again";z$:110n 21,0;2;1;"YOUR MOVE ":0,0;2;7;"Which row will you attack ? Typea number followed by enter, ";z$:z$""(z$=1)(z$>"0")(z$"6")a=z$:a(a)>08000@:210 190 ҩ0,0;2;7;"How many will you remove ? Type a number followed by enter, ";z$:z$""(z$=1)(z$>"0")(z$"7")b=z$:ba(a)230 210 9000(#:a=0:n=16:a=a+a(n):n:a=021,0;1;1;"YOU WIN ":0,0;"Press enter to play again";z$:110n 140 7:0:0::2;" ANDROID NIM "''1;" Nim is a game for two, your partner is the Spectrum. " ߯''1;" You take turns at removing any number of androids from one of six rows. " x''6;0;" The Winner removes the last Android " '': F7,31,21,17,17,15,7,1 F7,31,17,25,17,15,7,1 F7,31,17,19,17,15,7,1 F7,31,17,17,21,15,7,1 Q224,248,168,136,136,240,224,128 Q224,248,136,200,136,240,224,128 Q224,248,136,152,136,240,224,128 Q224,248,136,136,168,240,224,128 D31,19,31,3,3,1,1,3 G15,11 ,27,19,19,2,6,12 H255,131,3,3,31,16,480,0 Q248,200,248,192,192,128,128,192 N240,208,216,200,200,64@,96`,480  L255,193,192,192,248,8,12 ,0 bn=013 :5000+10 *n:m=(97a+n)(97a+n)+7:o:m,o:m:n a$(4,2):b$(3,2):a$(1)="":a$(2)="":a$(3)="":a$(4)="":b$(1)="":b$(2)="":b$(3)="" ( z:0,0;1;" ANDROID NIM ":a(6):n=16:a(n)=1+(*7):m=1a(n):3*n,3*m;4+(*3);a$(1);3*n+1,3*m;3;b$(1);3*n,0;7;n:m:n  bb(6,3) l%n=16:a=a(n):n=da=e v~b(n,3)=(a/4):a=a-4*(a/4):b(n,2)=(a/2):a=a-2*(a/2):b(n,1)=a:n Zc(3):n=13:c(n)=0:m=16:c(n)=(c(n)b(m,n)):m:n &c=c(1)+c(2)+c(3): J3*a,0;1;a Tn=1a-1:m=1a(n):s=(3*):p=21-1:q=34:3*n,3*m;4+s;a$(q);3*n+1,3*m;3;b$(p):.02{# =,2*(q+m+n+p):q:p:m:n ^m=1a(a):s=(*3):p=13:q=23:3*a,3*m;4+s;a$(q);3*a+1,3*m;3;b$(p):.02{# =,10 +2*(q+p+m):q:p:m hn=a+16:m=1a(n):s=(3*):p=12:q=21-1:3*n,3*m;4+s;a$(q);3*n+1,3*m;3;b$(p):.02{# =,20+2*(q+m+n+p):q:p:m:n r #2n=a(a)a(a)-b+1-1:p=23:q=13:r=14:3*a,3*n;7;a$(r);3*a+1,3*n;2;b$(q):.1}L-.03{u\*p,40(+r+p+q:r:q:p #<3*a,3*n;5;1;a$(4);3*a+1,3*n;2;1;b$(3):1,60<:3*a,3*n;" ";3*a+1,3*n;" ":n #F a(a)=a(a)-b #P3*a,0;a: