From e2c85c98c253a857be33fc4423d75d4b944bc30f Mon Sep 17 00:00:00 2001
From: pkali <pawel.kalinowski@gmail.com>
Date: Sun, 12 Jun 2022 00:39:19 -0400
Subject: [PATCH] inventory offensive weapons selection  #26

---
 constants.asm   |  42 +++++++++++++++++++++---------------------
 definitions.asm |  32 ++++++++++++++++----------------
 scorch.asm      |  19 ++++++++++++-------
 scorch.xex      | Bin 39013 -> 39025 bytes
 textproc.asm    |  22 +++++++++++++++-------
 5 files changed, 64 insertions(+), 51 deletions(-)

diff --git a/constants.asm b/constants.asm
index dedfab1..a840891 100644
--- a/constants.asm
+++ b/constants.asm
@@ -595,6 +595,7 @@ WeaponPriceH ; weapons prices (tables with prices of weapons)
   .by >price______________45
   .by >price______________46
   .by >price______________47
+  .by >price_White_Flag_____
   .by >price_Heat_Guidance__
   .by >price_Bal_Guidance___
   .by >price_Horz_Guidance__
@@ -610,7 +611,6 @@ WeaponPriceH ; weapons prices (tables with prices of weapons)
   .by >price_Auto_Defense___
   .by >price_Fuel_Tank______
   .by >price_Contact_Trigger
-  .by >price_White_Flag_____
 
 WeaponPriceL
   .by <price_Baby_Missile___
@@ -661,6 +661,7 @@ WeaponPriceL
   .by <price______________45
   .by <price______________46
   .by <price______________47
+  .by <price_White_Flag_____
   .by <price_Heat_Guidance__
   .by <price_Bal_Guidance___
   .by <price_Horz_Guidance__
@@ -676,7 +677,6 @@ WeaponPriceL
   .by <price_Auto_Defense___
   .by <price_Fuel_Tank______
   .by <price_Contact_Trigger
-  .by <price_White_Flag_____
 
 ;-------------------------------------------------
 ; how many units (bulletd) of a given weapon we get for a given price
@@ -733,6 +733,7 @@ WeaponUnits
   .by 0  ;_____________45
   .by 0  ;_____________46
   .by 0  ;_____________47
+  .by 1  ;White_Flag___48
   .by 6  ;Heat_Guidance__
   .by 2  ;Bal_Guidance___
   .by 5  ;Horz_Guidance__
@@ -748,7 +749,6 @@ WeaponUnits
   .by 1  ;Auto_Defense___
   .by 10 ;Fuel_Tank______
   .by 25 ;Contact_Trigger
-  .by 1  ;_____________63
 
 PurchaseMeTable ;weapons good to be purchased by the robot 
                 ;the comment is an index in the tables
@@ -811,8 +811,8 @@ WeaponSymbols
     .by $58,$59,$5a,$5b,$60,$7b,$7c,$7d
     .by $20,$00,$00,$00,$00,$00,$00,$00
     .by $00,$00,$00,$00,$00,$00,$00,$00
-    .by $02,$03,$06,$1d,$0a,$1b,$1c,$1e
-    .by $3b,$3c,$3d,$3e,$3f,$5e,$5f,$00
+    .by $00,$02,$03,$06,$1d,$0a,$1b,$1c  ; defensives
+    .by $1e,$3b,$3c,$3d,$3e,$3f,$5e,$5f
 
 ; Names of weapons (16 chars long)
 NamesOfWeapons ;the comment is an index in the tables
@@ -865,22 +865,22 @@ NamesOfWeapons ;the comment is an index in the tables
     dta d"----------------" ; 46
     dta d"                " ; 47 ; special (no weapon) name to simplify display
 
-    dta d"Heat Guidance   " ; 48 ($30)
-    dta d"Bal Guidance    " ; 49
-    dta d"Horz Guidance   " ; 50
-    dta d"Vert Guidance   " ; 51
-    dta d"Lazy Boy        " ; 52
-    dta d"Parachute       " ; 53	- no energy
-    dta d"Battery         " ; 54
-    dta d"Mag Deflector   " ; 55	- witch shield and energy	
-    dta d"Shield          " ; 56	- shield for one shot - no energy
-    dta d"Force Shield    " ; 57	- shield with energy and parachute 
-    dta d"Heavy Shield    " ; 58	- shield with energy
-    dta d"Super Mag       " ; 59
-    dta d"Auto Defense    " ; 60	- witch shield and energy
-    dta d"Fuel Tank       " ; 61
-    dta d"Contact Trigger " ; 62
-    dta d"White Flag      " ; 63
+    dta d"White Flag      " ; 48 ($30)                                        
+    dta d"Heat Guidance   " ; 49                                              
+    dta d"Bal Guidance    " ; 50                                              
+    dta d"Horz Guidance   " ; 51                                              
+    dta d"Vert Guidance   " ; 52                                              
+    dta d"Lazy Boy        " ; 53    - no energy                               
+    dta d"Parachute       " ; 54                                              
+    dta d"Battery         " ; 55    - witch shield and energy                 
+    dta d"Mag Deflector   " ; 56    - shield for one shot - no energy         
+    dta d"Shield          " ; 57    - shield with energy and parachute        
+    dta d"Force Shield    " ; 58    - shield with energy                      
+    dta d"Heavy Shield    " ; 59                                              
+    dta d"Super Mag       " ; 60    - witch shield and energy                 
+    dta d"Auto Defense    " ; 61                                              
+    dta d"Fuel Tank       " ; 62                                              
+    dta d"Contact Trigger " ; 63
 weaponsOfDeath
 	dta 1,2,3,7,15,16,17,18,19,20,21,22,23,24,25,26,27
 weaponsOfDeathEnd
diff --git a/definitions.asm b/definitions.asm
index abbcf85..69611e6 100644
--- a/definitions.asm
+++ b/definitions.asm
@@ -59,22 +59,22 @@ price______________44 = 0
 price______________45 = 0
 price______________46 = 0
 price______________47 = 0   
-price_Heat_Guidance__ = $ffff    ;_48_($30)
-price_Bal_Guidance___ = $ffff    ;_49
-price_Horz_Guidance__ = $ffff    ;_50
-price_Vert_Guidance__ = $ffff    ;_51
-price_Lazy_Boy_______ = $ffff    ;_52
-price_Parachute______ =    80    ;_53
-price_Battery________ = $ffff    ;_54
-price_Mag_Deflector__ =   120    ;_55
-price_Shield_________ =    50    ;_56
-price_Force_Shield___ =   210    ;_57
-price_Heavy_Shield___ = $ffff    ;_58
-price_Super_Mag______ =   160    ;_59
-price_Auto_Defense___ =   300    ;_60
-price_Fuel_Tank______ = $ffff    ;_61
-price_Contact_Trigger = $ffff    ;_62
-price_White_Flag_____ = $0       ;_63
+price_White_Flag_____ = $0        ;_48_($30)
+price_Heat_Guidance__ = $ffff     ;_49            
+price_Bal_Guidance___ = $ffff     ;_50            
+price_Horz_Guidance__ = $ffff     ;_51            
+price_Vert_Guidance__ = $ffff     ;_52            
+price_Lazy_Boy_______ = $ffff     ;_53            
+price_Parachute______ =    80     ;_54            
+price_Battery________ = $ffff     ;_55            
+price_Mag_Deflector__ =   120     ;_56            
+price_Shield_________ =    50     ;_57            
+price_Force_Shield___ =   210     ;_58            
+price_Heavy_Shield___ = $ffff     ;_59            
+price_Super_Mag______ =   160     ;_60            
+price_Auto_Defense___ =   300     ;_61            
+price_Fuel_Tank______ = $ffff     ;_62            
+price_Contact_Trigger = $ffff     ;_63
 ;--------------------------------
 ; names of RMT instruments (sfx)
 ;--------------------------------
diff --git a/scorch.asm b/scorch.asm
index e2579ba..7b74817 100644
--- a/scorch.asm
+++ b/scorch.asm
@@ -774,21 +774,26 @@ PMoutofScreen .proc
 ;--------------------------------------------------
 .proc WeaponCleanup;
 ; cleaning of the weapon possesion tables
-; (99 of Baby Missles, all other weapons=0)
+; 99 of Baby Missles(index==0), all other weapons=0)
 ;--------------------------------------------------
-    ldx #$3f
-    lda #$0
-@
-      sta TanksWeapon1,x
+    ldx #$3f  ; TODO: maxweapons
+@    lda #$0
+      cpx #48  ; White Flag
+      bne @+
+       lda #99     
+@     sta TanksWeapon1,x
       sta TanksWeapon2,x
       sta TanksWeapon3,x
       sta TanksWeapon4,x
       sta TanksWeapon5,x
       sta TanksWeapon6,x
       dex
-      sne:lda #99
-    bpl @-
+      beq setBmissile
+    bpl @-1
     rts
+setBmissile
+    lda #99
+    bne @-
 .endp
 
 ;--------------------------------------------------
diff --git a/scorch.xex b/scorch.xex
index f83cfe3a9a332896cbbad1c9a28e515faf3241bc..ae2136c7abe4e4f04759a3700410b5fe2fef4e65 100644
GIT binary patch
delta 13541
zcmb7r3t$vQ(*Hj4hLGjyf`*KoaOU73-XW|g0hC984d@By9iS`+2vG@wBIpq}j~!mg
zglvY#bmOjTU_vIBi5v0spYL-&Uk7FbiK8dp=@~^dF#!@+MFBna`}NEw;pP4P0%WGE
ztE#K3tE;QJhSs3vi=ZXAe!ThVLywGaG_UyOOwQ_3tNhy6T-QqW?BpJtRog5zDieLv
ziL%^hB8|4MxSh)slVEyB9cM}Zw=mAa?VQ1dZs&&G!6^P)G4aLR%~^_BSVOq#^}xil
zZ3g$!1B_89AU-o;l)E^KHHNoKnI|QC=mROQUGjY(h2E9&PD;La*-J~8RK{ru=xaGE
zl?`#=<@>Wyr0=^JlC$D=#RMw6Hrk$7k4q7&vte3SIn{+z1`Can^YdwnsoGcNZ$B|o
zJ6{nCd<=9_a{IulOTvV{m3;BUmrRs)-)N#(eK!&1K3^J9%)XI?3(WFO#Dp7}_~q-k
zZ`W}*JjOl!1XuN_J~6(;6)<_S^=ZYEh`FKBcJ38R&>jV7F^#tKE>-c{^9B;%K;lx5
zN=;8oWj4j+7LH2FFbK#EdcgV6jLMSGn-X7K9r{+%tj@IQ&|M}C4bBseSV93QlE$5Q
zg8P0J_sBz>Iaf`5JA9p%$gRqOwj*Yjv-%FMIg6Wpx6$l6DsitZ1!`sShu=zE`a*R9
zi7bRhL@Ml}+^1OwiqUYl__<qG*UTYWTxGH3%Or9!f3SPS<byoJSwqxaG-BljZ_qp0
zs=mLltynH@YL>LK3`u9DbE=4i=uo6Emjn_Nll_6*xunc$&q>;*on`M(tBT*Fq0D!c
zAwr{D(sh(fBC#Q8ZXk@Rtwb(ioMT`=CC*`YU`<L7`k|*@1$HTZB@Rkclim(bD7z3|
zAN*RV^w%8pLvmw62mO#$^b~XJACX1An01+quG)isduSoaiQ)4@i-|kO#1}Y1%ScBI
zUx)#VgolZ+ju=W(rV6<*0AVe`K<R1W{=suq^~u}0@3IV=I(|n<90{G3>}%o(>?qVF
z<(Obh&_GihDU0olBQ^^R?OSO_R%Nk0)Gjf+b}4j{;hmILSG!8waU@_0nMe;ol0%In
z-<wDk2u;M*y<U7#Wih1IW#$VYFQhd?5a-c5AY0R2BzRuPCcvIYg!x3cll03bW9MDv
zH=Bt$a=k+_b!HPG+YXve(9B~`5YA`MJHbHw!=&roCo(h(wuYbjKBT_k`+WE9^ZEDr
zKHS$BvD!X%Da*A_6;qYcz<U*mFPFUDHm_!BE0@c|el14!hCkF!L!w5%5+fY-D?bW6
z6&_>y%%q%orec9nD}9AGEJ}uO)>09p*n9~TzpU7{z5!JE(PvH;znGNaPRSEqv8c8@
z;Z=*;KTmkgq7KLtUbm<N^BA#7h<OM5*$ks=w0&D)+JOz$ej-jgkAdI;BEr1=7`joa
zFa?5&i8ECM92K*aIBv<Ot}H3*!1MLj=GBbLJ9X-maE(@C*V>+6UA1~@mXP!g1hi`q
zPz>DKZ&9O^(J!g0!UPT}6*@o8S^>=J)y}1#vO(XJ*r4ZJ6(*+Pco=Z-8vuJ7Tf7In
z@4YESI=9)*x1(nZv?Y6+n#F|M(%fPH;ays++TcGd2HVu5MynC6vVY1VypX&LUMO@E
zX&H%)8X8Sn(nzo`p6CJ;eJ<|R^{|kM#GbQ=_o|cG^RPF<m8JYJk!UBC41ODTdcE`e
zSszX$w!bT5yPJ>~vbzo8D@-Byr=g_%4BOajV{R$0Fl`Y-LrKdp61l!CjrWFzF$~%3
z8%CI`@`f}ClR;aP+Qjxx%eA*<QEPO;6R9b0hkuL=3ZIME;HuK6z*(hMm`iao3{f{(
z(o@1Ik+`b*;oG%%)$OrpZz+8%?4^y8PRj6IQ7rA8>aj$=)Y)mLUA>zUORsNM%sZ1L
zRfpndXNBTsXSuRwFP@z{yI}UN*}tFjyE&<IXU(29`!D!iGxx>0ug!fm`<?8jx&NBm
zG1ux$b>5o2FnevbdwcfYY&rY0>_gcM`9ii!iG|5@?V?H_p^S33FLjQX-vjF33yO(i
z4ZRYS)(h(96(!_G%<pxWaxo4__r)jV;0-uaR`bR4E|A>wMBPn=a|CACC^^*6Nk^>k
zISE>uBZPbY9_G<qN(vij^io|su+|y=ANjd2VrWy6FJg#!yPyU`AL<z*45ex(5r)yI
zFxOHwLOM*sb(AS<ut9m{1TU2bJF_<;z)Tf)tYD{rrc&$|;XLyZ7nskTlb%*)nf)VE
zfJrz_gf5~ErNSAa4x>URQLm*?hI$<pB8GyX5-b(dO0upEWAR4JZ?;qI8E{CYY%WT4
zW#E-??2ef4kn?Zs_ywOIv>Yh_c{kWD=jY7i^UEx47eU2_DWlvvm0d1GcOklq<f5<%
z{;n|G5KQQ%)(;4mJ{+?k=cGHk^%H$%LPTG??P;ivlge}mgByCMG6(`f><YqYlZ8B{
zm(9fObU3flWkuK3d*Y2AIbYaB<O1PwA{Poz5V=VBGpXH7<b2<g0Q<H8>?;M>w+D{2
zgX6N925?F;4XAl=D3+uoCY$^Ar6AjpZq^1lLQmr01bt`=i~ua0&pPdZ<wRjP=C<f(
z=hh4^J>H&IN-#ob4*`4+36+v?Ls_iy24K$9&h&WR>j13PYv6z%6J#&O0!JKtTL=!m
zQo_3n!GSN@kp&S~S2x;DHs=w@mtl1lIt{fmryFO_nXsmU@Z02quo<h9AD$Ha*tva^
zGJq*H;c}%i&0X2kt<y_--1<ty8cJm=(>J<eXXdlkkV{(KUcl&^9PNAWE~P)jVCdZl
zZ}oz@u>iW33HyT(VD|qEaX$Pz_&WDQQpF;e$JGMfgAfK049_B%3u+<1MKN`l_^rSW
zOIYtc6zjd0V!b7b^(IvI2$agau#d`Hgr}&yRq#=qbFk<kxgg4<>K@AHt9vP5ph}c4
zR0-vaR7!b|x{va_`V{52xK$s;5ZzSlIR6<`mlFNVp)Mtgj^w^VK(1vYgkM0o?f0?G
z9~)S~^_}6uW~m`8*7(E2T{Q%M)f&=NM$100FqLM~_R<<+^hCj50zZ=~`OsW6Y>)gI
zTDIp{buHVOnxSP!$7l;vGrtuEI3#y<wfYyL-K|zL*1@@I8Fh44gUFnelvEX(F7}^3
z)O}(;=bZ712@!PP83^^X{upTu0r}gHtgco}$ftH7VOcugFkU5zt$DBPZH0)biXf_t
zmm@_-3VUXvAp~P)gt=cdQDZuqF&!5-`YyZD4@hh?59fEw1vyXgdjh7q-NHuk)#<<e
z%_T6t&{Gtd+q98HEM?Oj!bZ|z<_k-@6|3FE4cMqYCXSl%tGU0w6XvBdcT&sT$+OIz
z1YxCoK3|}`VT95QTgA>*Yq4|HXA!chL2O*+W7&zwj+TH)87}UdF>F#Bu_dS`nrIeG
zi2M*Hg6T#g?+HJJy}LU+JTgSyjp^?>vb%0K<kL(+gnTTT94>x7<GLmHMYuNfx9#cf
z?XNyYZ1FJC$A}iIGh~27#cW?=Vo@jytTU<ele?6GhPpH9RVQQ?_Crnf0X6$|KW2_3
zmK-3kx0(Z@cjiF%e$s`G{X{rG<{cmoOt<rZF=K4Qg61-uJ6BVI3uF12@}4HDpW#0Z
z4Y8%Va*@atFuu@OpotD4!B`=z$>>=b=EuY(v(lFJENI<szA$1rQYaUCcSBd$2w!hh
z14OenKSP=WM16+f*op-t4AXQz@jDlM%jFTK9$Ol5rjc|a%oHPYt`WbQHOy@!o*%iw
z$=X1uxIyAxVAlavewG<muMd|Zh0R_N-ib%Sf^ZEU{T3n&>=&69PC>)9ARLE>e?d4N
zkHZVX*W+>H!tfY8PAzb5y}LU~jAv1z^B;F34Ae2uRayK)nj2I3VI=d6jnbupmsy>&
z?>6FMLv}PVxisv{Bt*<*$3W&BwLqstc8nN0jf8*Hl0O^?E5wEz$>M6zL=hb5?$8Mt
zUm#`ti*>rq7#QRe3BqoW$48^;@PP=!Qx@UMfIST~gyBE~k`alA7aK@&6zLkB*AJNl
zp=>w<CTl`2j(4tQY2+k=X)wZ2nZy>WjEnZT(RIe?a^b`aPY7N>5{$?)ngi=$ahTIm
zFbz1ic*IqRs<ghC4PHYdSqoj?GPy2_u#}+?rRE%o9x;fv^fLzWR`ifT%*9R_!5u;B
zYDY{6zv4wu2**;62=y&*FcE>6ZgDR3!n!-z{{Niq{|NR!Ol1M~A9G3={&^z&l?X2o
zNIRW`Z;r%-Z_%t>di&yZ7akQ(B|#WPxr|K_t0QQ(FCROcw&i2f7c`HeT1V}08dCFx
zLqr=4UJD806RR`#9u)%|B3*wa>I)1sEMQg-;U&_)vKa1|y~k;>#`_B-(E>?ySi}m+
z)EC6lbJE-kiIxH#Xi2Om2J4o4kA8!Yfb2&<ep$xLVhnG1s)1zDk)Q&Exv#F*M~+-u
zS*(obx9LYn0$<ph%yS4z*d<G4@w`K%ED;EptZx}%t^OFuP0(Cutb%W`0d|1ABML>J
zwD{)@qy80J#`*0+L#D7*o1lvrRlRO>xZAs2NH-=4@6;nDsEv~<U@}ask7jNtIYF?(
z!q)^#EPO+-?!uP@3om>{kg$c>N`FFxPl?b<u=?zj;0yVpe&@;93#9fODcwzNgB?3M
zWLzaIYV}q#dt^relgW)|NO@BDfvB+H?}&PV2>)i5`#q^h$o+woU1wLnBWu9^6Qcf`
ztid3k67_qs21B)yvEPxg|0ZL<Cym<QLDNQ56OC}V<k0c))Y0+OvGHspKmz7xL}({M
z2T|OM9G&M#_0JFiB%kRbfUsQ`p@VU_OoUT7C%Q-{aFEV?PC9{uEG9xaPZ1<C4z-<h
zI(7OEmRNNVw|a`boFcZqhQ68CtX*tZPwR6%&6LgNinOSctbzEQ#IAlq*5G;v3i*_*
z!SxOl(n{9gey5eFZDb8Dc%X<c+1~t$?ai;*-uwo8lkHaz+pj#^uUpuD-Ree|bMbm!
zvd*bgOHeb}?O-QMytLndL_bzOC*g2eELye+jOpc0Kn0-{0fO`NAJj_LeUQmf#pF;}
zj4)uM+#O%I|E~c?%?T2T-v*0x-o6+MiKG&OS)HFPvaw&)jm**97I`8(QQM&J;~1eb
z>f;U)-8qd(dfRq`19Ei?K$jco_CYe{AhAuh1D10GU}e^>gT&dgNCz+^9e_zRO*3n8
zz-pRm4))VoFm#;*pwW4{lph_PdR}kj`1&r?<3VouqbwwZH$YT~`#+ZSy1Uqt!Zg5u
zE%HIubU;`7T>#Vt<3Iw;PI%|*_rOGc(!Xa?BZ-Fd03&Q`FoL^*`C-TiVNM@wg}j0d
z1BY(X2XcSTQVYXI^`QbQFjy)ZtRe<R=zEb_pzkF{;(L|A^n6E{-T96(qw{IZ;(W(3
zgztUibIo>i<*X2nu}+Ne7VF0IT}<gy(y>BlVjURgZPtP3KirTCBn?7yl;rPGl7AW`
z4Z@pIl6Rsc?=hbfy}4DQmqZmmmVQLKJ|gNzBpl1!itrJs{fKC{{C_v2`;y(*y%}Ne
zq4!C|>Kt;PJ@g{UJIeGBdWqy|OckM5N#1d$ji0p>A<V}_ILVv<V%B`TW%R`^)3f8L
zg8L+6hXW=S?88&bVuA57QGqm2iy!kbaBaWE!!{P?{q4P%hTyClRR-p3L5w8&Rp!bE
zZFJtdq_>Tsx{u~)76rwyJu}G;q#QSnchIrpJzxSZ4)_sQBL-X0K_mAr!QV^eF!~TK
z=!7g_&?R9!>%0z@Wq69XC9^?)C7l~UGi;|KhABK2rIZXdMvs5^N%sJ5824)N_r=$5
zS1EU((qRNCxDbse?#Nu0wPj<!94^2jEF_2XgARL6LKPr6CcrFz%P;#SHqzn3GOi=$
zaA9y*d+7qw2nj1$kbjU#Sj93Vg}C&))oPc)ECI|MpvVul+jDG}@cW0sPwR+rgJI)O
zGrZE&^=mJ?oWG`w3Xej7HC`%gAnFF)hSWz%cuHB4G6h}O#v6!3&hG@`dLVWJ@e!gv
zqDR4iu*O>AZh8cl&T1}cT2IRQssQIQ999)sN18UUzK2QEqqvX;Z`{aYAXHFTHi7W9
zd8sf5m(vJU6OjSOVyV5)xvJ2&GLL^Q^k5!;sO~wJnx=*0BK>NcB(={wO?}>peAlRb
z?NV+LGAzn?LEN|?**y_=_OFzfETv|P(C-~=m}3(6v5Q0XP_KO<p%~D0Oj3_YNG94)
z8#*RAN4vuPwB+VvlI^&T&j4{+|Jq~HhkK>aUdi@9KkU`9;<bSQq5&X$!$EX2+`gLC
zxyyyOn!Qq1LqkckR3o8^P@j>9Qe*wid8jt(i-~+(s-Ki6I7tna>ZjxhcafTXQvLKi
z!7tT3CDqT)6PlzNpHx3DPk36KyD&3uuauOOw^!V`aD@4o_}s#IH#8uRVD-H?Zrx^Q
z%`)Us#<aSNY#+M<H;Om>{wB9x350F(sF4U;Xq8-ydxq-JDv9JzYj1cZK|8A$nFNZY
z!VZe+sZdOn-F#4)#@BKFRmw=-qfF#^T!9qQ(jvOW8@ktndCpvZpm<D!lrgv-_12am
zEv_Eb)>KcB^#ljjv&E{%VkI6r;H`U(;fpQ5PjfeU0x@2XUH0T$!v|$P$Hdox9meIp
zSyky}@N0YEsSF-!DS|wZL-xWX0AM)gZXBHo`@cM3jq{Ew-)6gDm%Tah=q}IU`MN+{
zUC`@kcx8xo?hH@0LF(u&R7+F~so<f`5zEyg_OjzdMzBv!AtiHYS0TD<iYQr6yNblh
zdxodn@+Z|po3_%RRoF_^LNWOd*NLCslWH!)+b!+}$u>kc+JNc3IW!XA@XC$aHvv<L
zhjQsFqn2iMHfQMxs<;C7VTOgFz>yM}r01?Luh28umse=b>J}PFZuU@HD%J_&on6iv
z?9}nli(~+tVGiyB)D6*!sFneVw_!|lF(`nTMm%Q3fa+Fi&q-<W&|sniT^%WyhrwgE
z8RnoRD<g&E@ybM@-+1TqE0n{maT^-?xCSm;<v(IjsK!I<=TPTASFo4$^sdU{s)&PC
z*Ds`cVBxTx3oS)3^7>TI(3T>8H`}sawq?uhb>7GC^?1GE6=gBXa<8{UH%G|a=T8RH
z%3|cGF46nP;r%eZ4COGa?lzvU^@yQAjx&42&OZ(}Zx#D4;;!3DBQX`n0~1OU$Co6H
z$6{89fhmrT{uzl)Tg9wJzi{7p*~VwZaeWtX<L);K-QAnyGZ(7!`aTl2<9crgRnlSi
zQ(^bttl}P7Rlzd*@l#PFG&T*&uB)U-A{jqb-#A|?`FJhaMtgip#mJVi+ug>2lN!2v
zd+j!=S<<I~N4t`b-zO3x@04z%&PVUpUBzvy!eb)84#!8*;man$C}zVrmW9V_&w?;w
zZq#WY!p&2C6Q&w;UE8U;orV+jaAZ4$kYLuV17Rx(m<H$8VZg#YB--J`vP3i-9f_>7
zyU)?V`fRMnp3~b?Sqy+LAO%c2n3qt;Pfd46QtH{mw@NZ*?Fy+y-Ho%XATPNp5<+*g
zm0p6C4p<Y<Y!^>29^u|W#}?CHg_Fu+JCeF~&_=DZIy7!IDWThJAE_m@Y20dUggR-p
zP(oEfZw+ECfvTl?D~`2FX~0@vLcKwhKwSYdTakV{E@2w!VR|ykR3|K<F#&UZiCDH|
zP(R!Xc<Ygome*GLLmR~BmW)W<ASNZ*S9*C-F|91;cgef-Y+OXFGzb`9EEzl?;FrsV
zXBa-NWtmqQF52%+b65C7-g05TKV%h!1MCX{*{|;R<2K`fpD(YG{VX=&gb)0x?8gXe
z0)9SUF|B#Vk5r|?&lhr4k9Wy_Lyjiduf2}@%#t_#HE;UWCdQ>1T<W|if{tZ8G*GK=
zG1|95i?g@I?FR=tI&xwJ&5sn~Eq~XWe&@&>+z;~4$OU|bT*x0lN$I#>J?<CY_H#2H
z!iyc~$NkDtp~<i03C(`QgBlb5t!^wXrw1!aH})Zzb$GNEk6}@Oh2q&Y-ObHeij|l3
z0hl~~<^7+*Q+(jQ4EI$fdg*6Scgr~Tq28f?&Zzz)vi9zg{SmA4h6m&WZoW`{hR>HP
z_yU(=V>d~<_|u`6=!`GYlv+-k{8HrCIB%5K;1VR=B`EbwTIuTgi;Pgz|1cSL_jg>n
zT**s}#j!vL#s43uuS)0WV05hVQ2MT4S;g;$n0sp9^|K;-aSsJPK(P8MCE3l+{i?d%
z=~LR#Y&emieRZI?ejs5}G_fQ9+2}lR<PQ^`l@zORNJ8B3yrfkAhiUhWgBNCQOCD-|
z*N<G}xZe=Zx#vNn=K<K<71rnEa+Gyf2k*QpxU%@AOj6(E5e7`t4_+fCPzFWA6$BB8
zA<LHy8k5X>^%$T$kW%L**Gz-|fP1`unvy7NoQ8B>OTw)0pN57qPBbqY=)RO-6(hh`
zIZQhlJ<LJ!n`y#trwQYy2{$tVrjtl2BK?S+;U%C``E4(9qJe|l8ez;x!gTD6_WGHe
z6G_Ikid&e5&&-6(Dbtiij_+};x`S5L&wG;JrVVj)$a?FmJboK4voaYTkf-#Fpk~9d
zsq^62)H}ugf4b#X2=S-h-g3&Mx~B&KSJNB(#YclbR@JB`!e2!GPjhF<2<;17xA0YR
zQR`M-ah9+O9|LY_Ed+3DYZ0%=1&4W796jtQv#T<@|6~aHtsY*M3tD-;(isx3S^f+2
zS@G88!v+E&1_-hoTNzsws~`@XC9YmR-+kX&yIixfmamc3mCy1j7^TN(1Lb{KH6(bl
zpBLq)`CZO!YXK4g+69mopmK(3)@*iJT!|D^-nA0dMrX}hhfG>Uv}x-uzKG#i7>;-4
zUhMetl@edz)PS?M)r+>&TJGix#)KtXQdc#udAe9R?#_9*UrNR`kQJpGmdV~K7iCN|
z%7fZCq(&?Q)k|SWY30JVyk*0BlQlgdMZQ*|7`H*r-#iR1ZToQ3{FMCE;R@($-{EKA
zh$gO;nM9J4FOZq|5S|rwu2vP>$(Nxn2VZXDee5L=hd*+F-yavS%llDc+%NkM2ZH0d
zPek)dySw4xBL^IEpd*0~$on0wzK$6CN+3JE4|AV9e6@tuWe0TSP8=|`NJ(+TJWEy{
z;0uL1f|45mMZ$BeYUKdD6>tDM0MsEWX*K8oDPZcVBQ9V($8O<THtKv2T*7zfPw)l&
zGQI{~FW(-v;`x<pajouKOmNTLXgdqToJEB!=DTK7_&`>`kFPq0Z>YYk$L)J3&U>xh
zuFj%)mHEIV3)y{J7FDw-SxmY>GMk>kCrgKokFV0~dEm`(eprm61#Zey&<a{VTujhN
z{{amoZf;5YyGyV1vV>k6YGmXC@Dao^f?~-GCd@P{+)f*9EiQaigAbvKarNC+Tv^P<
zI*adCSdJS{*lFrBY0d{8VNM{~*!gVRJ3H26*H_iEEf36#%NaQTW7z_17av&li@1(F
zl$g6jan%i(xSDiC283^k^b1dlB;lGeDLgTP3tz7F5f}d9e$b^1;P>kpGro{C^ZRk~
zvDyKrt*@}K(p*X-5@4gA&;xS<c4WUMyDk?3GJqZh{59As&6yN?zr$*L3ZumFNYXZT
zSDlY|wJ($y1`?lKZBNIB&`U1>e`SC-8inc}aHoO~I)MH1YVLQvY>aMZco-?!7zr%{
z94&RXY=j?UB?4tQ+}%@roh~A3*1>Q?BwoKNS}NX@b3HDm^lsLpL%}DAU0P>wle<6s
zn5wm~)Braau;aD30JGzjc>pxn4V2zo${%D+A76#Bab3pBOnsPh@E-JfojDuYP)7|n
zXzdq)#J6$=yVs$<Eax{pOv+x2{PkxKVHV63Vjm2@5gb=yM$~Th9z;Buu}S0f$)Z$?
zZZBV0=Vg7~61{q>mtBl+EZYuZqE&7AZdU)23z~YxP$CCaGcMPi#T#^1(XR@0g*sTB
zFd=x}o`WqeOlKy3hyKacH1<2)3TtOivoKSCrc}4Lx0lYKT;Y1dX9jhjStl0;Ox~b6
zlSW45IMh36C-w>WOsAc<Q*gygI3xH=+%e3g&d_6aV65rJSkr?cmBr#~z?t~S<nrZ;
zBs9;UTCsD=V^KTM2N$y+y#9KGNBCZd`Hb`Ua<SAxLkW}@LRQL`h6d28P_nr5!4d8c
zP(0v0askiFp7eNO3Z2Q{@3}wv?|`S)LM41)T3Hy1aq}LKH@SJ9FRh(IQOVGf>pa3W
zG<8qD*W>hW)EkriXn;z+hWe7JEZ{p;xfI{2R>ag;=ot%*42Kx+B~Wb$Bzezjqgp>m
z^WFf8Z#9!CNfxI*^eguie0(#Le_+m>s_4M_u+c#i>OA_0t~!rC7)t;yp1@C#0((#X
zy?gSRo{E$PM{A)lm6iFOn>Ixmu?v<Pc~6-orj2i&Dt10}-H=uMc6mq6E`CQKzHa;M
zAIVsJa6u-BX={eKhr=SsD5P{>TsHot3X}^S9r4w=_PQq#Sut-o%^gMOrP179(s>-s
zy^+qlp5~_0c_V1<ujssA(A?2<-VHQ&44pTU=Kh*Ga>vr#2{d;c&7DYdGia`Zx^r)$
zxwp{V-_YDiH21eO_g0!ap61?0b8n`(laX^i#r#x?@?%B3Z!GmqfNMTiVS?(0)5&8g
z?uPI>icX$@*KIu$Z{yn$9>4EWTl^9BB}j{3{lJd`um$h`V()YK?NHwiyS#l&&S$!A
zMCis;VXfOf=3jnW%&+j1n1TWEMe+oEQ0!w`@{JOg=3a+Iy;3vQ%QQ3or!;dF4Hyb&
z)Q&}`HKxUHvtBeequn#X6n$yg3}ZCS73e1>t{sVUHJTvLEWh8&{>fglifpsBxss|I
z8$(@BWQ97P$a4MriR=FS`bB?mgal>@lZkSt(7>|EuwUWWx7${HyUo?kVrN~oKQ-u2
zeaRmgiC240Y(`voQJDo9#bg|_L4QXqKAQ;jf63p$KA~{#WuH&s9$~TgKWpvo$;A2O
zpP6$>v*-MU4YT6PVIV^7Ec`k#3m-81s{N>B`GS5#+rF3ly|+&RZd;u<@*Vrn3NG&T
zCzKy~v9h?PS=#ou;>aEK_)i3xp;hF)RV0||s9#0CUq$du^=LQ#Gr+DnbLQYH#GC}-
znBQsN>;T#Yy|-Ua=j?d&ZL__={G<v0u^=({b<Huq{qbd+naE?9$Y!RQmzZWO&`eb1
zt4sIXf4$cD_WLJK+3ehk8#5eJv-AaUZ_WxmxjD-vZ2n;L*BAY9Rn_}Eky*HI!}{UE
ztsGZzyohT!cB65)9AT$;*jx5Xhb-a~$qyuXS8F+L=Xyu3zgKjuOB=Rx^O4<JmrF_D
zcjE#G^Dtu`X~D0#o#MK6OXB<=4!_U;;i12;tB4aH-PB*)vT2<7{3e@tcvFVW9A}A*
zwIn22tX7M~oHSI7ecUCkc-*#s!{gSZiK}xSU1=Ki(6UwH+Rfh_+K}f-bZ^>!@UO3h
z&-70nJ84?hq6Z6h{N?|>@x_Hc>5dr-AN7=09RAlCQ|fK^tQBjIe*DeA)a?5n-Xp*K
zkIw#sue~ATX2;|^mToB#CFO6&-Z}MsOrMc6?q0cN_lqyT{>D-5Y}~NS#q0S!6)zt-
z)qm0-);|5}>6igG-8}!k4cm>M9r};>_}1a#o~>!(i(C5*+F927<28QD5B+27O|jNW
M>5W5ughhS+7djOXzyJUM

delta 13595
zcmb_@349b)ws$Ytg`^V%n<!F(IKwg+BT9p^#El>gsK|2!M_bv_2vKpAMM8I$f{;$d
zbc&_!h3*M~3aLzr*BPJV7snP<lA$vbroa^y1SBz0lW84rossW<t2$v3{rtV(7a&#l
z+;h%7_uPBWJxlRL$kHCNgjS3*i!VGquGPG7=w00RkEq*&+8OTTBKGX&7EIgoy40$S
z4>*XjAaGi0wf&3R@Tg)EOmC^zTSop{xZc7&e<v5djmx~9QT#<Q@jmW1xr$kMlyJcn
zz{IoTPA;^RF$!-IcieoPr#P22uKrM({ElP~Yf{07Qb3c!tx~}|QlOQ+96c#ja#|Al
zj&@3wgB*DIPiGA2KPMTIv*tF%1S-6?+Wtq4NKvcvKu*tkstczK6ke5_|IATL^?~id
z&f_DrZ))O!kAdEiJOQveDPclAQs8?jU?xguU?@?nfe}P`I52=H=D=XWNz($ONvo}u
ziNF3SuIDMv{wyc1;kN%?pBP{6sy3C()Ti~m6g3}cwSB$M60*ktT3oB`8<!dg+6xj%
zAd$G#y;7SfRoWDjN7ySVnGldmTIyVOXKi`-4T<;FhkGQ=>Ku9pbeB!T$pu1-CA>+B
z4&~lj!=0JNEm_8$S*|7@j$EZBbMxKMcGT>0*5A&x<Z?N4jAqYXiF^4Gpw{}1^+?<`
zbJbiDoePa@ph79-KFr<aL&I|@$X%b;FqvoxwLU43O=KUxyLZLp-8{p2l&GaNYUPrj
z(L33y9-iCblYMQkOWJ9Mq_fgF)x<+|C{mb0s*@CxeQEv_QfaljQ%bed>>X-V@p~wg
z`HnJ3c-156Ix>@Jd>EP=fKAm=E|)XTao9iQ&dl4fCKcO)(9<~u_5^}T0+gnv9FE*v
z`E6uH=!`&v4cmf{+?dd|AY>IweB9!vWs&!>E|bx<XIs!7o=)6xyf-|Xc-$tw&=H<X
zy5jgE3|K5IB*G$MC`p+rJcbP*EFc(Y<j_cZ=<B*B^G5DpxyGJ)`}Xqhq;RKXU;dqh
zeH1<^xlPzi&_LUFQe}MicaqJ5jn*TT<<|P_;SVK-_n{PihvB^=<<+~&J>N;yrts-=
z1St;nJLx~Cr8*FvmR!B-#TVE5Ahj+tUkG_2tr>zi|8_fMYrB(#z7cW=ux}&6?L@eP
zq~?&Zw_V~ln~6DkjYBbY=MW*s4w`Pz+{T_Dyq!Jo00Z&26R#N>sG@<xG?1|^aNo8-
z)waOlZLOL`Sz!AFa@8rXh}9GAgAZ$;Vc1uLN}RAasGJp6Q(-AnTDEv-qTTjyqSyjo
zgJ~dvDrW;`@!N@63#<jgK8qSxAiQQ#;|qk>Eowr6@P<WAED-(*g$Z$Q;eeX4i&|~p
z)tJg~Vmgl}Xy1S-j&xL*wG+d<D%F^(LyCzr)l_HIOj8oLhfcY2rQBWr)09@wFkCFZ
zWz@V^rL5GHx*8L((rR=X&RUaKmsg+XeB=~k{D#CBf9<L<F|{OO*M+_U@LXfPf0zHr
z8&b5p)b>p$de-|p{Ib98b<uX~P)|76yh)2!UkNsgp$>Jg(RvlF%J*aurbFHY(-9s)
zjt<7@3J)bm2ar%dJkbRx`dr+LE3mAiiQPSq_p3LsXR|-bRi^zgnrJ7LEWVWcXod64
zv}2=*?M-EDZxixD_Bn>|HKs6(N`KP%IXjK)G_9|yF|8NF{mIc(61}E!DDMxaG7Q-t
zNF~g^_`~}pOa|@!Qis@is!BU7i(0FTYZ1+p?89KY2dS$pBhw;j(S*9DjE!2NT4K=-
zDgA2f6|YJR?UqTLCw4TjUiy*2M6yXrefVr{Zup1XT-Vg;bEYqzzIuB3^jUY`efPi_
zQ>IUuz7xN9&G_#bFVAS2`S+R4Gv1tWV#fC~20Cw?IdkTcnT0c-pBb3>(ab;2WVm0<
zbSd#z=AKfjTqcxIZsH@(%-MaQbk8|hTnugSk3mDvfqI#x8z3%o_Bpd9`!2eslAnQL
z&*Ocwx=H@$MBPY*&xq0w<2clhNmsn^G4X_~2Tu{M;Q?k>T}m3`I{Xn`KCu2@Fg%~1
zP3eCgKg`<&H5mF(j}xIkRZn<`kV<3Hq*3)0=`sm6%Ct4mApL($5Xb4<y^N_s^nMh;
zbc+2ie9q2rH#2;9j~rTQnSPcjz$AP`gp)+=Ple+iqNY;e1X0r{w4vIlaLUjSRD!i)
zTIsKA!&tq{*$4YkZ3kGSQ#KhTwlXjqxco9_J7jOyaNZlTv=oB67iyQi?z?zzrKRJ1
zsE#YXGlh#|q~do|uJq_UbgS&rxw9SP%)X~r9kEw7X6!Y#3!LdX&Jd<DY_Rlul*=Ix
zq})OnZGYh@riUkqGs}629&2xp=SM_|MwjdrmJzv7SWe_3A)m;_!V_fAlSK9gRsbAW
z18|@S;6NE}#4gT0lg$`c6PvO66bynTCB={pRAnR0+U1V$3S3qo53j+JgM)Lo)9wM#
z9RuQSS)*TA8?v~OiS~jbf)T=H1n@EvE+UZwmGR170ds!r9GS@b9e}m_4ID6Jf^5ZL
z;E3C14Z&?wgxdxT_~No$NSIgOYCC!GDFX4btj;w~rge|xVn#E;?!I~X7Q&axg%PtB
zCwn6kLnoXCtCS3;pQKAE^~XKEO8s$9yrEOJF#Tc+c4{_j4eB)pMzi<O8?8w()I;|w
z=@5hA_aa2jfqJn3x{?X|gRqJ1_sztacb{&f>zLQDdPgB&0=EHP1JAsMZ+8^&>lIU%
z$HZ>{c38rCmr<;@k7B*cDb`z{a*0quWnOrm%Ik$nDsK?{RIy+XE+rpC*;Fl~yjS&6
zzECZve32?pzF4iGe2Mxz<$1M|^6OPU#R$Db%qzTr$n#66{{IXW8;Lu#60+wKuJB<T
zbx$<DdLh^EP8SYKHGy=T^U0oSg1>4tX)B?X|Ew`pWYf-yYGU-nz+VDCn<`#tuGe{f
z4r;c$t-6}+OwUlWqszk7%x}O3Ov%rySN}k?Ickt`4$V+YsKe781d%x<C8aLxAQ4A&
zL}WrVBQi0X8o4!^5*Z&&fN;+DW^>Lv_nF|z_PY~4mzIvvA0^<~@^oIkVnSe3hRET8
z*@hiaQrJE?H=m9o&C*c}@nyWU6t@)h%}zTp*`@C-Xym-v8*|i*Il8#v_bRF2$PRc0
zzgaGHZ|ApEn;JI@j}!649arGrmDv|`@I@uX(HU)zlc=Tg4hPV>%zROKugbL>xP+DJ
zQgQ5^qdc?j!M@wU>`V=_Gdr1`*@f-Pd-+1;uZCmGuy^1{t2H>%>P{SKbr+5_Gq&tz
zWOq!pNr3<g<g&|~7kMG%mPLj9md4FY67_vzOHxmhWV3LZz?oXgMtYpcTO!*%IO>}t
z8PP%VW@u(h%jU+-kXkc^;Kea#@KQ`c7tqP>i*g+x>%cGuQM$U6*b=eVml7>rABX{x
z6|;T$X#ybgiL<HmgL{<$#sXz$(o0U?ENs;^>uK1k+e33Sxm+UHxD68N@M6fqQtgwL
zBDpAXHhOK(R)W9kRw77bmP8!TRkviQs|z8*!4h0vm(rgLLsv1)i$twr_#)JcwLWi|
zf77?l=K&2EUxYbhdB^uIFBbI1X<447B+DK#NBbFK8oy<T+)~)$y?_Z@o2Z3N!oL~H
z#=+}ascs^g_26c5a1&8ClZXjE>Lxs}wO8Edf-Sq)Bh`IT!!I==OV0A*3Vlm{KP}T^
zgqI(=BK@@iSdCXCZVwCkw+C7L8(a~oK%jc({gLPKSbcw_0gr^aBd0`CqdAc@G=6)3
zBms{t_eT=(2;U#M1`lp-WDFiB?{|9U^m>|!%+qxKV-9mQ83wv)eLoEFU@kulW~TU6
z=|agXt<Ib|h9hkVk0xd}0EQq1E_UVLLFT;rew`9AFr4lIByv{ke{3)|GEVzo=7@tP
zhTuSVmrls|0x9bQ*6A^0V33a{@Y6w_7<0oTyP^zFnTNyxdm3o)+kplo!*!3$H<08Q
z(iJ+dAF>Ht<wzEGw+Rt9-nq9QiJnC84n`O%o7m!&>tj70bbW4gu`4!mbLd-yy6{|M
zk*@A`M>s7F(|{#SgyROcP3wo*;59s$wb0eW<T}rVQwBqnhR;asQWK67{Z@lN7rWNr
z)8Sr2g5VUXHre5H!f5%`69iVP3NG*=e<&G_p1$Q==*7lA!R*S%%&we*UBOn##ZhGz
z55w0HK_NmtfwVBsH$~$j6Etg&-abF5g$akTN)j?DckQaE)e$n=^TuXSWB(t_q*~XW
z3>x0y6?PMCAb3qD@QAF=#Sf?$U^nSeh+5A;nbl@>H(sLYwLaK-_MV`{8}Icb*#b#)
zSkwy1bdo5uzgKv4o?04op`|d4IIQ2|2lRYF62d0^;;)jcbmzt&nQ9<ebR?((?(~Z*
z40c!6`jl~eseX4Q!F%ePB?oVarBrHtvv!lpWFTPDfw_dW(mnb}=D>7gH3G8@umj{>
zF(^E=*}rTURl(75emU2WDPq-b)<ujhfxh{W$-6*E57rTrgaPZ564b_ZSZx9&w(Vt_
z`9S$w1S>6c5iGUvDPbW=2f+pqJ|W1NgxQL}ON94`aD-qNuv>^P;)_#1Cu6(Gp3g|d
zMrs@ADC?4WzcR1gU(fa>yHzv~P6VFez&hbeqGBiilc?Q9h_W601*u8O|B_T*Wmo@6
zmV^DfM2(W=800;oenFOFs3T<TKgrlA8T$ok)!qcn`$RoWq8w5hIzFB{I-WW<p6?SN
z0rLYQd`JY(QKHOqbbm(be}M=f`9K!|gdgf693{fhi$yqwtK=l<1`gt;k4ZOh5G|b|
z-Ny(5CWrbV>7J_7AB8vX0lj*RMRLc8t)HQ9W<6`?+trWsxqify&E|TX>3ccEKSAv3
zyJR_%IZ()ZWI2*KP{<Lo9NC;BM17wuM>+?J=wN5`6Lv<s*cts4XOx}W5_WERc5c_J
zr?CDT;9#A<o)@fhI@OZYY?cdbX91p;jfv>@%f}=Vsf<U<b~9sou`y6VXoUmf{P?#j
zW!>AD9NU>30p^1wtdw>C#q+;#U>e>c(Ztg7w}^A%d@LlQR|sZxel*X<e$}@!gL7+i
zO=P_GjDEV}1RAq-+n5`ZOU9%ewq5IhTwNI+^dSu2M#gL-wn=ut+}8qBY3<oYoNv$5
z0U5mjOrkBvtR(=eZK^qxs<U9|ItM^w^K>a^9o>2Y!AK_Pr%-n~xd(pF{7zT{xSq)N
z2_8MX#*$)dfB{?NZES@d&{Y>pIzV0690;`8Rqy=E1K1)zY3H-45v{{`fDw*07{T0t
z3x+&JnDNJ2A);Z!z_6PH<P=y!0YMELO3x_3`Y*&_>1?o?IBdeeAK4BJgcwQSMS`st
zc$w|Hz+SfL0{hvH3q&wP;2;9YgLZVe7Yh4WCq`&y-FUWQp!Z1ELg6*m(Pa`^SO>x=
z;ct)%BnO1oV<dl#k^J2tIUu|dBRQaxn1nWFb1q6o)ts$(lk~hv)Hg{ao|!t~O|s`r
zqD}bu!|1u-G@f@DvERc7N!030eb^rUBPrO+^bih_g8fVt;TK6kglXd!okR%pHWA)o
z3Wl5O#amWCXq|=S9?aw&#ts)uJlIF3R>lM4ZK48cfR;GsZQ$B&#KSfg+xyGkUFhPo
zZqyW*tpzbm`HReyC#`hOedt^pL-k(KvG@&&VP|HdJ?shT*F5OhHD7H4E-w0Emm&sR
z&_N?}AHv@Y<uLl-Ht2-RanL1UJRAKE7R8hlbN5dN{Y7*hoheek2T4sFQ+PZICs}L^
z!#@0+c>p(zdnp(F{50PsiW{hF7|u$K$-`<8GgxRi6X&J55Q{LKG<!o1yE~~45Vr|1
z%YJX=uW*o>iz>OUxaOizW@kk%X@!K8#R1z`T(q4<U;*ONld|<LgIN-oIY8kJb=uvw
z3;4Zj@bhRo!`7c>_~Wgvr`PPVcX<gF@*u!+o(gWFy7fJz=8?#h$`oY^x^Rr$#36gT
zfw&lm-9TJI)Frw%3<w$?bpdHxf^4<=7-?HfD*LGbKgMua4P+5%bF;pMq%9AbZ16_r
z7XzVQ!omu;u`Q1XlabYi%bJWZJ045z|C6f@eGeA!e+oZRz`xM=Czm=@izGx-_q-;l
zm%Y_?*;~=?TeUMTWrC1p5!c>t^IVT?{=RaPrNV3xQs2U9*(Y&FTpS98dYKDRMMlp)
zN!=$QqUb;wXrJU9?uw*p{SWSwY;WuM43MCu@7X6E^GRW!WP9}opN^HN4FC`g0AUz*
zqnqLO)2z;N7v36tQtp8R<*!Q(<)|+-U0Z;vV$;Y16c+WB>}e3Brm+RWRMJo(HQiVs
z+({aqmzo>}LY34|DK$+(NkeMzOHH>G2%<P=?&JiYl#){56SvMCX5J^hJa^W$uOOIU
zrMv`g(OT!OM-faJ)9S6Kop4oi;+X%s!J`-burXJ&D&`tmC;O1ys1MJVh&QM6z`i8y
zv|@x4sD}#cC<>*5hbo)-kdnhUa#c%|5qya<p68Kxd6rhJr0f0RdrL6S$qRP*#=IhB
z4QxVb^-!^v(1gNjdP#`&ga$ORm1@FDCBLxC-}onnFSh^JP|s^6)p7n3yIkVFf)B~O
z+r&459meH8T~h03@GJY^=?oq|R1A3_hwR6G0D$3`dvSCs9R8|mYl8o}s#4pxcG>U#
z9^F;$627rIp)uqyIk0b#_Vwqhsdl+KdJWZ*)n}=&iaIkFs4Lk^+3~E<Wev|#GMV-~
zi|&S%lq{w_E5$tzT%C5qW9ll}_8bjah3BaHtoXqL6U-~|`zrB<-wyG-BH0G%JGR<%
zWHOB=9@zJ5?W<~2`6|i{Srpr8R%c7D9;NygVt<&i!=jg?ATm)8U|(9OhqEs&)DEg^
zXte*qRn#^F>jd#WU%(pd%2`FvlL2ssIj{#%4@6r@wJb<niZRi}pa5bTiI@=ss?Slo
zJFRUM4JA9!)s=>M7(Aw%u^qJj$_SzVIAy$$I?ma!P-$k3ThY+RHE`J~KZrr0npL!E
zGIeST*~?-&v({G^oyrR7-=>#fhhy)2d#D(jyeYk8@S$RUGdr(-c3!LOjsDg5miYaV
zg_Uv20>8g}HARvKrCGn<n6C9PG4SBkshC=p(u^H<E6?v)B}N{+-n>fu_Q9*o&x!VV
z+*QxfXk5+P)i+lpk1J0ZhlQ*WtEV`+(zBA=o)hn%H{8Qrbm&<PTt5Na@Wn<wyZ3;6
z;zAK#KSM$R5{m1nG7@`!D)#)ROSmOVYFKDLZYnB=#(_a~b-ol$CgY~+hvrMgi`VkC
zw9lT@j5s=M<0#{%84{khanD++Sw>C)k50vl-^Y`pZ&j?N&b-CCnaC2k`I(-zG-__u
zyD{2LQv)|oHBfpAs9HcH$-2u?Kp_w44(dQ`i6lsDfPjP?Cz_Gu%49SgUCHP7Il5S%
zjrG{w=Xz>=00cHk)sszS%owQSrjGPP)0)^LFkdnz=nC&B?rofAC3eYGlN6rD7W5u0
zXm#@E1>)E9hk4e~u^u`ql2RGpmD010wrbt=;o*72OG|AZsb1PPJWm^@j?ELiR4vq7
zm$OzORg3gi0&5k~YHO31`a>v>x~k1g_o?eHU>faXdNRgTC-l<ms?B|rw)Bhvmk%6t
zg?(_QsR@y?zX>sD)gBrQyTw-@8fJEjCmy=e;}%m=P_0m=wEGb^n%k@RD%me=3d&W&
zW`>E}FEb+WHef{HYA6SIvC)s(tc4d#_np=L<&ed${=$}En6DDH2E$)h2@?A%fCSa8
zLF6{1AYau$g3LqV1TCnNU`mR8`KBQ6RZPn_2R(>bwgmYiZu{yU5;TNsBSGyAq)p4;
z2sXSCR9|CkUI&{-KT?Wg8I%1WSDS;NZ2>K=V0@mieYG8Mcbu?4h{&Qj*z-ovIoORv
zBELf}<ZI+2ei!Ork)Rq03N1ly!ZN(r-5v%~_6n~B6_m__a0~Y{>6?4eE_dr_=MfHD
zhD{zBjck+|={gOI!?JcQxr&vS^#OEol!L#7Ws5AXe)u<@i-po<3jGoWvB?Zuc5d`v
zII#9k%g(6PX<sVuLYYI}!F%NzzR;!ESZawWRJjA1iSdsqOV`4B+Eyh+e}lV6`7=y}
zq?-suWztHQ)?jp)vg2na!;*m!>0&kCW2}z_LMT-~Lw!j)R5n1zY9AG?L1jL&?-IXd
zPiv5s>3w|^_=Le4ppxuiK0saL=8;o6(L8WGN&D9>UsEDsQ$(tcDm!EI#Py#k?35I%
zuv>x;Q70+%XQtgZ4qn)fyJy+K)*ynCNYD_^S@yWm<57P9;|V%1cPoo74KBVUxYqYd
zHfegTM99d|FJZ$!P%e+TE^sKAGl?^Pv43C|uX%Kc*&$AOl=GPNW6r~%r8WA=k{nnd
ze0ReXk=4fsI?2uvZp;zJ<p?*iu^c2i1m1nr&hV1ZsoZ!DIoZHLJPq$<Fp@!3amIS9
zm`I~Z)|HA!$iatX!sIDANEH1CDb;nfuIaXQe5p3b(IxAxPYU=_Wt}jY;Q@I{-w0|B
zCZ*m6)27}b4tZ?CEfC_dbG_>+lj?y!0PM;+pD!`y^RePbkO+Se{g2I<M&QmDwXf&v
z<l^=XyyEn-av}q+Z!ZFHLwhl=$c4>3tHd^!RN7U-a-R&r+g`%Ua$!5q*E$=;;R}Y3
z?aY_!V1E?Y9~rc@pxgnJ8oriM#eqte<7?yV;uZLWw}`)AFxzwA6Lz^_(H_1*Ru}y@
zuL5smoHjt-hLwT&m4mz}|AF7+T>At-B0!q}@&i=GFwL6HE{ls0i^`i8q2B4Ne!?M>
zb`fpbz6rT0;8+-rf6-Q)_^L$`U+CNqoUJhbURi3df<Yb=mTW0KLF9XSSVi!jSx7YX
zM?T1kA`c5`Z;^|$#v2t%?RvyW`sKh1Z-{N>qC@`5%yUtj9+@I=D-RfHA?I~Zf=kCX
z)QPss+nZ~k#BI$xV2DOPAv1}jEWS`?;zM}YZsAhpx99mv6ait*O?*JD7Qa|{rTJa4
z|028Rl_y(vIppfDB)(eS>1Yph#n~5C^E;jVlia&cUMhxl*#TYjJT8+OM4`A&c9KQA
z_##0jsNw-oEYz~fmILs1zya(6P>1Xw?FJnng-kIraRH;2CEgCL)cNkZfba7^!58q0
z_!@NQ`1Y|C;}$>RnN9+;NnkG0K&P=UZ=u4i%t}q7uy*WYfyBDM<9n+wap7y-xbU@3
zyLt;Ppk82-=`81VD^+i$WH#vm$t21?Z)!F^)Ea6p0B?r#!)(+mkQ`4#D`Y)3o1iiB
z2Q(0_c_i&kmtIw7F}ya|2*NY)!NpvHI>`hk%uQ6dnYP-Fy70XYKAQ3&+uh--_358d
z;gc8^)_yOsn=@e2oDV<EY(RhG;ImWjJh}phzOIR#cwqMB_z}$Gu8(I6P#`|LWO%~S
z0+h2)iho#g?JatBIs?_|R8*%^daKjOjvjg1g?~s1x|9rlryeB3&o=WramTT80k>cL
zVF{Pe_d3MWvQv{?7mtcTL4eN#9>p;@m`!okyR61{HA({S$BOrsuUq`u7fRd(AfwQN
zj?a{My`vBCuNbCL1lPfr6#}ta!51XlA@Of{+?;c)4KlX-FnWJubhHd`td4$YC2Sch
z4Pd$<Wjo)fi;aSKC~_d0sHceLtP-DeUy*s_B1DFx_a73Ua9@q@(6D<KAk$?>)`FdI
zG}sZ>n{)WxtQp|zFc|V;tgdt!JN*9Le!uf~&vdZz?*Xmze9&$j`MM52epeY1%Y|)=
zP>YtmZ3{`|OVJlG&bc8yKR2dXID_(8<L<~`L)Vv|VWl4bZn%)wuF^Ptx~SHo+s_v@
z`dOd9Trc421(%orhA?`y`T{YO=x+54OLTiY&*-dTA1&xAb+AfdQs^7I8z)_Gu$?|$
z|ElXI_Isoio1Q(*!bJU<R^Qp#Suuff&#tiRMlz&-ozN&3Rh#@Fbs~)pbExBKH%<%K
zIB56H6io3F$qN1IIwTk-QfK3{cAzZpMOog5f)8P9%oP*Gtj7lpm_Rk3^Tuam>#2_=
zKKS@G*TDV37fH-ge1mTrE50J(e-mB^e@*y`a00Cho5gL95A$fK67VH*A<xStBNK%i
z>0SKdlEtxqyGr(aMI?M>T3ZzUW*uJw^4B~(&sXfZk)mXw^=~W@E~7)ry#5kr)k?iF
zsR|8Hsh81!naV=o-$bs!$Er1P4PTMZzar7AA;yt^6KxPAIr6oQXsM9qNCL&zoMuYQ
zqI20O&yD!J=PrKf-FMf;2G)m-4Vu(gqL1imEYSyJKK}U=_z6;AmwA6z=4E;+Rt`AY
zi-d8ku<u;9D#nN<Q+~~tR9fOX_=DrbZ<k%=na^*O%iNpzvg*XfjnmJPVN^LwMj@K}
z!Y*%gC-ECAEgijm8Q2jdll5IB(1jY6iyU2v^}0HHXBAyID}&}|(pdv&{*`pr<uv~)
zI%^=!AL6022GRVh>8vYg{!lv0PV+fBYcS2fhC1?x(fm;~e>lw_P4lm%`D1AQ2%7&J
zntvV5A4~IpMf0zx`M;+5Su}qn&A$Pm=yqnk(v-6`iGg7>FbWp>>lzbunL#HFqeu+l
zHIq&nh1b$vP5jo<!FR$Te&3}Y3P#y?BZq>j7DNr$g7<&0_q+LxP-q!b#|OHyL@3Kt
zV{P0x<{v>@+$j7cr(r;Rr#uSZ83&k_0-56D`B!0;f2<knMVcA+6Po#H1+;2^k4<aL
zp`gur-rS6K-vq^kCsNG`;=m_H;8Kl+$9GjN_OpMopUfwvwhmWHeQRs@<eJ>@i8Z;d
z=o;H|FP--X_lGo1xPd752(PfPF&tDl_R+Q#A8m8B)7V893=Y{991;pfN8r`&j?YSn
z%&W90wV-l@cLlrR@wo&l1i>!$>4ekAzSGi6;&An<Py~#V{gLWWDzhs?K@BSBisxdj
zKeCY*{&-|aRXYv8-kYZ0Kmx%aidlhOK{(%mQ1Dz1s+ucp^hfcZGqQ=x!@aadIm?T+
zzJ}MO(*3^Z?M+D8PY%x~N9L2z5J%H|@}KzxLH}rc{l5tx9^(s0capF#=<K)F0jzKJ
z&eXon>51qowfz}_Mojph1j(T@4f}%j)pOS}k;gER%}iOZFlAYUy`Er9=1YtBr<Y%E
zJ^cR3Pi=PY*IACKx%!$sy*4+zVr{OgaILns>%2d%x+Z@~bQ+RwSW=|js*sT5MI__k
zDQ{}7f=0z=f90=`w!r6^nj~*(uL?}Ve~IZ!&NbazVt>jXS%6hSYR-i#dNWc)n28xP
zNei9fir2Pm)_Pn@()k@jS%+Bg)I$kXhcoW0I{d;%Pt_#Y&axlVS(6F>%y<+1tFjE>
zJ!e;CA3j?>h5-)&m|%&Iw<M)ltX7M~oHE!frmuF{EY^e}DOX-~^)0tfnmpy<M@%~l
zS6fB@+GyJNJooPxnXX&*=n}9tnO^WBwd`58b(`|%@bUQcVPkK)b=D)#touX5U)sCR
z4jD6Hdfuv{ElvM8emXsC#)1tsd*A*vF+JzLg=OT0znzFrPP1P-a?B0m=dAH=C=dLf
zeFu(x@y*%66Q(`5X5$}Uc<C>D_ji7mnmv2*>ar~_ynHNvtaE|*;z!>kj2L<QeeR9M
rPnrHB7H=3T?%Z&-xOamsqq6VEANzUX;|({&TdDMy7p@TIUG{$gw@d?h

diff --git a/textproc.asm b/textproc.asm
index d05b2e4..5e1050b 100644
--- a/textproc.asm
+++ b/textproc.asm
@@ -670,7 +670,7 @@ SecondSelected
 weaponPtr = temp
 isPriceZero = tempXRoller
     bit isInventory
-    bmi @+
+    bmi inventorySelect
 
     lda WhichList
     bne PurchaseDeffensive
@@ -726,13 +726,21 @@ LessThan100
     ; additional check for unfinished game
     ; if weapon was free (price == $0)
     ; then have nothing...
-    lda isPriceZero
-    bne @+
-      lda #0
-      sta (weaponPtr),y
-@
-    mva #0 PositionOnTheList  ; to move the pointer to the top when no more monies
+;    lda isPriceZero
+;    bne @+
+;      lda #0
+;      sta (weaponPtr),y
+@   mva #0 PositionOnTheList  ; to move the pointer to the top when no more monies
     jmp Purchase.AfterPurchase
+
+inventorySelect
+    ldy PositionOnTheList
+    lda IndexesOfWeaponsL1,y
+    ldx tankNr
+    sta activeWeapon,x
+    
+    rts
+
 .endp
 
 .proc PutLitteChar