\!<|BB@|B@~@@BBBBDBBBBB@@B><<<B>B|~B|<x~|~<<<><<@AbBBDBB@@fBBD@B@BBBBbD@@B@BBbBBBB@@ARBBBB@||ZBBB|B|B@@BRB|@B<@BRBBBB<@AJ|BBB@@@B|BB@|@~@@BJB@@B@BJ|~|B@AFDBDBB@@B@BD@D@BBBBFD@@BBBBFDBDBB@A>BB~B@<x~B~B<<><<~ 888  # # <@D@J \\\\(\`4h`X![ `PP!!8 "W K SRP:8000@  x-4*z,y+4*k: 4x-2*z,y+2*k:x-6*z,y+6*k: 11 :12 : >x-6*z,y+2*k:x-2*z,y+6*k:12 : 11 :14:  14:z=-118 4x-4*z,y+2*k:x-4*z,y+6*k: ,x+6,y+4:x+2,y+4:  x=0 &c=(*29):c=020 #d(c)=1x<2820 (x=2860< 2-x=x+1:d(c)=1:e(x)=c:20 _ dd19,10 ;" ";20,10 ;" ";21,10 ;" " nAm=104h1528:m,0:0,16:m o$96`,0:568,0 3m=713 :m,29;"";m,2;"";2,5+m;"":m:6,29;"";14,29;"";0,11 ;"";1,11 ;"";2,11 ;"";0,19;"";1,19;"";2,19;"";6,0;"";14,0;"" m=120x64@-8:239,m:0,-8:16,0:0,8:0,m:0,-8:16,0:0,8:m Rm=95_1438:m,175:8,0:0,-16:m X5,30;"2";5,2;"4";0,10 ;"3";19,8;"1" s:m ,x=96`:y=0 6n=17 Jh=e(n) T10 +a(h) ^ y=8 h10 +b(h) ry=0:x=x+8 |n  5 %z=1:x=140:y=138 $jpj1pj=02000 "18,10 ;" ZXCVBNM " ="z"g=1:2000 ="x"g=2:2000 ="c"g=3:2000 ="v"g=4:2000 &="b"g=5:2000 0="n"g=6:2000 :="m"g=7:2000 ?)="p"pj=1g=8:3500 D="t":8000@ N 510 $4500:pj=15000 jpj14510 jpj=2:pj=1 q=e(g) d(q)=0  a(q)=b(q)c(1+a(q))=1:x,y:0,12 :-8,0:0,-16:8,0:0,4:x=x-8:y=y-4:z=-1:10 +a(q):y=y+8:10 +b(q):z=1:y=y-4:i1=a(q):d1=b(q):4000 c(a(q)+1)=1:c(b(q)+1)=1:x,y:-16,0:0,8:16,0:0,-8 10 +a(q)  d1=a(q)  x=x-8 10 +b(q)  i1=b(q)  x=x-8  6000p 4000 7100 0>.9ffff2510 :SELECCION DE FICHA Be1=0:n=17:i1=a(e(n))i1=b(e(n))2507 n:3000 6n=17:d1=a(e(n))d1=b(e(n))2510 n:2520 &e1=0:>.53000 Colocacion izquierda 1f=rr+6:u=e(f):d(u)=02560 Ii1=a(u)a(u)=b(u)a=a(u):b=b(u):d(u)=0:2700 :2800 Hi1=a(u)a=a(u):b=b(u):d(u)=0:i1=b(u):2600( :2800 Hi1=b(u)a=b(u):b=a(u):d(u)=0:i1=a(u):2600( :2800 f:f=r+6 'e1=e1+1:e1=23500  3000 (/Rectangulos fichas nor males *Fc(a+1)=c(a+1)+1:c(b+1)=c(b+1)+1 -x<524k1=2 .#y<66Bk1=2k1=3 /x>196k1=4 2Ik1=2x,y:0,-16:8,0:0,16: 196k1=4 uk1=3x+16,y:0,12 :-8,0:0,-16:8,0:0,4: |k1=4x+8,y+8:4,0:0,8:-16,0:0,-8:12 ,0: $x<535k1=2:2710 `x,y:0,12 :-8,0:0,-16:8,0:0,4: Impresion de numeros ik1=2a=bx=x+12 :y=y-8:10 +a:x=x-8:10 +b:x=x-4:4000 ok1=2z=-1:y=y-16:10 +b:y=y+8:10 +a:y=y-8:z=1:4000 k1=3a=bx=x+8:y=y-4:z=-1:10 +a:y=y+8:10 +a:y=y-4:z=1:4000 Xk1=3x=x+16:10 +a:x=x+8:10 +b:x=x-8:4000 "ik1=4a=bx=x+12 :y=y+8:10 +a:x=x-8:10 +a:x=x-4:4000 ,ak1=4y=y+8:z=-1:10 +a:y=y+8:10 +b:z=1:4000 6ta=bx=x-8:y=y-4:z=-1:10 +a:y=y+8:10 +a:y=y-4:z=1:4000 @>10 +a:x=x-8:10 +b:x=x-8:4000 1f=rr+6:u=e(f):d(u)=03050 Id1=a(u)a(u)=b(u)a=a(u):b=b(u):d(u)=0:3200 :3300 Hd1=a(u)a=a(u):b=b(u):d(u)=0:d1=b(u):3100 :3300 Hd1=b(u)a=b(u):b=a(u):d(u)=0:d1=a(u):3100 :3300 f:f=r+6 'e1=e1+1:e1=23500 2520 Rectangulos normales Fc(a+1)=c(a+1)+1:c(b+1)=c(b+1)+1 %x1>209k2=1k2=2 %y1<100dk2=2k2=3 "$x1<90Zk2=3k2=4 &Tk2=2x1-8,y1:0,-16:-8,0:0,16: 0Tk2=3x1-16,y1:-16,0:0,8:16,0: :\k2=4x1-8,y1+8:0,16:-8,0:0,-16: Dax1,y1:8,0:0,8:-16,0:0,-8:8,0: Rectangulos dobles #c(a+1)=c(a+1)+1 %y1<108lk2=2k2=3 $x1<98bk2=3k2=4 uk2=2x1-8,y1:4,0:0,-8:-16,0:0,8:4,0: wk2=3x1-16,y1:0,-4:-8,0:0,16:8,0:0,-4: }k2=4x1-8,y1+8:4,0:0,8:-16,0:0,-8:4,0: &x1>203k2=2:3210 bx1,y1:0,12 :-8,0:0,-16:8,0:0,4: Impresion de numeros x2=x:x=x1:y2=y:y=y1 jk2=2a=bx=x-4:y=y-8:10 +a:x=x-8:10 +a:y1=y1-8:3400H k2=2x=x-16:y=y-8:z=-1:10 +a:y=y-8:10 +b:z=1:y1=y1-16:3400H k2=3a=by=y-4:x=x-24:z=-1:10 +a:y=y+8:10 +a:z=1:x1=x1-8:3400H [k2=3x=x-16:10 +a:x=x-8:10 +b:x1=x1-16:3400H jk2=4a=bx=x-4:y=y+8:10 +a:x=x-8:10 +a:y1=y1+8:3400H *k2=4x=x-16:y=y+8:z=-1:10 +a:y=y+8:10 +b:z=1:y1=y1+16:3400H 4va=by=y+4:x=x-8:z=-1:10 +a:y=y-8:10 +a:z=1:x1=x1+8:3400H >510 +a:x=x+8:10 +b:x1=x1+16 Hx=x2:y=y2:4000 Contador de paso l=24500 Ml=33,27;1;"PASO";0;" ":n=0tdp:n Ll=41,6;1;"PASO";0;" ":n=0tdp:n @l=115,0;1;"PASO":n=0tdp:n  4010 Control jugadores  6000p 0m=17:d(e(m))=14030 0m:17,10 ;"HAS GANADO":7000X 1m=814:d(e(m))=14050 /m:17,10 ;"EL 2 GANA":7000X 2m=1521:d(e(m))=14070 2m:17,10 ;"GANADOR EL 3":7000X 2m=2228:d(e(m))=14090 /m:17,10 ;"GANA EL 4":7000X  9000(# ,l=1l=2:r=1:505 0r=r+7:l=l+1:l=5l=1 Ol=33,27;"Juego";4,28;"YO":n=0tdp:n "ll=43,27;" ";4,28;" ";1,6;"Juego";2,7;"YO" ,l=11,6;" ";2,7;" ";15,0;"Voy";16,1;"YO":30:15,0;" ";16,1;" " 6tdp @ 2500 17,0;"@ ";19,0;" ";20,0;" ";21,0;" ";19,21;" ";20,21;" ":  c(7) O17,5;"SALE EL JUGADOR ";jpj:n=0100d:n:4500 #n=jpj*7-6jpj*7 Lc(1+a(e(n)))=c(1+a(e(n)))+1:a(e(n))=b(e(n))4560 /c(1+b(e(n)))=c(1+b(e(n)))+1 n  mn=1 n=17 .c(n)mnmn=c(n):i1=n-1:d1=n-1 n Npj=1:r=jpj*7-6:l=jpj+1:g=8:jpj=jpj+1 jpj=5jpj=1  l=5l=1 c(7):2500 'q=e(g):u=q:d(u)=05050 -i1a(u)i1b(u)d1a(u)d1b(u)5060 i1a(u)i1b(u)3020 d1a(u)d1b(u)2530 i1=d12530 Z17,0;"LA QUIERES A LA IZQUIERDA (i) O A LA DERECHA (d) " ,="i"d(u)04500:2530 ,="d"d(u)04500:3020 d(u)=05050  5010  505 o p320,11 +g;"";21,11 +g;"" u0f>7f<15f-1,30;"" zFf>14f<220,f-3;"";1,f-3;"" 0f>21l=1f-15,0;""  X@9100#:18,1;"Pulsa una tecla para continuar" Z 2 ]""9500% b 7005] algunas tacticas de juego >.9ffff7120 n=rr+6 Ea(e(n))=b(e(n))i1=a(e(n))d(e(n))=1u=e(n):f=n:2530 Ea(e(n))=b(e(n))d1=a(e(n))d(e(n))=1u=e(n):f=n:3020 n:2501  2501 @j10 ,6;" PARA EL CASSETTE ":100d::23658j\,0:jpj=1:tdp=1 E4:2,0;"  1985 MICROHOBBY CASSETTE ";8,9 ;" ";9 ,9 ;" D O M I N O ";10 ,9 ;" ";11 ,11 ;"J.Alberti";17,2;"INTRODUCE TIEMPO DE REACCION DE LOS CONTRARIOS." Jtdp:tdp<1tdp=1 T:9500% #()i1=d1c(i1+1)=79020<# #2 4095 #<^17,5;"EL JUEGO ESTA CERRADO";18,1;"Gana el que tiene menos puntos" #A 9100# #F;20,21;"PULSA";21,21;"UNA TECLA" #P 2 #Z""9500% #d 9050Z# #z=1:x=255:y=112p:n=814:10 +a(e(n)):x=x-8:10 +b(e(n)):x=x+8:y=y-8:n #x=95_:y=159:z=-1:n=1521:10 +a(e(n)):y=y+8:10 +b(e(n)):y=y-8:x=x+8:n:z=1 #|x=16:y=112p:n=2228:10 +a(e(n)):x=x-8:10 +b(e(n)):x=x+8:y=y-8:n # %c(7)::inicializacion %&Jf=1:y1=138:pj=0:x1=148:z=-1:k=1 %0,2:r=1:k1=1:k2=1 %:,10 ,5;"REPARTIENDO LAS FICHAS" %D l=2 %N4d(28):a(28):b(28):e(28) %S %X#s=128:a(s):b(s):s %b0,0,0,1,0,2,0,3,0,4,0,5,0,6,1,1,1,2,1,3,1,4,1,5,1,6,2,2,2,3,2,4,2,5,2,6,3,3,3,4,3,5,3,6,4,4,4,5,4,6,5,5,5,6,6,6 %lx=0:20 pd"" 2 5353 ^ P!  M-~\*;JU!:!T艝 v>>BB<DHpHDB@~BfZBBBBbRJFB