ZXTape! RUSSIAN'S "":"64000" #ATTACK bd!! !!1>!@$F>!d[AF1 B>7!!@W7> O0!+| 00>Ƹ0$ 0x0yO&F u yO#F.~F0|gz |~= >Щ (y/O7ɰ˰ >7!d$V!l>7!d*e"\V!d>7V!n! n!"B\2D\>b$1 A>G>AO{AAV}24+$w:\灁Ɍ6cqv6x.vxvv.q6!H\@̜祥bc93c0b3033b9c̜ӟ`c,3c0,p3,0,33,pcɜӟ`c,.3c0,<6,0,66,<.c̜灟`c~'3c0~0~0~33~'c̜繝bcF#3c1FF0F1F33FF#cɓððɌwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww66Osv6{OlpO{OvsOls6v.6q.cw<6bc9bc1b19Z1b3331Z19130b31bc9I~pcpc2`22p3,3,322230,,`32pc#DE= :H\A(8 #z :\[2\[yà2\[y0 PZ8[+@8;|\x0PP"!!0 # l@ڶ~ϗ϶\\\ay`'a \a}%yh!PP!!5  K SR4[/[P 1000 56000-1 ""58500 ""57450j,480 (""56000,1177 )%""23296[,546:1000 223658j\,8 <.236066\,108l:236077\,223 do17,0,64@,33!,132,228,1,0,27,237,176,201 n1100d:I=23296[23307 [:A:I,A:I xAN$(24,19):200:i=124 :n$(i):i yBI=(*4)+5 {E(24):G(24) |<2,5,6,9 ,13 ,19,23 }?V$(24,2):127:I=124:V$(I):I y"32","32","32","31","32","63","62","33","62","31","42","32","32","61","31","62","71","41","31","53","51","43","52","32" 4I(24):T(24):H(24):A(24) B(24):145 1,2,0,1,2,2,1,1,0,1,1,1,2,1,1,1,2,1,2,0,0,1,2,0 I=124 B(I) rA =((*10 ))/10 :T(I) =A +((7.8yB(I)=2)+(1.3&fffB(I)=1)+(2B(I)=0)) sA=((*10 ))/10 :I(I)=A+((888.4^B(I)=2)+(350^B(I)=1)+(350^B(I)=0)) tA=((*10 ))/100d:H(I)=A+((0.1}LB(I)=2)+(0.07}\(B(I)=1)+(0.07}\(B(I)=0)) I #inv=0:D=1:H=0 AP=0 A(1)=1 MO=5:MP=5 F(24):720 "ALEMANIA OCCIDENTAL","ALEMANIA ORIENTAL","AUSTRIA","BELGICA","BULGARIA","CHECOSLOVAQUIA","DINAMARCA","ESPA@A","FINLANDIA","FRANCIA","GRECIA","HOLANDA","HUNGRIA","INGLATERRA","ITALIA","NORUEGA","POLONIA","PORTUGAL","RUMANIA","SUECIA","StUIZA","TURQUIA","U.R.S.S.","YUGOSLAVIA" + 361i 6900+K:X,Y @L(350^B(K)=2)+(340TB(K)=0)+(330JB(K)=1) JJ=30-1:1;(0I7I12 )+(1I=7I=12 );4;X,Y+3-J:1;4;0;J,0:J:360h T1;0;4;X,Y:1;4;0;3,0:1;4;0;0,3:1;4;0; -3,0:1;4;0; 0,-2: 360h h  2500  23296[ `1,24 ;0;6;"DIA:";D;2,25 ;H ;":";(H-H)*10 ;"0": l]:I=119:I,1;0;" ":I: qE1,28 ;0;7;D;2,25 ;H;":00": v@1,16 ;6;1;0;1;"ENTER" x13 632x X$="" I=XX+4  Y,I ;"" A$= TA$>31ƯA$<91[IX+4Y,I; A$;"":.1}L,1:X$=X$+A$:I N=12 IXI=I-1:Y,I;"":X$=X$(1I-X):.1}L,1 1=13 X$""Y,I ;"":.1}L,1:  670 ou=56000+((u-1)*168):23676|\,(u/256):23675{\,u-(256*(u/256)): ƀ0:U=(V$(I)(1)):700:Y,X;(""V$(I)(2)="1")+(""V$(I)(2)="2")+(""V$(I)(2)="3") _Y+1,X;(""V$(I)(2)="1")+(""V$(I)(2)="2")+(""V$(I)(2)="3") Y4:950+I:J=YY+1:L=XX+2:K:22528X+32 *J+L,K:L:J _U=7:700:Y,X-1;"";Y+1,X-1;"";Y+2,X-1;"": F=0:I=124 B(I)2749 800 +I:K:J=1K 1L:B(L)2F=F+1:F(F)=I:749 J I:  500 M=(J-L)/(I-K) (I=IK(1/MIK) C4;0;1;I,J:J=J+(MN=1)+(-MN=-1)  I  !L8,2,3,4,6,7,10 ,12 ,21 "+4,1,6,17,20 #=6,1,6,13 ,15,21,24 $,4,1,10 ,12 ,14 %-4,11 ,19,22,24 &<6,1,2,3,13 ,17,23 '#3,1,16,20 (2,10 ,18 )2,20,23 *<6,1,4,8,14,15,21 +#3,5,22,24 ,"3,1,4,14 -<6,3,5,6,19,23,24 .#3,4,10 ,12 /,4,3,10 ,21,24 0+4,7,9 ,20,23 1"3,2,6,23 21,8 3,4,5,13 ,23,24 4"3,7,9 ,16 5+4,1,3,10 ,15 6#3,5,11 ,23 7F7,6,9 ,13 ,16,17,19,22 8=6,3,5,11 ,13 ,15,19 76L,91[ 91[,103g 96`,72H 59;,97a 134,568 101e,89Y 82R,119w 29,59; 124|,150 568,81Q 118v,44, 63?,101e 110n,78N 47/,107k 80P,67C 81Q,139 109m,102f 17,61= 128,70F 105i,163 73I),75K 156,41) 145,112p 109m,59; 716,16,16,22,22,22 716,16,16,22,22,22 =122z,122z,122z,122z,122z,122z 70,112p,66B,0,112p,66B :103g,103g,103g,98b,98b,98b 715,15,15,10 ,10 ,10 787W,87W,87W,87W,87W,87W =114r,114r,114r,114r,114r,114r =121y,121y,121y,121y,121y,121y 51,120x,2,1,120x,2 =125},125},125},125},125},125} =122z,122z,122z,121y,121y,121y =122z,122z,122z,124|,124|,124| 781Q,81Q,81Q,81Q,81Q,81Q 968D,120x,66B,68D,120x,66B 717,17,17,17,17,17 :120x,120x,120x,66B,66B,66B 798b,98b,98b,98b,98b,98b 71,112p,16,1,112p,16 746.,46.,46.,46.,46.,46. =122z,122z,122z,122z,122z,122z =122z,122z,122z,122z,122z,122z =114r,114r,114r,14r,114r,114r =121y,121y,121y,122z,122z,122z H=H+(*2)+1 )H=H+(((*2)*30)/100d) :H<10 ((H*10 ))(2)="6"H=(H)+1 :H10 ((H*10 ))(3)="6"H=(H)+1 H>24H=24  /0:0:4:0:0: .236066\,108l:236077\,223 C3,6;7;1;1;" RUSSIAN'S ATTACK " >0:5,0;"&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&" z7,5;"CUANDO LAS PALABRAS NO";8,5;"SON SUFICIENTES PARA";9 ,5;"DETENER LA AGRESION" ?0:10 ,0;"&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&" U=7:700  12 ,11 ;1;1;7;"";13 ,11 ;"";2;6;1;12 ,15;"";13 ,15;"" U=2:700 K17,0;6;"EDITADO POR:  A.B.C - ABARAN 89 " $21,12 ;6;"1988" 7 20,0;"&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&" $ 42* 620l:5,2;1;7;"LAS FUERZAS ALIADAS";7,2;"EN EUROPA";0;4;" CAPITULAN" n9 ,2;"ANTE LA INMINENTE";11 ,2;"INVASION DEL PACTO";13 ,2;"DE VARSOVIA." N#0;0,1;1;6;0;"ESTAS SEGURO...(S/N) " c="S":10 ,2;1;4;"GRACIAS POR HABERLO INTENTADO":0:7600 ="N"7600  1240  620l a2,4;"MOVILIZACION";3,6;"DE TROPAS";4,3;"&&&&&&&&&&&&&&&" I7,3;"ORIGEN:":X=10 :Y=7:L=8:650 !X$="RFA"B=1:1551 !X$="RDA"B=2:1551 7I=324:X$=N$(I)(1̱X$)1550  .I:7,10 ;1;X$:1520 /7,10 ;N$(I)(18):B=I &I=B:X=5:Y=9 :710 L13 ,3;"DESTINO:":X=11 :Y=13 :N=8:650 ,X$="RFA"V=1:I=1:1571# ,X$="RDA"V=2:I=2:1571# <I=324:X$=N$(I)(1̱X$)V=I:1570" /I:13 ,11 ;1;X$:1555 "+13 ,11 ;N$(V)(18) '"X=12 :Y=9 :710 ,1800 +B:J:K=1J:I:V=I1582. -EK:17,6;"ERROR!!!":J=1100d:J:1500 .]B(V)1B(B)117,6;"ERROR!!!":J=1100d:J:1500 5(.05|L,12 :.05|L,12 6~10 ,9 ;1;7;">";4;15,3;"%(1-100)?":X=13 :Y=15:N=3:650 ;GX$>100dŰX$<015,13 ;1;X$:15906 @aX=X$:I(V)=I(V)+(I(B)*X/100d):T(V)=T(V)+(T(B)*X/100d):H(V)=H(V)+(H(B)*X/100d) JZI(B)=I(B)-(I(B)*X/100d):T(B)=T(B)-(T(B)*X/100d):H(B)=H(B)-(H(B)*X/100d) T620l:7,3;"TUS TROPAS YA SE";9 ,3;"HAN MOVILIZADO":.05|L,12 :.05|L,12 :.05|L,12 :J=1100d:J:  500:620l N#0;0,1;6;1;0;"OFENSIVA NUCLEAR OTAN" xMO=010 ,3;"[NO HAY MISILES!":I=1100d5:(150-I)/1000,-20:I: ^U=7:700:3,2;1;1;7;"";4,2;"" <U=2:700:7,2;"&&&&&&&&&&&&&&&&&" J=1MO 0;6;2,(J*2)+3;"";3,(J*2)+3;"";4,(J*2)+3;"";5,(J*2)+3;"";6,(J*2)+3;"" J:J=J-1  L9 ,2;"OBJETIVO :":X=11 :Y=9 :N=9 :650 !X$="RFA"K=1:21026  !X$="RDA"K=2:21026 *<I=324:N$(I)(1̱X$)=X$K=I:21015 4.I:9 ,11 ;" ":2060  569 ,11 ;N$(K)(19 ):2200 >:11 ,2;1;"PERDIDAS APROX:":2200 C?13 ,2;"INFANTERIA:";(I(K)*400):2200 H<15,2;"TANQUES:";(T(K)*400):2200 MA17,2;"HELICOPTEROS:";(H(K)*400):2200 O<.05|L,12 :.05|L,12 :.05|L,12 RQ#0;0,1;1;6;0;"]ESTAS SEGURO? (S/N) " \="S"Ŧ="s"2150f aq="N"#0;0,1;6;0;1;"ATAQUE NUCLEAR ABORTADO":I=1100d:I: b2200:2140\ fI(K)=(I(K)-I(K)*40(/100d):T(K)=(T(K)-T(K)*40(/100d):H(K)=(H(K)-T(K)*40(/100d):MO=MO-1 p0;0;2,(J*2)+3;"";3,(J*2)+3;"";4,(J*2)+3;"";5,(J*2)+3;"";6,(J*2)+3;""  2250 0;0;2,(J*2)+3;"";3,(J*2)+3;"";4,(J*2)+3;"";5,(J*2)+3;"";6,(J*2)+3;"" .1}L,10 I=110 :I 0;6;2,(J*2)+3;"";3,(J*2)+3;"";4,(J*2)+3;"";5,(J*2)+3;"";6,(J*2)+3;"" I=110 :I: ʄ620l:8,4;"TUS PERSHING II";10 ,4;"YA HAN LLEGADO";12 ,5;"AL OBJETIVO":23308 [:: D=BI+17500L 500:9500% J #0;0,1;6;1;0;" TURNO O.T.A.N.:" X$= X$=" "9500% UX$""(X$<"0"X$>"8").05|L,12 :.05|L,12 :.05|L,12  X$<"0"X$>"8"2530  X=X$-480 X=7InV=0#0;0,1;6;0;1;"NO HA HABIDO NINGUN COMBATE":.08}# =,-8:.05|L,-15:I=1100d:I:#0;0,1;6;1;" ":2530 X=22000 X=81200 X=41500 #X=32900T :2565 #X=7INV06000p X=13000 X=63100 X=58000@ 990:500 #H=24#0;0,1;1;6;0;"TURNO PACTO DE VARSOVIA":H=0:D=D+1:9100# $X=0#0;0,1;6;0;1;"TURNO PACTO DE VARSOVIA":D=(D)+1:H=0:9100# %T#0;0,1;1;6;0;"PULSA OPCION...":2530 ^.05|L,0:620l aZ4,1;1;" EFECTIVO MILITARES";14,5;"PULSA OPCION" c+7,2;"1ARMAMENTO NUCLEAR" e+9 ,2;"2E.CONVENCIONALES" q;""Ʀ"1"Ʀ"2".05|L,-10 :.05|L,-8 r="1"7000X:2970 |="2"4000:2970 2929q  Z#0;0,1;1;6;0;"OFENSIVA CONVENCIONAL":620 l K2,2;"OBJETIVO:":X=11 :Y=2:N=8:650 #X$="RFA"DEF=1:3030 #X$="RDA"DEF=2:3030 >I=324:X$=N$(I)(1̱X$)DEF=I:3022 .I:2,11 ;" ":3010 ,2,11 ;N$(DEF)(18) )X=11 :Y=4:I=DEF:710 H7,2;"DESDE ":X=8:Y=7:N=10 :650 #X$="RFA"InV=1:3050 #X$="RDA"InV=2:3050 >I=324:X$=N$(I)(1̱X$)InV=I:3046 .I:7,8;" ":3031 ;B(InV)17,8;" ":3031 ,7,8;N$(InV)(110 ) (X=4:Y=4:I=InV:710 5inv+800 :I:J=1I:K:DEF=K3059 FJ:12 ,4;1;" ERROR!!! ":I=1100d:I: (12 ,2;"ESTAS SEGURO?(S/N)" [5,8;1;7;">":.07}\(,20:5,8;" ":7 ="S"500:#0;0,1;1;0;6;"OFENSIVA CONVENCIONAL":J=18:I=10-1:.01z# =,I:I:J:5000: ="N" 3060 ! 620l &;2,5;"MANDO AEREO";3,7;"EUROPEO" 05,2;"APOYO ACTUAL EN:":I=124:A(I)=1B(I)=15,19;N$(I)(17):A(I)=0:31255 1I:I=25620l:9 ,3;"NO TIENES APOYO";11 ,5;" AEREO!!!":.07}\(,-8:.1}L,-15:I=1150:I: 5"X=10 :Y=7:710 :M10 ,2;"OBJETIVO:":X=11 :Y=10 :N=8:650 ?!X$="RFA"X=1:3165] D!X$="RDA"X=2:3165] I<I=324:X$=N$(I)(1̱X$)X=I:3160X NI:3130: X+10 ,11 ;N$(X)(18) ]wB(X)113 ,7;"ERROR!!!":.1}L,-20:.1}L,-24:I=1502:I:3130: bA(X)=1:I=X g#X=10 :Y=12 :710 l>I=110 :.1}L,1:I:.1}L,10 : b620l:#0;0,1;1;0;6;"INTRODUCE NOMBRE,(END=SALIR). " 0:4:0 G2,2;"PAIS:":X=7:Y=2:N=18:650  X$="END" !X$="RFA"I=1:4030 !X$="RDA"I=2:4030 I=124 #X$=N$(I)(1̱X$)4030 I:620l:4010 Y,X;N$(I)(114) U=7:700:4,6;(""B(I)=2)+(""B(I)=1)+(""B(I)=0):5,6;(""B(I)=2)+(""B(I)=1) *X=9 :Y=4:710:4 U=1:700 ]6,2;6;1;"";6,2;"";7,2;0;"" P7,4;("APOYO AEREO"A(I)=1)+("SIN APOYO AEREO"A(I)=0) ɵ9 ,2;6;1;""(1I(I)/100d);10 ,2;0;""(1I(I)/100d) ͆13 ,2;6;0;""(1T(I));14,2;1;" "(1T(I)) H(I)<0H(I)=0 Ҳ17,2;6;1;" "(1H(I)*30);18,2;0;" "(1H(I)*30) 11 ,2;0;(I(I)*1000);1;" SOLDADOS";15,2;0;(T(I)*1000);1;" TANQUES";19,2;0;(H(I)*1000);1;" HELICOPTEROS" W#0;0,1;6;0;1;"PULSA UNA TECLA. " =""4070 .1}L,10 :4007 }CCI=0.1}L+(((H(InV)*20)+T(InV))*I(InV)/100d):CCD=0.001wn+(((H(DEF)*20)+T(DEF))*I(DEF)/100d) QCCI=CCI+((CCI/2)A(InV)=1):CCD=CCD+((CCD/2)A(DEF)=1) BGAN=(InVCCI>CCD)+(DEFCCICCD):PER=(InVGAN=DEF)+(DEFGAN=InV) G1=((CCI*15/CCDGAN=InV)+((CCD*15/CCI)GAN=DEF)):G1=(100dG1100d)+(0G10)+(G1G1<100dG1>0) qG2=(*((100d-G1)/2)):G2=(100dG2100d)+(0G20)+(G2G2<100dG2>1) *G3=(*G1):G1=G1-G3:G4=100d-G1-G3 GAN=DEFG2=G2+G3:G3=0 800 +DEF:J:I=1J:L:L=L:B(PER)=B(L)PER=DEFP=L:T(L)=(T(L)+(T(DEF)*G4/100d)):I(L)=(I(L)+(I(DEF)*G4/100d)):H(L)=H(L)+(H(L)+(H(DEF)*G4/100d)):5566 I:G4=0:G3=G3+G4 GAN=InVB(DEF)=B(InV) rGAN=InVB(PER)=B(GAN):I(PER)=(I(PER)*G3/100d):T(PER)=(T(PER)*G3/100d):H(PER)=H(PER)*G3/100d yGAN=DEFI(DEF)=(I(DEF)-I(DEF)*G2/100d):T(DEF)=(T(DEF)-T (DEF)*G2/100d):H(DEF)=H(DEF)-H(DEF)*G2/100d yGAN=DEFI(InV)=(I(InV)-I(InV)*G2/100d):T(InV)=(T(InV)-T (InV)*G2/100d):H(InV)=H(InV)-H(InV)*G2/100d D3I=124 :I(I)<0I(I) =0  N$T(I)0T(I) =0.000001m7 SH(I)<0H(I) =0 XI bkB (InV)=1GAN=InVX$="OTAN INVADE "+N$(DEF):X$34"X$=X$(134"):5800 loB (InV)=2GAN=InVX$="PACTO V. INVADE "+N$(DEF):X$34"X$=X$(134"):5800 v5B(InV)=2GAN=DEFX$="PACTO V.ATACA "+N$(DEF) 4B(InV)=1GAN=DEFX$="OTAN ATACA "+N$(DEF) 'X$30X$=X$(130) ;#0 ;0,1;6;0;1;X$ Y$=X$ -K=DEF :B =112  :300,:B 4B (InV)=2GAN=InVA(DEF)=15900    ?DEF+800  :I :J=1I:B:B (B)=15955C >J:620l:8,1 ;"EL PACTO DE VARSOVIA";10 ,4;"HA DESTRUIDO TU";12 ,6 ;"APOYO AEREO":630v:A(DEF)=0 : C A(DEF)=0 :A(B)=1  H z 620 l 2,8;"ATA DEF" :#0 ;0,1;6;0;1;Y$ JX=8:Y=4:I=InV :710 :X=14:I =DEF:710  p7,8 ;(N$(InV)(13)(InV1InV2))+("RFA"InV=1)+("RDA"InV=2) q7,14 ;(N$(DEF)(13)(DEF1DEF2))+("RFA"DEF=1)+("RDA"DEF=2) 39 ,8;(G2GAN =InV)+(G1GAN=DEF);"%" 49 ,14;(G2GAN =DEF)+(G1GAN=InV);"%" 9 ,2;"DESTR" +11 ,2 ;"CAPTU &&& ";G3 ;"%" +13 ,2 ;"RETIR &&& ";G4 ;"%" EG4>015,2 ;"RETIRADA A:";N$(P)(17)  630 v c b)Y=20:.1}L,7:620l gW#0;0,1;6;1;0;" ARMAMENTO NUCLEAR ESTRATEGICO" lU=7:700 v4,2;1;1;7;"";5,2;"";2;6;1;12 ,2;"";13 ,2;"" U=2:700 >8,2;"OTAN";9 ,2;"&&&&&&&&&&&&&&&&&" M16,2;"PACTO DE VARSOVIA";17,2;"&&&&&&&&&&&&&&&&&" ,I=1(MOMO>MP)+(MPMP>MO)+(MOMO=MP) MOI0;6;3,(I*2)+3;"";4,(I*2)+3;"";5,(I*2)+3;"";6,(I*2)+3;"";7,(I*2)+3;"" MPI0;6;10 ,(I*2)+3;"";11 ,(I*2)+3;"";12 ,(I*2)+3;"";13 ,(I*2)+3;"";14,(I*2)+3;"";15,3+I*2;"" I  630v  Lq:1:7:10 ,2;"!!!LA GUERRA HA TERMINADO!!!":I=110 :.1}L,-24:I `vC=100d:DI=100d:145:A(1)=0:A(2)=0:A(3)=0:I=124 jOB:B(I)=2B=1A(2)=A(2)+1:C=C-5.8823529<<<' kLB(I)=2B=0A(1)=A(1)+1:C=C-5.8823529<<<' lNB(I)=1B=2A(3)=A(3)+1:DI=DI-14.285714dH m]I::4,31;A(1);3,31;A(2);6,31;A(3) t1,3;"FINAL REPORT:";3,3;"PAISES DE LA OTAN INVADIDOS:";4,3;"PAISES NEUTRALES INVADIDOS :";6,3;"PAISES PACTO VARSOVIA INV. :" ~88,3;"MISILES UTILIZADOS OTAN:";5-MO 89 ,3;"MISILES UTILIZADOS P.V.:";5-MP 811 ,3;"ARMISTICIO: DIA ";D;":";H;"0 HORAS" X15,3;"PACTO DE VARSOVIA&&&&&&&&";:DP=((DI+100d-C)/2):DP;"%" X16,3;"OTAN&&&&&&&&&&&&&&&&&&&&&";:DO=((C+100d-DI)/2):DO;"%" *13 ,3;"RESULTADO FINAL:" j18,1;"VICTORIA PARA ";("EL PACTO VARSOVIA"DP>DO)+("LA O.T.A.N."DO>DP)+("...NADIE)"DO=DP) NDO>DP20,1;1;6;1;"LA VICTORIA ES TUYA!!!" A#0;0,8;1;"PULSA UNA TECLA":0: 1,0;"BLOQUE DEL ESTE:":X=1:Y=3:A=124:B(A)=2I=A:710:X=X+4:X30X=1:Y=Y+3 A ;7:Y=Y+3:Y,0;"BLOQUE OCCIDENTAL:" X=1:Y=Y+2:A=124:B(A)=1B(A)=0I=A:710:X=X+4:X30X=1:Y=Y+3 A J1:7:Y+3,7;1;"PULSA UNA TECLA":0 %.1}L,10 :""7600 6#0;0,0;"OTRA PARTIDA?(S/N):""C"""  ="S"  ="N"  7601 ? @ 620l Jn2,3;"GRUPO OTAN DE";3,2;"MANTENIMIENTO Y";4,2;"APROVISIONAMIENTO" T&5,2;"&&&&&&&&&&&&&&&&&" UDAP7,3;"!!NO DISPONEMOS";9 ,3;"DE REFUERZOS!!!":.1}L,-24:.1}L,-24:.1}L,-24:I=1150:I: YU=7:700 ^I=1D-AP h7,(I*3);1;1;7;"";8,(I*3);"":.06|u\,10 :.06|u\,10 :.06|u\,10 rI |U=1:700 10 ,2;"";11 ,2;" 100.000 SOLDADOS";13 ,2;" 2.000 CARROS";14,2;"";15,2;"100 HELICOPTEROS";16,2;"" R#0;0,1;1;6;0;"INTRODUCE NOMBRE DEL PAIS" M18,2;"DESTINO:":X=10 :Y=18:N=10 :650 "X$="RFA"I=1 :8140 "X$="RDA"I=2 :8140 #X$=N$(I)(1̱X$)8140 0I:18,10 ;" ":8090 SB(I)= 218,10 ;1;"!!!ERROR!!":I=1100d:I: <I(I)=I(I)+100d:H(I)=H(I)+.1}L:T(I)=T(I)+2 z620l:AP=AP+1:7,4;"YA HAN LLEGADO";9 ,4;" LOS REFUERZOS!":I=1100d:I: E(I)=K #0:720:MP0ƥ>.2~L9700% #)MO.59600% #>.59300T$ #E (24):G(24) #I=124 #-1+800 :B(I)29200# #,J=1F:F(J)=IK=0:9150# #J:9200# #H J:L=1J:M:M=M:B(M)2K=K+1:G(M)=G(M)+1 #L #E(I)=K #I #IInV=F(1):I=124:E(I)+.5#0;0,1;6 ;1;0;"APOYO AEREO SOVIETICO EN";N$(InV)(15):K=InV :B=18:300,:B $MP0((I(InV).5#0;0,1 ;6;1;0;"LLEGAN REFUERZOS A ";N$(I)(111 ):K=I:B=18:300,:B $@>.9ffff9100# $J.2~L,10 :2500 $^fJ=F(1):I=1F:((H(F(I))*20)+T(F(I)))*I(F(I))>((H(J)*20) +T(J))*I(J)J=F(I) $hI $mInV=J:800 +InV :J $rDEF:I=2J $|[L :((H(L)*20)+(T(L))*I(L)<((H(DEF)*20)+(T(DEF)))*I(DEF))B(L)2DEF=L $I $(A(InV)=1:5000:9245$ $ %#I=124:=13 %+900:X,Y %O(9507#%B(I)=2)+(9506"%B(I)=0)+(9504 %B(I)=1) % J=30-1:1;(0I7I12 )+(1I=7I=12 );4;X,Y+3-J:1;4;0;J,0:J:9508$% %"1;0;4;X,Y:1;4;0;3,0:1;4;0;0,3:1;4;0;-3,0:1;4;0;0,-2:9508$% %#J=31-1:1;0;4;X,Y+2-J:1;4;0;2,0:J:9508$% %$I: % J=18:I=124 %B(I)19640% %B(((H(I)*20)+T(I))*I(I))>(((H(J)*20)+T(J)*I(I)))J=I %I %e#0;9 ,1;6;0;1;"ATAQUE NUCLEAR SOBRE ";N$(J)(19 ) %MP=MP-1 %DI(J)=I(J)*.4L:T(J)=T(J)*.4L:H(J)=H(H+1)*.4L %23308 [: % 9101# %:J=18:I=124:B(I)19740 & %w(((H(I)*20)+T(I))*I(I))>190008J((H(I)*20)+T(I))*I(I)-(*600X)>((H(J)*20+T(J))*I(J))J=I & I:J189645 % & 9101# ' Y23734\,224:23735\,0:23736\,20:"WARGAME II"10 ' !"WARMAP"58500,6912 'e"WARCHR$"57450j,480:"WARUDG"56000,1177:"WARSOUND"23296[,546: uha}\(ndhfk#%l xLy[{ ALEMANIA OCCIDENTALALEMANIA ORIENTAL AUSTRIA BELGICA BULGARIA CHECOSLOVAQUIA DINAMARCA ESPA@A FINLANDIA FRANCIA GRECIA HOLANDA HUNGRIA INGLATERRA ITALIA NORUEGA POLONIA PORTUGAL RUMANIA SUECIA SUIZA TURQUIA U.R.S.S. YUGOSLAVIA {{5323232313263623362314232326131627141315351435232{/^Ffg/L͉/^^9/ {ffffL̈́ s333{}# =~8Q}8Q}L~~B\)~\({{1000 95DO POR:  A.B.C - ABARAN 89 "  |8MBNbN|8M|833t 3 34 &4&e3XO%O%R]Rv  >  0<>>> ????0p? @`G8ϳ98c89c?? ` 8~v> #C0DB" xIE% ℈0        UUPP<<l$>>8>< 0`@6ccccc68<.G/f.GG.&Fw>@lF,6a`ngc6?~@ 6cc6cc66cs;C60??>> ~~ ,Fa9.'#s,,~FOv33633v6b```b6v33333vw12621ww12620p6b`gcc6s33733s<<ff,s33633sx00001{c7;[SCCq9.'#s6ccccc6v33600p6cccog6v33633s.bp<Fl~Z<cccccc6y11 ccckwcca8ccr8 sG8qghUUUUUUUUUU_hhUUUUUUUUUU~Wh_hUUUUUUUUUhUUUUUUThUUUUUUUU_UhhUUUUUUWU_hhUUUUUUUUUUhhUUW_UUUUU_hhhh hh hh/ ih hh ih  *i??h_hhU|Wh_hhUUUUUUTh_i@hWhJ䤀hU?yUWi'"WRG&h__|U_i?NFpphhhhh hhi? Jh*+? h Jhi_RUTUDUh iJggh_hhU_h_hhUUUUUUTh_Wi Jh_PhJhWxWiRUVTFVh_o^Ui ̄Jhhhhhhh+ hhªi Jh* +h Jh iruTUDuh iJhhh~Uh_h__h_hhh_UUihUhJNhW|>WiRSwrwUh_LUUi9DLhhhh0hhh/ hhપih hh ih*ihUUTUUUU~_hhUUUWWhhUUUUUhhUUUU?hhUUUUWhhU_U_hhU}_W_UUUhhUUU]_UUhh*.hh*+ih hh*ihhh ih*hLh+  ihUh LhU^?Si JDhWh LFhiJhWh @hSxi JhUWU_hhU_UWiLNJhhHDh*iHBJh ?h Jh i HJh?hHhi h++*h h*  i꤮hWOh HDhUUi_ HDJh_h Lhi ̪DJhWϏh Lh_Wi? hUw_hhOWW}i쬪hh HDh~?i HHJh h Jh*iBJh osh Hh ?iY h*+¿hH`hi誮hU_h `hoi Dh_?h JH`hWi9 Dh_W O=}h Fh}___i h_h`h<UiJNJh+h`h??ihh`hih?hh ih*  hh+0 + ihUUUUUUU}TUhhUUUUUU~UUUU_hhUUUUUUUUhhUUUUUUUUUUUUhhhhhh |+ hh hh* ihhhhhhh|h @h__hJh8_iLDhhhh?hhh 8 x ?h Nh?h Hhi_ DJhhggphgh8_h Jh?_WWhLhUWiDJhhppghph0 x h Jhh HhiY DJhh??hh?h|W_h @hWWUhJN`hUPihhhhh hh*h`h ihhhh0000000000000000000000pppppppppp0 0pp000000pp0 0p0000000pp0 0pppppppppp0 0pp0000000p0 0pp0000000p0 0pppppppppp0 0pp0000000p0 0pp0000000p0 0p0pppppppp0 0pppppppppp0 0pp0000000p0 0pp0000000p0 0pppppppppp0 0pppppppppp0 0pp0000000p0 0pp0000000p0 0pp0000000p0 0pppppppppp0 0pppppppppp0000000000000000000000pppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppppp@@@>BB<DHpHDB@@@@@~BfZBBBBbRJFB