ZXTape! 0Created with Ramsoft MakeTZXGENERAL t t| v p61700:ç:ç:ç::23659k\,ç:"GEV":7:7:11 ,ç:"GEV":11 ,ç:"GEV" GEV 0uN 8x???`1f0?`1``0???`1?0``1 ?`1`@@0`1?`1?0``1?`1`?000`1?`1~0``1>???0`1?f0~0``1???0???0`1wf00``1``P@@<??0`1wf0?`1LlLl???`1f0?`1n __2_2(R S3Q2HFk*ʺ= N r nUU@HB}}UUUUPUWUUUUT_UUUV5UU@UUuTuUWUUG Bjꪺ kꪫꪫϰxUUU`Lj~UUUUUUUUUX?UUUUvWUUWU]UU@UU}UPUW U] ꪪjꪫk+ꪫzp UUPUUU}UUUUUUTWUUU7UU_UUUUUUUU?pUVUWWWB`joڪ*@ uU}UUuUUUT]U_UV5}U_UUUU}VU_pUUUUWj{~AUWW`UUUX]UUuWUu]UU}_@??P!xCWAnj}pp!@1Q<=UWW`]UUUTwUuWUUUU]}UU}U@ !?1Q<>z󪺿Py?UUWPwUUuUVUuUUUU}]U}WWppp >zꪫꪀ??p? O?UUX]UUuWUuUU]UU}]@}UW@? O1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111888888888888888811111111111111118888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((*****))))))))))))(((((((((((((((*****)))))))))))))((((((((((((((*)))))))))))))))))(((((((((((((( GEV ,66$lllll>X>|0f8l8vv0 000 0 0l88l~0<< 0`||8~f<0 0 ~~0 0b```b>lffflbhxhbbhxh`fff~fff~~ xflxlf```bf||ff|``|vff|lff:|fffff>|p0<666v8<f<`flxl8<lffff|~L2~pppv8DD8<!"I!"Mu͎(ɴ)^#V@(r+s~ _!f.++!IR2F!MR2G!F_8!G_|= z=(B:QO:H:Hb \-l µadam(- µ:Q/O!... yrlf`[VQLHD@=9630-+(&$"  :GW[(+ʭKp:Q/GO//_ :H! ҟ#Fʛ{ {˧7X!Z~G!Z}==/O! :H @)))@:F\`i*=\s#r>2\v{=\!:\~2\(M(I(E6} (+('(!"B\>2D\*E\"n\:G\2p\}:\(*E\"B\:G\2D\}*=\6#62\ |;;33R*~=(^#V@##~< ~w#~< ~w#~w~86~8686~ 6#~@WOF  FF( CzW{ _zWQ>XWFK x 66V( y(~# ~G#~O#^ "" 1?? ?? ??   4  // <<<8</>/pp/ppp////.y/ ///    08ȈUWQV   0@@0"e!"$w   v` 0 ?A! H2  *2H!A?  ????? {'? 0070$$$0070$$$0070$$$007000 @UU8|q epPPUE[_*"w*vUWVTboffaagfLDDDEABDBDBBFJNBHLBBHNIIABDD<GS@4t qu}]Ye((8AA~}yi禘Jߚi$UDUUwUU"ww p|Xxp8)*/x+[h`@@@H*x((/zࠠnh3㢲x(TZZCBXT!)ZJRk=-Zk*UUUAAU`bbfbgB\@@@@D<<4,?N/ *x9 <~Z~<`gHaJJ)*BGEV B PzD 23659k\,2:63010"::62536H,ç:23658j\,8:ç:ç::CH=ç:9900&:6;8,12 ;D$:"":4 =""30 (79400$:="L"5200P:6700,:7000X ZN=1921:0;N,4;S$(24):N:44000:ç;20,11 ;7;E$:610b:7000X bXN=17:9800H&:U(N,3)=2000-(502*L)+(RN*5/L):N lYN=812 :9800H&:U(N,3)=1000-(25*L)+(RN*2/L):N vQN=13 15:9800H&:U(N,3)=430-(10 *L)+(RN/L):N `N=115:U(N,4)=(*4)+7-L:N:Z=1630:1940:Z FI1=(*15)+1:I2=(*15)+1:I1=I2680 SH(15):8600!:8000@:9000(#:6700,:.01z# =,25: ?F(2)<16T1=3-2*(F(1)<16) ?F(2)>15T1=4-2*(F(1)<16) ~SST1SS=T1:AF=AF+(502*(SS=4)):N=1630:C(N-15,2)=1:1200:6500d:N: N=1630:C(N-15,1)=C(N-15,1)-1:C(N-15,1)çC(N-15,2)=C(N-15,2)+1:1200 6500d:N: L=X=ç:N=17:U(N,1)<12 X=X+1 Q4N:9800H&:X<4RN>(60<+X*3) V%N=2330:X=(N>27) [GP=(*7)+1:6650:U(P,1)>11 1115[ `IC(N-15,1)=(*4)+3:3360 :N:MA=1: d1400x+(SS*100d-5)+(5*(N-15)):M=1C(N-15,2):X$,X:M U(N,1)=99c -X$="L"C(N-15,2)=X:1200 0X<1X>çY=X*10 :X=(*Y)+1 #P$(N)=X$:C(N-15,1)=X P$(N,1)="P"1300 PP$(N,2)="*"9800H&:P$(N,2)=(78N+5*(RN>502)) P$(N,3)="*"1250 1450: RN=(*(7+(P$(N,2)="C")))+1:U(RN+(7*(P$(N,2)="C")),1)<14TI>890zP$(N,3)=(RN): .P$(N)="HLD":C(N-15,1)=0: mZ=12 -(6*(X$(2)="2"))-(3*(X$(2)="C")):C(N-15,1)=(U(N,1)-Z) #U(N,1)=ZP$(N)="HLD": (4P$(N)="M"+(78N+5*(U(N,1) 9 U(N,4)=9 1450:N: yP$(N,1)="E"P$(N,1)="F"P$(N)"FAW"P=N:9700%:U(UN,1)>76LC(N-15,1)=1  MN>27TI>500C(N-15,1)=ç:C(N-15,2)=ç  "ONF",99c "ONF",99c "P2",ç,"ONF",99c "P2",ç,"ONF",99c "P2",ç,"ONF",99c "ONF",99c "PC",ç,"ONF",99c "EC*",30,"L",1 "EC*",30,"L",1  "HLD",99c "HLD",99c "HLD",99c "MS",2,"FAW",99c "MS",2,"FAW",99c ""MS",2,"FAW",99c @"PC",ç,"OSF",99c E"PC",ç,"OSF",99c J"P1",ç,"OSF",99c O"P1",ç,"OSF",99c T"O*F",15,"L",1 Y"O*F",10 ,"L",1 ^"O*F",12 ,"L",1 c!"PC",ç,"R",6,"L",1 h!"PC",ç,"R",6,"L",2 m"R",6,"L",1 r"D1",6,"L",1 w"D2",3,"L",1 |"MS",.5,"FAW",99c "MS",.5,"FAW",99c 6"MS",.6,"FAW",6,"D2",3,"L",2 "ONF",99c "ONF",99c "ONF",99c "P2",ç,"ONF",99c "O*F",15,"L",1 "P1",ç,"OSF",99c "OSF",99c ""P1",ç,"D1",3,"L",2 ""P1",ç,"D1",3,"L",2 "R",6,"L",1 '"EI*",6,"R",6,"L",1 "R",9 ,"L",1 "MS",.73333,"FAW",99c "PC",ç,"FAW",99c 6"MS",.4L,"FAW",6,"D2",3,"L",2 "OSF",99c  ""P2",ç,"D2",3,"L",2 ""P1",ç,"D1",3,"L",2 "P2",ç,"ONF",99c "EI*",6,"L",1 !"ONF",99c &"OSF",99c +""P1",ç,"D1",3,"L",2 0""P2",ç,"D2",3,"L",2 5'"EI*",6,"R",6,"L",1 :!"PC",ç,"R",6,"L",2 ?"EC*",12 ,"L",1 D"MS",.3,"FAW",99c I"FAW",99c N"P1",ç,"FAW",99c lWX1=ç:Z=1630:U(Z,1)=99c1920:X1=L*2-1 qZ: 3Q=110 :M(1,Q)=ç1930: Q: U(Z,1)=1:U(Z,2)=Q:M(1,Q)=Z:1940:N=1:M=Q:9900&:NP=ç:8145:9900&:N=Z:1460:X1=X1+1: 1U(Z,4)=(*3)+4+L:9800H& OZ<23U(Z,3)=1950+(100d*L)+(RN*5/(4-L)): NZ<28U(Z,3)=1050+(502*L)+(RN*2/(4-L)): /U(Z,3)=450+(20*L)+(RN/L): qDE=44,:N=115:9800H&:RN>5*VI*(L-1)O$(3,N)" "P$(N)=O$(3,N) ,9800H&:RN<502O$(3,N)=" " N LM=115:N= 32+(H(M)=0)-1:9800H& MRN> N*2*VI*(L-1)O$(N-1,M)" "O$(N,M)=O$(N-1,M) 79800H&:RN<502N=3O$(2,M)=" " N:M >N=115:U(N,1)>12 U(N,1)<77MO$(2,N)" "P$(N)=O$(2,N):O$(2,N)=" ":O$(3,N)=" " C((U(N,1)>7U(N,1)<13 )(U(N,1)=77MU(N,2)=1))O$(3,N)" "P$(N)=O$(3,N):O$(3,N)=" " HN J519,8;"Follow":4:ç:9800H& L-RN>502P=130:2127O MP=301-1 O^MV=1:CE=ç:EB= 0 +(15*(P<16)):ET=16+(15*(P<16)) RbW$=P$(P,1):(U(P,1)=77MW$"A")U(P,1)=99cW$="H"W$="S"2155k TVW$="E"((P >7P <16)( P >22P <28))2400` :MV=1 WW$="M"2200 \W$="E"CE=ç2400` a'W$="F"2600( :P$(P,1)="F" dW$="O"3600 e*W$="A"U(P,1)=77M3700t k P:SP=ç: ,NP=1:N=U(P,1):M=U(P,2) 3IY=ç:IX=(P$(P,2)="S")-(P$(P,2)="N") 1P$(P,2)="E"P$(P,3)="E"IY=1 2P$(P,2)="W"P$(P,3)="W"IY=-1 < N+IX <1N+IX>17 M+IY<1M+IY>10 02415o :MV=1MV=2:2250  0ENP=1:G$=6 X,Y;" ";X-1,Y;" ":2365= 30G$=2M(N+1,M)<40(X,Y;" " 8kG$=3M(N+1,M)<40( M(N+2,M)<40(2500 :9900&:X,Y;G$:9900& =NP=0: G=N>9 N<15M(N+1,M)<40(8100: LKN<10 M(N+1,M)<40(M(N+2,M)<40(8100: QN>148100: V `N9700%:U(UN,1)>76LP>15C(P-15,1)=1 bU(UN,1)>76L e 9730& j,NP=1:N=U(P,1):M=U(P,2) oTX=N+IX:TY=M+IY yM(TX,TY)=çM(N,M)=ç:M(TX,TY)=P:8100:2350. :N=TX:M=TY:9900&:2370B :9900&:U(P,1)=N:U(P,2)=M:MV=2: ~GP$(P,1)="E"M(TX,TY)=UN 3000 :CE=1:MV=2: 9800H&:M(TX,TY)>EBM(TX,TY)5RN>502P<28UN=M(TX,TY):3000 :CE=1:MV=2: KM(TX,TY)>39'P$(P,1)="O"M(TX,TY)=DE3900<:MV=2: +M(TX,TY)>39'2450 :2415o MV=2 TMV=2:4300: N+IX <1N+IX>17 M+IY<1M+IY>10 2415o  5X=((M(TX,TY)=40()*F1)+((M(TX,TY)=502)*F2) 9IX0IY0(M(X+1))IY=0: IX0IY0IX=ç: +IX0IY=IY-(M=X)+(M=(X+1)): $Y=(*2):IX=Y-(Y=0): "B=((N+2)/3)*3 &M(B,M)>0G$="o":2525 : )M(B-1,M)>çG$="n":2545 : M(B-2,M)>çG$="m": G$=" ": M(B-1,M)>çG$="l" M(B-2,M)>çG$="Z" 8M(B-1,M)> 0M(B-2,M)>0G$="`"  M(B-2,M)>çG$=""  (U(P,3)<10 *'FI=0:P$(P)="FAW"2900T : -&9700%:U(UN,1)>76L 2DX=U(P,1):DY=U(P,2):P1= 0 +(((U(UN,1)-DX)-(U(UN,2)-DY))=1):F=18:9760 &:P1=P1 7sP1SX=(U(UN,1)-DX):SY=(U(UN,2)-DY):SXSYSX0SY0IX=IX*(SX > SY):IY=IY*(SY > SX) <TX=DX+IX:TY=DY+IY FM(TX,TY)=çDX=TX:DY=TY:F K)M(TX,TY)=UN62510.:2700 : P<P$(P)"FAW"P>162400` :MV=12415o U =FI=1:Z=P:CO=38&:FL=1:2800 :FL=ç 9800H&:RG= F*15-U(P,4)+(5*(VI-1)):B= 1(F*3):B:2750 :RN>RGZ=UN:CO=39':2800  )VI=VI+*1:VI>5VI=5  Z=UN(Z=I1Z=I2)3300 N=U(Z,1):M=U(Z,2) eN>39'((N=4N=5)(M=F2M=F2+1))(N=11 (M=F1M=F1+1))2863/ HNP=1:8100:PO=22528X+X*32 +Y:N=12 FG$=6B=13:PO+B-1,CO:PO+B-33!,CO:B $G$=2PO,CO :PO+1,CO G$=3PO,CO {10 -(9 *(N=2)):CO=(32 *(U(Z,1)<10 ))+((U(Z,1)>9 )*(33!+(Z<16))):N /,P<13 (P>15P<28)FLST 1[U(UN,4)=U(UN,4)- (*2)-1:U(UN,4)<0U(UN,4)=ç 6AF=AF+(UN>15) 99800H&:U(UN,3)=U(UN,3)-((U(P,3)/10 )*(*5+5))-RN*(P$(UN)="SQR"):P<166600 :UN>22UN<28P$(UN,1)"E"9800H&:RN>60<-(L*10 )P$(UN)="EA"+(P-12 ):C(UN-15,1)=(*6)+1:N=UN:3360 ;V=UN:4100: YEX=U(P,1):Y=U(P,2):Q=(*3)+3:Z=1Q ceX1=X-(Z*(X > Z))-((XZ)*(X-1)):X2= X+(Z*(X < (18-Z)))+((X(18-Z))*(17-X)) hA1=Y-(Z*(Y > Z))-((YZ)*(Y-1)):D1=Y+(Z*(Y < (11 -Z)))+((Y(11 -Z))*(10 -Y)):V=Z*2+((Y-Z<1)*(Y-Z-1)) j5N=X1X2:M=A1D11 +((V-1)*(NX1NX2)) m:M(N,M)>EBM(N,M)7))+(6*(P>12 )):D1=2+(2*(UN>22))+(6*(UN>27)) ǁP>15A1=2+(2*(P>22))+(6*(P>27)):D1=2+(2*(UN>7))+(6*(UN>12 )) ɀAG=((A1-D1)/2+5):DD=((D1-A1)/2+5):3150N :N=1AG:A1:N:3150N :N=1DD:D1:N ̝A1=A1+(U(P,4))-2:D1=D1+(U(UN,4))-4:((P>7P<13 )(P>22P<28))P$(UN)="SQR"D1=D1+5:A1=A1-10 lU(UN,1)=77MD1=D1+4:UN<169800H&:RN>502Z$="@":Q=P:V=UN:4200h CP$(P,1)="E"X=UN:9700%:A1=A1+(2*(X=UN)):UN=X ֍A1=A1*U(P,3)/150:D1=D1*U(UN,3)/150:AG=(A1*.75@)+(*(A1*.25~)):DD=(D1*.75@)+(*(D1*.25~)) lDD>AGU(P,4)=U(P,4)-(*1)-(DD/U(P,3)):U(P,4)<0U(P,4)=0 rAG>DDU(UN,4)=U(UN,4)- (*1)-(AG/U(UN,3)):U(UN,4)<0U(UN,4)=0 >U(P,3)=U(P,3)-DD:U(UN,3)=U(UN,3)-AG #V=P:4105 :V=UN:4105  UN>27P$(UN,1)"F"9800H&:RN*L>502N=UN:C(N-15,1)=(*4)+1:3360 :X=1:6650 P$(UN)"SQR"P>7P<13 UN>15UN<23N=UN:9800H&:RN>(U(N,4)*6)P$(N)="SQR":C(N-15,1)=(*4)+1:3360 .P<16U(P,1)99c6600 uU(UN,1)=99cU(P,4)=U(P,4)+(U(P,4)<9 ):P<16Z$="?":V=P:Q=UN:4200h xU(P,1)=99cU(UN,4)=U(UN,4)+(U(UN,4)<9 ):UN<16Z$="?":V=UN:Q=P:4200h  ]Q=P:N=12:Q<8(Q>12 Q<23)Q>273105! :Q=UN:N: !-VI=VI+*.25~:VI > 5VI=5 & NC15,30,ç,5,10 ,30,ç,5,5 32;6;1;20,8;W$: pB=ç:9800H&:UN=I1RN<(30+10 *L)N=UN:Q=P:P=P-15:X=UN>12 :6650:P=Q:B= WUN=I2RN>(502-10 *L)P$(UN)="MS":B=:U(UN,1)=77MP$(UN)="AF" B=V=UN:3350  ,O$(3,V)=P$(V):O$(2,V)=P$(V): OC(N-15,2)=C(N-15,2)-(C(N-15,2)>1): MP$(P,2)="N"DE=502:IX=6-U(P,1):IY=F2-U(P,2) NP$(P,2)="S"DE=40(:IX=12 -U(P,1):IY=F1-U(P,2) $09735&:2410j :MV=12415o ) tPU(P,2)=1 3750:X1<99cF(1)=0:3720 yPU(P,2)=2 3770:X1<99cF(2)=0:3720 ~ lU(P,1)=X1:U(P,2)=X2:M(X1,X2)=P:N=X1:M=X2:9900&:NP=0:8100:9900&: SX=13 11 -1:M(X,F1-(X=12 ))=çX1=X:X2=F1-(X=12 ): X:X1=99c: KX=57:M(X,F1-(X=6))=0X1=X:X2=F1-(X=6): X:X1=99c: i6:ç:FU=40(20,8;"SOUTH FARM":FU=F(1):F(1)=03815 WFU=50220,8;"NORTH FARM":FU=F(2):F(2)=ç3815 FF=1:7700 ;""N=1719:4;N,2;" ":N:  3815 <F(1+(DE=502))=çF(1+(DE=502))=P:M(N,M)=0:U(P,1)=77M:U(P,2)=1+(DE=502):8100:2350. :3950n: AbF(1+(DE=502))>EBF(1+(DE=502))0F(1)<16F(2)>0F(2)<16U1 < U2)Z$="WON":Y$="The enemy":5300 eA1<2(F(1)>15F(2)>15U2 < U1)Z$="LOST":Y$="Your army":5300   9800H&:(U(V,3) <25U(V,1)99c)(U(V,4)<2 RN>40(U(V,1)<99c)N=U(V,1):M=U(V,2):4120:4190^:U(V,1)=99c :U(V,4)<3.5`U(V,1)99c41506  ZU1=U1+(V<16):U2=U2+(V>15):N=77MF(1+(U(V,2)=2))=ç $V>15U(V,3)<25 Z$="*":4200h: $iU(V,1)>12 U(V,1)<77MR$(2,V)=R$(1,V):R$(3,V)=R$(1,V): %x(U(V,1)>6U(V,1)<77M)(U(V,1)=77MU(V,2)=1)R$(2,V)=R$(1,V) ' ;39800H&:RN<((U(V,4)+1)*5) @\V<16P$(V)"MS "U(V,1)77MP$(V)="MS":3350 :Z$="!":4200h: EqV>15P$(V)"MN "U(V,1)77MP$(V)="MN":C(V-15,1)=U(V,1):N=V:3360 : GU(V,1)77M J:P$(V)="AF":V<16U(V,1)=77M3350 O<V>15C(V-15,1)=3:N=V:3360 T ^`N=U(V,1):M=U(V,2):N77MM(N,M)=0:NP=1:8100:2350. c hFM=V:N=1:90102#::R$(1,V)=R$(1,V,4)+Z$ r:Z$="?"Z$="@"R$(1,V)=R$(1,V,5)+(Q) |4132$: ̐9800H&:(IX+IY)=1IX=IX+((IX=0)*(1-(2*(RN>491)))):IY=IY+((IY=0)*(1-(2*(RN>491)))): RN>502IY=ç:  IX=ç: 317;ç;21,9 ;"LEVEL? (1,2,3)" 5zX$=:(X$)>480Ư(X$)<5249400$:L=(X$):6;2;1;21,15+(2*L);X$: : 44055 Q$="*"Q$="Unit has routed"  Q$="!"Q$="We are retreating" Q$="?"19+X,Z;"Enemy ":9900&:19+X,Z+6;F$((R$(3,R1,67))-15):9900&:19+X,Z+7;" destroyed": Q$="#"Q$="Farm occupied" Q$="@"9900&:19+X,Z;F$((R$(3,R1,67))-15):9900&:19+X,Z+2;"attacking farm!": 19+X,Z;Q$: $""4900$ )23560\,ç: 1;5;16,10 ;" ACCESS ";7;2+GO;17,10 ;"'S' save";20,10 ;2+GO;" resume";2;18,10 ;"'L' load";19,10 ;"'G' new game"  4900$ X$= 6X$="G"Z$="restart":51702:X$="Y"6400 1X$="S"GO=çX=1:5100:5000 <X$="L"Z$="load":51702:X$="Y"TE,CC:5200P: X$=32 GO=ç  5010  5150:9060d#:"SCR" y"POS"23627K\+256*23628L\,(23653e\+256*23654f\)-(23627K\+256*23628L\): 3Q$="":W$="":X$="":Y$="":Z$="":I$="":G$="": 2@6;ç;21,6;1;"Really ";Z$;"? (Y/N)" 7!X$=:X$"N"X$"Y"51757 <21,ç;ç;S$: PCç:ç::6;17,12 ;D$:5290:X=1 R 5200P Cç:ç::6;19,7;D$;" START-UP":5290: ,5150:"SCR":17,ç:"POS": TE=22976Y:ç:7:1:N=410 :N,6;S$(20):N:5,6;"THE BATTLE IS ";Z$;"!":Z$="DRAWN"8,7;"It is dusk.":5307 >7,7;Y$;" is";8,7;"in full retreat" PA=6:ç:7900 =""5312 <9060d#:GO=5:5000:6700,:7000X HH=(TI/60<):MM=((TI-(HH*60<))/10 )+1:5660:N=1MM:MX,MY:N:5650+(20*(MM>2)):N=1HH-(12 *(HH>12 )):HX,HY:N: 4,7,7,4,8,ç,7,-4,4,-7,ç,-8,-4,-7,-7,-4,-8,ç,-7,4,-4,7,ç,8 bç,12 ,10 ,6,10 ,-6,ç,-12 ,-10 ,-6,-10 ,6 &6,6,8,2,8,-2,6,-6,2,-8,-2,-8,-6,-6,-8,-2,-8,2,-6,6,-2,8,2,8 D@.05|L,14:PA=7:7:1:7900: E6:ç:228,28:MX,MY:228,28:HX,HY: X$=32 ,7620:7870:X$="I":7060  BCA=ç:N=13 15:U(N,1)99cCA=CA+1  N:CA=ç N=2327 FRN=(*3)+1:U(RN+12 ,1)=99c5915  CP$(N)="EA"+(RN):C(N-15,1)=12 :3360 :N: 720,8;S$(8):W$="Unit":3200 X$=:X$=""6025 X$=32 8X$="A"X$="C"X$="I"9400$:Y$=Y$+X$:6050 TX$="G"Y$=""EN17,8;"all units":9400$:Y$=" ":UN=30:  6025 6X$="I"DO,11 ;U$(1):UN=ç:TP=568 ;X$="C"DO,12 ;U$(2):UN=7:TP=546 <X$="A"DO,12 ;U$(3):UN=12 :TP=524 X$=:X$=""6065 X$=32 VX$>480ƯX$5*VI*(L-1)R$(3,N)=R$(2,N):R$(2,N)=R$(1,N) N M(TI/60<)=TI/60<19,8;"Sending reports":9200# &19,8;" Relaying orders"  2000 919,8;6;2;" ";E$;S$(5) C4000:TI=TI+10 :TI=1140tZ$="DRAWN":5300 \4900$:CC=TE:5600:7:ç:6700,:H(15):.01z# =,25: bTE,CC:5270:X=10 44000:7;20,11 ;E$:610b:7000X  6400 dP$(N,1)"D" iOO=F1:P$(N)="D2 "OO=F2 nB=11 -(6*(P$(N)="D2 "))13 -(6*(P$(N)="D2 ")):M=OO-1OO+2:M(B,M)>0M(B,M)<16P=M(B,M):X=(N>27):6650: sM:B: FN=1630:X=(N>27):P$(N,1)="R"6650: N: Q$="ICA":T1=1+(P>7)+(P>12 ):P$(N)=(69E+X)+Q$(T1)+(P-(7*(T1=2))-(12 *(T1=3))): ,8410 :5800: F20,8;Y;Z$:.05|L,20:N=110 :N: CC=TE:TE,CC+88X: ]ç:6:TE,CC+88X:16,8;S$(16);16,13 ;"--":7800x+150*ME:GO=0:4900$ _X$=:X$=""7007_ bqX$ =9 TE,CC:TE=TE+((((TE-22559X)/32 ))((TE-22559X)/32 )):6900:7007_ lrX$ =8TE,CC:TE=TE-((((TE-22496W)/32 ))((TE-22496W) /32 )):6900:7007_ vQX$ =10 TE,CC:TE=TE+((TE<22976Y)*32 ):6900:7007_ QX$ =11 TE,CC:TE=TE-((TE>22591?X)*32 ):6900:7007_ TX$>480ƯX$<52 4.01z# =,29:7100:7450:7000X -X$ ="L"7300:6700,:7000X EX$ ="I"6100:5850:PA=6:7900:7000X 8X$ ="S".01z# =,20:ME=1-ME:7000X 3X$="0".1}L,25:6300:7000X 6X$ ="R"9100#:0:6700,:7000X 9X$ ="M"9060d#:5000:6700,:7000X YX$ ="U"5700D:7600:PA=6:7900:I=I*(X$=13 ):7000X  7007_ ,PA=6:X=((TE-22528X)/32 ) %Y=TE-X*32 -22528X+1 rX<4(Y<12 Y>21)X >3X<9 (Y<6Y>26)X>8(Y=1Y=32 ) 7550~:FU=ç  9900& ԹFU>307260\:0;4;17,3;"!%";18,3;"#$";19,3;"&'":18,2;Q;4;L$:7900:9900&:3800: m7400:1+(FU<16) ;4;17,2;G$(3);18,2;G$( 4) 40:9900&:7900:FF=ç:7700 A7170:N=1718:4;N,2;" ":N: ""  7170 \\Q=4:F(1+(FU=502))>0Q=2-(F(1+(FU=502))>15) f 7:0:9900&:16,0;"@";S$(30):9900&:N=1721:N,0;S$(31):N:16,9 ;"ORDERS" X=16:Y=18:8445 :7350:N=17:17,N*4;N$(N):N:N=13:17+N,0;U$(N,1+(N=1)3+(N=1)):N 7320:X=1820:Y,Z:N=YZ:X,(N-Y+1)*4;1+H(N);O$(1,N):N:X:21,2;0;K$;": ";2;X$:4900$ 32 7310  41,7,8,12 ,13 ,15 I=0X$="none": bX$=N$(I-(7*(I>7))-(5*(I>12 )))+" "+U$(1+(I>7)+(I>12 )): FU<8G$="(M+NN*": FU<13 G$="ABCDEF": FU<16G$="QRSTUV": FU<23G$=",O-PP\": FU<28G$="GHIJKL": G$="abcdef": SFU>0FU<31J$(1+(FU>15))=F$(FU-(15*(FU>15))) 6;0;21,25;L:9900&:0;2;21,1;J$(1);21,5;5;J$(2):9900&: ~IX>3X<9 FU=M(X+6,((Y-5)/2)):7565 SX>8FU=M(((X-1)/2)+11 ,((Y-2)/3)+1): 5X<4FU=M(X*3+1-(X$),Y-11 ) /M(X*3,Y-11 )=502FU=502 ;M(X+7,((Y-5)/2))=40(FU=40(  g Y$="":2;16,10 ;K$:EN=1:DO=18:6000p:20,8;" " X$=32 I=ç: I=UN A2;6;1;20,8;"ENTER TO CONFIRM" X$= >X$=13 Y=2:Z$=" CONFIRMED ":6800: >X$=32 Y=1:Z$=" CANCELLED ":6800:  7630 I=ç ;U(I,1)<15(P$(I)"HLD"P$(I,2)"MS") N=1630 0U(N,1) >14U(N,1)<76L N 16,8;"You inspect";17,8;N$(I-(7*(I>7))-(5*(I>12 )));" ";U$(1+(I>7)+(I>12 ),1+(I<8));19,8;"Their morale is";20,8;"now" RN=(*5)+3-L SI(I)=çU(I,4)=U(I,4)+RN:U(I,4)>9 U(I,4)=9 :20,12 ;C$(((U(I,4)+2)/2)) SUN=ç:Q=12:ST=1:CO=39':Z=I:2800 :Q:ST=0 4I(I)=1:N=175K: N:7900: ç:6:9900&:(FU>15);16,8;";";17,8;"[";F$(FU-(15*(FU>15)));"]";18,8;"{|}":9900&  FF>ç -CES=(VI)*(25+(25*(X<9 ))+(502*(X<4))) 2 GU=(( (U(FU,3))/ES))*ES 7k6:17,12 ;"Estimated";18,12 ;"strength:";20,12 ;GU;" to ";GU+ES 15FU<23))P$(FU)="SQR"20,8;1;"s" F 18,8;"'L' List orders";20,8;"'S' Swap menus";19,8;"'U' Inspect unit";17,8;"'I' Issue order": X$13 .O<30O$(1,O)=Y$:H(O)=1: ×N= 1+(7*(O=32 ))+(12 *(O=33!))15-(8*(O=31))-(3*(O=32 )):O$(1,N)=Y$:H(N)=1:N: 8N=1620:N,8;PA;S$(16):N: 18,8;"'M' Access Menu";20,8;"'S' Swap menus";17,8;"'R' Read reports";19,8;"'0' Continue": TNP=ç:9900& W1N=6:M=F2:8830~":X,Y;4;"pq" XVN=12 :M=F1:8820t":4;X-1,Y;"vwxX";X,Y;"yzWY":9900&: N>148900" "N>9 N<158930" N<10 G$="omn" gN>148800`":NP=01+(P<16);X,Y;G$(4);X-1,Y;G$(3) fN>9 N<15 8820t":NP=0M(N+1,M)<40(1+(P<16);X,Y;G$ vN<10 8830~":NP=0M(N+1,M)<40(M(N+2,M)<40(2500 :4;ç;X,Y;G$  ڃç;4;15,ç;" ";15,7;6;ç;"";15,25;6;ç;"" =63247,2:4900$:63245 :7455: Z$="":W$="":8550f!:X,Y;W$;(TI/60<);X,Y+2;":";X,Y+3;Z$;TI-((TI/60<))*60<:(TI/60<)*60<=TIX,Y+4;"0" ! !f$(TI/60<)=TI/60<Q$="0" !h!(TI/60<)<10 W$="0" !k !XMA=ç:F2=(*7)+2:M(6,F2)=502:M(6,F2+1)=502 !SF1=(*7)+2:M(12 ,F1)=40(:M(12 ,F1+1)=40( ! "`/X=(N-10 )*2:Y=M*3-2: "t&X=N-6:Y=(2*M)+4: "~2X=((N-1)/3)+1:Y=M+10 : "FU=M(N,M):7400 " "<M(N,M)<8M(N,M)<23M(N,M) >15G$="k/": "M(N,M)<13 G$="gh": "M(N,M)<16G$=">?": "M(N,M)<28G$="ij": " G$="^_": #--TI=420:N=1:M=115 #2 Q$="":W$="":8550f!: R$(N,M)=W$ +((TI/60<)) +(TI-((TI/60<))*60<)+Q$: 9050Z#:R$(N,M)=R$(N,M,4)+Q$+(U(M,3))+((U(M,4)))+P$(M):TI>450 #7WM:N=23:M=115:R$(N,M)=R$(1,M):M:N:TI=450: #ZRX=U(M,3):Z=0+(X<1000)+(X<100d)+(X<10 ):Q$=S$(Z): #dJç;ç;15,ç;S$:63247,1:4900$:63245 : #R=ç:ç:7:9060d#:15,0;B$;"S":X=15:Y=10 :8445 :15,22;"Vis:";C$((6-VI)) #<7:ç:X=1:Y=1:R1=169180# #(W$=" ":U(R1,1)=99cW$="" #9300T$:0+(I(R1)=1);17+X,Z;N$(R1-(7*(R1>7))-(5*(R1>12 )));17+X,4+Z-(R1<8);U$(1+(R1>7)+(R1>12 ));17+X,17+Z;2;W$ #18+X,Z;"Tim:";R$(3,R1,4):Q$= R$(3,R1,5):Q$="*"Q$="!"Q$="?"Q$="#"Q$="@"4500:9150# #18+X,Z+8;" Ord:";R$(3,R1,10 );19+X,Z;"Str: Mor:";C$((((R$(3,R1,9 ))/2))+1);19+X,Z+4;R$(3,R1,58) #R=ç4900$:R= #X$= #X$=32 #'X$ <7ůX$>11 9153# #͍R1=R1+(X$=9 )-(X$=8)+(4*(X$=11 ))-(4*(X$=10 )):R1=R1-(16*(R1>16))+(16*(R1<1)) #..001wn,19:R1169125# #ܜ9300T$:17+X,Z;"SITUATION ";B$;18+X,Z;"Units lost:";18+X,Z+14;U1;19+X,Z;;"Enemy losses: ";19+X,Z+14; U2 # 9150# #M=115 #U(M,1)=99cM: #-N=1:90102#:V=M:4132$:M: $TX=1-X:Y=1-Y:Z=3+(8*(Y=1)):16+X,Z-1;"":N=17+X20+X:N,Z-1;"";S$(18);"":N:20+X,Z-1;"": $.01z# =,ç: %YUN=(15*(P<16))+(7*(P$(P,2)="C"))+(12 *(P$(P,2)="A")) %UN=UN+P$(P,3) % &>IX=U(UN,1)-U(P,1):IY=U(UN,2)-U(P,2) &IXçIX=IX/IX &IYçIY=IY/IY & & *IX=U(UN,1)-DX:IY=U(UN,2)-DY &*9735&: &HRN=(*100d)+1: &[236066\,44,+(CH*43+):236077\,240+(CH*11 ):CH= 1-CH: '361700-(23653e\+256*23654f\) iMEcccccc xxyY 28 !htmW 2 @o GYQTFC5  InfantryCavalry Artillerypoorlow fairgoodhigh]        ώHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLD_HLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLDHLD# 070024408HLD070021507HLD070022709HLD070021106HLD070023258HLD070024709HLD070020906HLD070011549HLD070011887HLD070011108HLD070010827HLD070011949HLD0700 5138HLD0700 4926HLD0700 4336HLD070024408HLD070021507HLD070022709HLD070021106HLD070023258HLD070024709HLD070020906HLD070011549HLD070011887HLD070011108HLD070010827HLD070011949HLD0700 5138HLD0700 4926HLD0700 4336HLD070024408HLD070021507HLD070022709HLD070021106HLD070023258HLD070024709HLD070020906HLD070011549HLD070011887HLD070011108HLD070010827HLD070011949HLD0700 5138HLD0700 4926HLD0700 4336HLD 1st2nd3rd4th5th6th7thV Zll m llZF456789:u0123rstS K InspectionE One momentBREPORTDLOADING l W      N L)NQWYZIGrXGEV @?88@ۺz8pÁ||@??7u Ã|}Zwۀ`>Ã@n/_??ρ_on{N]8o?3tt?w }z^o0=88?}3.~8h??:]v7뮻Xx`Xx`뮻뮻Xx`뮻뮻x+@x+@x+@ UUUU p[@eep[@UU  UUep[@eUUUU UUeee DEDE Ye8@wwpwwp8@YeDE  DEwwpYe8@YewwpDEDE DEwwpwwpYewwpqq()hHUUPUUP)hH(qqUUP()hH(UUPqUUPUUP(UUPu] UU[UU[ u](*UUPUUP*(UU[u] u]UU[UUP(*(UUPUU[UU[u]UU[UUPUUP(UUP} UU_UU_ }/*/*UU_} }UU_/*UU_UU_}UU_p|p|p| @= @!b!4 " `C=@DG D @}P=W 0# ; @?Z? L" ( %  REDDP < @APET0?X P?B @?Z? \  qx=@84O O 0<=S? 7 @!F!|o 8C? =A @!F!; L ?#!Bh? @!B!?߃ ‰0G?#!B6 @!B!w0 D@>P @!b!x o < pqqqȜ9@8D993 !!! ! ! ! !!!! ! """"""""" """""""""" """"""""" """""""""" """""" """ """""" """""" """ """""" """ """""" """ """ """""" """ ((((GG((((GGGGGGGGGGGGGGGGGG((((GGGGGGGGGGGGGGGGGGGG((((GGGGGGGGGGGGGGGGGGGG((((((((((((Y