MV - CPCEMU Disk-File Disk-Info ZX-Modules(Track-Info  R ( *RTrack-Info  R DISK MICRO 7 24 AA U AB  !"#$%&AB '()*+,-./0123456AB 8789:;<=BA >BA 0 ?@BB ABB 0 BCBC DBC 0 EFGBD HIJKLMNOPQRSTUVWBD XYZ[\]^_`abcdefgBD %hijklBD 0 mnPLUS3DOS@ @DISKEADO POR MADFOX "MICRO"  300, "24" PLUS3DOS@UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUTrack-Info  R UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU@|#A |paqx:|x>0q8 ?*WTmTŒ' PIUU@x<#A paqx88@"?A -TOmQjTZJR6UI%@@' UJ ?@x<#ap8 0paq8 @>A /ȟ' !UU@??@8<>xp_9܅۪UUUUUUUUUU 0ꪪUUUUUUv0 `8UUUUUUUUժUUUUUUUUUUUUUU `8UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU `8UUUUUUUUժUUUUUUUUUUUUUU0 `UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU0UUUUUUUUժUUUUUUUUUUUUUU0UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU0 `UUUUUUUUUUUUUժUUUUUUUUU0 `UUUUUUUUUUUUUUUUUUUTrack-Info  R UUUUUUUUUUUUUUUUUUUUUUUUUUUUU88888888888888888888877777778888888888888888888888887777777788888888888888888887778888888888888888888888887777888888888888888888866666778888888888888888888888666666688888888888888888888888888666688888888888888888888888888888888888888888888888888888:8:88888888888888888=88r>=8888888888888888888:8>>>7ppp7::::::W:::::::::::Wp0p00VWWWW888888888888888888>p0007>>>88888888888888888888888>7>>888888888888888888888 888888888886888888888 88888888886668888888888888888888888888888866688888558888888888888888888866688665555888888888888888866688668855588888888887778866;;6666;;;55;;;8888888778888866;;6666555555;;88888887778888PLUS3DOSdCINTA 24 (REVISTAS 93 a 96) n4:0:7: x5000:6000p 8,10 ;"A - CARA A" 9 ,10 ;"B - CARA B" A$= A$=""150 A$="A"A$="a"500 A$="B"A$="b"1000 100d --- MENU CARA A --- :5000:6000p 4,12 ;"CARA A"  7,8;"A-Sopaletra" 8,8;"B-Scalybur" !15,11 ;"1 - VOLVER" B$= B$=""680 B$="A"B$="a""AA" B$="B"B$="b""AB" HB$="1"100d R 500 --- MENU CARA B --- :5000:6000p 4,12 ;"CARA B" 7,8;"A-Editor" 8,8;"B-Carga V" 9 ,8;"C-Matrix" $10 ,8;"D-OLIMPIC" !15,11 ;"1 - VOLVER" B$= B$=""1180 B$="A"B$="a""BA" B$="B"B$="b""BB" B$="C"B$="c""BC" B$="D"B$="d""BD" <B$="1"100d F 1000 --- CABECERA --- 51:0,4;"CINTAS MICRO N. 24" -2:0,16;"HOBBY":0 C3:1,6;"DISKEADO POR MADFOX":0:0 #3,8;"REVISTAS 93-96"  p--- PIE DE PANTALLA --- z?1:20,0;" J, siempre... ILM " ?21,0;" ELIGE UNA OPCION ":0  PLUS3DOSp*))E  NBV-1985 *SOPAS*  5000:5500| 20:0:7::23658j\,8 PRESENTACION C6:128,88X,80P:128,88X,557 (2:20,0:8,0:0,110n:-8,0:0,-110n:0,110n:-8,0 2^f=13:0,502:0,-502:8,0:f:0,502 <]228,0:8,0:0,110n:-8,0:0,-110n F232,133,23 PD6:85U:f=110 :l,c:l,c;(f+100d):f U5,15,7,13 ,10 ,10 ,15,12 ,10 ,20,13 ,11 ,6,18,14,13 ,13 ,17,15,18 Z9 ,13 ;"SOPAS":a$="EXPRESS":g=110 :f=17:11 ,f+11 ;a$(f):23728\,11 :23729\,f+11 :.05|L,33!:23300[:f:g _ 7:200:9000(# ` 0 dENTRADA DATOS nO:"Cuantas palabras? (Max. 10): ";npal:npal>10 npal<1110n s%p$(npal,10 ):z$(npal,7) uf=1npal xY"Palabra numero ";(f);": ";a$:a$<2űa$>10 .5,-33!:120x } p$(f)=a$ ~tf>1g=1f-1:p$(f)=p$(g)"":#0Track-Info  R ;">>>> ESTA PALABRA YA EXISTE <<<<":100d:120x f>1g f 7000X j"":#0;1;2;"";0;" ESPERA UN MOMENTO ";1;"" COLOCACION DE PALABRAS -x$(17,17,1):23672x\ f=1npal !23673y\,0:8000@ dir=(*8)+1 3a$=p$(f):7500L:c=1̱a$:a$(c)" "c len=c-1 23673y\151,-33!:f=721:f,0;"":f:"":#0;"Lo siento pero he de repetirlo!!":2,33!:150  wposx=(*17)+1:posy=(*17)+1:x$(posx,posy)a$(1)x$(posx,posy)32 1056  $1000+100d*dir Lposx+len181055 Q`v=posx(len+posx)-1:x$(v,posy)32 X$(v,posy)p$(f)((v+1)-posx)1055 Rv VHc=1:g=posx(len+posx)-1:x$(g,posy)=a$(c):c=c+1:g ` 1900l posx-len01055 iv=posx(posx-len)+1-1:x$(v,posy)32 x$(v,posy)p$(f)((posx+1)-v)1055 v Qc=1:g=posx(posx-len)+1-1:x$(g,posy)=a$(c):c=c+1:g  1900l posy+len181055 `v=posy(len+posy)-1:x$(posx,v)32 x$(posx,v)p$(f)((v+1)-posy)1055 v Hc=1:g=posy(len+posy)-1:x$(posx,g)=a$(c):c=c+1:g ( 1900l xposy-len01055 }iv=posy(posy-len)+1-1:x$(posx,v)32 x$(posx,v)p$(f)((posy+1)-v)1055 ~v Qc=1:g=posy(posy-len)+1-1:x$(posx,g)=a$(c):c=c+1:g  1900l 1posx+len18posy+len181055 cv=0len-1:x$(posx+v,posy+v)32 x$(posx+v,posy+v)p$(f)(v+1)1055 v ;g=0len-1:x$(posx+g,posy+g)=a$(g+1):g  1900l @/posx-len0posy-len01055 Ecv=0len-1:x$(posx-v,posy-v)32 x$(posx-v,posy-v)p$(f)(v+1)1055 Fv J;g=0len-1:x$(posx-g,posy-g)=a$(g+1):g T 1900l 0posx+len18posy-len01055 cv=0len-1:x$(posx+v,posy-v)32 x$(posx+v,posy-v)p$(f)(v+1)1055 v ;g=0len-1:x$(posx+g,posy-g)=a$(g+1):g  1900l 0posx-len0posy+len181055  cv=0len-1:x$(posx-v,posy+v)32 x$(posx-v,posy+v)p$(f)(v+1)1055 v ;g=0len-1:x$(posx-g,posy+g)=a$(g+1):g ljz$(f)(2)=posx:z$(f)(34)=posy:z$(f)(56)=len:z$(f)(7)=dir:f m IMPRESION DE SOPA  n7f=521:f,0;"":f qj"":#0;1;6;"";0;" YA FALTA POCO ";1;"" vue$(17,17):f=117:g=117:x$(f,g)=32 x$(f,g)=((*25)+65A) e$(g)(f)=x$(f,g):g:f 1,33!:"":f=521:f,0;"#################":.01z# =,33!:f:f=215-1:f,0;e$(f-4):.01z# =,33!:f /"":#0;" PULSA ""F"" PARA OTRA SOPA" LOCALIZACION PALABRAS posy=9  posy,18;"" m=10 .1}L,33!:posy,18;" ":posy=posy+1:posy=npal+9 posy=npal+8 c=11 .1}L,33!:posy,18;" ":posy=posy-1:posy=8posy=9 ="0"6000p ="P"9500%  ="F"100d  2020 CODIGO MAQUINA  5050 f=23300[233440[ a:f,a f: 58:,176,92\,71G,58:,177,92\,79O,62>,0,22,4,245,205,30,91[,126~,15,119w,241,60<,21,200,195,16,91[,245,120x,230,24,246,64@,103g,241,132,103g,120x,230,7,15,15,15,129,111o,201 | G.D.U.  5550 f="a""i"+7 a:f,a f: 251,23,47/,223,0,0,0,0,123{,177,218,239,180,24,176,240,144,144,144,160,208,176,112p,240 222Track-Info  R ,141,219,247,45-,24,13 ,15,9 ,9 ,9 ,5,11 ,13 ,14,15,15,13 ,24,45-,247,219,141,222 0,0,0,0,239,23,11 ,253,240,176,24,180,239,219,177,123{,126~,195,165,129,165,153,195,126~ pMOSTRAR PALABRA zx1=z$(posy-8)(2):y1=z$(posy-8)(34):len=z$(posy-8)(56):dir=z$(posy-8)(7) 6000p+100d*dir Bx2=x1+(len-1):y2=y1:stx=1:sty=1:6900 8Cx2=x1-(len-1):y2=y1:stx=-1:sty=1:6900 Bx2=x1:y2=y1+(len-1):stx=1:sty=1:6900 Cx2=x1:y2=y1-(len-1):stx=1:sty=-1:6900 dPx2=x1+(len-1):y2=y1+(len-1):stx=1:sty=1:6950& Rx2=x1-(len-1):y2=y1-(len-1):stx=-1:sty=-1:6950& ,Qx2=x1+(len-1):y2=y1-(len-1):stx=1:sty=-1:6950& Qx2=x1-(len-1):y2=y1+(len-1):stx=-1:sty=1:6950& 23672x\+256*23673y\:bright=(*2):ink=(*7)+1:f=x1x2stx:g=y1y2sty:col=f-1:fil=g+4:fil,col;1;1;ink;bright;" ":23728\,fil:23729\,col:v=18:23300[:.01z# =,33!:v:g:f: &s23672x\+256*23673y\:bright=(*2):ink=(*7)+1:f=0len-1:col=((x1+f)-1stx=1)+((x1-f)-1stx=-1):fil=(y1+f+4sty=1)+(y1-f+4sty=-1):fil,col;1;1;ink;bright;" ":23728\,fil:23729\,col:v=18:23300[:.01z# =,33!:v:f: XPANTALLA ]Zt$=" " b5:1,6;t$ l0,0;"";4,0;"";21,17;"" v6f=13:f,0;"";f,31;"":f f4,31;"":f=520:f,17;"";f,31;"":f:4,17;"" Af=170140-2:5,f:245,0:f [7:f=5212:f,0;"":.1}L,33!:f Sf=205-2:f,0;"":.1}L,33!:f D7,20;"PALABRAS";7,20;1;"________" f=1npal:a$=p$(f):7500L:g=1v:8+f,18+g;a$(g):23728\,8+f:23729\,18+g:.01z# =,0:23300[:g:f  L(v=110 :a$(v)32 v Q v=v-1 V a$=a$(v) ` ag0;21,0;a$,:v=115:g=115:v,g;x$(g,v):0:g:v: @NUMERO DE PALABRAS T%85004!:v=0npal-f:c$:v ^1:11 ,2;" ME FALTA";("N "npal-f1);(" "npal-f=1);12 ,2;" ";c$;13 ,2;" PALABRA";("S "npal-f1);(" "npal-f=1);14,2;" POR COMPONER" c 0 h !3 DATOS !4"CERO ","UNA ","DOS ","TRES ","CUATRO ","CINCO ","SEIS ","SIETE ","OCHO ","NUEVE " #(EXPLICACIONES #2ea$=" Este programa a partir de laspalabras entradas (max.10 y lng.max.10 letras),confecciona una sopa de letras en la que las pa-labras pueden estar horizontalesverticales, en diagonal e inver-tidas. Una vez hecha la sopa podemosaveriguar la posicion de las pa-labras moviendo el cursor que aparece junto a las palabras y pulsando la tecla '0'. Cuando se hayan encontrado las palabras o para cancelar el juego, pulsar la tecla 'F'. Para imprimir la sopa por im-presora, pulsar la tecla 'P'." #2*";12 ,6;"=":Track-Info  R         4;12 ,7;"30";13 ,7;"41": zA>15BI=6040:BI U=29:BI=6030  U=U-1 (12 ,U)" "6800 2;12 ,U;"&' " *U=212 ,U;" ":U=29  200 U=2:BI=6050  U=U+1 '(12 ,U+2)" "6800 6;12 ,U;" []" *U=2712 ,U;" ":U=2  200 A>15BI=6150:BI U=29:BI=6130  U=U-1 I(13 ,U-1)="z"BI=6150:13 ,U+1;" ":BI $(13 ,U)=71G6800 6;13 ,U;" " *U=213 ,U;" ":U=29 -U=313 ,U;" ":BI=6150  200 U=2:BI=6152  U=U+1  A(13 ,U+3)="u"BI=6120:13 ,U;" ":BI  ,(13 ,U+2)=71G6800 6;13 ,U;" " .U=2813 ,U;" ":BI=6100  200 8)BI=6202::LI=10 :CO=15 :LIA=LI:COA=CO <2C1=1+(*2):D1=1+(*2) @9LI=LI+(C1=1LI<13 )-(C1=2LI>10 ) B8CO=CO+(D1=1CO<21)-(D1=2CO>3) C(LI,CO)=71G6800 D$4;LI,CO;"ab";LIA,COA;" " F 200 A>15BI=6350:BI U=28:BI=6312  U=U-1 I(13 ,U)="z"BI=6350:13 ,U;" ";12 ,U;" ":BI $(13 ,U)=71G6800 ,4;13 ,U;"` ";12 ,U;"_ " ;U=313 ,U;" ";12 ,U;" ":BI=6350  200 U=2:BI=6355  U=U+1 Q(13 ,U+1)="u"BI=6310:12 ,U;" ";13 ,U;" ":BI ,(13 ,U+1)=71G6800 ,3;12 ,U;" \";13 ,U;" |" >U=2813 ,U;" ";12 ,U;" ":BI=6310  200 A>15BI=64502:BI  U=29:BI=6415  U=U-1 A(12 ,U)="z"BI=64502:12 ,U+1;" ":BI (12 ,U)" "6800 4;12 ,U;"xy " -U=312 ,U;" ":BI=64502  200 2U=2:BI=64557 7 U=U+1 ,Track-Info  R         255,87W,67C,513,12 ,62>,102f,231,231,206,206,124|,122z,491,251,124|,255,234,194,204,480,124|,102f,231,231,115s,115s,62>,94^,104h,223 #,480,96`,192,128,S+5*8,0,0,480,120x,204,134,131,1 #zS+6*8,127,255,0,63?,63?,0,255,127,S+7*8,0,128,192,255,255,192,128,0,S+31*8,247,223,255,247,127,222,59;,94^,S+32 *8,126~,118v,126~,92\,60<,60<,28,24 #2S+59;*8,30,15,3,1,7,31,32 ,0,S+61=*8,0,134,203,238,243,225,192,0,S+60<*8,0,480,120x,254,124|,116t,124|,120x,S+92\*8,108l,108l,100d,124|,568,24,62>,62>,S+63?*8,0,28,62>,238,254,126~,110n,110n,S+64@*8,230,230,246,126~,62>,31,7,0 #tS+14*8,120x,204,135,135,204,120x,0,0,S+15*8,0,0,255,255,14,14,10 ,0,S+91[*8,255,123{,29,15,7,3,3,0,S+93]*8,255,222,184,240,224,192,192,0 #tS+72H*8,106j,86V,106j,86V,106j,86V,106j,86V,S+87W*8,255,85U,170,85U,255,0,0,0,S+86V*8,7,2,3,62>,85U,106j,85U,63?,S+81Q*8,224,192,64@,252,86V,170,86V,252 #S+65A*8,240,120x,29,15,7,3,1,2,S+66B*8,15,30,184,248,224,192,128,64@,S+67C*8,8,24,24,60<,60<,568,24,0,S+68D*8,24,60<,36$,36$,36$,36$,60<,24,S+69E*8,24,24,24,126~,60<,24,255,126~,S+70F*8,126~,126~,24,24Track-Info  R ,60<,126~,255,60<,S+71G*8,255,153,153,255,255,153,153,255 #vS+73I*8,44,,44,,44,,44,,44,,44,,44,,44,,S+74J*8,254,175,251,95_,255,246,223,125},S+75K*8,0,144,86V,37%,41),255,255,255,S+76L*8,0,252,0,240,0,15,0,192 #S+77M*8,24,60<,60<,126~,102f,102f,60<,24,S+78N*8,102f,124|,124|,60<,60<,24,24,24 #S+79O*8,254,252,248,254,222,158,0,0,S+80P*8,127,63?,31,127,123{,121y,0,0,S+82R*8,158,222,254,254,254,248,252,254,S+83S*8,121y,123{,127,127,127,31,63?,127,S+84T*8,0,0,255,255,0,255,0,0 #%S+58:*8,14,22,22,14,6,6,6,6,S+579*8,0,117u,138,141,138,141,117u,0,S+546*8,6,6,6,6,14,22,22,14,S+557*8,0,255,255,255,0,255,255,0,S+43+*8,0,252,254,255,15,254,252,0,S+38&*8,6,87W,175,87W,175,87W,175,6 #&S+11 *8,3,6,4,152,104h,104h,40(,8,S+13 *8,192,96`,16,21,25,22,20,16,S+12 *8,524,42*,37%,18,9 ,119w,568,0,S+26*8,44,,84T,164,72H,144,238,28,0,S+27*8,96`,144,136,133,127,3,1,2,S+8*8,6,9 ,17,161,254,192,128,64@ #S+9 *8,0,127,255,225,239,239,127,0,S+28*8,0,128,197,253,253,197,128,0,S+30*8,0,1,2,5,8,14,22,17,S+29*8,18,18,12 ,28,28,24,0,0,S+10 *8,0,0,128,128,128,128,128,192,S+16*8,252,254,254,254,220,192,192,128,S+17*8,0,0,0,128,192,192,192,128,S+18*8,126~,129,136,92\,136,0,223,63?,S+19*8,124|,252,255,255,255,243,237,221,S+20*8,93],60<,60<,63?,127,255,255,255 #S+21*8,28,126~,114r,226,194,228,152,60<,S+22*8,110n,78N,76L,68D,100d,252,254,254 &\W=S-256:236066\,W-256*(W/256):236077\,(W/256):3 PLUS3DOSS "BA.0"61801i  Track-Info  R PLUS3DOS?iZGN( G: \7:*Wn|xO(3xG(^|:\ |:\ !<:\   Ͷ*Y\"[\è Ͷ*a\++*Y\RҨS[\è PͶ*[\~ ʨ+~ʨ[a\7RDMx¨ʨd> *[\ S*[\6 *a\++!d+y=W Ͷ*[\~ (#"[\è Ͷ*[\~( +"[\è# *[\~ ʨ#"[\è Ͷ*[\~ ʨ*a\++è Ͷ*[\+~ʨ#[Y\è =Ͷ*a\[Y\ ʨ7R|ʨDMx¨ʨd*Y\Sͩ!d+y=W8J2\Ͷ!N#F#x(5~(1:\ #~=2#"~2\GFGn :ʂ *Y\~ ͨ*O\##~ Gi*O\##s#rɯ2\*[\+#ͶKI\* }0!>W <8B=(0>0T.J.Te *"M";1;*"M";1;COPYRIGHT  JAVIER TARI AGULLO.7:0:1:0:0:23624,120: #V"q^{(#:/2Î>"{:S2y( }:<[*#+"#:=OG [͢* R+ #w#">͘>Ø: HPLUS3DOS++z !59999_:"BB.0"60000`  PLUS3DOS6`:*]\#~ #~: #~((R -8X> !͙2v[>*S\8*͙-L#~ ͮK6>t %0u[-Lͮ %0X[*S\*Y\7R8 (DM RDMU*S\K "K\*| "B\6 [*S\>%F(7 Ï !@[*R0 *[* [!7 06R!: 0 ! ~< yO#  y > +;‹!R҉!Rڅ[LSa#~"‡# ~"( #~"7> > ~">2#~ ((,(;(VË!"2[S\*K\R"*Y\7R"7!'RډSs#~ ‹!@"!"!">2+S~,‹Sz+~0‹#+ ‹ɯ2#~ 7>2~((Ë͡#~ >++S~ >#~:00SLN_ډ)ډT])ډ)ډډ͢!~2#~2#~2#~2͢!~D2\#~D2}#~D2#~D2!"!_ͩ0DMK+-+-ͯ1͢-*w#";B>1PN5P M. HOBBY>!? O0!+| 00>Ƹ0$ 0x0yO& 0uyO~#.>˸Ҁ|gz |!?!(! +>G- %/> 7;oz( n|g>7lyx0B> <#1>z<;Track-Info  R PLUS3DOSX (0:1:7:29000Hq +1;10 ,10 ;"M A T R I X" (D7;2;"NO PARES LA CINTA":20,0;:0 2"BC.0"29960u,2160p <29960u PLUS3DOSpu!y"{\|!X>[6# lxͶx&ͽxCy*[6![~ .~1 . 4#6.4!u5Cy: [0 y2>A ![~ #~<6G_w![~(@++6##>>>>>> >~#~5~/ 69+5~/ 6xw!͵*[6*[> ,} (v-> -}(v,> %|(v$> $|(v%> J: [ w0u!X~ 6x#>[ !X~x 6#>[ !X~ 6#>[ ! [5Cy> >"[0u|W}O|XG (  *[C[  1>>>> >>>[> =(qw=(  >:[<< >2[o& ͵  T>>A ![4~: 60,4} ![Cy&ͽx>>>>>|}> : !&h͵! [4~(Cy5P>>H >:[:[y&_O o͵>>! X>[p# 2h&͵x G ! [5#~(4lxͶx&ͽxCy!@>X6# !@6 #|X &@.6,|gX &P.>6, $!P>6, &2_O_G? O G z>{>xy|>2[![xw+~w!/X0X:[w w xg.:[_͵+y!X w, > >>>>! [>>>~+>0> : [G>>>> >V>I>D>A>S> : [!Z>[6#  K.O.!   $~~<G ##~ _2;zx |x |x | x | x !|[u|![z(~(p!Bvw}ow}o|4zBx>Bx>Bx1W>4%Xj ,bW )1Wh% Bx>Bx>Bx1W>4%Xj ,bW 4%1WX1W4%:x'=FTBxt"Bx:h%!:4%bW!!Bx!x>Bx:Bx>Bx1W>4%Xj ,bW!)1Wh%!Bx>Bx>Bx1W>4%Xj!,bW!4%1WX4%4%4%%FTBxxtcXXNFTBx:4%bWX=W%:>xBxFT,%:1W4%'=,1W4%:!x'42,'#T!x'#Th% *20000030Y>2k\z>q27\>2[|/z!@>[6# >}(>:[>>>> 2qw>2u M A T R I X  1..TECLADO 2..KEMPSTON 3..SINCLAIR 4..CURSOR 5..JUEGOTrack-Info  R PLUS3DOS%u63999:=/:J("3"):=/:SF=-:P(X,Y)=(X*10 ^Y)/(10 ^Y):"23658","8":"9010" "BD.0""64000" LV=3:M=-:L=-:T=-:X=-:P=-:LL=-:G="20":Z=-:S=-:E$("3","32"):E$("1")="66666666666666666666666666666666":E$("2")="22222222222222222222222222222222":E$("3")="77777777777777777777777777777777":"3000"  "7400" 7Z11 Z14Z16PVP=-:9100# &Z<13 7:-:ܧ-:٧-: 09935&:Z=169997 ':6162 1#0;1,0;"METROS TIEMPO" PVP=-:9998' W12 ,0;0;0;5;" ";"O L I M P I C";" " 9280@$ $(Z>5Z<11 )5000 Z=142000 o236077\,252:18,0;8;0;"GH";19,0;"IJ";20,0;"OP" "23607","249":ڰ"4":"16","0";"PREPARADO":"9900":"16","0";"LISTO ":"9900":"16","0";"YA ":װ".7","0":"16","0";" ":۰"0":ڰ"8" mT=T+.368Q:=O$(L=0ƫ(20,X+3)491)L=1:P=P+1:502:100d =C$ƫ(20,X+3)=4918:X=X+1:P=P+1:236077\,252:17,X;"GH";18,X;"MN";19,X;"OP":236077\,60<:18,X-1;" ";19,X-1;" ";20,X-2;" ":30  40( 236077\,252:F=09 :F:X=X+1:16,X;"GH";17,X;"MN";18,X;"OP":236077\,60<:17,X-1;" ";18,X-1;" ";19,X-2;" " {236077\,252:F=09 :F:M=M+5:X=X+2:18,X;"GH";19,X;"UV";20,X;"WX" "y236077\,60<:16,X-2;" ";17,X-2;" ";18,X-2;" ":236077\,252 (u236077\,252:=P$(L=1ƫ(20,X+3)491)L=0:P=P+1:502:100d - 120x 2P>6P=1 4Y236077\,60<:18,X;32 ;19,X;32 ;20,X;32 68:9 :236077\,252:18,X+1;"GH":P=119,X+1;"IJ";20,X+1;"KL": 8@P=219,X+1;"MN";20,X+1;"OP": :@P=319,X+1;"QR";20,X+1;"ST": <@P=419,X+1;"UV";20,X+1;"WX": >@P=519,X+1;"YZ";20,X+1;"[\": @@P=619,X+1;"]^";20,X+1;"_`": dX=X+1:M=M+4 x`236077\,249:#0;1,20;0;7;T;" ";1,7;M |lD>100dX=3020,30;" ";18,30;" ";19,30;" ":X=1 } SɺSS=S PMDSF=0:0,7+(7-S);0;7;S:136 300, #T %T>CS=S+(*1000):141 [S=S+3000 *(C-T)+(*1000):0,7+(7-S);0;7;S B(TR(E,3))YX="18":"390":"8000":"7485":"150" 9970&:9973& 9976& 8T>CCOMP=1400:װ"1.5","0"::3012 8Z>10 TCCOMP=2Z<11 LV=LV-1:400:7485= RCOMP=/1,0:ڧ-:S=-:X=-:M=-:T=-:ܧ/:ٰ"7"::"3012" LV=-"8505" 7X=-:M=-:T=-:E=E+"1":Z=E:E="4"E=6 E="9"E="11" E="17"LVɧ-"2100":E=/ &Z=E:8300l +(10 *E)::"3" ^ 20 i"23607","252":F="0"̰"7":YX,X;"{|";YX+1,X;"~";YX+2,X;"yz":װ".05","5":YX,X;"uv" J"23607","252":YX+1,X;"wx";YX+2,X;"yz":װ".05","5":f: 18,X;" ":"23607","252":F=011 :19,X;"ef";20,X;"gh":.09}8Q,10 :19,X;"ij";20,X;"kl":.09}8Q,10 :F 236077\,249: Gڧ-:7:V1=R(E,1):V2=R(E,2):V3=R(E,3) PVP=0470 92,26+(6-V1);P(R(E,1),2) 93,26+(6-V2);P(R(E,2),2) 94,26+(6-V3);P(R(E,3),2) 9V1<62,2Track-Info  R 5+(6-V1);1;" " 9V2<63,25+(6-V2);1;" " 9V3<63,25+(6-V3);1;" " ,V1=62,25;1;" " ,V2=63,25;1;" " ,V3=64,25;1;" "  500 -2,26+(6-V1);R(E,1) -3,26+(6-V2);R(E,2) -4,26+(6-V3);R(E,3) "9 :9 :PVP=1:: ] XZ=1 b':0,7;"TABLA DE RECORDS" hF=47:F:5,0;"1 REC ";Y$(XZ);" ";R(XZ,1);6,0;"2 REC ";U$(XZ);" ";R(XZ,2);7,0;"3 REC";Z$(XZ);" ";R(XZ,3) l5,16;"1 REC ";Y$(XZ+1);" ";R(XZ+1,1);6,16;"2 REC";U$(XZ+1);" ";R(XZ+1,2);7,16;"3 REC ";Z$(XZ+1);" ";R(XZ+1,3) q12 ,0;"1 REC ";Y$(XZ+2);" ";R(XZ+2,1);13 ,0;"2 REC ";U$(XZ+2);" ";R(XZ+2,2);14,0;"3 REC";Z$(XZ+2);" ";R(XZ+2,3) v12 ,16;"1 REC ";Y$(XZ+3);" ";R(XZ+3,1);13 ,16;"2 REC ";U$(XZ+3);" ";R(XZ+3,2);14,16;"3 REC ";Z$(XZ+3);" ";R(XZ+3,3) {19,7;"1 REC ";Y$(XZ+4);" ";R(XZ+4,1);20,7;"2 REC ";U$(XZ+4);" ";R(XZ+4,2);21,7;"3 REC ";Z$(XZ+4);" ";R(XZ+4,3) XZ<63,0;2;"100 METROS";3,16;"200 METROS";10 ,0;"400 METROS";10 ,16;"800 METROS";17,7;"1500 METROS" XZ>10 XZ<12 3,0;2;"PESO";3,16;"TIRO AL PATO";10 ,0;"MARTILLO";10 ,16;"JABALINA";17,7;"TIRO CON ARCO" XZ>5XZ<10 3,0;2;"110 VALLAS";3,16;"200 VALLAS";10 ,0;"400 VALLAS";10 ,16;"800 VALLAS";17,7;"1500 VALLAS" G#0;1,0;1;" PULSA UNA TECLA PARA CONTINUAR " ""670 .002xn,10 :F F=8615g (XZ=XZ+5:XZ=163000  :"610"  :ܧ/:ڰ"7":"4":ٰ"9"::"9935":"9280":TR=-:ACR=-:F=715:F,-;5;5;R$:F:F=1620:F,-;4;4;R$:F *O17,28;"ANG.";18,29;-:AG=-:245,125}:-,-80P:9 ,31;2;7,31;1;8,31;1;10 ,31;2;11 ,31;3;12 ,31;3;13 ,31;4;14,31;4;15,31;5 4LFS=/:V("3"):ZS=-:"6",-;ڧ-;"INTENTOS 0 FASE 1 PUNTOS 0 " >XC="15":ڰ"8" H X=-:AK=(*9 )+7 JM-,7+(7-S);S;6,9 ;TR;" ";1+FS,7;ZS MxFS=3TR="10"FS="4":"10",-;ۧ/;"CONSEGUISTE ";V(/)+V("2")+ZS;" PUNTOS":M=V(/)+V("2")+ZS:"9978" NcFS="4"COMP=/F=-̰"60":F:S=-:G="20":X=-:TR=-:AK=-:ACC=-:XC=-:"3012" OcFS="4"COMP="2""7490":F=-̰"60":F:G="20":T=M:TR=-:ACC=-:AK=-:XC=-:"145" PTR>9 F=7̧--1:.05|L,20:10 ,5;F;"FASE ";FS+/:F:TR=-:10 ,5;" ":V(FS)=ZS:FS=FS+/:6,17;FS:ZS=- R6AK,X+1;٧-;"%$#";AK,X;5;5;" " psAG=0:.002xn,10 :X=X+1:X>26AK,27;" ":X=0:TR=TR+1:840H z =C$TR=TR+1:960  =O$XC0XC=XC-1 O.002xn,10 :AK,X+1;0;"'&#";AK,X;5;5;" " !=P$XC22XC=XC+1 :19,XC;" | ";20,XC;" } ";21,XC;" ~ "  850R L19,XC+1;"y";20,XC+1;"z";21,XC+1;"{" "AK=7AK=8G=1 #AK=9 AK=10 G=2 $AK=11 AK=12 G=3 $AK=13 AK=14G=4 AK>14G=5 )""AG=AG+1:.003xD,0 18,29;AG ;AG>5AG=0:18,29;AG:1040 =""1040  990 AGG1140t O(AK,XC+1)=109mAK,X;5;ڰ"5";" ";AK,XC;" ":"840" 4236077\,249Track-Info  R :AK,XC+1;2;"y" .(AK,XC-2)=109mƫ(AK,XC-1)=104hƫ(AK,XC)=104hF=-7:F:װ".006","-10":F:"6","27";۰"1";"1000":S=S+"1000":ZS=ZS+"1000":1100L 8(AK,XC+2)=104hƫ(AK,XC)=104hF=-7:F:װ".005","15":F:"6","27";۰"1";"500 ":S=S+"500":ZS=ZS+"500":"1100" B(AK,XC+4)=109mƫ(AK,XC+2)=104hƫ(AK,XC+3)=104hF=-7:F:װ".005","40":F:"6","27";۰"1";"250 ":S=S+"250":ZS=ZS+"250":1100L D5(AK,XC-2)=104hAK,XC;" ":1140t G.(AK,XC)=" "AK,XC+1;" ":1140t LAK,XC-1;" " VoF=AK+116:.01z# >,20:F,XC;"(";F+1,XC;")";F+2,XC;"*";F-1,XC;" ":F jn.01z# >,10 :F,XC;" ";F-1,XC;" ";F+1,XC;"%$#":.25,5:F+1,XC;" " tVAG=0:G=0:19,XC+1;" ":AK,X;5;" ":840H ~ :"10","12";ڰ"2";"RONDA ";:C(/)=C(/)-".8":C("2")=C("2")-"1.1":C("3")=C("3")-"1.3":C("6")=C("6")-".8":C("7")=C("7")-"1.1":C("8")=C("8")-"1.3" C("11")=C("11")+"1":C("12")=C("12")+"1000":C("13")=C("13")+"2":C("14")=C("14")+"6":C("15")=C("5")+"500":C("16")=C("16")+"1" 15,0;"BONUS":F=SS+10000'*(*2)375w:.003xD,40(:15,7;F:F:S=F:25: *ڰ"8":T=-:M=-:X=-:LB=-:P=- c"23607","252":"20","0";"KL":"23607","249":"18",X;"?@";"17",X+"2";"]";"19",X;"[s" ="""2005" P>5P=0 0M100d236077\,249:6610 RT=T+.54 =p:=O$LB=0X=X+1:P=P+1:LB=1:2040 H236077\,249:#0;1,7;M;1,20;T C=P$LB=1X=X+1:P=P+1:LB=0:2040  2007 M=M+4:236077\,60<:17,X+1;" ";19,X-1;" ";20,X-1;" ";18,X-1;" " R236077\,249:18,X;"?@";17,X+2;"]";19,X;"[s" 236077\,252  u20,X;("KL"P=1)+("OP"P=2)+("ST"P=3)+("WX"P=4)+("[\"P=5)+("_`"P=6): Hb=+"1":"23607","249":ڰ"0":"0":ٰ"9"::A$=" ":"0","10";2;"O L I M P I C" Rz"14","7";ڰ"2";A$;"15","7";A$;"16","7";A$;"16","13";ڰ"1";A$;"15","13";A$;"14","13";A$;"13","13";A$ \'"16","19";ڰ"4";A$;"15","19";A$ f;A$="2":YX="10":X="15":"390":X=-:"23607","249" p.5,-2:.9fffg,3:.3,3:.5,2:.5,-2:1.2,0:.3,0:.3,2:.3,3:1.2,5:.3,7:.3,3:.3,0:1.2,5 uJ.3,7:.3,7:.3,8:1.2,10 vJ.3,12 :.3,8:.3,5:1.5@,3 z1160: 4װ".15","2":װ".15","7":װ".15","7":װ".15","2" װ".15","7":װ".15","7":װ".15","2":װ".15","7":װ".15","9":װ".15","11":װ".15","12":װ".15","9":װ".15","6":װ".15","7"  ڧ-:-:9 ::R$="":"23607","249":ڧ-:-,"13";ۧ/;"MENU":3,8;6;"O L I M P I C" S'''" 1 ENTRENAMIENTO"''''" 2 COMPETICION"''''" 3 TABLA DE RECORDS" AO=/̰"7"Ͱ".5":"21","14";ڧ-;ܧ/;O;"POR GABRIEL CHOVA" P>5P=0 [X=11 :P=P+1:236077\,252:524+2*P:236077\,249 A$=:O="7"O=/ 9A$="1"X=-:P=-:E=/:COMP=/:"4000":"3012" CA$="2"X=-:P=-:"4000":E=/:COMP="2":"8310":"9210" A$="3"P=-:X=-:"600" O ڧ-:-:ٰ"9": 8;2,7;2;"1";4,1;ڧ-;"1..100 METROS";6,1;"2..200 METROS";8,1;"3..400 METROS";10 ,1;"4..800 METROS";12 ,1;"5..1500 METR." 2,23;2;"2";4,17;ڧ-;"1..110 VALLAS";6,17;"2..200 VALLAS";8,17;"3..400 VALLAS";10 ,17;"4..800 VALLAS";12 ,17;"5..1500 OBST." 16,12 ;2;"3";ڧ-;16,1;"1..PESO";18,1;"2..TIRO AL PATO";20,1;"3..MARTILLO";16,17;"4..JABALINA";18,17;"5..TIRO ARCO";20,17;"6.Track-Info  R .GOLF" 6:-,535:-,-535:245,-:-,535:-245,-:5,5:F=-5:-+F,535+F:245,-:F:F=-5:245+F,535+F:-,-535:F -,163:-,-95_:117u,-:-,95_:-117u,-:5,5:F=-5:-+F,163+F:117u,-:F:F=-5:117u+F,163+F:-,-95_:F 128,163:-,-95_:117u,-:-,95_:-117u,-:5,5:F=-5:128+F,163+F:117u,-:F:F=-5:245+F,163+F:-,-95_:F -,12 ;"OLIMPIC" C#0;/,-;2;ٰ"9";"ESCOGE BLOQUE 1-2-3...4 MENU " B$=:B$<"1"B$>"4""3030" B$="4"2 Oװ".3","30":#0;"1",-;ڰ"2";ٰ"9";"ELIGE NUMERO DE PRUEBA " Q$=:Q$<"1"Q$>"6""3044" װ".3","30":Z=Q$ Z=Z+5*(B$="2") Z=Z+10 *(B$="3") )Z=148440 :E=Z:9210# *8300l +(Z*10 ):E=Z:9210# XC=-:ڧ-:-:ٰ"7"::-,"8";ٰ"6";"DEFINIR TECLAS":"9","6";"DERECHA ---";"11","6";"IZQUIERDA ---";"13","6";"DISPARO-SALTO ---" ?(<480ů>579Ư<65A)ů>90Z4060  4120  4090 "ZXC<39 +(XC*2),22;1;:.25,25:XC=XC+1 ,PXC>2#0;-,-;7;٧-;"HAY ALGUN ERROR S-N":4485  4070 %="S"F=-5:F:4000 8O$=("9","22"):P$=("11","22"):C$=("13","22") ="N"4491  4485 O$=P$P$=C$C$=O$4495 ="N"O$P$C$O$C$P$  4491 B#0;-,-;"NO REPITAS LAS TECLAS":װ".95","20":"4000" ڧ-:-:ٰ"9": q"23607","252":F=628N:19,F;٧/;6;"c";20,F;"d":F:"23607","249":"14" 9GT1="1.25":GT2=/:GT3=".50":ܧ/:ڰ"7":٧-:-: 8"9940":"5","0";ڰ"2";ٰ"2";R$:"8200":"9270" (B"23607","249":"18",-;"qr";"19",-;"tu";"20",-;"wx" 733!,7:35#,25:74J,7:35#,25:113q,7:35#,25:153,7:35#,25:195,7:35#,25:236,7 P19,14:17,4;2;2;R$(5);21,4;R$(5):F=-255:21,F+3;2;F:F Z"16",-;ڰ"7";" "::LP="1":PPP="65":"16",-;"FUERZA ":65A,46.:85U,-:-,-6:-85U,-:-,6 d4F=90Z̧--1:16,20;F;" " i=""F=90Z5220d n&=O$LP=/PPP=PPP+1:LP=- x*=P$LP=-PPP=PPP+1:LP=1 PPP,46.:-,-6 F X"16",-;5;5;R$:8,-;"FUERZA ";PPP-65A;" KG":8100 B"23607","249":"18",-;"qr";"19",-;"tu";"20",-;"wx" Bװ".15","10":"18","0";"ij";"19","0";"lm";"20","0";"op" Bװ".15","10":"18","0";"ab";"19","0";"de";"20","0";"gh" Sװ".15","10":"23607","252":"18","0";"GH";"19","0";"IJ";"20","0";"KL" PPP>"135"PPP="135" PPP<"60"PPP="60" |HL=PPP/"3":9300T$ s-:ڰ"7":ٰ"9"::"5",-;ڰ"2";ٰ"2";R$::GGG=-:21,3;2;"0 11 22 33 44 55 66 77" 32 ,7:30,25:60<,7:30,25:92\,7:30,25:123{,7:30,25:152,7:30,25:185,7:30,25 218,7:30,25:247,7:7,6:17,6;2;2;R$(7):GT1="4":GT2="3":GT3="2.5"::9940&:8200 :92706$ .ڰ"8":PPP=1:VUE=0:TIP=38& 236077\,249:18,0;" =>":236077\,252:19,0;"-.%&";20,0;" )*":0 =O$PPP=1PPP=2:VUE=VUE+.5:236077\,249:18,0;" =>":236077\,252:19,0;"-.%&";20,0;" )*" e236077\,249:TIP=TIP-1:16,0;TIP;" VUELTA ";VUE:236077\,252 ~=P$PPP=2PPP=1:VUE=VUE+.5:18,0;"GH ";19,0;"#$+,";20,0;"'( " TIP=05635  5614 L18,0;Track-Info  R "GH ";19,0;"#$+,";20,0;"'( "  9"23607","249":װ".5","10":"16","3";" " VUE>"22.5"VUE="22.5" :7"8100":19,2;" ":HL=VUE*"2":"9300" "9935":92706$ /:ܧ/::PVP=-:HOYO=-:ACC="8":CLM="2" "9270":A=118 (XYZ=(64@A$="2")+(0A$="1") @ACC=ACC+1:A=7A="13"CLM=CLM+"1":ACC=ACC-"6" 12 ,0;5;" O L I M P I C ":18,0;7;7;R$;19,0;R$;20,0;R$;4;4;21,0;R$  ~7:236077\,252:18,0;"/";19,0;"01";20,0;"ab4":236077\,249 .PACO=(*25)+5 321,PACO;7;" " 4 SɺSS=S 5E236077\,249:0,7+(7-S);ڰ"0";ٰ"9";S 8N15,0;"HOYO ";A;" A ";PACO*3.25P;" METROS";5;" " B8FZ=10 :#0;1,0;"FUERZA 10-240" D5=O$FZ>10 .007ye`A,0:FZ=FZ-5 F7=P$FZ<240.007ye`A,20:FZ=FZ+5 LR=C$"23607","252":20,0;"EF":236077\,249:6227S N #0;/,"20";" ";FZ;" " Q "6212" SF=2̺(FZ/8):"23607","249":20,F;7;" ":236077\,252:20,F+1;"4":.01z# >,10 :F V("21",F)="120"-XYZS=S+"3000":HOYO=HOYO+"1":20,F;7;" ":21,F;"4":236077\,249:CLM,ACC;ڰ"0";ٰ"7";"1":F="0"̰"150":߰"254",F:F:A `"23607","249":(FZ/8)PACOS=S+(502*(30-((FZ/8)-PACO))):CLM,ACC;ڰ"0";ٰ"7";"0";"17","0";"TE PASASTE":װ".25","40":17,0;ڰ"4";" ":A:"6270" j(FZ/8)1515,0;"CONSEGUISTE ";HOYO;" HOYOS DE 18 TIROS":F=-̰"40":F M=HOYO:"9978" UCOMP=/PACO=-:HOYO=-:S=-:T=-:M=-:A=-:CLM=-:ACC=-:"3012" @COMP="2"PACO=-:HOYO=-:A=-:CLM=-:ACC=-:"145" 4Z=13 :9935&:Z=14:T<"9"T="9" k9 :1:F=2010 -1:F,0;4;" ":F KF=69 :F,0;5;" " F (10 ,0;2;2;R$ ڗF=69 :F,0;2;2;" ";F,5;" ";F,10 ;" ";F,15;" ";F,20;" ";F,25;" ";F,30;" ":F 3"23607","252":"20","0";"D":"23607","249" T>20T=20 ?21,0;6;"0 15 30 45 60 75 90 105 " Bɧ/H=/̺-1:1+H,7;ڧ-;7;J(H):H 92706$:8100 28:8:T2=(20-T)*41):AG=G AA=T2*(*AG/180) BB=T2*(*AG/180)  J=0BB/16.5 !D=.01z# >*(BB*J-16*J*J) ".04|# >*AA*J,4*D+8 "8J:1;(.04|# >*AA*J)-5,4*D+8 ,I=031 1MNN=(*1):.01z# >,10 :1+,7;7;I*3.8s334 6%(20,I)=2246751_ TI _J()=I*3.8s334+NN a<J()=P(J(),2):J()<6J()=J()+.05|L b/1+,7;ڧ-;7;J():M=J() hb(I*3.8s334+NN)CLQ=J():1+,14;7;"OK":S=S+333M*((I*3.8s334)-C) iQ(I*3.8s334+NN):G="20":X=-:LL=-:M=-:"145" I=+"1":X=-:G="20":D=-:M=-:T=-:LL=-:װ"1.5",-:"4" N("3"):NIC=S ڰ"7":"7":ܧ-:ٰ"9": dPP="7":ڰ"7":"7"::"9935":"9280":V="1":XX=-:U=-:S3=-:S2=-:FL="2":AIR=- 4#0;/,"23";"TIROS 8";/,-;"PUNTOS " 1"6"::AG=-:"6","10";ڧ-;ٰ"7";"VIENTO " `R$=" ":F=1821:F,0;7;7;R$:F ;"23607","252":"11",-;٧-;"@A":MX="11":MY="11" Q236077\,249:10 ,31;4;2;"";11 ,31;;"";12 ,31;"Track-Info  R ";13 ,31;"";14,31;"";15,31;"";16,31;"";12 ,30;1;3;"";11 ,30;"";13 ,30;"";14,30;"";15,30;"" 13 ,29;7;5;"";9 ,31;7;2;"";17,31;"";15,30;7;3;"";11 ,30;"" ,=""AIR=AIR+1:.006yD,10 AIR>9 AIR=0  6,17;0;AIR ""7172  7150 F236077\,249:7,10 ;7;0;"ANGULO " -.01z# >,4:AIR=0AIR=1 MX=MX+1:MY=MY+1  236077\,252:MX,0;0;"@A":236077\,60<:MX-1,0;" ":236077\,249:#0;1,31;1;U:Z=0AIR1.5@:Z =C$7210* JMX>18MX=7:MY=7:19,0;" ":U=U+1 $V="3"U="8"M=S-NIC:7196  7198 _COMP="2"MX=-:MY=-:AG=-:AIR=-:V=-:U=-:S2=-:XX=-:9978&::"145" COMP=1"9978":U=-:V=-:S2=-:S=-:XX=-:M=-:T=-:MX=-:MY=-:AG=-:AIR=-:װ".75",-:"3012"  tU=81,30:V=V+1:N(V)=S3:U=0:V,7;0;7;1;S3:S3=0 % 7175 *`.003xD,23:7,17;0;7;AG;7;" ":Z:AG=AG+.368Q /&AG>10 AG=10 :7240H 4=""7240H 9 7210* IC=7310:0:236077\,60<:MY,FL;" ":236077\,252:MY,FL+1;"=>":236077\,249:FL=FL+1 L(MY,FL+2)=" "FL-5>24S2=0:FL=2:236077\,249:MY,30;" y":װ".02","0":װ".02","5":MY,30;" ":7311 N"(MY,FL+2)=" "7241I O(MY,FL+2)=61=S2=400:XX=XX+400:236077\,252:MY,FL+1;7;5;"C?":236077\,249:MY,FL;" ":1,10 :7366:C RP(MY,FL+2)=11 .1}L,20:S2=320@:XX=XX+320@:C W(MY,FL+2)=59;S2=260:XX=XX+260:236077\,252:MY,FL+1;7;3;"C?":236077\,249:MY,FL;" ":װ".1","30":7367:C \J(MY,FL+2)=34"װ".1","40":S2=220:XX=XX+220:C a(MY,FL+2)=58:S2=180:XX=XX+180:236077\,252:MY,FL+1;7;2;"C?":236077\,249:MY,FL;" ":װ".1","50":7368:C  7240H PMY,FL-1;;" ":AG1AG9 XX=XX-300,:S2=S2-300, S(AG>1AG2)(AG8AG<9 )XX=XX-200:S2=S2-200 S(AG>2AG3)(AG7AG<8)XX=XX-100d:S2=S2-100d Q(AG>3AG4)(AG6AG<7)XX=XX-80P:S2=S2-80P 0AG=5.4,XX=XX+100d:S2=S2+100d wS2=50010 ,10 ;5;"CENTRO":F=0100d:254,F:F:10 ,10 ;" " S2<0S2=0 XX<0XX=0 3S3=S3+XX:1+V,7;0;7;S3 úS=S+S2:0,7+(7-S);0;7;S:XX=0:#0;1,8;7;" ";S2;" ":MY,FL;" ";MY,0;" ":S2=0:FL=3:AG=0 ĴU=U+1:F=MY21:236077\,252:F,0;"@A":236077\,60<:F-1,0;" ":G=0AIR1:G:F:21,0;" ":MY=8 $MY=8:MX=8:7175 "MY,FL;7;5;" ": "MY,FL;7;3;" ": "MY,FL;7;2;" ": 7ܧ/:C=C(E):ٰ"9":ڰ"6":"6"::X$(2,32 ) 0X$(1)="!3!3!3!3!3!3!3!3!3!3!3!3!3!3!3!3" 0X$(2)="nononononononononononononononono" 236077\,252:-,-;2;X$(2);1,-;X$(1);20,0;X$(2);21,0;X$(1) wF=2182:F,-;2;"no";F+1,0;"!3";F,30;"no";F+1,30;"!3":F 6"23607","249":3,7;"OLIMPIC PRESENTA" (A$="2"6,9 ;"COMPETICION" *A$="1"6,9 ;"ENTRENAMIENTO" q8,5;"PRUEBA ";E;10 ,5;D$;13 ,5;"PUNTOS ";S;15,5;"ATLETAS ";LV $518,5;ڧ-;7;"POR GABRIEL CHOVA" Track-Info  R 82830 :::.4L,5:.12}u],5:.12}u],5:.12}u],5:.12}u],5:.3,12 :.4L,9 :2:.3,12 :.45fffg,14:4:.3,14:1,17:: =A$="1"Z>10 B.4L,5:.12}u],5:.12}u],5:.12}u],5:.12}u],5:.3,12 :.4L,9 :2:.3,12 :.45fffg,14:4:.3,14:1,17:: G JZR=-10 :236077\,252:F=610 2:F,-;E$(3):F TI.1}L,10 :F=610 2:F,-;E$(1):F:R ^,F=-30:F:236077\,249: E236077\,252:16,2;"5":236077\,249 #=C$G=G+/:LL=/:8140 =""LL=/ G>69EG=69E: 16,-;G:8110 430,8:10 ,10 :-20,- 5cF=615:F,0;5;5;R$:F:F,3;5;5;R$(4) 6ڥ*3;11 ,5;" ";11 ,9 ;" ";11 ,12 ;" ";11 ,14;" ";11 ,18;" ";11 ,21;" ";11 ,23;" " 7ڥ*4;5;12 ,5;" ";12 ,7;" ";12 ,9 ;" ";12 ,12 ;" ";12 ,14;" ";12 ,18;" ";12 ,21;" ";12 ,23;" " 8ڥ*4;13 ,5;" ";13 ,9 ;" ";13 ,12 ;" ";13 ,14;" ";13 ,16;" ";13 ,18;" ";13 ,21;" ";13 ,23;" " b 8: v#D="100":D$="100 METROS LISOS": #D$="200 METROS LISOS":D="200": #D="400":D$="400 METROS LISOS": #D$="800 METROS LISOS":D="800": %D$="1500 METROS LISOS":D="1500": CN="5":R3=R(6,3):D$="110 METROS VALLAS":D="109": ,N="7":D$="200 METROS VALLAS":D="199": ,N="9":D$="400 METROS VALLAS":D="400": -N="11":D$="800 METROS VALLAS":D="800": 3N="10":D$="1500 METROS OBSTACULOS":D="1500": $D$="LANZAMIENTO DE PESO":D="0": D$="TIRO AL PATO":D="0": (D$="LANZAMIENTO DE MARTILLO":D="0": *D$="LANZAMIENTO DE JABALINA":D="110": !D$="TIRO CON ARCO":D="0": ! D$="GOLF":D="0": !9'9500%:ڧ-:-:ٰ"9"::"8540" !>F=/̰"2":-,"10";"RECORDS";"4","6";F;W$(/);" ";Z(/);" PUNTOS";"6","6";F+1;W$("2");" ";Z("2");" PUNTOS" !H"8","6";F+"2";W$("3");" ";Z(3);" PUNTOS";F+"3";"10","6";W$("4");" ";Z("4");" PUNTOS";F+4;12 ,6;W$("5");" ";Z("5");" PUNTOS" !R6"14","6";F+"5";W$("6");" ";Z("6");" PUNTOS" !T """2" !W "9000" !fpG=/̰"6":S>Z(G)F="4"G-/-/:W$(F+"2")=W$(F+/):Z(F+"2")=Z(F+/):F::Z(G)=S:W$(G)=F$:"8560" !kG !p%"21","0";"TU PUNTUACION ES ";S: #(F #- "8510" #3{Z("6"):Z("1")="500000":Z("2")="450000":Z("3")="400000":Z("4")="350000":Z("5")="300000":Z("6")="250000" #4nW$("6","3"):W$(/)="ABC":W$("2")="DEF":W$("3")="GHI":W$("4")="JKL":W$("5")="MNO":W$("6")="PQR" #5 "9500" #7hY$("16","3"):U$("16","3"):Z$("16","3"):F="1"̰"16":Y$(F)="GAB":U$(F)="CHO":Z$(F)="BLA":F #<R("16","3") #AVR(/,/)="9.93":R("2",/)="19.72":R("3",/)="43.86":R("4",/)="99.73" #KYR("5",/)="229.66":R("6",/)="12.93":R("7",/)="21.99":R("8",/)="47.02" #U]R("9",/)="110.73":R("10",/)="220.55":R("11",/)="20.86":R("12",/)="14000" #ZYR("14",/)="105.86":R("13",/)="65.86":R("15",/)="9750":R("16",/)="12" #dtR(/,"2")="10.31":R("2","2")="20.15":R("3","2")="44.65":R("4","2")="102.68":R("5","2")="233.45" #nvR("6","2")="13.31":R("7","2")="22.65":R("8","2")="47.99":R("9","2")="112.55":R("10","2")="223.24" #xxR("11","2")="19.54":R("12","2")="13000":R("14","2")="102.72":R("13","2")="64.01":R("15","2")="9100" #ztR("16","2")="11":R("1","3")="10.68":R("2","3")="20.47":R("3","3")="44.97":R("4","3")="104.09" #|R("5","3")="237.25":R("6","3")="13.69":R("7","3")="22.97":R("8","3")="48.36":R("12","3")="12000":R("11","3")="18.55":R("14","3")="100.01":R("13","3")="62.52" #~]R("9","3")="114.95":R("10","3")="226.62":R("15","3")="8500":R("16","3")="10" # #sM=-:("5100"Z="11")+("5600"Z="13")+("800"Z="12"Track-Info  R )+("7100"Z="15")+("6600"Z="14")+("6150"Z="16") #PS="9":ܰ"1":ٰ"7"::CC="65":0,10 ;"OLIMPIC":''"INTRODUCE TUS INICIALES":''O$;" IZQUIERDA":'P$;" DERECHA":'C$;" PONE LETRA" #5'"ENTER VUELVE AL MENU ANTERIOR":NJ="1":V$("4") $="79","17":"25",-:-,"-12":"-25",-:-,"12" $ "9232" $(=C$PS=PS+/:V$(NJ)=CC:NJ=NJ+/ $!=13 COMP="2""3000" $ =13 COMP=/"3012" $ PS<10 PS=10 $ PS13 20,PS;CC $37:=O$CC=CC-1:.006yD,15 $?PS=13 :F$=V$(/)+V$("2")+V$("3"):ק/,"10"::"3" $CC<65ACC=90Z $%=P$CC=CC+1:.006yD,- $'PS>12 PS=12 $)CC>90ZCC=65A $, 9220$ $@ٰ"9":ܰ"8":-,"7"+(7-S);ڧ-;S;-,26;C;2,22;Y$(E);1;" ";ڧ-;3,22;7;U$(E);ڧ/;" ";ڧ-;4,22;Z$(E);1;" " $E"410" $J $cG2=(HL+G)/"2" $jG2<"45"YY="20"-("45"-G2) $lG2>"45"YY="20"-(G2-"45") $nG2="45"YY="20" $|YY<"13"YY="13" $"23607","252" $Z="13"L$=";" $Z="11"L$=":" $ܰ"8":ڰ"8"::M=M+"2":X="0":N="18"("28"-YY)+"2"Ͱ"-1":F:"23607","252":X=X+"1.5":M=M+GT1:N,X;ٰ"0";L$:"23607","60":װ".03","10":N,X;" ":N $""23607","252":Z="13"L$="9" $eV=X+"2"X+"5":"23607","252":M=M+GT2:N,V;ٰ"0";L$:"23607","60":װ".03","10":N,V;" ":V $""23607","252":Z="13"L$="<" $N=("28"-YY)+"2"̰"17"Ͱ"1":"23607","252":X=X+"1.5":M=M+GT3:N,X+"4";L$:"23607","60":װ".03","10":N,X+"4";" ":N:"23607","252":N+"1",X+"4";L$ $YY=YY:YY>"15""9388" $BZ="13"M=("11"YY="13")+("22"YY="14")+(28YY="15") $?Z="11"M=("2.5"YY="13")+("5"YY="14")+("10"YY="15") $Z="11"YY="16"M=M-"2.5" $Z="13"YY="16"M=M-"5" $!"23607","249":M=M+(*"2.5") $$M<"5"M=M+".05":"1","7";M $)M=P(M,"2"):M::="1":G="20":LL=-:"145" $т=4COMP=/J(/)=-:J(2)=-:J(3)=-:=/:S=-:X=-:G="20":LL=-:M=-:װ".75",-:"3012" $PN+/,X+"4";" ":װ".75",-:(5160(Z=11 )+(5605Z=13 ) %|C("16"):C("1")="14.5":C("2")="24.5":C("3")="48.5":C("6")="16":C("7")="26":C("8")="53":C("9")="120" %&zC("10")="235":C("11")="17.5":C("12")="10000":C("13")="57.55":C("14")="80":C("15")="7680":C("16")="8" %0 &װ".7",-:SF>/"9915" &y=O$Ŧ=P$"23607","249":"16","10";"SALIDA FALSA":װ".8","-10":"16","10";" ":SF=SF+"1":"17" &=O$Ŧ=P$LV=LV-/:"23607","249":SF=-:"16","10";"DESCALIFICADO":װ".7","-10":::("3012"A$="1")+(145A$="2") & &#Z="14"ڰ"7":"7":ܰ"1":ٰ"9": &CZ16"21",-;ڰ"6";ٰ"6";R$;"20",-;R$;"19",-;R$ &5,0;2;2;R$;"0","0";1;9 ;1;"PUNTOS ";0;"0000000";1;" CLASIFICA 1 REC 2 REC 3 REC " &նZ="16"Z="14"Z<"11""15",0;ڰ"5";5;R$;14,0;R$;13 ,0;R$;16,0;4;4;R$;17,0;R$;18,0;R$ &XZ>"10"Zɰ"14""2",-;ڧ/;ٰ"9";"1 INTE";"3",-;"2 INTE";"4",-;"3 INTE": &0"2","3";D$(̰"11");"4","3";D$(12 ) & &T>R(E,3)145 &PVP=1:TR(E,1)R(E,3)=R(E,2):R(E,2)=R(E,1)::R(E,1)=M::T=M:410:9983&: &hM>R(E,2)MR(E,1)R(E,3)=R(E,2):R(E,2)=M:T=M:410:9986': &MMR(E,3)MR(E,2)R(E,3)=M:T=M:410:9989': &Z$(E)=U$(E):U$(E)=Y$(E):Y$Track-Info  R (E)=F$:2,22;9 ;F$;3,22;U$(E);4,22;Z$(E):F="0"̰"100":1:2:3:4:5:0:F:7485=: 'Z$(E)=U$(E):U$(E)=F$:3,22;9 ;F$;4,22;Z$(E):F=0100d:2:5:0:F:7485=: 'dZ$(E)=F$:4,22;9 ;F$:F="0"̰"100":2:6:0:F:7485=: ' ']"23607","252":F="6"̰"11"Ͱ"2":F,-;٧-;ڰ"6";E$("2");F+/,-;ڰ"5";ٰ"5";R$:F '"23607","249": PLUS3DOS |$$xv??<800088$:::::D$88<<4<80 ?n7>`p<< ?P?>`??` ppppp$<<~~Zp88<<``$< 8:vg78?> p877@ >< `p08;wg7?> `p8𰰰0ppఘ6y\;ܾ7~-;1 ،efca3?Ľ acg@ ?Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R         Track-Info ! R!!!!!!!!! Track-Info " R""""""""" Track-Info # R######### Track-Info $ R$$$$$$$$$ Track-Info % R%%%%%%%%% Track-Info & R&&&&&&&&& Track-Info ' R'''''''''