From 8a3d3ae0a93ae82f427a4768219e370ddd15b9d6 Mon Sep 17 00:00:00 2001 From: Pecusx Date: Thu, 18 Aug 2022 09:36:41 +0200 Subject: [PATCH] New offensive(defensive) weapon - "Buy me!" #97 --- constants.asm | 24 ++++++++++++------------ definitions.asm | 4 ++-- scorch.xex | Bin 50689 -> 50740 bytes textproc.asm | 29 +++++++++++++++++++++++++++-- 4 files changed, 41 insertions(+), 16 deletions(-) diff --git a/constants.asm b/constants.asm index 0c263e5..52e2379 100644 --- a/constants.asm +++ b/constants.asm @@ -263,7 +263,7 @@ WeaponPriceH ; weapons prices (tables with prices of weapons) .by >price_Ton_of_Dirt____ .by >price_Liquid_Dirt____ .by >price_Dirt_Charge____ - .by >price_Earth_Disrupter + .by >price_Buy_me_________ .by >price_Plasma_Blast___ .by >price_Laser__________ .by >price______________33 @@ -329,7 +329,7 @@ WeaponPriceL .by RNawlXXnw~EcaZ|9mgvgiA`Uz>WgmE~K0CSz+11*Id1c=n-jjzl@BjY~^Y48n~j zZsF`PXn)Ebp6Lx&B0Q%_qvc2L^y8O0xvA5+2c~jIr!uTJ=bCNfrYZ)$h%1<-82KaI zcQ2rIg!4~VV!79b>P}l%RU>E2AFLH_o#LfjPF`x`7^d&_jL63iWBEu5An1$Cu%=J z90shw14hA522mdO@WkULo*hJK^E45~>^Vu4$2^CKV)Qf+?)*&8Xt~kS2w`xeU*Ou- zbF*IHR&M0BWpSTQ=YCrsl2x%1Bh;Df#NfP-$;nNE#)d}A4+l)XexbJJ2*VE8)lsr_ z6{E0J=JHo!Uk=Mf z{+kMfdK0()dG7pk{-Go|n0q^0E<%H|%~GRJ1O{r++;1zfsTQN%w(MSR$ZW3vd^J%H z8Xa~_q*DTwRuV`G#spHdIBupLlW>FCza0w*_uf(v`+_Ij2al8&g+?q`DV+}9gzr9H z{y68E-AzNJ<3Tg`)CQ@D_h6a1MQq__ZsEE{%XhLTx2WoCqD9C>J3P&#+|fnN8;-R> z;@r;Zjh63~zI-hc(GC&}XTz_-*w$jHxUNA9gAx|oj!wnaY#u2?N|&YAF-le<_*ymQ zMBtW^p8|jNofk&PRU_q)v=*$yCzukQMcnudN#u*FMmpq6tJytLw))SLv@kx?e}SYK z_^f2Vk+z5N*_ba!uu!2V)z_*_5#lK*CQ!_iI3$qZ`=O%d6&Lr`Y^6_#>7gWG(qf@d zH_M(oWY2Uc%2&3^dy8Gf?;zGyE~aDt49wxlzz0u`yGTj+Sr@UGFoq}PMb?_<3D8QP zCpD{pR=SGVF_;+qMVE17l2sS^wTM(;Oc7z*$Tot{ks(n}D*=pqH%l>sEldqgkAFve zKMLOvAO?wWjtJk9_;1K#(L_(uG3?PAjNdRPgVA|6Ay%6m@hjcx8lTW7SFC7HQ|O64M~)LaRi$`!U{|MD6NJ&Q~(9Sapc6$xEqQ9J+kw|c8$q?S*9sQDW;)Byz|i%W1G0)QERVG3xY^> z!-Df^7I!_mE3xy4d1?b3=nB4Q+Wsf@seQftK_!l_O;$J3_Hbb%^_iPCi7)(R@c#q$ zzP}84cpVkIR9#Pn*JvlHa;k2k?FK=jt;b=!jojF!+zSs%MKg4%b@9@z1)k74tb_}c z`2blQ|JZ<(3@U7(s+S7usQMZe)>E~df=yMT!Y0Z%=bl~2r7VTNj8($*EZKGWil^WVrtD&2Rf)V%@h-Z6{Rf2sKP{});rlh2#yoO z{Wn0mpkRA(t`)GfPFNa)F=NO};u0gR8^=;i;J=vyelzutrGbW$aOEgqwzuXcM)Iy? zz*<}(9MEHYY{y)n$Y(k*2jnxB^4Xxk=M>HWhbt-@E&ps9NY#Nf$!wcFmpNuTn=rzf z7Pjgx%I8a20V8}zX5e<;KW$kKH=s+-I%$?|IWC0TaCV>^W(4q=LumMwCmz{v$thgxm3U#GSIQLzd8IsI zuvamGt4v`&;hLTY(fMS~G@5=doumJstlW9_UdmTU6^X`~P)W6)m(NtK4lkdj_V@DH z>HsgFqh9O9npT6rple;t{4U;Pjl6FC~P=c&NWVBuB8tC zGRwMnVQ^g z3dsR`)%5&|N_8657OVHtx<=o_Qe!e!Wlb~2#KctiTg87qK72|M(XIvUBe2WdBKRtW zoo|RkqhFMZV2_R1;))0LEmmS6ur5}!aY*EVKXJzLfy)@{j7?2v)6U)UuoBPLGF2|) zw@X=RukkyGp?bT}mm)~U|G(?uvz=P>Az}Z^lOVrP7YTYf!rFfwEv9X}e~s-%-E4dOJvJ245KXZdS@f zN9w@DFN1?x(cQY^QfIu>Y>B|WH6!?8#F{NpiqX2NP&|@)i}9RzA@!bVlb8ulrs^cv zggO}}fffF44dCH-Fg_a$U`-R)nndRlbC-7sqQvOWCgNVDB&&?NC#wW^S57 zn^LGcg$4{bu~P68G}|7ShZuxE0;RwDjM7i1&`HHYQbeiIFN(=e4xSSVNxwiql_=Z0 z1*ymEfgakenDNq;184d?!u47XBhW7~N(Am7Xe7#vAYyK8*>__3lS_@SixDe^ISwI6 z{;dIF3SWCAHzj6U|M{WgGQ<#?;P?=9GX@7~$#IOb-LXKbv9Kt!CeYu2r75fZK*;;E07A2wa4SfV>CS27OMf zj;ZPq9L(rWhPwn(n9iS$gu#ws891fc;I~49jek5CK8+3b`Sck&k(7Rn?cbV-zZp@z z#;!N|H}~<<;Qzt}Kxg8MW?~6fZoJ&{b*M+VcwbwY(7UZn7jze_y-a8q)ilmALdGpX zzkw`RiEUU*+4)TZoYoW4IE-cO17Va^d&+8wddXu^Xdh{vbReJ1Hm1?4-O& z#z~1$2XIsh`a#OSU13$%QP`zRT~A?{Zk+ocxO`DKMM3(oUA<==Q}Xpta`eE{ZGzv2 zU7W^6E5t~wW^5>4L(wbbup?e@Qcx5!_0vC#LgD6%FFiG2SzmAS;*uU%Ng+)xY+qDq z`*0zagNCxGo~C}xf2`)x)KBo{r0<ub_#1cr51{@PbWG4Cpsti6O7J>{D+LrN&e(jbUsQ}H_(<3S&*@j zwwx3YT5O^%A3?|hi942fh zgbgYy$JL5}xuQbzjM!w$ zUnG6b_sx{ffctwG_fx?=FwD$fcPt+=Y{Vw1i3M4FmZb67(g%D_)fyU%%!l^aCj13E zE{h4P23_xC4yBS*HnKbNB*^sRM+3<)$`2mxyfc38zaY+Cwb0RdI^p(p`G5ioItMJ6 zwJSYf_irViWkD?iFduNm!G@tBJHYM;5Ny{uCw(rgqtY3Gld%>(5XN%a4M1XMVRI~$ ziySb+%NF-vS=(W<90nj$jQ55?O*}THB%TMDig@Nz>0{4gDt+RyQ|VJrDwR%oo?^GC zXApy(uu7k#EfUt#d;VuA zHg4|{tKUX9+Szjb573RNY{mZhbmLQO(f`pPF!u{oc#+wlB@*G;i!>q2!8HoO0+K|!-)2c0q-6A7W%FfZyw{Ea2a%-fLHfXn}}e{O*NBjXilh_GIt^LS{R1oQh3IGKoL_b*v-5 zKp0O{p+J~GuyGAnr$B#O57A#rkp7_G;~TJqM+i6Oaqi5lP!=+fpk34P2vHv)fhet2 ziA1+8ZCM~*>(TTGv3#WCGeCsabN3_UixI>>f>`$bHUe0VWr0Yo7ocbX3U{yz{R}w{ zj`_qgd{vDg4GqqQs*%KNs99WqbaIWo02yVL(Dt!LXc-`vTB1e#zn2pG=KfZdX@ez?< zJ!j-R0!bqG8o|kVwip(w>LF`rxt9W1w8RUmlN|F{u5S-n@Yg?B19^Ssxv zIm){^+MDb0|56Nrw4|07jhRQ1)+=*`_$*fZrNLxMuC-l9ao2dxd`wHh#Kd$rX|#U=8H;}K5I_^e;A4_1D~

O7_t1&$Ru5*7~JX143MW7k8SE4%fvy>hUHMU{V6qfy&SPvZASMA#Lq zTJlqEF|-+b|I>zID0Fd*_rPH7Mx-_Z6HEHBA0zVKLw)B1gM;TPYJMpWex>zf;PEAn zp8`{S=XKaOmo45}y*J~RV%Ofl@{%y+ao1k9RkmlAv-x}I^TQE06Wfs4Iumdff$>^` zG7vEgE07>pZ+m1#U^0^3g8}M|f|ADJw$bZME79VWL4bAUqJsk-gdeYY)P?Zo^6b@n zbteS!*u+*6jKenmi14f7fQ4=2v1qUFC+BA&_oa7YkI^|&?}SP$%ec-I>lO1d9x=sv z#eZZB85HLYhItQ@l+7_I#jz<+8}BP*N^*P8q-gB2IB4DY387L+d0NOYTZ^P3)D+t6 z@M60C3h~~y+ztQ+BcU$+>&Vd%(CoPVhaUIvcWoJRt==7RX(hWR~*%92|cCQB6AALc{K#F`C59M{P(uHmwJy^Jg24KnYp z8ZKA65>o`btPYoBVyvr%%Dkc&Rt=N+O7%LKf1NAK>=+I*$A`<>3H$C5vVWLIxL)>e z^$0h}ZTR8cfFQFdxz2*BD7nvq?iSR9C|CHjU3a|Jv~wsp7}CldyjyZ%G+4VqMv}-C zj9||Ahx`U7EiYpD#8CWjsK`|Hu&h4F*n9|VR=aTRPh?!q1App##@&JtcUFMX!i0Hp ziMeCG-0`q%JGj!Wgz?9uW5NQNTl2>I>!}LNB$}9)iZa^ z@#o|(4XJ-aJ5|3+bK1EQ)Fv29Q!g*t(YYeExA*vsBsiL{SMG-)65SA$X^bE8hmr^m z*GtmMj|`>Y4^c3gom?R?K^L+KqG|6OhHBt{7BU;c(wD~&;%r_dE9dy_N*TXn_ad2< zL5ePInpv2LDqhX2IHuuHk1BU`E&`|Y0O3vqCAxxDRBumAY4c1Z4b4&7cZyk<;vhKv z?;^^?KVRupD`;9IC&hH~WIK_rtAg_W@1=PxRMB+ViWFq3M^cc9d z=5yMQc7%T}#m&2wATKH$zl9i31C89G7eRZ7f62B@EqP7}3MnZHCrnAfxmnvxYHWh= z*U88WAn?a7tnLgL5xKFP9rJMT=-uPCV)1PDAY-c-o5R_Qc^5WI07gQ!tMuq(_-oXw zL8hdO43_PlEQphZEt7?N&N$g#-jH7t z?iLp~?+Ck>3e&`G&e_xN#_cM*C6|9)%4x~tt87zOgLekZZOH~OuO)}ClCtV}Ru`&s zmRQxhX|zd4$ZT=)3a(^4Uujz-j^wX1R*5!#KrbMK0YOs2E5lz8uR^r_vzWo(@94Y6 zD!q|f&A%b}Qs3l#Ae0!U^^$PAmauHeiv#C1ev56&8h}KAwgBV;$jvZ~n#C%KsXLL5 z+LHPTpJQ9TCRy6qBBK3D%N8WxfMa4fuGCT_mfWc?^I5ih;FPww(0;kaJ%P^}GoM&u zI_^cftz#P1=FFXmlvodBw#?kQO~@A9D&-_i)GIvN7%QuRh#9$que*m9cV^pK)&Q@y z3^fQMkvdjoFRPP+X4^O7-*RmOir2QjWR+-I6i=mH!MLQDklt=;c?k^v9qlZ%)#)s;F#`!YG*JCatzexP zkJMc1OMJHQdvbtYK~5jhMK0ztJ@MaQ=RARh!5rE15`%D@3Qa7f`*$ig!0ZwuD~>ey zzDF>keN%IRX#cjV$LYpN#lR~)kGBmSO;l~7r58xY-|6nZQ(Pn)LdE?d){P*{P=32W zl2PtzPe99O{^9~bBk?yh*tPSdeJaaHoJY<<>xcXSvIiCvR*e*Q-}hN^!l+MRE}hs82|da}$5)-WT>u<<3{!lzurJD3d4-(gGNBNXt|yu8JwkJ#6#}=0YJ2B4 z>71Y#%{YN|x5x6?_{>3GLgxT8*JssdGN$aPpRvUTEG04edJl#~1_vw5qQY#-A5u&Y z3Nu+P14-Unf>D86gJFR?!22QT(Ab$Y7!Aysl$8xTj|=G#UdgaCfJsQ5O|>x))4?oE zf&wN|dQo8F7V*WR(MVebZq)`56BjWZsTVU!sw@))f|!)ukfcM=CjL-ppvOpUh3iRV z&D7$$J;4ceZw15iE#D?B9W#qQ`zSO=i-Z;hOhJ^?&yzGG^b0`!^g!@3i)wcOF=?XS z2?q2&7QwoalVp!&CI_v$mUa$oXU7gMs~BkRm`$N~(xHG^i@>T-Rbz`X+t#ncOjv3k zC6gE#b#nzIu*b>DQtQ_-Vd!Jxbh)v}Q(sXx*_c_yue^9z|1$XU*Z6H1au|X1)<8or zQqM3h5Wg%Q+OxBl_2|%ZVozc4o$)NkpMa#K6?recDwLonIQ3>T??GQ$IsYnTiM%Oy ziz66|6CvB>ak*^oiBAi|9X+WQE@d9K(2~Ce-vy2Tj+~Ky4~%#MM}4E6?_ob(9@xk& z4s8%)9+gmb5#Y0{U98ImlZke)5_ITgQmY4A^J+*{B}dlr%N(e|*QNI$(lZ-SCu6S? zz;-5{nz4g_r0+*-+FUrgM&_3SRN09yxWt$fVX;s|BL_?LP*f}4<1bxK)0FF6wZ8YJakb=X~ZKC?ps3&(8>eEP>iIJ6g4TG)+{OW zsadmlr<`5e9l6>$^Wvnj#cc0#l!oM%Y@q>$6q;U5=Ty@4H|d<$Y5E>Ir;4V(MdzqA{cSpDH%;G5lhfa!>HBH=yEOd( zO|PNp2Wk4>X!;?V{vJ&~Ow(&=`VpG$r|ESxeIHG)N8R!j903W+MQ^0%9qQTdz+w4= z*8s`vqLbdCE@uNi-=LHB<1@e8D%)^_Ic-;$%E55lV3x|NU55Fa@V$h6&*BRpt3s<( zfSBQuAPin}b-|b=vL$R3{zNBWLcGk|PnDpDiNx~;MHuv^tG^?pEKFh8-*Tt)I&vG8 zx~6oA=B7Ur&7X>(Q9IVTurW(zi@DqCLhY_4inH8FQ;o0$w%u@qsLNa+d=}1RoVxzg zgs;%+Y}}Vw%peMBU~!2x8O3B~kl_enveFR3;PzQ4?sH#%+mu4oSq}my996(jk(oaM z%AfEb@{})E3!$@!tx#L07!T(V8gEM%uN6n)c*L`vccn~Wf-GeT6J;q|xJkB?@Xj0x zg3D>{CtU2WU0i84oSFUuW9=H_L{~dCBxCaj=rpq{8@SsA-fyCev@P3U1NQs5bwFGl*!u#CuvKG(Ux1v2? zZ!60~lU+3zcjGL)Uc{4HTn+H57Iy`L>X3fIW zva~4S0a=UdY|e~Ci%rHZW6{3zRS(G446BnZa15K%C}7T7wmuWqhyDF^=4FX>pX#Z< zuFEcTzwEtcz_8I1ZohjL?nHsXzJX+XwZj#Rv7)fz((|JX9_|ZQl5imEcS4q(4MTR; zs13nkiHKlI{($5J#nO&!B^CEy1Mk5t??_Q_L=E0c4)aISQ<2o+OQ_)qp3wHfGw&@phhsy{ zFxJesoG9NSdF&i0T{q@2Xzu^)CsYxtjMmi zTc&M!LS%o%Z?+A94XB9(2~4HoSNILlTC=(U;z<=Dhnh77kWiPPFF%f9&vU@k+mc6H z$8E^N)4S10QRS!ekM*FzQB^%C?j&_*G-l{^pZoe-VG3#C0pd%5^4juqlhMYD04Q=e zzts^MpVT!z@v8A9F-_y;`mMp9wxhXBF~a$M2%7hIjF;{I)6^yXLsJF%l;~5N@*FwK zObE_=#9%foMDOduz8p+r-touNPn59WTne6Z-D#`twTHACG5GV0V90*a-44 P5f7G*+ta)HZ14XIerL?9 delta 13624 zcmb7K31C!3(w-wXkPL?~Ajjj7Lj%T>5ru%ToMV1Okwb-1h!TY;hkyr6j%i3p9%S-} z5OFr$F>lC=c{nV}zflGdNXTS`eIoZI9?2#uanvA)EBs%-Ny4H2`~R$)d0kyqU0q#W zU0v1h=bF=V&AuNeo6Z+)YnuF>soe)fS(eLmaK(YF!lokW{9{9$Kg$XA!u=_VLA=u> z%$O99_HkkFgyL`|!n2vySS|@C=d^SRW5x-OjuG~c;aGp0Y_<;>qZmkzkUdc`l6}JN zWoYda{Nt21LdGQF$O7TvN#5!j{}j4nB=wA>dFCs_XwQ*!#4u|0->U=fbyEKjx?&jh z4B;PV#?m}Ni$doaJI(8C!^dxS>baNq{Wg{(+0Ttu3;^KM>d)4BWK(~p&LWe4w6Mr- zVUew~(2+QcOlt27sXf{JvnHXN*`7UG9ZZ9QMX91HTpJ#X;JBROv=`2#+tY_aEoY^$(yVrwqE*%=U)AC`NIJSC~2<>$2CI z<2PoDRVHElVqwohe`8Uwr;w51%|S!3PgJ811-fg|!awF?Q7uM?{n@_=y(S4=pHP36 zgGQ$V1L>T=Wg8771Y-h;T3ca)1A_=X`QOHVRQTu_FgrVi3ZG6d$q7;Pn=hXX-iz-q z895+$CS7MC@`0dP82W~sLp+$~svJIXv(W#w8p}^!&#IjA3aUkTb2fTZTH*7o2j-Y_?pGt^PeUC5)u`t7(dX zq}%)lX+s#vz<8PB87iKo`dpQf;we~xc$#9ILA?TTzKf+5DQ@BYNy;rDp&N?=Canz& z%H;J#c|D!HHI{GfWq-+?Mg4YaT`-H=n13wB@QlUwm_iTCqIu!xXHkm@G*f6vja8^E;?ca~?E)(4Gh3PX4=#GjNC> zQW~WgtS_W~h}~~ZiOJHM_%}9-ioctr_onxB{+cE3HmU#45^aj!|e znkDWxIf@e%!?^^_gdO)C^TZc><`;X)i#^{Jd*a`z37RcmIFvcs*NUN3=|kKKCHWiO z?mD+-s>_%2170mmb_ed%zQwG%dzCP;hgZ2O9%JMj-xxyCc;VtW$vz{-GK(n|&kP3D z%wx(`&m8Hw89i^A4fl5$EBOV3)qLm(xkRaOMz8K2v&#o$fAh^ZVizsfs@45{Ug^A% z<1t1TO&uT|o^glqgZ!BV>mFndS)HQKCw8&H4`;NH)_+~CUEn)7zu2%!@-L)k7SUkuyk5lZU&Q-m zw`URMe#z}0NHIUO2TJ>%9ANob);g=pO@rbBalwevisjO;PbQigi=>C1N;G~Tz44T_ zWAhGzO7)Ee=c7uSpV~aA`G^_%1{~--k~4PKb34_q82MOfOLo}QiL4=9oXC9UgOj9X zPxt(PVDEgo*W=@u_!3jcGx25C%xWQ1C$R>DxQNvqz~-$H20tS#nZK6DKh)x$yD~A@Ldb%Qi|l z*`c(-NXw=iOl8_;C}8onHM6=Jjq|0F*;9>4(&gFl-Qe&hSmlE$9Y~t|PwtA~kt)-* zaQ_}@q~q48*2Wyi6lW}#y`9*=T~a-@nl+JTe5A)5Nc-oG#WPx-@tK#-2WqOFo1)7`D80#Db27H4&$3)b%HP`(z@a@#Q=U21Kh;?mua9nFI?FV znEn09gCdFB23V~-gadwDjtv+K97&oJV?aNbDail_lDTF)B%D`PWBKx6163Png4sT4 zGIz`lK4643C2T<~BUy5KzzE-w78vIH(w^j0IzVSp*XgW9mp8*(blD1T)2#e(C{r5# z>`Z4{I2o}WvyYn!qrN1Us#j&=QVm{0RHK)y!tPwnHO{!k8P_=D8fUUgtYdc@Uz~}H!L%<;>c~<%uq6FIoAS{44vdt_rGtzUV3O+BjHIcxPDawz zIz}?oe?c2+J;UG)41<5e$SU<)MpkpKU|3bERdQ2qrn`X*LY@@1I$*Hjbgob{mb;cp z_|xOB)K%71%9WKhc|XA=?5$r_sl#;01$|>Y!sTraZp`+39>bApO)(P}EZ7Q5COA`V z4W^JDuvVKE&nr_qGVMvV1FNj@JucVSFe__{F(xLa)W1#oa!&t|)2VhVc<;l$T$KY~ zrSS6&ap=)y-W=@58Z2??6n%-67$~e&)C?RFnUGH!Kezj{Ty!p`rimeDg%;4w)U(ui`?;#uT8jJvi)TG@ZG_8=T=8iMr zCoZ`sHuI3=p7%^+(ME9^&Kq(L3;h+9HwNB;(QOFK58fhg&`ebut2S)i0G67;7Y4b{ zDf1;~a`!>y!5($!uG`qs87rT&L}1;{A^73U&RL=qqjkYFXVBZmUAJZXg*!Q&onX;obo8_6kQ=s%@EO zKG=>OY|GSkEMUNi)fPWNv;EPjh(X9c82!y>lzuvePAVRfB1%2FOtL-SGbt33o<%_Q zv+TGoNd3eSXr~Ruh%HwRoaue2&~Yv{fqscmB5?me<7b&OM9hsP+bxwm|BP|D6fv)l za~*=@D+LHs$c`JO$urx#J`p-DLjs`*iPyn4V{nk>9RQX6!D(`Zg-4kcfv!G*Gx6q} z#VNav2Ci!D&K6K;-+%)b1RxLf+tAyfv%m-uPXH<5bbd;=2fkm9BNlETa1|;7@-|!> z^f56zZmRomFr(WBcL}60T|ONN#Ln-RN1De4C)`JmLQj$_!DZXDLwnE5#OKXv<}aEgNUUWYn*95?du++|JVo^BF6 z9rndZT(m-hw9$;!xeqh+ij(;fFFwk^QG7%{{gW6BuCKK2g>KJ&#m+sM*A6q8#%yaE zW|rAMn}O+|q0FrPxXj;fjX0IbJH;tX-X%W9{rcmqI4X52%j;}ar?BLsOFl-9 zsgJYdGx8bdbC?{yiO&(6I)T-G z#)FKBtoE>o&|(s+Jpzrzk7fydZ1QL4KceI_`EY}Q9F~vZ?-5JekR~EDv)#GyX{$OG zazejQL-KL1{qZdM1oY1t^svfD7wn+qsC;aJpORzp@dZ06IWC`Au!~|2k8outab-{D z%6^m|D_8&*UjV`vU=?40)o|t4>-aj|J6XRE657gpgW>98cn_ftk&yO0Mz+L*G9ea> za2SV!Ixs4)tDHto%jx6{Jf?*ojqSPrJZV4qBye?qGm!-XdEsbT9^!J`YzP=DDl|^h z3VYT}`84UACZB=y7A}2zNDmA%_t%Ycd-Z8rAs^&H7D<;ik|BReGRq%k!N@FFkNxha zvEqxRxCK4>t>6x287-^fcjV#F>CvYGHf+jIpK87{p7vKulNZczHlI$oeO)`CAc8Id z4`v-oJM8=SZRdGV%K_X6+;FggG_((}IwBO?dd|tG#c@nN1F#Kq(F0*jr@;UuzAfy| z8QvTxw&ArM_kY@Ld+A(kfW-{-#bGcLPgiavo}S!9Jbjsb)H9ID$2^0XeB5(4lTUbt z@>|qHh`|n7xRJCW0?3Cz6ULl2+#h)657Jr^`O-` z5>2q-_6)XxkqBhdfUW|mqZS!I2Dp}c@M9TbG27po4JVO?Tl)S`l7V+y0LmblAVwad zFF(hBUSYS)y4L19uG!^BaeE74tC(&D5}l?b_YW!4)Z@GZF%|j*`pYsH*crw(nUxI zacjrTPWIp$gt%{oruhb1 zQ=&@sgbyxQrhRF7UFuhztogkYa@1IS4!?5`qSr8v-(U#g`|3AZQ!F=dIO_BN-hdHz zCD({wP&qyMAL5r({gUcF?+Y48%!^SH(SzB1No{gkZH@Rj&}#o7o}=nHJ=g$%H%?RM zfpfV1tEcFJ&uLy;72s1G2MSTo(gR=ezBBZ|7sw2#Ur=ZW!$3t2{VWjnKOD?SY7vaM=AOiW|QsyW!dDvw{CZ+y|h3?Fm_9SsHCwz=q|VG1uOdDm)itW2q;>B z!X0czKSyp0$9(8ne3ds9Rad*J%P$la8!857Bb{6^I2##dp3wNd{O6*IyR*fQX!*sW zilN!!Zd!h+sN$h)@!v(|zZ6wW$`9|}z(_ZlHAUTu%zp{gFThNjyRz@jDnx+KBbhv)iw@E~@i z7@MfvC&nd$TF>I@`72N#XQgruZb4=KokfM`M$}jDj?$V!QJw!@N~(}CC;OEqQlN|= zZwhB$P(~7$avveZhP6l7+M{fh+aJhqKWv{eti){Ra zTrHvkx%g~p&nxkL1G%J15MK1Ut+Fen8!3=Uih;c8&j#2(A(!mOAX59KLIgLLie=K! zrSUyDw!f=L!`v=tCZC!k-2L;jEWcP~cgkZ@+R{$LjxpR^4CGX>%Xi0^)iC#y&CyXIViuTA+8R_I}kN0=5}ev}nfvc{uKI=Hk?%n2lW#1jk@(&eQ#6QGxu z-YWgqvL2X{r5ERRi*DT1aKgiaZL4=DXg^b2M}!CFxlRd-=Y9qKsjDAR6-C|NqL4uNnHkP{H~1a7Etm8X1BHu+RT z9OMHjmJD(pXA_Jfr0RZcVbwkqM)8Dmo{ofx1NR(X^m+FE9d`>z)90LUl+JaCPW-W*gOF zl^%fci#OtvU^o0$407Z1ngCn3>kb9nu^`)Muq~FP5}{P}ZVO+MPkJ3?zF%CYLcU1v z#e$)Cpx%r1EqJxB={S=%ZkiA_X$BrdV|Z8{PQ5DY8c zOB2_|B<8kBgmrMJt)YEF^nnvhn*7>b&QL{UVM=KK)#b=JC>_*0;H>m*DxPBXtE!Z2 zY@gxSKEjK_wik-|wQl`zT5Bc_;MZxI8^~3ee_oI@A&)k!&)rl3~b|%Xm3`Yeg zp@&~}Z#l^{)1XAKs8^h6_&FC9JiPWKvwx7HyQUQ{1mc5(1ChZ&@UX*>8l4b`4L%dN zS9=eXL1T@=X&^$uaL=2=Lv)R&n0kr@qVoATeA1x^=+LqR=!Q{;s*6=0=mFILbde8z<|$Y;5o7 z?@lr4+t=^zb=+Nenq^tOqy{+H)9joNM@V!jR)Syh>73QZk{scA$ev-9Ajx9~H|NFPa zA7uZt9`Q%H9zP@>5Tq1k_jz!YF$(P-rhG;*^ z$PT%K5!?%3%&K;=k{pgt4Y|F&IJk#+%X@p(US5bPczFnd`~DyCk1cp60sXiOP%ZPL!>8L3~e1OF}x-a)G1mI_eq;agMb z$mOAbsEJ^Iy%w!h{<+8)Y%sk+V>5Lno1mKQ&1BC1q-0LQ^Om0=wplyCtL!8jlp?Zm z%K$I0f8?|*nprfUd{^-z&S!Yv{Yq5xByc=;6QgOdK{v3{ts4d<)_V-J`dpOulVTRz zIVq0)SR}0ee5N*Mi+OA4c@Mwddf?*T7v{EDUg%PIF27 zk%hu2$(uIpzXo`zAvD#pRXj{7{Cm+xl*6z~1d^YX0AKBfuXe*%=i86IG;cgLmibS( z-EL}b4Po4Fc$YRPC*}BGlO||2W!YUj$I2^2{Jd{t^htWW=JRT_M~z zN&6dCPR~pVqZaZ)Lm&p_=ia^xo`by35ip?j0a};jme%b_z6*n{SXZpb_Uyr{hU^rB zr&>o9@(?cJcty%x|7$4o7=-$BKWLX6%GXf1o8&7&B0=%%sR0#GNw0vOl=3p{W1e29 z1jWQeMG!|O;+)-~(u%I4xM&2D0*Lxyl1pHYJX%E9#uIkj%fYK(AGFPogv=hsZPJKL z!7+olu@)jQ;(`5aC7ac_9CHD;~HYXIRB^hWnLwo55#a0QizD-RZKL@H4^H zTb~3RaI1wCKHnT9J4&jvDh|1&HLeH4Ixw-L6mU)I9EVgxM(rx{uAEuBnv~nyFM;fF z((U9{bVZv)-k(Bt5<_ zwZt@bKvu1>Bh!*5PeA6Y9THe(VdqLD1%}F*3HRuQ94+3;OC3`As-Ar(*IimJ&snygAr5A;wnA8p6nC`@>7CN^NpU zLlh~IH|s!aatYvVmI^bZ)Ybi+otXS7HgTqS3&Q|5S*tC@v_5SBNN*pkU56?B6YX@g z)lNL4aSJkYXrSzwT*^B^kDOfcI+7v&o*ke!u+u48*`Wr~!cXdv)gPC3Y%Xj?{;tFz zzQx2%JeT`6^H%ekU}WjOYF`tA5$*emYN~x>Ro`MOVse33xCf6K8aFX@6DzEyjc>Cp zZ!_E=tBVbsu9tNM7;}^>)zpSMS3?|HKJ(dXipHQTXz=^yVaFJrir9l>gVqI!1EdWs zsHh&Kxb$x1G5T5Zd5z_BgdXEjQseclx*Tr~ue_tS#iQlfRO|1Llp?bGbpLJnj&|AD z27xDiCR}i{@WuxkOmYG%QW}$eUxaZDDs7RHGyCx*Bq|>Wb`Crk>>U^u>=76qv>;>I z77u*7X#<2IuiC#~j=w@t%g5LJ1A%`QoSh9Tn*p}eDDMjzvs`=R z;f3dC1hX`8&8<^mXQ;DPWmaWWxwRh<54f?2EugwIm{vMEzEx1hMMoY|(~xB+X~4;&v0Fstc9*c1qDXJ)EGykX7kbXs&%6#Az~b|EoM|vdGZMyF(`NN z@}6iD*%PAl9HjPXuhYni_PLeYf_GQG9}Lg3{Fv}ed>8ieQ?MB=67~}?1yM!E3ne2g z3qbwIK+M;LX%7N1;U2vc0_c4_cFjkMiNB8-5wz;|*-Y5L&l=oML1=EYGFY6vCt%hh zFfA0)_^izK@vmVd%=H!}jT$+3b177?&BZHG<6q<2&}rK0isLb-KBMcDW9CJ^W4V2t z^WnkYA#Z|YFGA>oKy@%uPb&6v))he0Z-!P;ZmGwQ)K2gu3(tx+Q*tVu0xSN<6leIg z4oNZ80!~wsZpEiwJvvQO-sw;B^|nep=u9age+73WSOv2)*aoLZhTG$I+q0yF7!+er?x|*9KFA@5&!R=Vj9LwcVW?xNmxsDVxL%+>ON?8ho{goaMh)ipb~O@fgKI z)OimLiYu$HuV1^737eMb&K;oJk^Q9+z|6F1vH3-WYDmb#o$h0rSjZvgnz`B)xloudlSCn`S(PU4PC9_Q$3<9!UIJZ zip^WI$qEdpti^z&tM1N@8k zWq09Wnq{eT#FS=bRlJokzM?Q=JWtBGc|t$mu`A=lX{0%XL&lI}41WJN& zvNUnxL_8@=i4uEywYJU836W^=!T3Ea+IOM6r`P&wZ6=>_JRj32V!}K4giV;RH)j^+ zd`*Yf5B0*L*D}`Rzg66!Tc11b9`^7=+=l`^eckC@5GKZof{I&DrE+k%FI-8$sidFFa~`wBVLbEeTXz`bS;%^vqBP;)YOWwYfu>O>$3Cp@Cc{P+05SZSqc( zTDy7WT@40I!V-hI=u3F3*DCKsake|UQVgMGgy!^;q9y8ei_^G4=(|2gx!|NqRd z@s@YOP~=^(l2(zDGn8Z^Ik8DRxWMhp2@a^hJIFr%!}P>q>WizGLh&-TBVKQ>uk&ba zLd`JV%(5IRSucAW0ytd7)wq?xot(k#%?vu)Dh|`%4s#}5nwiAe(D#cDYGzbZ63aR9 zTdKrwsq3Yl8?4T;>z|XX%FJX57Nh=Lgbbxp{Tp0`WUUyL4F#d2ySL)uY^*@5u5pEJ ze)hs2-axJoWRLcmFkv+w)!mU0RdO=xlammx{3OMtqwx!W; zQs9<6edvF#3W*|O{Qt|)z8H+64;{Pux}hPDLk~>D@OnXyO!)%_guM-6sMW*SOkx<8 ze2m9E-W*3vSxt>Uef4;M+UoI+b*rPZY+27|IiJtki2psGffkXKQk86cG zaJ#ttJzJqTV-PFq9i00$bjTY+HjHW+;D4oX>+*04{JS=afKl91V_{jF z@8ai|e;3b+@o(EZZ+&YrUX|8)67lz+p2S`;;o*iG{~67u@Nkpag#XN@ZG-=Mk16i9 zXBI7)XXux*c+o2_FG*gs?IpUoo%3XPbeDd2BrRIGZd0-H(I;Pi+qUb#DKqDwMEMF}DrAZ_=#f z`K!F|SN-c}tI%&?{9RL@f4ykOXLT3N!hlJOHdSa>drz9PFmJuOJ=`fuC6w{$g`n~HjGvu^Ev%l`m{9zXN| diff --git a/textproc.asm b/textproc.asm index f5246ed..8236043 100644 --- a/textproc.asm +++ b/textproc.asm @@ -795,7 +795,34 @@ positiveMoney ; now we have to get address of ; the table of the weapon of the tank ; and add appropriate number of shells + + sty LastWeapon ; store last purchased weapon + ; because we must put screen pointer next to it + ; but if we purchasing "Buy me!" then we must draw the winning weapon. + + cpy #ind_Buy_me_________ + bne NoSuprise + +Suprise ; get a random weapon + lda random + cmp #51 ; defensive weapons are less likely because they are more expensive - probability 255:51 (5:1) + bcc GetRandomDefensive +GetRandomOffensive + randomize ind_Missile________ ind_Laser__________ + cmp #ind_Buy_me_________ + beq GetRandomOffensive + tay + lda WeaponUnits,y ; check if weapon exist + beq GetRandomOffensive + bne NoSuprise ; Y always <> 0 +GetRandomDefensive + randomize ind_Battery________ ind_Nuclear_Winter_ + tay + lda WeaponUnits,y ; check if weapon exist + beq GetRandomDefensive + +NoSuprise lda TanksWeaponsTableL,x sta weaponPointer lda TanksWeaponsTableH,x @@ -810,8 +837,6 @@ positiveMoney lda #99 sta (weaponPointer),y LessThan100 - sty LastWeapon ; store last purchased weapon - ; because we must put screen pointer next to it mva #0 PositionOnTheList ; to move the pointer to the top when no more monies jmp Purchase.AfterPurchase