War G.1 ssu REELAX GAMES 1985 64511 "7:7:7::"" P4,0;:"" M war.g11 @Nmm@`` m7`m`[m[7``[ mmmmm6ml```[ l7`m`mmmvl`  PFmmmmm6[l l7`@ ` [`l@7`m`mmmvl@ ` mmm-m[l h7`` [`h@7`m` -mm vm``mmm m[h `7`` [h`P7`m` mm vm`` mmm m@[`-[`7`` [l`X7`m` mm-vm h[@~<mmmm`[`m@7`` [l@X7`m` mmmvml>(~mmh[` m7`m`[mZ7`` mmmvmm6@^?@P?PCP@P@?P?AP?@p(((?(?(?(????  ? ?? ?   ????????9(?))?(?@P?@PP?Q@?P?P@??? &?@P@P@P@P@P%A(( ((B($A>? ?$A  ?  |B!   A?|"@"@((((B!P@P@P @P@A888888888888888888888888888888888zzzzzzzzzzzzzzzzzzzzzzzzzzzzzz88~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~88||||||||||||||||||||||||||||||88yyyyyyyyyyyyyyyyyyyyyyyyyyyyyy8888888888888888888888888888888888xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx88xyyyy||zxxxxxxxxxxxxx|||||||xx88xyyyz||}xxxxxx}xxxxxxxxx||||xx88xzyzz}~~~~~~~xxxxx~~~~~x|||zxx88xzyzz}}}}}}}}xxxxx}}}}}}}}xxxx88xzzzzzzz}zzzzxzzzzzzj}zzzzzzzx88xzzzzzzz}zzzzxzxxxz}z}zzzzzzzx88xzzzzzzz}zzzzxzzzxzzz}zzzzzzzx88xzzzzz}z}zzzzzzzzxzzz}z}zzzzzx88xz~~~~~~~xxxxxyyzxxxxx~~~~yzzx88xyxxxxxxxxxxzyyyzyxxxxxxxxxxzx88xyxxxxxxxxzxxxxxxxxxxxx}}xxxyx88x|}}||xxxx|xxxxxxxx||xxxx||||x88xyyxxxxxyyxxxxxxxxxyyxxxxyyyyx88xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx8888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 war.g12 wwy 63160 (:1:6:1:0: x10 ,5;"WAIT FOR THE COMPUTER";12 ,7;"TO FINISH LOADING";14,11 ;"WARGAME" 23693\,73I:"" Y23693\,78N:23676|\,255:236077\,251:23658j\,8 :.2~L,10 :.5,20:1,9 ;1;"STOP THE TAPE";7,5;0;"DO YOU WISH TO LOAD AN"''" UNFINISHED WARGAME WHICH YOU"''" HAVE SAVED ON ANOTHER TAPE?":#1;"KEY YOR N" Baty="80":exit="4890":blot="2100":SCR=1+(*3) CHQ=0:X$="ENEMY ":T$=" A.M. ":TIME=5:BPONT=1 (~G(16,32 ):B(21):R(21):X(546):Y(546):M(546):T(546):W(14):Z(14) *"q$=:(q$="Y"q$="N")42* +q$="Y"7300 -:.2~L,10 :.5,20:7;7,5;"ENTER NAME OF YOUR ARMY"''" E.G. 'BRITISH','AMERICAN',ETC. "''" IN NOT MORE THAN 11 LETTERS! " 2Y$:Y$=""502 7rY$>11 1,-480::1;15,4;"11 (ELEVEN) LETTERS ONLY!":100d::45- < Y$=Y$+" " A:.2~L,10 :.5,20:6;1,13 -Y$/2;;Y$;"ARMY";7;7,6;"CHOOSE BATTLEFIELD"'''" P=PLAIN"''" R=RIVERS"''" F=FOREST" BH#1;1,0;"KEY P,R, ORF" FC$= K C$"R"C$"P"C$"F"70F P:.2~L,10 :.5,20:6;1,13 -Y$/2;Y$;"ARMY";7;7,4;"CHOOSE DIFFICULTY LEVELS"'',"ENEMY MORALE"'',"L=LOW"'',"M=MEDIUM"'',"H=HIGH" RI#1;1,0;"KEY L,M, ORH" UM$= Z M$"L"M$"H"M$"M"85U _#M$="L"EM=3:EMB=-10 d!M$="M"EM=4:EMB=5 i"M$="H"EM=5:EMB=20 n.2~L,10 :.5,20:7;7,4;"CHOOSE DIFFICULTY LEVELS"''" NUMBER OF ENEMY REGIMENTS "''," 1=17 "''," 2=25 "''," 3=34 " pI#1;1,0;"KEY 1,2, OR3" sr$= x!R$"1"R$"2"R$"3"115s } NER=R$ 20:7::2040:1350F:blot JC=116:C,1;4;"" C SCR=18200 SCR=28210 SCR=38215 6500d 8130:2805 8072:2805 NER=3205 8063 NER=1NR=17 NER=2NR=9 -N=1NR:Z:T(Z)=0:M(Z)=0 .01z# =,*8-5 N SCR=1RES=8220 SCR=2RES=8226" SCR=3RES=8232( RES+1 N=135#:X(N),Y(N) N N=135# 5T(N)=0X(N)=0:Y(N)=0:238 1040 .01z# =,*8-5 N +C$="R"BP=0:6000p:300, +C$="F"BP=3:6050:300, 8C$="P"BP=5:FL=9 :FU=7:6100 1n$=y$ ; 3000 @1500:4000 c1500:1120`:65262:.25~,6:.5,18:236077\,251 blot:7;0;19,5;"FIELD REPORTS? Y OR N"'"S TO SAVE THE GAME FOR LATER ON A SPARE TAPE" *q$=:(q$="Y"q$="N"q$="S")406 q$="N"605] q$="S"7200  blot 2:7: 61,7-Y$/2;Y$;"ARMY FIELD REPORTS" &'"UNIT";17;"STRENGTH MORALE"' n=36$546 t(n)=0n N8072+n:a$:a$;:22;t(n);29;(m(n)*10 )/10 :n  10808 `0:7:1::2040:1350F:blot:65312 :236077\,251 ]&.5,18:.1}L,21 bn$=y$:e$=x$ d t(535)=0620l g$n=535:1770:1040 l!n=45-47/:2500 vN !n=36$47/:2500 N !n=36$546:2500 N .X=X(546):Y=Y(546):G(X,Y)=2  8061} AB,AC,AE,AF,AG,AH,AI,AJ,AK,AL  A=ABAC  3215 A A=AC+1:3330 A=AJAK:3330 A  4000 ,2440 :x(a),y(a);P;I;1;B$:  2440  x(a),y(a);P;I;0;B$:  ,2300:X(N),Y(N);P;I;1;B$:  2300  X(N),Y(N);P;I;0;B$: $<21004:7;19,12 ;"MISSED":502 . 8^#1;0,0;" " 91#1;1,6;"ANY KEY TO CONTINUE" = 0 Bc#1;0,0;" ": VTIME=TIME+1 `'TIME<12 T$=" A.M.":1130j e T$=" P.M." j6;0;0,11 ;" ";0,12 ;TIME-12 *(TIME>12 );T$:88X,168:0;71G,0 oTIME=187100 t y9V=10 :T=.015zu\:W=11:1160 ~8v=7:w=13:v=v+3:t=.02{# =  8260D :q=112 BM,BN:BM,BN q w  $x(n),y(n);4;0;"": $x(a),y(a);4;0;"": X=X(A):Y=Y(A)  F$="U"X=X(A)-R F$="D"X=X(A)+R F$="L"Y=Y(A)-R (F$="R"Y=Y(A)+R 2*(X,Y)AEƫ(X,Y)AFƫ(X,Y)AGX=0 < F3;7;0,10 ;"";0,20;"";17,10 ;"";17,20;"";9 ,0;"";9 ,31;"": blot FR=0:BR=0 N=36$546  BR=BR+T(N)  N N=135#  FR=FR+T(N) 1N 6R7;19,0;"TOTAL ";X$;"TROOPS = ";FR'"TOTAL ";Y$;"TROOPS = ";BR :10808:  1030 blot:7;18,2;"PLEASE GIVE ORDERS FOR"'2;N$;"ENGINEERS DETACHMENT";0;'"M MOVE","F CLEAR FOREST"'"  B BUILD BRIDGE" &=""("M"Ʀ"F"Ʀ"B")1795 "M"Ʀ"F"Ʀ"B"1800 ="M"2530 : ="F"6750^: &="B"6850: vc:  gN=031:0;7;0,N;"";17,N;"":.01z# =,30+*8:N gN=116:0;7;N,31;"";N,0;"":.01z# =,30+*8:N / 4 PA=0 >PA;18,0;" " H W=N W35#2350. +W: 8072+W $ A$,B$,P,I . 37A$="GUARDS REGIMENT ":B$="":P=5:I=0: 8:A$="FUSILIERS REGIMENT ":B$="":P=5:I=0: =5A$="FOOT REGIMENT ":B$="":P=5:I=0: E8A$="CAVALRY REGIMENT ":B$="":P=7:I=5: L9A$="ARTILLERY BATTERY ":B$="":P=4:I=7: P<A$="ENGINEERS DETACHMENT ":B$="":P=5:I=0: Q4A$="HEADQUARTERS ":B$="":P=7:I=5: W=A:2310 x(n)=0 $1030:n=5462650Z pblot:18,0;0;7;"PLEASE GIVE ORDERS FOR THE"''1+(n$"ENEMY ");N$;A$;0; Y#1;0,0;"USE ARROW KEYS TO MOVE UNIT"'"ENTERT0 GO ON" bcurs=:((curs8curs11 )(curs535curs568)curs=13 )2540 1090B x=x(n):y=y(n) Cy=y+(curs=9 )+(curs=568)-(curs=8)-(curs=535) Ex=x+(curs=10 )+(curs=546)-(curs=11 )-(curs=557) curs=13 2630F (X,Y)>79Oblot:18,8;7;"ORDER BUNGLED. "'N$;A$'" CANNOT MOVE IN THAT DIRECTION":.5,-15:100d:10808:2630F ;2300:n45-n5247600:2595# !^.05|L,-32 :.05|L,-40(:25:.05|L,-32 :.05|L,-40( #B1250:G(X(N),Y(N))=0:X(N)=X:Y(N)=Y:G(X,Y)=1 < 6900 F1090B:1045: Zlblot:19,0;2;7;N$;" H.Q. TO MOVE?";0'0'"YORN" d =""("Y"Ʀ"N")2660d n"Y"2630F xn=36$546 x(n)=02701 m(n)=m(n)-.3 N:N=546:2530 Z=17:VA,VB,VC,VD N=VAVB:M(N)=VC:T(N)=VD N Z  2XD=12 :YD=15:N=546:3035 N=36$535 m(n)=0n 2300:3100 N=5463010 N  !hblot:7;18,0;" MOVE CURSOR TO POSITION "'N$;A$'"ENTER TO FIX POSITION" #&yd=15:xd=16:3180l &bcurs=:((curs8curs11 )(curs535curs568)curs=13 )3110& ( 3185q +Eyd=yd+(curs=9 )-(curs=8)+(curs=568)-(curs=535) -Gxd=xd+(curs=10 )-(curs=11 )+(curs=546)-(curs=557) 0/n=546yd=yd-(yd>20)+(yd<10 ) 5Dyd=yd+(yd<1)-(yd>30):xd=xd+(xd<9 )-(xd>16) : 3180l S8curs=13 (at1=68Dat1=79O)3110& X`curs=13 3185q :X(N)=XD:Y(N)=YD:G(XD,YD)=1:.2~L,30:1040: b 3110& lRat1=(xd,yd):at2=23693\:xd,yd;7;3;1;1;" ": q923693\,at1:xd,yd;1;" ":23693\,at2: Q.2~L,-10 :blot:7;19,0;Q$:10808:3105! x(a)=0 %.1}L,5:.1}L,25 1000:blot:18,0;1+(n$"ENEMY ");7;N$ ;A$;0''"TO MOVE OR FIRE? (MORF)" =""("M"Ʀ"F")3230 $="M"n=a:2500 :3310 3400H Rblot:;7;19,0;"FIRE ";l$'" RANGE?","1,2,3 OR 4" ,=""("1"Ʀ"2"Ʀ"3"Ʀ"4")3254 R$= r=r$ C1280:x=0.5,-15:1060$:3310 N=AHAI X(N)=XY(N)=Y1030:9000(#:T(N)=T(N)-CAS:M(N)=M(N)-.3:blot:1+(e$"ENEMY ");7;19,0;E$;A$'0'"LOSES ";CAS;" MEN":10808:1040:3394B :3305 n 1020: T(A)=0 y1000:blot:7;2;19,0;N$ ;A$;0'0'" TO ATTACK?","YORN"  =""("Y"Ʀ"N")3342 ="N"1020:  3400H  R=1 C1280:X=0.5,-15:1060$:3392@ $3470 :1000:1145y  N=AHAI 'X(N)=XY(N)=Y1030:3370* "N: * 9000(# /=CAS=.0025x# =*(BC-RC):M(BL)=M(BL)-CAS:M(RED)=M(RED)+CAS 0M(A)<1M(A)=1 1M(N)<1M(N)=1 5M(N)>10 M(N)=10 6M(A)>10 M(A)=10 7T(RED)=T(RED)-RC 8T(BL)=T(BL)-BC 9blot :$A<36$K=BC:L=RC:3388< ; K=RC:L=BC v2300:19,16;7;1+(E$"ENEMY ")'E$;A$;0;0;"LOSES ";L;" MEN":10808 @1020:1040 BLHQ=1T(35#)=0T(546)=05880:7000X CT(A)<100d3900< D2T(N)<100dN546N35#3903? F HLblot:18,0;7;"USE ARROW KEYS TO GIVE DIRECTIONOF FIRE" JTcurs=:((curs8curs11 )(curs535curs568))3402J Ll$=("LEFT"(curs=8curs=535))+("RIGHT"(curs=9 curs=568))+("UP"(curs=11 curs=557))+("DOWN"(curs=10 curs=546)) Rf$=l$(1) f aalaakm(a)=m(a)+.3 blot  <(O$=N$:W=A:GSB=1260:3905A ?O$=E$:W=N:GSB=1250 A+1;6;2;X(W),Y(W);"" F 2310 Kublot:19,0;7;O$;A$'," DESTROYED":.2~L,-20:.5,-(*3)*14:100d P'GSB:G(X(W),Y(W))=0:6900 ZT(W)=0 dM(W)=0 iX(W)=0 nY(W)=0 s 1100L:n$=x$:e$=y$ !n=3134":4140, n =blot:7;1;20,8;"ENEMY ADVANCING" !a=1617:4900$ a:a=20:4900$ n=546:8255? s=19 :o,c a=oc :X(A)=0A=20A=6A=13 4036 X=X(A):Y=Y(A):4300 xa=0:ya=0 O(x(a)+1,y(a))=79Oxa=1:4700\:1020:4035  4800  6900 a s ;4530:a=2430:t(a)=04043 /X=X(A):Y=Y(A):r=14:4410: r a +r=1:a=134":44000 a  400 1t(n)=0 6c$="F"c$="P"4160@ ;M(x(n)+1,y(n))=97abx=x(n)+1:by=y(n):6881:blot: @&8055w:Z=14:XA,YA EC(X(N)+XA,Y(N)+YA)=96`FX=X(N)+XA:FY=Y(N)+YA:6800: JZ:  X+1>164305 $G(X+1,Y)=24036  Y+1>304310 $G(X,Y+1)=24036 Y-1<14315 $G(X,Y-1)=24036 X-1<14320 $G(X-1,Y)=24036  4030 0a=24a=31 2t(a)=0 5x=x(a):y=y(a) :.005y# =,-15 X+R>164505 'G(X+R,Y)>0X=X+R:4550: Y+R>304510 'G(X,Y+R)>0Y=Y+R:4550: Y-R<14515 'G(X,Y-R)>0Y=Y-R:4550: X-R<14520 'G(X-R,Y)>0X=X-R:4550:  <21004:7;20,8;"ENEMY ATTACKING": &1000:AH=36$:AI=546 <a24a303285 :r=4:4530: 4al=16:ak=23:3355 :4530: /a16a307600:4770 ^.05|L,-32 :.05|L,-40(:25:.05|L,-32 :.05|L,-40( B2440 :1260:x(a)=x(a)+xa:y(a)=y(a)+ya:1025: WX(A)+1Y(N)ƫ(X(A),Y(A)-1)X(N)ƫ(X(A)-1,Y(A))Y(N)ƫ(X(A),Y(A)-1)X(N)ƫ(X(A)-1,Y(A))x(n)<9 x(n)0ƽ(y(a)-y(n))64925=: 3n 8 =s=13 BwG(X(A)+1,Y(A))>0G(X(A),Y(A)+1)>0G(X(A),Y(A)-1)>0G(X(A)-1,Y(A))>0 L0XA=0:YA=0:4800:6900 Qs: !X(N),Y(N);4;7;B$  uNfl=12 :fu=4:6100:0;4;10 ,5;"" z 8205  6500d brid=5:w(2)=11 :w(3)=10 :w(4)=10 :w(5)=9 :z(2)=5:z(3)=15:z(4)=20:z(5)=27   "n=120+(*20) C9 +(*7),2+(*29);4;0;"" n:   n=14+(*5) 9fl+(*fu),2+(*29);7;0;"" n: dRIV,TREE,FARM,BRID nkbridge=brid:W(1)=3:Z(1)=24:SCR=3W(1)=0:Z(1)=0 x)p=4:i=1:v=riv:6570 *i=0:p=4:v=tree:6570 *i=0:p=7:v=farm:6570 ,p=1:i=7:v=bridge:6570   n=1v a,b,z$ a,b;p;i;z$ .01z# =,*8-10 n  c]blot:7;19,0;"USE ARROW KEYS TO CHOOSE"'"DIRECTION FOR CLEARING FOREST" h 3402J pfx=x(n):fy=y(n) rFX=FX+(f$="D")-(f$="U") |fy=fy+(f$="R")-(f$="L") }(FX,FY)96`.5,-28:21004:7;19,0;" NO TREES IN THAT DIRECTION!":10808: .005y# =,30:20:.005y# =,30:20:.005y# =,30:20:.005y# =,30:40(:.8L,-30 )FX,FY;4;0;"":100d FX,FY;0;4;""  !n$=y$bpont=06857  6858 i.5,-28:21004:7;19,0;" NO BRIDGE MATERIALS LEFT ":10808: 4bx=x(535)-1:by=y(535):6880 (BX,BY)97a.5,-45-:21004:19,0;7;"THERE IS NO RIVER THERE, STUPID!":10808: 'bx,by;1;7;1;"" Kblot:19,6;7;n$;" ENGINEERS"'" BUILDING BRIDGE" Cm=110 :.005y# =,502:1+(*502):m ;.01z# =,25:bx,by;1;7;0;"" Ablot:19,6;7;" BRIDGE COMPLETED":100d N=524BPONT=0 +brid=brid+1:w(brid)=bx:z(brid)=by  m=1brid 9(w(m),z(m))=68D7;1;w(m),z(m);"" m ! XXblot:2;7;1;1;20,4;"A MESSAGE FROM THE KING!" b!H=0:U=0:M=0 c!T(35#)0H=20 dT=(BR/1000) f;n=36$546:t(n)>99cu=u+1:m=m+m(n) gn h,ner=1c=142507-fr:et=-5 i+ner=2c=20250O-fr:et=5 j,ner=3c=27250rj-fr:et=15 q"T(546)0H=-20 v4PTS=(T+U+(M/10 )+(C/1000)+ET+EMB+BP+H) {*85004!+PTS:Q$:M$="HIS MAJESTY IS " :blot:19,10 ;0;7;"HERE IT IS!"  1150~ PA=3:2110>:18,0;3;0;M$;Q$;21,0;6;"YOU ARE ALSO AWARDED ";PTS;" DUCATS";0; a#1;0,0;7;"G FOR ANOTHER GAME"'"S TO END ALL PLAY" "G"Ʀ"S"7092 ="S"0 1:1:6:1:0::9 eC=116:8;8;0;1;C,1;" " C Xblot:18,0;7;"NIGHT FALLS. THE BATTLE IS DRAWN":4,-10  7000X  3236077\,60<:2:4:0: *10 ,6;"PUT A SPARE CASSETTE";12 ,8;"IN YOUR RECORDER";14,2;"READY TO SAVE THE GAME DATA" 4E#1;1,5;6;0;"WAIT FOR THE COMPUTER" 9s$(60<,6) ;l$(12 ):l$=y$ >s$(1)=c$:s$(2)=m$:s$(3)=t$:s$(4)=l$(6):s$(5)=l$(7):s$(6,1)=time:s$(6,2)=bpont:s$(6,3)=scr:s$(6,4)=ner:s$(6,5)=brid:s$(6,6)=±y$ Cj=1546:s$(j+6,1)=x(j):s$(j+6,2)=y(j):s$(j+6,3)=m(j):s$(j+6,4)=(t(j)/10 ):j DQj=121:s$(j+6,5)=b(j):s$(j+6,6)=r(j):j ETj=2841):s$(j,5)=w(j-27):s$(j,6)=z(j-27):j HU#1;1,5;" ":.02{# =,30:"data"s$() M643040 OL#1;6;0;" STOP THE TAPE  ANY KEY TO GO ON":0 Rc236077\,251:0:7:0:1::2050:1350F:65312 \#236077\,251:10808 f 404 3236077\,60<:2:4:0: z10 ,8;"PUT THE CASSETTE";12 ,3;"WITH YOUR GAME DATA READY";14,8;"IN THE RECORDER" t#1;1,0;6;0;" START RECORDER AND PRESS ENTER WHEN READY TO LOAD "  q$=:q$13 7320 8#1;1,0;30;" ";31;" " 23693\,100d -s$(60<,6):l$(12 ):""s$() "" p#1;1,0;6;0;" STOP THE TAPE ";1;"AND WAIT FOR THE COMPUTER " YC$=S$(1):M$=S$(2):t$=s$(3):l$=s$(4)+s$(5):x$="ENEMY " time=s$(6,1):bpont=s$(6,2):scr=s$(6,3):ner=s$(6,4):brid=s$(6,5):y$=l$(̯s$(6,6)) j=1546:x(j)=s$(j+6,1):y(j)=s$(j+6,2):m(j)=s$(j+6,3):t(j)=10 *s$(j+6,4):j Qj=121:b(j)=s$(j+6,5):r(j)=s$(j+6,6):j Sj=114:w(j)=s$(j+27,5):z(j)=s$(j+27,6):j D0:0:7:1::2040:1350F:blot MC=116:C,1;4;"":c Q65312 :236077\,251:23658j\,8:1120`:404 Q.1}L,-524:10 :.1}L,-60<:5:.1}L,-524: wC1,0,0,1,0,-1,-1,0 }]491,524,103g,125},104h,1,35#,36$,480,45- 5,10 ,14,15,22,23,29,30,34",4,9 ,13 ,20,21,27,28,33! 36$,37%,6,1000,39',40(,5,1000,42*,43+,4,1000,45-,47/,5,1000,491,513,4,250,535,535,4,500,546,546,7,500 +"1ST GUARDS REGIMENT","",2,7 +"2ND GUARDS REGIMENT","",2,7 %"4TH FUSILIERS","",2,7 %"5TH FUSILIERS","",2,7 )"7TH FOOT REGIMENT","",2,7 )"8TH FOOT REGIMENT","",2,7 ,"1ST CAVALRY REGIMENT","",7,2 ,"2ND CAVALRY REGIMENT","",7,2 ,"3RD CAVALRY REGIMENT","",7,2 ,"ARTILLERY'A' BATTERY","",4,2 ,"ARTILLERY'B' BATTERY","",4,2 ,"ARTILLERY'C' BATTERY","",4,2 ,"ENGINEERS DETACHMENT","",2,7 $"HEADQUARTERS","",7,2 1,5,em+1,1000,6,10 ,em,1000,11 ,15,em-1,1000,16,23,em,1000,24,30,em-1,250,31,34",em-1,500,35#,35#,em+2,500 "7,10 ,3,1 4,1,"",5,5,"",4,8,"",3,10 ,"",2,13 ,"",3,22,"",2,26,"" 1,5,"",3,1,"",3,8,"",4,7,"",1,7,"",2,3,"",7,8,"",7,11 ,"",7,25,"",7,28,"" U7,9 ,"",7,19,"",8,4,"",3,24,"" !6,1,1,4 10 ,1,"",11 ,2,"",10 ,7,"",9 ,9 ,"",10 ,10 ,"",9 ,22,"" 0,0," ",0,0," ",11 ,5,"",10 ,15,"",10 ,20,"",9 ,27,"" !4,2,6,1 a1,21,"",2,21,"",3,22,"",4,26,"" -2,29,"",5,28,"" 2,17,"",3,16,"",3,19,"",5,17,"",5,19,"",5,21,"",3,24,"" "1,14,1,1 21,31,"" /1,14,"",1,21,"",2,8,"",2,14,"",2,21,"",3,9 ,"",3,15,"",3,19,"",3,26,"",4,10 ,"",4,15,"",4,25,"",5,17,"",5,21,"" -1,12 ,"",21,31,"" 2,6,8,15,8,16,8,14,8,18,2,24,8,17,8,24,8,5,7,13 ,8,6,8,22,1,12 ,8,7,8,27 5,19,6,24,8,2,8,29,6,7,8,12 ,8,1,8,30 w1,24,7,15,7,16,7,4,7,24,7,14,7,17 D8,3,8,23,8,13 ,8,19 !1,6 #2,30,8,17,8,25,8,27,8,13 ,2,24,7,17,7,25,7,27,8,15,8,4,8,6,1,29,7,13 ,7,15 $6,10 ,6,24,8,11 ,8,19,6,29,8,2,8,29,7,29 %w3,28,6,17,6,25,6,27,7,6,6,13 ,6,15 &D8,12 ,8,18,8,5,8,26 '1,30 )2,17,8,17,8,18,7,13 ,7,22,4,19,8,16,8,19,7,20,7,12 ,8,15,8,20,1,18,8,11 ,7,15 *6,12 ,6,20,8,14,8,21,4,24,8,13 ,8,12 ,8,22 +x2,20,7,17,7,18,7,16,7,19,6,13 ,6,22 ,D8,15,8,20,8,24,8,9 -1,17 @18,23,31,34",2,15,25,30,18,23,31,34",2,15,18,23,25,30 D-2*t,v,2*t,v,8*t,v+4 E-2*t,v,2*t,v,8*t,v+4 F-2*t,v,2*t,v,8*t,v-5 G=2*t,v-5,2*t,v-5,8*t,v-5 b;10 ,11 ,-BCOL,-1,1,BREM,I$(1) c914,13 ,RCOL,1,2,RREM,K$(1) dk24,2,23,21,4,R,-1,19,249,BC,20,BL,8294f ,"`a\" eo0,1,1,3,12 ,3,1,20,250,RC,19,RED,8295g ,"ijh" fBBL,35#,BC,20,480,535,9195#,4,RED gCRED,546,RC,19,23,31,9200#,14,BL hS22,24,2,3,RED,480,535,546,"]^_","rs ","}x" iP0,0,1,1,BL,23,31,35#,"efg"," tu","}|" q"GDS REG","n" v"FUS REG","n" {"FT REG","n" "CAV REG","mp" "ART BAT","n" "ENG DET","n" " H. Q. ","n" "1ST GDS","o" "2ND GDS","o" "4TH FUS","o" "5TH FUS","o" "7TH FT ","o" "8TH FT ","o" "1ST CAV","lkq" "2ND CAV","lkq" "3RD CAV","lkq" "'A' BAT","o" "'B' BAT","o" "'C' BAT","o" "ENG DET","o" " H. Q. ","o" !4Q"AFTER YOUR BLOOD!THERE IS A LOADED PISTOL IN YOUR TENT - DO THE DECENT THING." !G5"FURIOUS!. YOU ARE TO FACE A COURT MARTIAL." ![-"NOT DISPLEASED. YOU RETAIN YOUR COMMAND." !eU"PLEASED! HE MAKES YOU A MEMBER OF THE ORDER OF THE RED HANDKERCHIEF " !o/"WELL PLEASED! HE GIVES YOU A KNIGHTHOOD." !5"ECSTATIC! HE MAKES YOU HIS COMMANDER IN CHIEF" #()7:0:23676|\,251 #-OA<36$BL=A:8300l +A:H$,I$:RED=N:8300l +N:J$,K$:9030F# #27BL=N:8300l +N:H$,I$:RED=A:8300l +A:J$,K$ #F3RCOL=(T(RED)/100d):BCOL=(T(BL)/100d) #P7BREM=T(BL)-BCOL*100d:RREM=T(RED)-RCOL*100d #ZPA=7:2110> #_!Z=01:8290b +Z #dTA,TB,TC,TD,TE,TF,Z$ #nL=1821 #sC=TATB+TCTD #xL,C;TE;7;Z$ #}C:L #CTF0L=1817+(TF/25):L,TA+TC;TE;Z$:L #8296h +Z:9800H& #Z #a18,25;J$;21,25;H$;19,25;"- ";20,25;"- " #A2;19,30;"";20,30;5;"" #BC=0:RC=0 #;A>23A<319350$:8293e :9600% #;A>480A<5359350$:8292d :9600% #BBL>15BL<24BS=13 :GSB=9450$:9158# #BS=12 :GSB=9458$ #DRED>44,RED<491RS=11 :GSR=9400$:9162# #RS=12 :GSR=9408$ #RRH=0:BH=0:L=1821:B(L)=BS-2:R(L)=RS+2:L #C=110 #L=1821 # (L,13 +C)=122zGSR # (L,11 -C)=121yGSB #BH=19500% #RH=19550N% #L #C $70:4:23676|\,255:10808: $T5L=1821:L,TA;Z$;L,TB;TC;Z$(TD):L: $R=4R$="c" $R=3R$="bd" $R=2R$="bcd" $R=1R$="bccd" $ $,.005y# =,-20:.005y# =,-28 $=L,12 +C;2;K$(2);0;" ":9410$ $$L,13 +C;2;K$(2) $(L,RS+C;8;8;1;"" $.08}# =,-502 $(L,RS+C;8;8;1;"" $(*10 +M(RED)11 BH=1 $ $,.005y# =,-20:.005y# =,-28 $=L,11 -C;0;" ";1;I$(2):9460$ $$L,11 -C;1;I$(2) $(L,BS-C;8;8;1;"" $.08}# =,-502 $(L,BS-C;8;8;1;"" %'*10 +M(BL)11 RH=1 % %!!(L,B(L))121y95244% %&1;L,B(L);I$(3) %+ 9590v% %0'BC=BC+25:20,26;BC %1L,B(L);I$(4) %2B(L)=B(L)-1 %4 BH=0 %52(T(BL)-BC)<100d8294f :9700% %: 9195# %S!(L,R(L))122z9574f% %X2;L,R(L);K$(3) %] 9590v% %b'RC=RC+25:19,26;RC %c0;L,R(L);K$(4) %dR(L)=R(L)+1 %f RH=0 %g/(T(RED)-RC)<100d8295g :9700% %l 9200# %v,.005y# =,34":.03{u\,-12 : %+GA,GB,GC,GD,GE,GF,GG,GH,GI,GJ,GK,GL,GM,O$ %L=1821 %=L,GA;GB;O$(1):1;L,GC;O$(2):10 %L,GD;O$(3) %>.02{# =,-20:.2~L,-502:.05|L,-25 % L,GD;" " % C=GDGE+(*8)+(R-GF)GG %<1;8;8;L,C;"[":.003xD,60<-C %%1;8;8;L,C;"[" %C %@<.3.05|L,0:GH,26;"DUD!":9685% %-L,C;1;1;8;8;R$ %^Z=13:.05|L,-35#:.005y# =,0:.02{# =,-27:Z:20 %Z=04-R %N(L,C+Z)=GIL,C+Z;O$(4):GJ=GJ+25:GK,26;GJ:9677% % L,C+Z;" " %$T(GL)-GJ<100dGM:9695% %Z %"20:GH,26;" ":L %CAS=GJ:9220$ %GL=BLBC=GJ %GL=REDRC=GJ %GA,GB,GC,GD,GE,GF,GH,GJ,GK %GA=GB9710% %5GC=GC+75K:GD,26;GC:CAS=GC:9715% %'T(GA)>0GK>GEGK0GH % HQ=1 %O18,GJ;"SURVIVING ";19,GJ;" TROOPS ";20,GJ;"SURRENDER " % GA<36$BC=GC:9220$ &RC=GC:9220$ &H"TA,TB,TC,TD,TE,TF,TG,TH,O$,G$,W$ &R TE>TFTE04_=fB| 8(,X<($<~~<Á8~~|<**********?8>>>& ?|4RRB48(H>04_=fB| 8(,0 000 0 0<~~<0~~ 0`||8~f<0 0`0 ~~`0 0`fff~fff~~ xflxlf```bf8ll8ff|``8lvff|lf2**2>>4 @p"B~^~zDDD9 )H"8~=e( ~^>*|T8zHHp|OC@@@@@@OII@@@@ 'O @BG@CBBB66!8%Ͱw#> > 66<@>66! ~ # > > 66>>& ?|4RRB