ZXTape! 0Created with Ramsoft MakeTZXBatalha 23613=\,0  da';a$;';b$;';c$;';b$;';a$;';b$;';d$;';b$;';a$;'';e$;'';f$;';h$;'i$;';i$;';l$;';i$;';i$;';j$;';g$ nXa$="o":b$="o":c$="o":d$="o":e$="o":f$="o":g$="o":h$="o":i$="o":j$="o":l$="o" x*7:7:11 ,0;:"" AHB. C^  M I C R O B Y T E   D^  S O F T W A R E   E$  P O R T O  FB ***************** GB *********************** H> ******** A G U A R D E ******* I, * * J6 ***** A C A R R E G A R **** L0 *  BATALHA DE INGLATERRA  * mu*U G >wGMICROBYTE SOFTWARE  100d 58579 .23675{\,238:23676|\,255 1:7:1  -10 ,4;"NAO DESLIGUE O GRAVADOR" ( "MAPA" 2A=58580 723658j\,0 <N:A,N F A=A+1 KA<5860360< P33!,0,64@,17,238,228,1,0,27,237,176,201,33!,238,228,17,0,64@,1,0,27,237,176,201 Z58580 d n 8000@ x LOOP 23658j\,0 I$= 21,0;N$ I$=0 ?I$<97aůI$>120xV$="USE APENAS LETRAS MINUSCULAS" "I$<97aůI$>120xMESS I$<97aůI$>120x I$="" .1}L,0 160  I$="s"V$="DESCOLAR - " I$="c"V$="MUDAR ROTA - " I$="p"V$="PATRULHA - " I$="r"V$="RELATORIO - " I$="q"100d I$="k"9000(# I$="i"9500% I$="x"1900l I$="k"I$="i"I$="q"I$="x" &V$=V$+"NUMERO DA ESQUADRILHA (1-9) " MESS /=0ů>579ů<491195 A=-480 I$="b"10808 V$=U$+" "+A :F(A,1)=1V$=V$+S$+" A REABASTECER NA BASE " /F(A,1)=2V$=V$+S$+" EM STANDBY " 4F(A,1)=3V$=V$+S$+" FORA DE COMBATE " 0F(A,1)=4V$=V$+S$+" EM PATRULHA " .F(A,1)=5V$=V$+S$+" EM MISSAO " "@F(A,1)=6V$=V$+S$+"REGRESSANDO PARA REABASTECER " ,FF(A,1)=1F(A,1)=3F(A,1)=6CANT 1I$"r"330J 6-V$=V$+" AVIOES DISPONIVEIS: "+F(A,2) @5V$=V$+" AVIOES PERDIDOS: "+(10 -F(A,2)) EMESS J I$="r" T I$="p"ACK ^'V$=" COORD. DE DESTINO (ex:Bd ou HG)" h MESS r 1;A$ s,A$2V$="APENAS DUAS LETRAS":MESS tA$2350^ |&F(A,8)=(A$(1))-64@ =A$(2)>96`F(A,9 )=(A$(2))-70F =A$(2)<91[F(A,9 )=(A$(2))-64@ F(A,1)=5  V$="ROGER. "+U$+A+" PARA "+A$ MESS I$="s"I$="c" QF(A,1)=2F(A,1)=5V$="ROGER."+U$+" "+A+" EM PATRULHA" 2F(A,1)=4V$=U$+A+" JA EM PATRULHA" sF(A,1)=1F(A,1)=3F(A,1)=4F(A,1)=6V$=V$+" INCAPAZ DE OBEDECER" MESS AF(A,1)=2F(A,1)=5F(A,1)=4   V$=Q$+V$+H$  7 H=1̱V$-32 -1;21,0;V$(HH+31) KBEEP=0ůV$(H+31)<65AůV$(H+31)>90Z550& N=14 *C((V$(H+31))-64@,N),25 N &H +V$="" , 502 0 :58592 ?5:1:7 DN=19 NwF(N,1)<4F(N,5)<1F(N,5)>20F(N,6)<1F(N,6)>30620l XF(N,10 )=11;7;1;F(N,5),F(N,6);"";F(N,5),F(N,6)+1;0;7;N bMF(N,10 )=07;1;F(N,5),F(N,6);"" gQF(N,10 )=07;1;F(N,5),F(N,6)+1;N l(G(N,1)<1G(N,2)<1)G(N,10 )<1G(N,10 )>20G(N,11 )<1G(N,11 )>30G(N,8)<1640 v:7;2;G(N,10 ),G(N,11 );"" {:7;2;G(N,10 ),G(N,11 )+1;N N BT>01;0;2;T(1),T(2);" "  21,0;Q$ -1;21,0;U$;X;" ATACANDO"  502 RF>0740 Z=19 _(F(X,5)-F(Z,5))<2ƽ(F(X,6)-F(Z,6))<2RF=RF+F(Z,2) F(X,10 )=1 b(F(X,5)-F(Z,5))<2ƽ(F(X,6)-F(Z,6))<2F(Z,10 )=1 Z PRINT 6F(X,2)>0F(X,2)=(F(X,2)-) 6G(Y,2)>0G(Y,2)=(G(Y,2)-) )G(Y,2)<1880p  %F(X,2)<1800   750  TOT=0 !Z=19 *=F(Z,10 )=1F(Z,2)>0TOT=TOT+1 4CTOT=1F(Z,10 )=1F(Z,2)=(F(Z,2)-) >Z H-TOT>0G(Y,2)=(G(Y,2)-) R%G(Y,2)<1880p \TOT>0800  fTOT=01000 p6G(Y,1)>0G(Y,1)=(G(Y,1)-) zP>(100d-(G(Y,1)/2))/100dF(X,2)=(F(X,2)-) (G(Y,1)<11000 !F(X,2)<1930  880p  TOT=0 Z=19 =F(Z,10 )=1F(Z,2)>0TOT=TOT+1 rTOT=1F(Z,10 )=1ƥ>(100d-(G(Y,1)/2))/100dF(Z,2)=(F(Z,2)-) Z -TOT>0G(Y,1)=(G(Y,1)-) &G(Y,1)<11000 TOT>0930 E(X)=0 -F(X,1)=6:F(X,10 )=0 Z=19 .F(Z,10 )=1F(Z,10 )=0  F(Z,2)<1F(Z,2)=0:G(Z,1)<1G(Z,1)=0:G(Z,2)<1G(Z,2)=0 Z  RF=0 $,F(X,2)<1F(X,1)=6 )4(G(Y,1)+G(Y,2))=0FU=FU+1 . 8F(A,1)=6 B#V$="ROGER. "+U$+A+" DE REGRESSO" LMESS V `R=(*100d)+1 j<G(X,8)=0R>70FG(X,4)=B(X,1) t<G(X,8)=0R>70FG(X,5)=B(X,2) ~7G(X,8)=0R>70FG(X,8)=1   M=M+1 X=19 INK ;F(X,2)=0F(X,1)=31560 )F(X,1)=1R(X)=R(X)+1 $R(X)=5F(X,1)=2 %R(X)=5F(X,4)=14 R(X)=5R(X)=0 9F(X,1)>3F(X,4)=F(X,4)-1 (F(X,4)<11350F Y=19 (F(X,5)-G(Y,4))<2ƽ(F(X,6)-G(Y,5))<2G(Y,1)>0F(X,2)>0F(X,1)>3E(X)=1  [G(Y,1)+G(Y,2)=0F(X,2)=0F(X,1)=613302 )E(X)=1F(X,5)=G(Y,4) )E(X)=1F(X,6)=G(Y,5) (=E(X)=1G(Y,1)>0F(X,2)>0ATT 2E(X)=0 <Y FSF(X,4)=5F(X,1)>3V$=U$+X+" NIVEL DE COMBUSTIVEL BAIXO" P1F(X,4)=5F(X,1)>3MESS ZAF(X,4)<1F(X,1)>3F(X,1)=6 d=F(X,1)=6F(X,8)=F$(X)(1)-64@ nVF(X,1)=6ƯF$(X)(2)>96`F(X,9 )=F$(X)(2)-70F xVF(X,1)=6ƯF$(X)(2)<91[F(X,9 )=F$(X)(2)-64@ UF(X,4)=0F(X,1)>3V$=U$+X+" DE REGRESSO PARA REABASTECER" 1F(X,4)=0F(X,1)>3MESS ,F(X,2)=0F(X,1)=3 ;F(X,2)=0F(X,1)<41560 {F(X,1)=6ƽ(F(X,8)-F(X,5))<2ƽ(F(X,9 )-F(X,6))<2F(X,5)=F(X,8) {F(X,1)=6ƽ(F(X,8)-F(X,5))<2ƽ(F(X,9 )-F(X,6))<2F(X,6)=F(X,9 ) CF(X,5)=F(X,8)F(X,6)=F(X,9 )M(X)=1 9M(X)=1F(X,1)=6F(X,1)=1 =F(X,1)=4F(X,8)=F$(X)(3)-64@ VF(X,1)=4ƯF$(X)(4)<91[F(X,9 )=F$(X)(4)-64@ VF(X,1)=4ƯF$(X)(4)>96`F(X,9 )=F$(X)(4)-70F >F(X,5)F(X,5)>F(X,8)F(X,5)=F(X,5)-1 >F(X,6)F(X,6)>F(X,9 )F(X,6)=F(X,6)-1 M(X)=0 "X 'PRINT ,INK 6X=19 @9G(X,8)>0G(X,9 )=G(X,9 )-1 JG(X,8)=0FEED T$G(X,8)=01890b ^3(G(X,1)+G(X,2))=01880X hINK rAG(X,1)=0G(X,2)>0G(X,8)=3 |:G(X,9 )<1G(X,8)<4FU=FU+1 ,G(X,9 )<1G(X,8)=4 CG(X,4)=G(X,6)G(X,5)=G(X,7)N(X)=1 5N(X)=1G(X,8)=2T=T+G(X,1) ?N(X)=1G(X,8)=2V$=R$+X+" ATINGIU O ALVO" )N(X)=1G(X,8)=2MESS /N(X)=1G(X,8)=21715 <.75@1720 G(X,10 )=G(X,4) G(X,11 )=G(X,5) FN(X)=1G(X,8)<3G(X,8)=G(X,8)+1 1G(X,8)=1G(X,6)=B(X,3) 1G(X,8)=1G(X,7)=B(X,4) /G(X,8)=2G(X,6)=T(1) /G(X,8)=2G(X,7)=T(2) 1G(X,8)=3G(X,6)=F(X,5) 1G(X,8)=3G(X,7)=F(X,6) /G(X,8)=4G(X,6)=O(1) /G(X,8)=4G(X,7)=O(2) GG(X,4)G(X,6)G(X,4)=(G(X,4)-(1.6L*)) &GG(X,5)G(X,7)G(X,5)=(G(X,5)-(1.6L*)) :[<.90ffffG(X,8)<1G(X,10 )>20G(X,10 )=01880X D^V$=R$+X+" RELATORIO DE OPERACAO "+G(X,1)+" BOMBARDEIROS "+G(X,2)+" ESCOLTAS" NMESS XN(X)=0 bX gI$="" l0BM=0:EM=0:FM=0:IN=0 q21,0;H$ vl=19 BM=BM+G(l,1) EM=EM+G(l,2) FM=FM+F(l,2) *G(l,8)<3IN=IN+G(l,1) .F(l,10 )=1F(l,10 )=0 l I$"x"2000 *V$=(TF-FM)+" CACAS INGLESES PERDIDOS " 5V$=V$+(TB-BM)+" BOMBARDEIROS ALEMAES DESTRUIDOS " 1V$=V$+(TE-EM)+" ESCOLTAS ALEMAES DESTRUIDOS " +V$=V$+T+" BOMBARDEIROS ATINGIRAM O ALVO" MESS  <FM=0T>(NN-1)(T+IN)(NN-1)FM=0V$="VOCE NAO CONSEGUIU DEFENDER O SEU PAIS. APRESENTE-SE IMEDIATAMENTE NO MINISTERIO DA GUERRA ":N$="" ‹T+IN0V$="NAO FICARAM BOMBARDEIROS SUFICIENTES PARA CUMPRIR A MISSAO. O SEU CHEFE DESEJA FELICITA-LO PESSOALMENTE. ":N$="" 6FM=0V$="VOCE PERDEU TODAS AS ESQUADRILHAS. " HFU=9 V$=V$+" AS ESQUADRILHAS INIMIGAS FICARAM SEM COMBUSTIVEL " +V$=V$+T+" BOMBARDEIROS ATINGIRAM O ALVO" *V$=V$+" UMA TECLA PARA RECOMECAR " MESS =""3035  110n @1:7: E*4,5;"Batalha de Inglaterra" J T=0 KM1=.03{u\ LM2=.09}8Q MLOOP=1170 NINK=130 OMESS=480 PRET=10808 QATT=670 RACK=420 SPRINT=570: TM(9 ) UFEED=1120` VCANT=430 W'Q$=" " XH$=" " YNN=100d Z'N$=" COMANDO(OU 'x' PARA TOTAL) " ^F$(9 ,4) hB(9 ,4) r O(2) |S$=" STATUS: " } 8061} ~C(26,4) X=126 Y=14 C(X,Y) Y X M1,M2,0,0,M2,M1,M1,M1,M2,M1,M2,M1,M2,M1,M1,0,M1,0,0,0,M1,M1,M2,M1,M2,M2,M1,0,M1,M1,M1,M1,M1,M1,0,0,M1,M2,M2,M2,M2,M1,M2,0,M1,M2,M1,M1,M2,M2,0,0,M2,M1,0,0,M2,M2,M2,0,M1,M2,M2,M1,M2,M2,M1,M2,M1,M2,M1,0,M1,M1,M1,0,M2,0,0,0,M1,M1,M2,0,M1,M1,M1,M2,M1,M2,M2,0,M2,M1,M1,M2,M2,M1,M2,M2,M2,M2,M1,M1  N(9 )  R(9 )  G(9 ,11 ) F(9 ,10 )  TB=0  T(2)  TE=0 F$(9 ,4) B(9 ,4) O(1)=22 O(2)=33! RA=(*3)+1 @RA=1T(1)=1:RA=1T(2)=1 ARA=2T(1)=2:RA=2T(2)=10 @RA=3T(1)=1:RA=3T(2)=5 X=19 R1=(*30)+1 &R2=(*30)+1 0B(X,1)=20 :B(X,2)=R1 DB(X,3)=10 NB(X,4)=R2 X$G(X,1)=(*40()+1 bTB=TB+G(X,1) l$G(X,2)=(*15)+1 vTE=TE+G(X,2) 4G(X,3)=((G(X,1)/4)+G(X,2)) G(X,9 )=45- F(X,1)=1 R(X)=4 F(X,2)=10 F(X,4)=14 X TBNN8210 FU=0 TF=90Z R$="RAIDER " F$(1)="MWTA" F$(2)="LZLC" F$(3)="EdLI" F$(4)="DTCA" F$(5)="GKTW" F$(6)="EMSA" !F$(7)="FDTO" !F$(8)="GANI" !4F$(9 )="EARQ" !R E(9 ) !\ M=0 !fU$="ESQUADRILHA " !pX=19 !z'F(X,5)=F$(X)(1)-64@ !AF$(X)(2)<91[F(X,6)=F$(X)(2)-64@ !AF$(X)(2)>96`F(X,6)=F$(X)(2)-70F !X ! RF=0 !BEEP=0 ! 8640! !X=07 !AA ! "A"+X,AA !BB ! "B"+X,BB !X !ߏ0,0,16,16,16,84T,254,254,16,16,16,16,568,568,0,0 !'10 ,9 ;"DESEJA SOM?" !=""8675! !="S"Ŧ="s"BEEP=1 !""8694! " 9000(# "7:0 "v:10 ,1;"SE "; NN;" BOMBARDEIROS ATINGIREM"," O ALVO VOCE PERDE."," DESEJA MUDAR ESTE NUMERO?":502 " =""8735" "!"S"Ʀ"s"8750." ""6''" ENTRE NUMERO DESEJADO " "#A "%;A>TB"NAO HA BOMBARDEIROS SUFICIENTES":A>TB8738"" "&NN=A ".PRINT #,V$="COMANDO - ALERTA VERMELHO: STAND BY. " # MESS #%V$="CANAIS DE COMUNICACOES ABERTOS" #MESS #' #(:1:7: #) #2(0,5;"COMANDOS E SIMBOLOS" #< :502 #F" s = Descolar uma esquadrilha":" c = Mudar rota para...":" p = Esquadrilha em patrulha":" b = Regressar a base":" r = Relatorio da esquadrilha":" k = Listagem desta tabela":" q = Parar o jogo": #P" ";7;1;"";7;1;6;1;;7;" = Esquadrilha Inglesa"::" ";7;2;"";4;1;7;" = Esquadrilha Alema"::" ";7;1;1;"";0;7;7;1;0;" = Combate"::" ";0;6;8;1;7;" = Aerodromo"::" "; 0;2;1;" ";1;7;0;" = Alvo bombardeado" #d5:21,5;"UMA TECLA PARA VOLTAR" #s1:5 #t 502 #x""9100# # 9080x# #M>0PRINT # %7:1 % %$" UMA TECLA PARA CONTINUAR " % 502 %=""9665% %M>0PRINT % ant{u\}8Q녬oonese8tcrin:0 ee`anQ H dN COMANDO(OU 'x' PARA TOTAL) !S STATUS: {u\}8Q}8Q{u\{u\{u\}8Q{u\}8Q{u\}8Q{u\{u\{u\{u\{u\}8Q{u\}8Q}8Q{u\{u\{u\{u\{u\{u\{u\{u\}8Q}8Q}8Q}8Q{u\}8Q{u\}8Q{u\{u\}8Q}8Q}8Q{u\}8Q}8Q}8Q{u\}8Q}8Q{u\}8Q}8Q{u\}8Q{u\}8Q{u\{u\{u\{u\}8Q{u\{u\}8Q{u\{u\{u\}8Q{u\}8Q}8Q}8Q{u\{u\}8Q}8Q{u\}8Q}8Q}8Q}8Q{u\{u\!0 0   -H-P-\-0-,-% -0-$ -                A) MWTALZLCEdLIDTCAGKTWEMSAFDTOGANIEARQ           ZRRAIDER 0 mU ESQUADRILHA eevMAPA @Ar. `<|D@BB<|<|B @?NBBBBD@@BBBD@BFB@JDBB$Z$ D" D@B~BBD?~@BB@BBBB|D@<B?B<BH@B?f(b?B~p?@ZRBBBH@<BJB?BBD@@?BFB?B><B~~B>B<??|<|<BBB@?BBB<|R|?@JD??B@<?B<??888888888888888888888888888888888!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!8!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888