ZXTape! 0Created with Ramsoft MakeTZXSTARTER u L12 ,0;"ALL THE PROGRAMS ON THIS","CASSETTE ARE  N LOCKE,1984" U:"ANY UNAUTHORIZED COPYING (EXCEPTFOR PERSONAL USE) SHALL RESULT IN LEGAL ACTION"  100d 0,0 7:4  "picture" :18,7;2;6;"SIEGE ON THE VOLGA" 919,12 ;2;6;1;"LOADING" ( 0 2"STALINGRAD" hpicture @@@?   @@? f!ffff ffffffffffffff~ffff@@? f ffff ffffffffffffff~f?fff@@? Γ fffffffffffv f@?@? fΓ fffffffffffffffffffffff@ @? f ffffffffffffffffffffxfff@ @ `B@? fΓ ffffffffffffffffffBf?fff@' ~~~~~~~!~~~~~~~~~~~~~~q | A$$s w< H$G%/O_D_  ~~~~ ~f/)>~~~ 0 /O')2@/O_x_@  ~~~~H `~f?~~~ s~CD80@CW|@yw _ȟпB %D BBBB)$Ov??䔔BBB~/0 INO?E:?E;F ~~~~0Gff !#@G~~~WТV~"00 _ȟпB c'F |BBBBPL ff / 'JU?@ԓ @BBB PSp0PC /O_x0_  ~~~~P<'Bf B@|oͪҪ  so"X(H 7%/O_D_TTUUe*" } D ~/c   PRU( ""Q9 _k} /O_T_?@D D@ D<>~<~B< @ PPPP@@B@BbB@BB@BB@P@@@@BBDbBP@P@@@<|@|BR~|BB@@B@BBBR@@N@BJB@BB@N~@B~BJNB@B@BFB@$B@BB@BBDFB "$$ "$$<>~<~B<$ "$88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888GSTALINGRADhhh:53059C:8,7;6;2;"SIEGE ON THE VOLGA":10 ,10 ;1;0;"LOADING MAP":"":80P:19,0;0;"stop tape-press any key ":0 /X1=0:X2=0:X3=0:394 ,4:n=24:x=2:y=24 'r(n+2,2)=00 'r(n+2,2)=42 &1,29;n+2:4 v=112 r(n,2)=00 r(n,2)=42 x-1,y;n:4  n=n+1 r(n,2)=00 r(n,2)=42 x,y+3;n:4 #'n=n-3:x=x+1:y=y-2 %v &%r(1,2)=00 '%r(1,2)=42 (14,3;1 )58::7:0: *Gz=59980L:6:0:4::y=185:x=165 +v=114 ,%v>5y=y-1:x=x-1 -`y+40(,x:15,-12 :v=14218,107k:-8,18,3.6ffff .%v<12 y,x:16,-13 /Jy=y-16:x=x-8:v>4v<9 y=y+1:x=x+1 0v 110 ,58::227,111o:-502,-2,1:185,165:-163,-80P:-10 ,-30,2 2)115s,132:-30,30 350,14;"NORTH":6,0;"SOUTH" 401:0,28:255,125} 5'0,26:255,125} 6'0,24:255,125} 8'0,22:255,125} :U2:7:12 ,20;"EAST BANK OF":14,22;"THE VOLGA" E14,9 ;7-(r(5,2)<2)*7;"" F P8r$(26,22):r(26,3):F(8) Z,g$(11 ,10 ):g(11 ,8) c F=0 da=111 ng$(a) sg(a,6)=95_ xb=12 g(a,b) b a "29th Mot",60<,1 "94th Inf",40(,1 "24th Pz",65A,1 "71st Inf",480,1 "295th Inf",480,0 "389th Inf",40(,0 "Kg Krumpen",32 ,0 "100th Jgr",36$,2 "14th Pz",557,5 "305th Inf",40(,5 "79th Inf",40(,6 a=126 r$(a) R(A,2)=4 a ,$"Kuporosnoye","Yelshanka","Minana" .6"Leather Works","Grain Elevators","Stalingrad South" 0("Tsaritsa Gorge","Prison","Red Square" 28"Stalingrad Central","Nail Factory","Mamayev Kurgan 1" 44"Petro Chem Plant","Mamayev Kurgan 2","Rail Yards" 6"Stalingrad North","Red October Factory","Silicate Plant","Bread Factory","Barricades Settlement","Red Barricades Factory","Dzerhezinsky Settle'mt","Tractor Factory","Orlovka","Spartakovka","Rynok" @A=126 ER(A,3) JA O1,0,3,1,4,1,3,1,4,1,3,2,3,2,3,1,4,1,3,1,4,0,4,0,3,1 TA=126 YR(A,1) ^A h12 ,12 ,2,15,4,18,2,13 ,4,22,2,14,5,13 ,8,11 ,6,11 ,2,11 ,8,11 ,8,45-,11 ,15 rA=18 wF(A) |A }GS=60<:RA=5 G81Q,42*,45-,33!,12 ,36$,6,6 #N=07:A:"H"+N,A:N 00000000,01111000x,01100000`,01010000P,01001000H,00000100,00000010,00000001 tn=1: 0::2,7;2;"SIEGE ON THE VOLGA"::7:"  OMEGA GAMES/NIG LOCKE 1984":8,4;"SELECT DIFFICULTY LEVEL":10 ,6;"1. HISTORICAL":12 ,6;"2. BEGINNERS" %A$:EZ=0:A$="2"EZ=1 'TN>1F(TN)=F(TN)+F(TN-1) 4:0:7: 34,2:" GERMAN ADMINISTRATION PHASE" *8,0:" Turn ";tn , 20,0:"hit any key":0  x =1  :9 ;"SITUATION BRIEF": :"Use <1> key to change option":"and when ready"  2 x>4x=1 x=17 66,3:9 ;"VIEW DIVISIONS":2 x=27 .5;"VIEW INTELLIGENCE REPORT":2 X=37 12 ;"VIEW MAP":2 x=47 10 ;"ISSUE ORDERS" (0:="1"x=x+1:441 =13 600X  441 X 7 b"x=11000:434 lx=21100L q,X=3750:x=3:435 vX=41300  435  42* )"ENTER AREA NUMBER OR"," <0> to exit";a !a<1a>26800  Vr(a,2)=48,0;r$(a):"IS SOVIET HELD":160:750 85,0;"German units in":1;r$(a);":" b=111 c=35 g(b,c)=a4;g$(b) c b s:R(A,2)=0"GERMAN HELD":a=5a=9 a=17"Ferry crossing in German hands":502 Fr(a,2)=1A=24"Soviets are surrounded":790 r(a,2)=1"Soviets in poor positions":a=5a=9 a=17"Ferry crossing in German hands":502 8r(a,2)=2"Soviets in fortified positions" Cr(a,2)=3"Soviets in heavily fortified positions" 280:750    A:2000::7:3,0;G$(X);20;" " 5,20;" " S7,2;"STRENGTH: ";G(X,1);2;"MORALE: ";G(X,6);"%" (12 ,0;"DEPLOYMENT AREAS":  1521 :"hit any key":0: L b =1 M/:2;"AREA STATUS RESIST" VA=bb+12 jR$(A)(116); t/R(A,2)>3" SOVIET";:1170  ~0R(A,2)>0" DISPUTED";:1170 4;" GERMAN"; pR(A,3)1R(A,3)0R(A,3)2R(A,2)=428;"?":1200 6R(A,1)>3026;"HEAVY":1200 4R(A,1)>626;"AVRG":1200 5R(A,1)>026;"MINOR":1200 26;"NONE":1200 A :"HIT ANY KEY":0  #B=1B=14:1101M  7::X=1 11 ;"ORDERS PHASE" %:5;"use <1> & keys" <6,0:2 =X>5X=1 AX=17 F%9 ;"RETURN TO BRIEF":2 KX=27 P$10 ;"MOVE DIVISION":2 UX=37 Z$10 ;"ORDER ASSAULT":2 ]X=47 _'8;"SUMMARY OF ORDERS":2 cX=57 d$5;"TERMINATE ORDERS PHASE" )0:="1"X=X+1:1340< =13 1420  1340< X=1401 .X=21500:X=2:1440 .X=32200:X=3:1440 X=43000 #x=5cp=1:3700t  7:  1305 :2000  :7 .G$(X);" POSITIONS"::1521:1550 ;G(X,2)=0"1 NORTH OF STALINGRAD":1525 "1 SOUTH OF STALINGRAD" #A=35:A-1;" "; #G(X,A)<1" -":1540 R$(G(X,A));" (";g(x,a);")" A   4:"OVE TO OR EIT FROM":"TO CONTINUE" "0:="M"Ŧ="m"1600@ ="X"Ŧ="x"1700 " @=q=x:42*:x=q:"MOVE TO WHICH AREA?","ENTER NUMBER ";M J"M<1M>261600@ T 21004 Y1R(M,2)>3"SOVIET HELD":1055 ^ G(X,Z)=M h @"EXIT WHICH POSITION (1-4)";M:M>4M<11700 8M=1G(X,2)=0G(X,2)=1: #M=1G(X,2)=0: G(X,M+1)=0   IX=1:7:"SELECT A DIVISION WITH":"<1> & ":2: )4,0:X>11 X=1 *G(X,2)>TNX=X+1:2001 B=111 X=B7 !G(B,2)TNG$(B):2 B  )0:="1"X=X+1:2001 =13 2070  2001  4 Z=0 5W=35 > G(X,W)<1Z=W:W=5 HW MZ=0Z=5 R C=1::2000 AG(X,7)>07:"ALREADY ASSAULTING":1055 .7::G$(X);" ASSAULT FROM?"::2 (3,0:C>4C=1 C=17 BG(X,2)=0"NORTH OF STALINGRAD":2:2230  "SOUTH OF STALINGRAD":2 A=35 C=A-17 'G(X,A)=0" -----":2250  R$(G(X,A))  2:A #:7;"USE enter AND 1 KEYS" )0:="1"C=C+1:2211 :G(X,C+1)<1C>1G(X,7)=0: #::7;"ASSAULT WHICH AREA?" C>12400` -B=1:G(X,2)=0B=13 C=B 3,0 C>B+13 C=B /R(C,3)>2C=C+1:2275 A=BB+13 C=A7 &R(A,3)<3R$(A):2 A #:7;"USE enter AND 1 KEYS" )0:="1"C=C+1:2275 =13 2325 =13 2325  2275 "r(c,2)<12700 G(X,7)=C 3 2450 `B=G(X,C+1) a320,0;7;"USE enter AND 1 KEYS" bF2,0:B>G(X,C+1)+2B=G(X,C+1)-2 d'B>26 b=g(x,c+1)-2 e$B<1B=B+1:2405e jA=-22 kAG(X,C+1)+A>26 G(X,C+1)+A<12430~ oB=G(X,C+1)+A7 tR$(G(X,C+1)+A):2 ~A )0:="1"B=B+1:2402b ""2448 B=B+1:2402b "r(b,2)<12700 G(X,7)=B :C=3 7:20,0;"USE enter AND 1 KEYS":1,0;G$(X):"ASSAULTING ";R$(G(X,7))(21):5,0;"TACTICS":1;5,0;"_______":2 C>4C=1 C=17 ""RECONNISANCE IN FORCE":2 C=27 "SUDDEN ":2 C=37 "NORMAL":2 C=47 "MAXIMUM EFFORT":2 )0:="1"C=C+1:2451 ""2600( C=C+1:2451 (G(X,8)=C: L:7:7,0;"Veerry Intereshtink.....","But Schtoopid !!" B12 ,0;"You are firing on your own men !":1055 ,:7:"DIVISION ASSAULTING": A=111 G(A,2)>TN3050 G$(A); /G(A,7)<1" -":3050 !" ";R$(G(A,7))(21) A >"PRESS TO CANCEL AN ASSAULT OR TO CONTINUE";A$ NA$="C"A$="c""CANCEL WHICH ASSAULT","ENTER DIVISION NAME";A$:3300 ):"DIVISION TACTICS ST MRL";: A=111 G(A,2)>TN31200 G$(A); 3080 :3115+ (G(A,8)=1" RECONNISANCE"; "G(A,8)=2" SUDDEN"; "G(A,8)=3" NORMAL"; &*G(A,8)=4" MAXIMUM EFFORT"; ' +!G(A,8)<1" -"; ,.26;G(A,1);" ";G(A,6);"%"; 0A : 1055 a$<3 A=111 JA$(3)=G$(A)(3)G(A,7)=0:G(A,8)=0 A: t9"END ORDERS PHASE ? Y/N";A$:A$"Y"A$"y"1300 uM:8,4;"TROOPS ENTERING ASSAULT";9 ,10 ;" POSITIONS" vLA=126:Z=0:T=0:R(A,2)>03750 w:B=-22:A+B>26A+B<13707{ x%R(A+B,2)>1T=T+1 {B ~B=111 C=35 G(B,C)=AZ=1 C Z>0B=11 B AZ=0T>0R(A,2)=4:R(A,1)=2 A 99cG(B,6)=99c >B ?3904@:4000 @X=111 A"G(X,7)=03970 FBR(G(X,7),2)=4R(G(X,7),2)=3 ZC=35 d!G(X,C)=G(X,7)3970 nC s 21004 xG(X,Z)=G(X,7) x  P2::6:7000X:;6,4;"SOVIET OPERATION STAGE ";CP 4X1=0:R(5,2)<2X1=1 4X2=0:R(9 ,2)<2X2=1 5X3=0:R(17,2)<2X3=1 8,0;"*";  A=F(TN)/(5-CP):F=(F+A) F(TN)=(F(TN)-A) 5B=4:R(23,2)>1B=B+3 ɋA=126:"*";:R(A,1)>22A5A9 A17ƥ>.5R(A,1)=R(A,1)-2:B=B+2 A ̈́R(24,1)>25r(24,2)=4ƥ>.85YR(24,1)=R(24,1)-2:B=B+2 x1+x2+x3>2b=b-4 b=04125  A=1B "*";:R=(*26)+1  LA=1R(9 ,2)<4R(9 ,2)>0R=9 ER(R,2)>0R(R,1)=R(R,1)+1:4120  4100 A kR(17,1)<10 R(17,2)>0R(17,1)=R(17,1)+3 jR(23,1)<7R(23,2)>0R(23,1)=R(23,1)+1 ".x1=1x2=1x3=16500d hA=126:"*"; iF<24270 j"r(a,2)=04270 m"A<5X1=14270 n#A>13 X3=14270 o8A<14A>4X1=1X2=14270 r DG=0 |%R(A,2)<4DG=DG+1 <DG>0R(A,1)=R(A,1)+1:F=F-1 A F<344000 RD=(*7)+1 RD=1A=5 RD=2A=9 RD=3A=17 ;RD=7RD=4RD=5A=(*26)+1 5RD=6A=12 :X=:X>.5A=14 "R(A,2)<14300 "*"; <F=F-3:R(A,1)=R(A,1)+3:4300 0SOVIET ATTACK :A=126 DRD=(*90Z)+10 NR(A,1)26A+B<14460l bR(A+B,2)<4X=A+B lB "Y=0:X=04800 B=111 ,Y>0G(B,8)=44525 ">.5Y>04525 C=35 G(B,C)=XY=B C B Y=04800 X:"REPORT FROM ";G$(Y),"DEFENDING ";R$(X):0;"________________________________" ?Z=110 :.005y# =,1:.005y# =,2:Z %"WE ARE UNDER ATTACK !!",:80P .Z=.73333:G(Y,8)>1Z=.5 #G(Y,8)=4Z=.33( *"SOVIET TROOPS ADVANCING !!"::557 ?Z=110 :.005y# =,1:.005y# =,2:Z Ig(y,1)=0"POSITIONS OVER RUN!!":GS=GS-2:4799 K=(G(Y,1)*Z)+(GS/16):L=(R(A,1)*.33()+(RA/5):tn>1R(12 ,2)>2TN>1R(14,2)>2L=L+(RA*.5):"HEAVY INCOMING ARTILLERY FROM EAST BANK !" A=24L=L*.5 RD=(*6)+1 K>LRD=RD-1  9000(# 8"SOVIET LOSSES ARE ";:RS<3"LIGHT":4615  "HEAVY !!" R(A,1)=R(A,1)-RS %80P::RD=(*6)+1 %R(X,3)=0RD=RD-1 :R(X,3)=2R(X,3)=4RD=RD+1 @G(Y,1)=0GS=GS-5:RD=RD-2:4640  0L>KRD=RD-1:L>K*2RD=RD-1  9000(# #!"SOVIETS ENGAGING FRONT LINE !" $?Z=110 :.005y# =,1:.005y# =,2:Z %C40(:"OUR CASUALTIES ARE ";:RS<3"LIGHT":4650* & "HEAVY" *hG(Y,1)=G(Y,1)-RS:G(Y,6)=G(Y,6)-RS:G(Y,1)<1G(Y,1)=0 4 L=R(A,1):K=G(Y,1) 5a=24L=L*.5 9#RD=(*6)+1:80P :L>KRD=RD-1 H 9200# M.RS<1"ATTACK REPELLED !!":4799 R]R(X,2)+rs<4R(X,2)=R(X,2)+RS:"SOVIETS TAKE GROUND !!":4700\ W0r(x,2)=3:"SOVIETS TAKE GROUND !!" \Q15::"WE ARE COUNTER ATTACKING....":RD=(*6)+1:9200# e?Z=110 :.005y# =,1:.005y# =,2:Z f_40(:RS>0"COUNTER ATTACK SUCCESSFUL!!":R(X,2)=R(X,2)-RS:4799 p"COUNTER ATTACK FAILED" "press enter";a$ A 7:0: 4B=0:A=111 :B=B+G(A,8):A  GT=GS-B A=111 "G(A,7)<16000p :G$(A);" ASSAULTING":R$(G(A,7)):"STRENGTH:";G(A,1);15;"MORALE:";G(A,6);"%":"TACTICS:";:3080 :G(A,8)=5"SHAMBLES !" 5.5,28;" ":2.5 ,28;" " >4,0;2;"________________________________" <40(:CP=1"ASSAULT GOING IN......":5118 "ASSAULT CONTINUES......" hKS=GT:LS=RA:K=G(A,1):L=R(G(A,7),1)*.75@:G(A,7)=24L=L*.5 L=05800 :502:"TROOPS COMING UNDER ";:L>20"HEAVY "; "FIRE" ?Z=110 :.005y# =,1:.005y# =,2:Z :R(G(A,7),2)=3"FROM GOOD POSITIONS !"  1G(A,8)=1K=K*.25~:KS=0  "G(A,8)25138  bKS=KS*.3:X=:X<.1}LK=K*.1}L:G(A,8)=5:"ASSAULT FORCE AMBUSHED !!" X<.73333K=K*.75@ X>.9ffffK=K*1.1 "G(A,8)=3:5140 5G(A,8)=3K=K*.85Y:KS=KS*.6 'G(A,8)=4KS=KS*.85Y P#60<:RD=(*6)+1 ZK+KS2RD=RD-1 dPR(G(A,7),3)=2R(G(A,7),3)=4RD=RD-1 i0R(G(A,7),2)=1RD=RD+1 n%g(a,8)=1rd=rd+2   9000(# FRS<2"ASSAULT GOING WELL....","ONLY MINOR LOSSES":5400 'RS<4"SOME LOSSES":5400 "LOSSES HEAVY !!" JG(A,1)=G(A,1)-RS:G(A,1)<1G(A,1)=0 %G(A,8)=4RS=RS*2 JG(A,6)=G(A,6)-RS:G(A,6)<1G(A,6)=0 "#RD=(*6)+1:85U #BG(A,7)=24R(24,2)=1RD=RD-3 $EZ=1RD=RD-2 'KG(A,8)>2rd=rd-1:"STUKAS DIVE BOMBING !!"::40( ,J"TROOPS STORMING ENEMY POSITIONS!";:RD=(RD-((K+KS)/(L+(ra>12 )))) -?Z=110 :.005y# =,1:.005y# =,2:Z 1PR(G(A,7),3)=2R(G(A,7),3)=4RD=RD+2 20R(G(A,7),3)=0RD=RD-1 6:40(:R(G(A,7),2)>2RD=RD+1 ;0R(G(A,7),2)=1RD=RD-1 =&G(A,6)<502RD=RD+1 >&G(A,6)>94^RD=RD-1 T 9000(# hvR(G(A,7),1)=R(G(A,7),1)-RS:R(G(A,7),1)<0R(G(A,7),1)=0 r8RS<2"NO SIGNIFICANT SOVIET LOSSES":5550 w/RS<5"SOME SOVIET LOSSES!":5550 |"SOVIET LOSSES HIGH !!" ZK=G(A,1):L=R(G(A,7),1)*.75@:G(A,7)=24L=L*.5 -r(g(a,7),1)=05800 RD=(*6)+1 EZ=1RD=RD-1 K>LRD=RD-1 K>L*2RD=RD-1 K>L*3RD=RD-1 K>L*4RD=RD-1 K>L*5RD=RD-1 K>L*6RD=RD-1 ,x1+x2+x3>1ƥ>.1}Lrd=rd+1 0R(G(A,7),2)>2RD=RD+1 PR(G(A,7),3)=2R(G(A,7),3)=4RD=RD+1 &G(A,7)=24RD=RD-1  9200#  :557 DG(A,8)>1RS<1G(A,6)=G(A,6)-5 4R(G(A,7),2)=R(G(A,7),2)-RS BR(G(A,7),2)<1R(G(A,7),2)=1 6RS>1"MAJOR OBJECTIVES TAKEN !!!":5650 3RS>0"SOME OBJECTIVES TAKEN !":5650 "NO GROUND TAKEN" '40(:X=:X>.55990f f1;2;"SOVIETS COUNTER ATTACKING !!":RD=(*6)+1:L>20RD=RD-1 ?Z=110 :.005y# =,1:.005y# =,2:Z L<3RD=RD+1 ! 9200# &V502:R(G(A,7),2)=R(G(A,7),2)+RS:RS<15690: 'BR(G(A,7),2)>4R(G(A,7),2)=4 +eG(A,6)=G(A,6)-5:R(G(A,7),2)>3R(G(A,7),2)=3 0("SOVIETS RECAPTURE GROUND":5990f :"COUNTER ATTACK REPULSED !!" <z=(*502)+20:z>g(a,6)G(A,1)<5"ASSAULT BOGS DOWN !!":" TO CONTINUE";A$:A$="C":5995k ?9>.95s333r(g(a,7),2)<35810 D 5990f GR(G(A,7),2)=0:1;"AREA CLEARED OF SOVIETS !" RD=(*5)-2 >G(A,7)+RD<1G(A,7)+RD>265810 RD=05810 0R(G(A,7)+RD,2)<15890 Z:"IT IS NOW POSSIBLE TO ASSAULT ",R$(G(A,7)+RD):"DO YOU WISH TO DO SO? Y/N";A$ A$"Y"A$"y"5990f G(A,7)=G(A,7)+RD  3904@  f;" TO CANCEL ASSAULT OR TO CONTINUE";A$ k;A$="C"A$="c"G(A,7)=0:G(A,8)=0 pA q'CP=CP+1:CP<54000 uTN=69500% zA=111 :G(A,2)TNG(A,6)=(G(A,6)*1.07) /EZ=1G(A,6)=G(A,6)+5 .G(A,6)>99cG(A,6)=99c .G(A,6)<30G(A,6)=30 \G(A,2)TNG(A,1)>502G(A,1)=(G(A,1)*1.05fff):6045 9G(A,2)TNG(A,1)=(G(A,1)*1.1 ) :G(A,1)<20G(A,1)=G(A,1)+1 .G(A,1)<10 G(A,1)=10 .G(A,1)>65AG(A,1)=65A ,G(A,8)=5G(A,8)=3 "G(A,7)=06060 MR(G(A,7),1)<1G(A,7)=0:G(A,8)=0 A TN=262008 *TN=TN+1:TN>3GS=GS-3  B=0 A=126 #R(A,2)<1B=B+1 A 1RA=RA+3:B25TN<9 400 ":"THE GAME ENDS....":120x B>243,7;"THE GERMANS WIN!!!":100d:12 ,0;"PERHAPS THEY HAVE WON THE BATTLE ,BUT ......": 53,4;2;"THE SOVIETS HAVE WON !!"  570F:12 ,0;"BETTER LUCK NEXT TIME"  *"hit any key for map";a$:750:: 8@:7,0;"THE 29th Motorized Division exits now" =M:"A small group is left behind.","What do you wish this to be called?" B,:"(e.g.KG Janecke)", "Maximum 7 letters" L "KG ";a$ Q%a$>7"too long":6220L Vg$(1)="KG "+a$ `g(1,1)=10  1055 d?a=126:r(a,1)=(r(a,1)*.95s333):a m.>.3F<15TN=86900 n(x=:x<.3x=5:6530 s%x>.66(x=17:6530 x x=9 RD=(*6)-2 `:4,3;"SOVIETS ARE TRYING TO MAKE AN ASSAULT CROSSING OF THE VOLGA AT ";R$(X)  8,0:F=F-15  C=0 A=111 B=35 G(A,B)=XC=2 B A RD=RD+C:9200# 6RS<1"ASSAULT BOATS DECIMATED !!":6900 fC<1R(X,2)=4:R(X,1)=R(X,1)+7:"ASSAULT SUCCESSFUL":6900 o"ASSAULT PARTIALLY SUCCESSFUL":R(X,1)=R(X,1)+3:R(X,2)=0R(X,2)=1 100d:44000 XH&S b%25,140:5,5 l6,11 ,*1.3&fff v(36$,148:10 ,-10 %33!,146:4,4  #( 9100# #2S=-78 #<RS #FRDSS=8 #PS #Z #5,4,4,4,3,3,3,3,2,2,2,1,1,0,0,0,0 # 9300T$ #S=-47 $RS $RDSS=7 $S $" $Ta2,1,1,1,1,1,0,0,0,0,0,0 %K:"22 strength points of combat engineers are available.","You may:" %&A5,2;"1. Spread them evenly amongst your units" %038,2;"2. Assign them to ";g$(1) %:"ENTER 1 OR 2 ";A %D=A=2G(1,1)=G(1,1)+22: %N:A=111 :G(A,1)=G(A,1)+2:A %X \st map DT4{(  /( (R/((B<|B<<<@0<<`<~ @0<<`<< ?0<`< @`<`< ?<BBB,JJH?,<FBDB`0@~@B0@@@B/0@b@B?pB@`BBBBB`~ `@ BB<~>P><><<<<BPLL>>?P>~>< 00pA`J `CJ` R00(0(0 ?@ ( ((`<` < <` <`< E~<0~~<<|,R1HJ <@ @?@~B~JHB@J ,R ?B@BB@N~,, b BB0B0~ @@ 2B @BBBBFDB@0BB@$B@BBL><><<>>LP<<P2```L@~<~B<|BBB<@L<@P2>B~<~