K?"p6XD:\!6812345@LMuMMP33v3.vj26 v.),F)vkRv>>BB<DHpHDB@~BfZBBBBbRJFB5@4<00<<4$$**~*<~<4$$**<P*PBB@@BB (||<B@@<H  BB > @B~BBB?V?U?U~<><*4<04<<><?T?T?TxPPPP 5Pxx@@@@@x y?U?UUUz?}z?T?T?T=TCFFFCFFGFFCFCFFFFCCFFFCFFFFCCCCFFFCFFFFCFFFCFFFFCCCGCCCCFFFCFFFF CFFFCF@FCCCGCGCGCCCF@FCFFF CFFFCFFFCGCFFFCFFF CFFFCF@FCCCGCGCGCCCF@FCFFF CFFFCFFFCCCCGCCCCFFFFCFFFCFFFFCFFFCFFFFCFFFCCCFFFFCFCFF@FFFCFFFF.C@> ͛ "[= *v\X@*v\~# "v\ # <@QTuv\\\ps)v,vp.v.v.v\qM Xq![!@@P!!GG8I>dW K SR PM7;1;16,3;" PARA EL CASSETTE ":100d  3A()=I=2*(I/2)J=2*(J/2) M0:0:1:3::K=0:BI=117u:AI=170 .A$="135753":B$="311355":N$="465132":Z$="" *M$(7,5):L$(7,5) #%GENERACION DEL CUERPO INTERIOR. (&I=26:J=24 2A()=09000(# < 0 FJ:I K&GENERACION DEL CUERPO EXTERIOR P 6 ZN=61-1 _ H=0 d 2000 nBA=162-16*A+24*T-13 *(A=5A=7) x"B=69E+16*B-24*U S=(A-AI):T=(B-BI) N=2H=1 Y=AIAS X=BI+(Y-AI)*S*T X,Y:13 ,0 ?T0Y/2=(Y/2)+.5*H4,-4 Y 0N=4-13 ,0:-3,3 AI=A:BI=B N N=16 (117u,20+N:12 ,0 )117u,163-N:12 ,0 N '121y,153:11 ,0  1 J120x,156:2,-2:2,2:-2,0 "N=16 , 2000 6@70F+16*B-24*U,161-16*A+24*T @J11 ,0:0,-11 :-11 ,0:0,11 EM0;2+2*A-3*T,9 +2*B-3*U;32 JN O$CARGA MATRIZ. PRESENTA FICHAS. T7:0 ^&I=26:J=24 hA()=1390 r5K=K+1:M$(I,J)=(480+K):L$(I,J)=M$(I,J) |.2+2*I,9 +2*J;M$(I,J) J:I X$="#":1,15;X$ 9T=1:U=0:N=1:AI=1:BI=3  7100 =3;21,1;"PULSA UNA TECLA PARA COMENZAR."  7190 >0;21,1;" "  W=1 DESORDENACION. C=170F C$=Z$ Z$=(5+(*3)) C$="5"Z$="6"490 C$="6"Z$="5"490 C$="7"Z$="7"490  630v C H$="COLOCALO" J=12  ^5;1,1;H$;1,22;H$;19,1;H$;19,22;H$ !J=14000 #H$=" " $J & W=12 0 580D : 5600 D""580D IH2*(1+AI)-3*T,9 +2*BI-3*U;32 NI=120:=""I XA2*(1+AI)-3*T,9 +2*BI-3*U;X$ b(I=130:=""I:585I lZ$= v2Z$="7".02{# =,12 :N=N$(N):1000 >Z$="5".02{# =,0:N=N+1:N=7N=1 >Z$="6".02{# =,0:N=N-1:N=0N=6 SUB. MOVIMIENTO EXT. H2*(1+AI)-3*T,9 +2*BI-3*U;32  2000  AI=A:BI=B A2*(1+AI)-3*T,9 +2*BI-3*U;X$   SUB. MOVIMIENTO INT. M$(AI,BI)=X$  2000  I=AAI-TS  J=BBI-US W M$(I,J)=M$(I+T,J+U) $ H=0 .I=AI-TJ=BI-UH=3 8@2+2*(I+T)+H*T,9 +2*(J+U)+H*U;32 BV2+2*I-3*T*(I=AJ=B),9 +2*J-3*U*(I=AJ=B);M$(I,J) LJ:I V AI=A:BI=B ` X$=M$(A,B) jX$="#"3000 t "SUB. IDENTIFICACIO POSICION. "S=1:N>3S=-1 5T=0:U=S:N=1N=4T=S:U=0 A=A$(N):B=B$(N)  !SUB. CONTROL DE COLOCACION. 8I=62-1:J=42-1 A()=0M$(I,J)L$(I,J) J:I 4000 ROTULOS. D$="LO HAS CONSEGUIDO":E$=D$ d5:7,15:3,-3:25,0:-3,3:-24,0 ]223,15:3,-3:25,0:-3,3:-24,0 M=13 164 ^5:35#,M:-3,3:1:-24,0:5:-1,0 V251,M:-3,3:1:-24,0:5:-1,0 M 935#,165:-3,3:-25,0 :251,165:-3,3:-25,0 &M=117 0F7;1;1+M,2;D$(M);1+M,29;E$(M) :M D 7100 NF7;3;21,1;"PULSA UNA TECLA PARA OTRA BAZA" X 7190 b421,1;" " d 0 fM=12 168 g7,M:27,0 h223,M:27,0 jM l7:460 I=17 P.07}\(,12 :.07}\(,17:.07}\(,19:.07}\(,17 I  SUB. MUSICA.  M=0 9200#:M=M+1 Q=1568 M>2Ʀ"" W:.08}# =,W Q .25~,4:35# M<27110  M=2  380|  7110 ##SUB. CUBOS. #(N=06 #2482R+16*J,162-16*I-2*N #