P8?%Lћ6:\ à ÁÿÃýÃ�Ã￿�ÁÁýÁýýa8 :88:a8# # <@8\\\]\]\,X![!PP!!8: K SR P0:0::5,5;7;"ESPERA UN POCO!!";8,5;"ESTAMOS GRABANDO!!":.1}L,23:"" 62999:7:0::4,5;2;"PARE LA CINTA";20,1;"PULSE UNA TECLA PARA CONTINUAR":.1}L,12 :0  8000@ 7::0,10 ;1;1;"EDITORIAL";3,1;0;"CREATIVOS EDITORIALES, S.A.";5,1;"DIRECTOR:";6,1;"AGUSTIN DE NASCIMENTO";8,1;"DIRECTOR TECNICO:";9 ,1;"MANUEL FERNANDEZ" 11 ,1;1;"CREACION:";12 ,1;"-GRUPO ADEN-";14,1;"DIRECCION:";15,1;"C/LEGANES, 63 BAJO-B";16,1;"FUENLABRADA (MADRID)" 18,1;1;"DISTRIBUYE:";19,1;"DISPREN, S.A.";20,1;"FUENLABRADA (MADRID)":400 2700 :5000 7:4::0,10 ;1;1;"B I N G O":0:4,2;"Simula en pantalla el tablero de control de los numeros que han ido saliendo, de forma alea-toria, en el recuadro superior derecho." 10 ,2;"Al arrancar la ejecucion apa- rece parpadeante en el recuadro aludido,el numero correspondien-te a la 1a bola en juego." 15,2;"A continuacion, cada vez que se pulsa ENTER aparece un nuevo numero, indicandose en cada caso el numero de orden de la bola en juego en ese momento." J21,1;2;"PULSE UNA TECLA PARA CONTINUAR":0 :2,2;"Si en lugar de pulsar ENTER se pulsa E y ENTER,se comienza una nueva partida.";6,2;"Si lo que se digita es f y ENTER, el programa termina." [9 ,2;"Para cantar BINGO, introducir la palabra ""bingo"" y pulsar ENTER." 15,2;"Con cualquier otra respuesta seguida de ENTER la partida en curso continua.";20,1;"PULSE UNA TECLA PARA CONTINUAR":0 7::5,10 ;1;1;"ATENCION!!";10 ,10 ;"1A BOLA":.1}L,12 :.1}L,14:.1}L,16  29 v$ 63000 "atencion primera bola" 300,:6:6: ( t(90Z) 2 d10,0;1;" " n-1,0;1;" " x-2,0;1;" " -3,0;1;" " %0,26;1;"" %1,26;1;" " %2,26;1;" " %3,26;1;" " %4,26;1;"" 0,16;"E:Empezar" 1,16;"f:fin" 2,16;"#:seguir" #3,18;2;"BOLA" i=0:n=0 0 j=190Z t(j)=0 j 3,22;" " 2,28;" " ,n=1+(90Z*) 6t(n)=0500 @i=90Z600X E<i=89Yn=190Z:t(n)=0500:n J 300, i=i+1:t(n)=1 i$=i $i10 i$=i$(12) n$=n &$n10 n$=n$(12) +(n<10 n$=" "+n$(11) 03,23;i$ : 2,28;;1;n$ DRk=((n-1)/10 ):l=5+2*k:m=3*(n-10 *k-1) N l,m;n$ S&.2~L,16:.1}L,15 V 800  Xa$:a$="E"8 Z#a$="bingo"a$="BINGO"2000 ] a$="f" b 300,  n$"30"840H %n$>"30"n$"60"1200 *n$>"60"1600@ 4 840H 9v$:63000 > 600X Hn$=" 1"980:8259 Mn$=" 2"985:8259 Rn$=" 3"990:8259 Wn$=" 4"995:8259 \ n$=" 5"1000:8259 a n$=" 6"1005:8259 f n$=" 7"1010:8259 k n$=" 8"1015:8259 p n$=" 9"1020:8259 u n$="10"1025:8259 z n$="11"1030:8259  n$="12"1035 :8259  n$="13"1040:8259  n$="14"1045:8259  n$="15"1050:8259  n$="16"1055:8259  n$="17"1060$:8259  n$="18"1065):8259  n$="19"1070.:8259  n$="20"10753:8259  n$="21"10808:8259  n$="22"1085=:8259  n$="23"1090B:8259  n$="24"1095G:8259  n$="25"1100L:8259  n$="26"1105Q:8259  n$="27"1110V:8259  n$="28"1115[:8259  n$="29"1120`:8259  n$="30"1125e:8259 "u no" "dos" "tres"  "cua tro"  "cin co" "seis"  "siete" "o ho"  "nue ve" "diez"  "on ce"  "do ce"  "tre ce"  "ca tor ce"  "quin ce" "die ci seis" $"die ci siete" ) "dieci oho" ."die ci nueve" 3 "ve in te" 8"ven ti uno" ="ven ti dos" B"ven ti tres" G"ven ti cuatro" L"ven ti cinco" Q"ven ti seis" V"ven ti siete" ["ven ti oho" `"ven ti nueve" e "tre in ta"  1220 v$:63000  600X !n$="31"1400x:1205 !n$="32"1405}:1205 !n$="33"1410:1205 !n$="34"1415:1205 !n$="35"1420:1205 !n$="36"1425:1205 !n$="37"1430:1205 !n$="38"1435:1205 !n$="39"1440:1205 !n$="40"1445:1205 !n$="41"1450:1205 !n$="42"1455:1205 !n$="43"1460:1205 !n$="44"1465:1205  !n$="45"1470:1205 !n$="46"1475:1205 !n$="47"1480:1205 !n$="48"1485:1205 !n$="49"1490:1205 #!n$="50"1495:1205 (!n$="51"1500:1205 -!n$="52"1505:1205 2!n$="53"1510:1205 7!n$="54"1515:1205 s$ C s$="f" Hs$="e"8 M 2110> L7::10 ,10 ;2;1;"UN MOMENTO!!":2805 $a=047/:x:"a"+a,x:a 0,0,0,0,20,20,42*,42*,0,0,0,0,3,12 ,20,101e,0,0,480,192,0,0,192,96`,81Q,107k,61=,119w,64@,128,0,3,134,40(,208,3,12 ,480,192,0,80P,32 ,192,0,0,0,0,0 T:1:6:1: 7,3;"";8,3;"";8,6;"";9 ,3;"";9 ,6;"";10 ,3;"";11 ,3;"";11 ,6;"";12 ,3;"";12 ,6;"";13 ,3;"" 7n=613 :n,9 ;"";n,19;"":n 8n=513 :n,12 ;"";n,16;"":n 8n=713 :n,25;"";n,28;"":n 7,13 ;"";8,13 ;"";9 ,14;"";10 ,15;"";11 ,15;"";6,20;"";10 ,21;"";11 ,22;"";12 ,22;"";13 ,20;"";7,26;"";13 ,26;"" 24,120x:8,4:22,0:-8,-4:47/,112p:8,4:0,8:568,112p:8,4:-8,0:568,96`:8,4:0,15 32 ,96`:8,4:0,11 :40(,100d:7,0:480,88X:8,4:0,3:568,88X:8,4:-7,0 568,72H:8,4:0,15:480,64@:8,4:0,3:32 ,72H:8,4:0,11 :40(,76L:7,0 72H,128:8,4:7,0:-8,-4:80P,64@:8,4:0,64@:96`,136:8,4:7,0:-8,-4 103g,120x:8,4:0,15:112p,120x:8,4:-8,0:112p,104h:8,4:0,15 135,136:-8,4:-7,0:8,-4:120x,96`:0,43+:104h,64@:8,4:0,36$:127,96`:-8,4 120x,80P:-8,4:128,64@:-8,4:0,12 :151,128:-8,4:31,0:8,-4:151,64@:-8,4:0,64@ 167,96`:-8,4:15,0:8,-4:167,88X:-8,4:176,71G:-8,4:0,12 :168,75K:-8,0 199,120x:-8,4:31,0:8,-4:199,64@:-8,4:0,557:223,72H:-8,4:0,35#:215,76L:-7,0 319,27;"";20,27;"" <n=12 p.2~L,12 :.2~L,10 :.2~L,12 :.2~L,10 :.4L,9 :.3,5  20 .2~L,9 :.2~L,10 :.2~L,12 :.2~L,10 :.2~L,12 :.2~L,10 :.2~L,9 :.2~L,10 :.2~L,12 :.2~L,14:.2~L,15:.2~L,14:.2~L,15:.2~L,14:.4L,12  20 .4L,13 :.4L,12 :.4L,10 :.2~L,8:.2~L,7:.2~L,5:.2~L,7:.2~L,8  20 .2~L,8:.2~L,7:.2~L,5:.2~L,7:.4L,8:.5,5:.5,12 :20 n  97:0::a=0143:x:"a"+a,x:a 960<,126~,239,239,239,239,126~,60<,60<,126~,231,251,247,251,231,60<,60<,126~,255,255,255,255,126~,60<,60<,126~,219,205,213,219,126~,60< 860<,102f,215,195,247,247,126~,60<,60<,126~,235,235,235,235,126~,60<,60<,126~,199,223,231,251,70F,60<,60<,102f,219,227,251,231,126~,60< 860<,102f,219,231,219,102f,126~,60<,60<,126~,211,221,219,221,82R,60<,60<,126~,231,223,199,219,102f,60<,60<,110n,239,223,191,255,126~,60< 660<,126~,207,215,217,223,126~,60<,60<,90Z,231,255,255,255,126~,60<,60<,90Z,213,213,213,219,126~,60<,60<,74J,171,139,235,235,126~,60< 60<,126~,199,171,171,223,126~,60<,60<,126~,191,223,223,191,126~,60<  4: w=0:k=1 Ώw,k;2;"";w,k+20;"";w,k+12 ;"";w,k+8;"";w,k+28;"";w,k+2;"";w,k+22;"";w,k+14;"" ؘw,k+10 ;1;"";w,k+24;"";w,k+4;4;"";w,k+18;"";w,k+26;"";w,k+16;3;"";w,k+6;"" w=w+1:w-1,k;" ";w-1,k+20;" ";w-1,k+12 ;" ";w-1,k+8;" ";w-1,k+28;" ";w-1,k+2;" ";w-1,k+22;" ";w-1,k+14;" ";w-1,k+10 ;" " w-1,k+24;" ";w-1,k+4;" ";w-1,k+18;" ";w-1,k+26;" ";w-1,k+16;" ";w-1,k+6;" " #w=215200P ( 5070 PH21,0;" ":.1}L,12 Rs21,1;"";21,4;"";21,7;"";21,11 ;"";21,14;"" S`21,16;"";21,28;"";21,19;"";21,24;"" U"w=21:k=3:c=0 Z~w,k;1;"";w,k+23;"";w,k+9 ;2;"";w,k+13 ;"";w,k+19;"";w,k+27;1;"" w=w-1:w+1,k;" ";w+1,k+23;" ";w+1,k+9 ;" ";w+1,k+13 ;" ";w+1,k+19;" ";w+1,k+27;" " 1w=-21w=21:k=3:c=c+1  c=2  5210Z @6:7: Th3,5;1;" ";4,5;" ";5,5;" " Yc9 ,12 ;2;" ";10 ,12 ;" ";11 ,12 ;" " ^j15,17;1;" ";16,17;" ";17,17;" " a 1 c44,,152:2,2:568,152:2,2:-11 ,0:568,140:2,2:0,11 h204,568:2,2:4,0:-2,-2:208,480:2,2:0,8:211,502:64@,152:2,2:12 ,0:-2,-2 m84T,152:2,2:88X,152:2,2:-3,0:96`,152:2,2:100d,152:2,2:-3,0:100d,148:2,2:0,3 r104h,148:2,2:-3,0:104h,144:2,2:0,4:108l,146:2,0:107k,146 w108l,152:2,2:112p,152:2,2:-3,0:120x,152:2,2:12 ,0:-2,-2:132,148:2,2:0,4 |480,132:2,2:0,8:76L,132:2,2:0,20:88X,132:2,2:0,20 100d,132:2,2:0,12 :112p,132:2,2:0,20:128,132:2,2:0,15 480,144:2,2:1,0:502,147:68D,136:2,2:1,0:70F,139:0,11 2:100d,104h:2,2:12 ,0:-2,-2:104h,96`:2,2:1,0:106j,99c:104h,84T:2,2:0,7 112p,84T:2,2:0,20:120x,104h:2,2:4,0:-2,-2:124|,100d:2,2:0,3:128,100d:2,2:-3,0 128,96`:2,2:0,3:130,98b:2,0:132,104h:2,2:4,0:-2,-2 (124|,84T:2,2:0,12 :136,84T:2,2:0,20:144,104h:2,2:12 ,0:-2,-2:156,100d:2,2:0,3:160,100d:2,2:-3,0 160,88X:2,2:0,12 :156,84T:2,2:0,1:148,88X:2,2:6,0:150,91[:0,12  1 140,568:2,2:12 ,0:-2,-2:152,524:2,2:0,3:156,524:2,2:-3,0 156,40(:2,2:0,12 :152,36$:2,2:0,1:144,40(:2,2:6,0:146,43+:0,12 164,568:2,2:12 ,0:-2,-2:168,480:2,2:1,0:170,513:168,36$:2,2:0,6 176,36$:2,2:0,20:184,568:2,2:12 ,0:-2,-2:184,40(:2,2:6,0:196,524:2,2:0,3 188,480:2,2:0,2:196,480:2,2:-7,0:196,36$:2,2:0,12 ¶212,568:2,2:4,0:-2,-2:208,36$:2,2:0,7:216,36$:2,2:0,20 _6,6:0,163:243,0:0,-163:-243,0 j5:10 ,10 :0,155:235,0:0,-155:-235,0 19,22;" 1985" 0n=23295Z:a=22528Xn:a,240:a  9000(# 2:1 n=010 Z18,4;"";17,4;"";16,4;"";15,4;"" m15,4;" ";18,6;"";6,26;" ";3,24;"":.05|L,23 !m16,4;" ";18,7;"";5,26;" ";3,23;"":.05|L,12 &m17,4;" ";17,7;"";4,26;" ";4,23;"":.05|L,20 +l18,4;" ";16,7;"";3,26;" ";5,23;"":.05|L,6 0m18,5;" ";15,7;"";3,25;" ";6,23;"":.05|L,10 5m18,6;" ";14,7;"";3,24;" ";7,23;"":.05|L,14 :l18,7;" ";14,6;"";3,23;" ";7,24;"":.05|L,5 ?m17,7;" ";14,5;"";4,23;" ";7,25;"":.05|L,19 Dl16,7;" ";14,4;"";5,23;" ";7,26;"":.05|L,4 Im15,7;" ";15,4;"";6,23;" ";6,26;"":.05|L,30 Nl14,7;" ";16,4;"";7,23;" ";5,26;"":.05|L,8 Sm14,6;" ";17,4;"";7,24;" ";4,26;"":.05|L,16 Xm14,5;" ";18,4;"";7,25;" ";3,26;"":.05|L,36$ ]m14,4;" ";18,5;"";7,26;" ";3,25;"":.05|L,26 bn g 0:: #0n=12 #2.4L,7:.3,5:.73333,5:.3,9 :.3,11 :.3,13 :.3,14:.3,16:.3,17:.4L,16:.4L,14:.73333,14 #<.4L,14:.3,14:.3,12 :.3,10 :.3,9 :.3,7:.4L,10 :.4L,9 :.5,9 #F.4L,7:.5,5:.4L,9 :.6,7:.4L,2:.6,5:.4L,9 :.8L,9 #Hn %! &H #1 &R?#1;1;1;" EL BINGO NO ES CORRECTO!! " &W 9830f& &\v$ &a63000 &f"el bingo no es correcto" &k 200 &p #1 &uF#1;1;1;" CONTINUAMOS!! " &z 9865& &v$ &63000 &"continuamos" &160:600X & #1 &?#1;1;1;" EL BINGO ES CORRECTO " & 9925& &v$ &63000 &"el bingo es correcto" & 200 & #1 &5#1;7;1;"ALGUN BINGO MAS? si/no" & 9960& &v$ &63000 &"algun bingo mas si o no" &8#1;7;1;"ALGUN BINGO MAS? si/no";s$ &s$="si"9980& &s$="no"9990' & 9965& &m:10 ,8;1;1;"DEMASIADO TARDE!!!":.1}L,23:.1}L,25:160 '4:7: ' nn=021:n,10 ;(*5)+1;1;"B I N G O":.05|L,(*30)+1:n ' @n=12:.2~L,5:.2~L,12 :.2~L,12 :.2~L,12 :.2~L,10 :.2~L,12 :.5,13 :.3,12 :.2~L,12 :.3,10 :.2~L,10 :.2~L,10 :.2~L,8:.2~L,10 :.5,12 :.3,8 ' .2~L,5:.3,12 :.2~L,12 :.2~L,12 :.2~L,10 :.2~L,12 :.5,13 :.73333,17:.2~L,17:.3,15:.2~L,12 :.3,13 :.2~L,10 :.2~L,8:30:n ' 21059 "" z.cm  voz.cm $M/MP>v>ñF#^#V#Fx( >>Ͱ#F>?Ͱ#z 2   )- "        *K\~V( p͸#>N#Fx#2+26~ (4A{[8a A'_!^#fk #x!@+| RQKrzIr'?crlvzi "#N,:-b 2                   >>2+<26 ] n    Q d  ! $@I$ Tj)$@I$ Tj) ,D" ; Q(^! X/j`H   " B " &   " X,@ "   " B " &   " X,@ "   " B " &   " X,@ "   " B " &   " X,@ ",A( * !./- )#% A!5M/8H4&H.  X=5&KPEBI)3 >+aj  * $  4B ]iX(~*$'UAp0#a&+8'F >%  A34R@$z8e($8* 3`U ^(? P ( >Hn$  Q d  A( * !./- )#%                                                       A     C  "   !7%   6Q X 5{"Z!5M/H4&H.  X=5&KPEBI)3 >g  N'S  \! ^!  ^6$R R(9R *@Z#,a^P!/%%%%"   dd dd ddc P P P 88MPO^GWq !v>>BB<DHpHDB@~BfZBBBBbRJFB