From cb270be8652be15e58dd7c1150798ccaa659d6e1 Mon Sep 17 00:00:00 2001 From: pkali Date: Sat, 11 Jun 2022 14:53:28 -0400 Subject: [PATCH] wip: inventory shows weapons #26 --- scorch.xex | Bin 38972 -> 38997 bytes textproc.asm | 78 ++++++++++++++++++++++----------------------------- 2 files changed, 33 insertions(+), 45 deletions(-) diff --git a/scorch.xex b/scorch.xex index 6950da8fddf170c8d5dc3727a96f1aa00534598d..198e5be1ee2e29c1ee5069c45343ce5124768a89 100644 GIT binary patch delta 13086 zcmb_?349b)^8XyUIWpX15NLu2QG|#ngR25wAdGk*BFO3}R|ZK$R8Syxj%i3T={S=H z?AJK6G14K;ro#l#-^O)zK?O5e5}U(a(FKnm!~{(oRuS1<;rD&rlZ4A%|DVsFW4d3x zs(SV6y{cDLuip(>J`Pzz%g31ucRW8%GhbO6)J`!67OHr*GxMj^ZWkMs@qv*T8|{vpDYEmutR*>Vq4v4rA>J;EEeWUzP}x=*}guV@eN5_9*7 zfn8$w9Wi&W7G1S-5X+IFh-V$|wv znB1{K!g!`b$^gDrbbdEkF>MW$23xol{5&*{N#2ny{D=)yhG%? zTf;|1&FUO>Hx!pHh0m9jSuI}K+q7NOexOL5tcGP(#zS-{k{?4V zk`$ADNzNGJv)bJ$McNPa9coqan+j$ART+qR*KTLA5l)KH_%JlruhI5>OQ~E+Imco1 zlsePy!kUzMgHTkr0z3Gik^o{gX-k5%c|2V^4j2SLq2c{E2AKK0!B9_<-m(VKYGkO(#TOeESK}X2C`~Dwa&G z^4i1uM2fdh4DY3Qd&R7+F3?x7rtqHcPOUz8;MRbpdB=0LE8?( zo9J^K7zmHun$8wTf%l|pNll_tRv~M6tZBU8hw*{4Ryj$YuQZ=SajQL*0g1xNtZvvSdlvP_HT?S)_4FFb!^FoO zf;F45UAO<4s6VD^{8+LW+qoRaRtHPEit=dB_5CijJ6lqeriR}S}0BSH*FV^ZX3p` z!9DA>c(o?DM+mj3+l*E%TE0(Y0X|4x4<8gBK#nBCOv9<do#>1VO^ zTWZ$Sb*(M0G_4iFKZ{4siqYY|VVpmFmSV{Mz*&(xDt~yVh{>S6Q#f(kwL{_Z2dXbw zGEyU{(S+)HOR<)ydMw(0rDvtRtX3Fv`&Ip728D&w4GmJK3yW@ln5`8%UXqj^{0kCu z>yys32b6fM8U^*~2F1ldS6m7j)(yIdkV$)>+dawNi_W4m)PZMlUUtS2lJj?>zAW*d z5iEPH=ui)mws`&^30a#D5vFD~^`9;!l@2uGNnJd!{zZnrj-O5GW$>3^FbETQ}G#Z{x{Ly z00*-~=c2?`2F?J7T-pN;Ij?O5mlv|^%?EWS)Gq9tXfxLednRV!_q&Nhu^)h}yIGgc zhVBgK*ati39ebtBW3Qe2q>qj>gz5$xsn3H-e+&$9))GqFi+_qv*hQR~&dc;zJA2qm zh!Tx1Igg)5FwS@IvBVoOBCE3Hj zBFP-jO7dDhPmhvNlA?60Bv|1(rYTT(Pp7)=GI{Y z{xdsktNJR@W~ybBb7;Eyg5>DgUIrp_N=iy~c%;zh?rYd%qSgn@A0i-m`}wS`iV4X^ z2_pU3F*l*4&}Hrxx1|74Ng0nkR%7;eyNfG_9Q?(p+stT}Ebv^8qx=MPk(F3Bw zq+o32b>VmS3}hRLElE8_lFj@vgieUF!1!?@Z;ZSSYuymBLQ@gFrV89vVcx@XOw9HS1V7$x&+I)bh2iC9kgffTeD90Xy#~gX%WHJt0@xv_x5Agkq&gM zBYY8=QG`>^PuhzNZM2!V{N@)V?TyQ+$Az&9sA3C=T0rp&p*^f%=i+s(6LfP4j4Oa* zux{fWe3G$nSgPx%WSZv+^QH`Ys%xF=HgE+|%iaRHz`p@Hgh?D;sd|WJZRSX`ho~Hh zm=MKz@W8HI{;&&P=Hi%5kJgOH%}C-9xCzl|gM{y=qzyF^xzAmZURposxJG1ZpMqLT zgEZ4D6Rw|nKWiy=el(MYR8}W5%gN5H@}9Lqg0sogwbhCjj_0#FC(kqjL}N%aA(It` zm4eXGw-02_p^xa4ND>iDT1n)b*6V08HWkb(nFg4ki6J<`R+hBsl$0^BGC!leW(*AS z!36Oq$P;7XWn?q7fbO}-oV(Ewj{*%yMo1cY+(43JNP~1kw zWb`X$FFO^SFjhLT#VcdFyS_!@iynGpMQ#b5K`w}pFO~|@2$Mt@Efv#%XG%oGgLp^l ziOJ$MoJ?EjI!fg_FZ5BafG9Pek=P-DFbJmv>oy@0ik%aPhHy}r5DrzC>48^wiQY|8!Aqz_V)J_M7-3Oisn)W=|Wk?@4@5`nZMN#y2eTx5b~ z?aMe<^Bpgv|EQ7O5o<#+u)pB57^47Afq{<6k4%0PvbX5MfxI zi)O1B;5E`gh$>M~T7_AC4KL9?RbF^``ktW08}AZHwm=dc7PUe$og_L)9i|E2PaDKe zAX+MPp`}oaIIQ2I*?K~qgmgepsA(ohg9U$Nl7VE=k)R61q4IKr-QX&(GL9?K&w?aG zBVDs(5M9ukLzQ>NYs8lf1k5>b5239-7>FfkPN1vdHU%acU!gSBg46LNeOBrOsy~(Tdjv?ZYceLV5RxPG+yUFC0Kv{ zuX-r|H-e&qN>}_t!Z#2;La+^Jc!v2`_^*hHo%}gbj}ZO~x`V$Yl}R~Y5#N<|^>dO9_8$`U3zCgN8i@KO$;MC- zGWv5e`U^7pOVX$v1WhARkC7;YoL|SsQ%A>B$Hudf0123XA^bkVHxY%M>uCRsZ2c7? zfaEW_2q4_2i_k-24I34jkkg2T40{kY*er?ac(H^RMg zw6P%3Plbad67j{OWxItkz1SJ3AhhD_cmD5VY6oYwS?- z0f{CSm3}~+w?2-AMA`?ztj^Ep+UU>LM(S{Gi>``{*Iv}^IF2tdtc&;3kitPmr5vzb z<$zpmebL1tANG<_UShl54w(BYzfxM0XbggSq$6*2@m3>>@e`&ITJO%mu( zdMXa@zW{@o>0p&{*o1*ibO#11C`mvj*m{Ajbl(NG(M=cFNq1bJ9zz8Fgv6}bjxP5C zK14e)!dtW(&v!7T2GX{GucIApCjM>Of#)A_22hd)etV4Me_|x>8YB(;ju^=wVkBYe zb1tg8RGuq)pLD!W)b~jwp1KwOeNy{A(I)&?V`ML|#!h3zeh>eNM6J%=PuRnoNbWYO zhj0bS-APpumPu|s)yA)~LpI;xlO!XgyeP^s3PNeEWe(B^2}@{3=LZE-9ZHvTfhOSigSm$J)w*)K@^V-O(w zMTwt7)H(VdQXeCciM|wNBD!G4bBIIEYX{<^Kx_x%Y@*KAqhUa3VvE)-}ofG~FNll*8@YZ1*R?=nT>vDE(U zu4?q%m&C@o=LlD%x7MpUB-%cPJsE%mtxs)8Ji1y8uNG~8 zI=foOO4RxRhz5Xg1zXTfiF;~RXQ>NsHLJyjhSKd~%^DQZ>-*>8o~?fT6}h-;)7P$} zCReNI}%olDJi+D zg;!^#n?u6(Su=*#Abp^>TM5jpHO|dXA?q=wWn3`{LmwT_>NjB6gl>AJw?wLzy{HUq z4Nn(I-sIMXT}j#xijg|ta*)rFaBIjvD=8bekTRL8V+s~4S92a^JjbDEu}CUgEUop2 zCwnl%Df2gbN7aa#1L|?lxVunGsK+g%*%P8Yp)2dLDndP0rQiC^{yIU&FFBl!)05AV zgpVE_%GP-*;`|=F>~Rm`LNezzadlt}37Ah8SNSP?a2MQ6;o;qdkPH&Ze(VAOD2}-k zN2h|xmseO5{MVEh+0NKyzxx|>m%BY&T}47&$nR;`HBdYKty|LitJg1)v}ARW1aX`r z=Btb8OUW0Rp&m7hBr;m+ScLAH#S(c`>R2pnnmsi2#;4URsp%OhWaXcc)I~zW>QibFo-ij2a9S1rI!Fk>%8`=h3RYh*ZJRSU4q=tFB#mq^iG%~_Id z2-XEcd^(>t=y8%Ioi`HT6mvj_0bMLlV%sV$b<>-;ZI_W1pg1->|CzTaQ! zmQYQ>y`TWp*$L&D>WYnMuzC1WC33~W{M@c1GrdZ=uvk@S%7th~l6}c&INFlW z?{l=#J{#?^ySsa;yZ{6|V#OV%66zb&ag#FGXlgxu1g49|1YKc&VQ1q9{rcHenG_yR z*LxDyyCV79Y~j7f)7czp^s~}+krZEiTS`Zc)Tp&@4fo3;%cLUP=jt-4sb7|st`5!O zmr3e#daFNeJtwKl^;QCHEte{+^~)rG2seJN3NzJx@0<&mM!T4P6=SLsE|adQFn3Yf z`tf9HhYs!|w{J#le&md$uRYU-Q9az0ln7jT<#XH*|l>x2B;K_+7QDzj_G%OCSv+bR#SUFiAKo>{()30H&xl zehq`zWcn`c9{pDito?QGn^CJXX^FfUHwN+>T%KIX<+~IcttwH4DtALOG5#@S=~`GJ zH5G`_8*l(ARd5la?jn=`l~%mG2BYbU|36GdVa{weJM!&9k?Q0=M$kK#3@`G$g35+mJD_70re(lCVt-O&Q;GCJ*PcIK=>wwDk8Is4|FniGJn%#e%xgKW;)hL5*>oTK5D0UN$6B=>PAjB zaF9wPgh?h;oz7Tq0TpR5$sDY({A7G&#osY;vNG54GpeaMQg!{2lAyKJjcLCs6xv-q$rl`7%T>#T$JcR+b6F00i-qvhgVBWoC+*KW?%`xP|2W50Io}XEo*ps! zlN`Ako<@PEkwIF;DX=LSHdUp9Dh^b#9A6b*9j_n&x?Y$#|A9VtK5Lh27S?h#vbt~^ zr>e!m@8%C=mp&_R;sp71ZoLf0C;txfDyD^3n_U(bBEOW^FT|ao)Ay`HCdUP|rQ_>S zZvu{m;`kT722(CyD02DEoxphwemzeX;n(v=siG~VqYOc42fZ|Va0Y5ey-?z@;ueKw zslSm6GsoX%+~R3tkoV|bpWc8VUzH2?`+aHMnV6n!A{i^?jZ%+u;4)^nuxvqp$KYpW zDgp#Rjtud*LVC$^>4lDodzJIy>I{C_#06BJ@a}@aX&)|YdDSil+(}$OelyxLGsST{ zfDf$Rbk+zb7Yt%wT*iF3>~e{y%MR$mS8*(qBbCI#AdrQdxdMIz!7Ug7h5SZ(S>yox zIN$)b0jNX#-Dvv(JM4OiA4UDm4HEnoy+Kc`-iMEY{(+-gYsb;8wc6F|rQDJ{V3G;6PBuzX zM@eKN=>W+M68-jOkMR}JFnca|Q=GFCap!;vcPd&T>(Pk>jf}HsAOmAX?VwA)YNd&| zc7>5i_r+HT_YhomWKdzQmiTL=M%xh=zE;5(JzkWoTf9|X{W~9g5JGd)Z$x?q227fB z#`Dygdl@E7?bq3~9OheHPi+^NU4?pNlX6lNXOjXv)PM?*U=S;;Z0?UR`WY zk38>UBG03U=TiD|Z|Z3+qGvPrCXOar;AeIU-z^@J3<hZw=hokkhnwn<2Qfj|O;z!b#NM`6-Wc}Ak&No)rfsx&bk==zM`o_gqnt{RdK1Q7Owd!Tv)o~BCZ(dB?-mXlw1@0ZMrPgFXTkmi7;*-8_1Y>{s7E1{-?*A(gYG`tpdX{d#3MHKs~OWhre(vL272i09c z+}T?2{%86=%}^Xw$6s`12~d`)(ppzM>d!%2+;#YqoQeVQO>G*!g$+7>Zk;!4@t*cd*rYHE1@s;RCoR+(0BIqxqH5^)MYoG1_SH8ky0g9<}GKepoY zW2R~fJ>JTKL)Hg}R0N|}TAhYG9@B6to| z1iMR26--f`Kl(5F<-Ln#wyaXlaYB{1X1iGQfj4?rJwA!QBRriPo=!qT9QD)5&(jH# z_UrLw`}%3qrr~2icM=~8I{&@e0jx86XYa1g`x4PtWP2NeMojohJ~?!%CKR;4e9syx z@+c~@nJVjDsw@k??aE+G=F5pE1eXn(JAcj8@Y8Fix}ICJYt7;F{<^B`^F7fi^=1zi z5H+-Nl-D=`r8R`V>-UsHf5INW?^+ZY@Ll3AQC@$%92K|jVd^Ifsm~2FKQD}V&W_)y z&&^9Nc+YZY!F!UlX@~mUhym=pbzV}XYNyP7hh9DEjt3Uzy!!g@KR)tZuPZYqJeIY5 zt@3B>n3?&_%$4Qa_I!HUeB+&utSWxE7$PVp+7W#+4@~_ z#`yb|yu9hnEx+Hk^OF;2(OJqVOFB3Q76@B|W6WL&RKn7A_L@+`&7I|;KfPchNo&YPI+t0;bGwXk^ACu={bFdZ zn6HYyz4YTqvsl4sN$5NBqF6D)iI3l2j3NEjOp#nQ*DEGa;j_*Dlo}ADR@cGIo_i#W zXL?5&&R2=9uQC-=y>ElR>*I^GpK9WPkAX16iz4f579n(t=zB}_y(cPNz8^%z>ibnx z?)4oN6|*lYGU9Zfg|yk*sO@vP#IViHGP=BtL=#k`$9; zRqhB zk9E!Ol``LE88-Fq4dri&p%+C*&YRSbLd~Mb1Y?2*+TRo_;=A7z?G_kXi?}1Jw#*Sa zAX2;oVo0TUs+e8x27Q1vg%0%-Bsx_j4)E3Per)Vj=EA>@U$W(eXs zbOU5-KZgW=;vEFoBMCo>@Mn`02N^%|41eiN%+d3limBT{bdurSpcx6;ZV-;5zh{Gi zaM$GXS&!sXBws}GrB(Yp)jp-VO|vLV?O#BwIz`~TipW)pUT>#YvvgL(D1OBVItTltqQ>IYl-S1jt0t^BJN^~0@{hl!7S2fNt}lWVj8 zTw~gS?bY>hg7y=}!~T!*vmS>8Rbq`P5L8TzsV0zKGhInw7Jcr{60`O_)!ezY;peSK zj~?aE(#joL=Tq5r*%?`U@;i{zp+Qa|aBa%MDlt7Jxvs_p4yiRdKgL=E%=&ECeV@}o zC4JBz-8Ckv-$a;i@CN|<8{545yzfh5w7b;)Qx|%+L20tLod`+SjbV5BTXt#js^D)C zf}QGaqg91g#e1>{mvmcG*R`#( z#Q`EgZe>;?Z#VBh<~7wA65FG@-6J zQmQ4YB^K>XWnhhCXO(cplnaN(HWU_4-)NB9CajopJ6k38+$Sjm_`4-$@_nvRvz2(P z8U+pR2gSueBTom7=?9%c$c&oZ@1EqcQ_iA~sRPgE%Gg=2k=$2_>X!Id2$sD{bgIvj zNId^M30e=oK$wR4)PK5_R65WF_vzw+^&c|)bNuYeAcG&PGsL{zn6q1NsLvAqbD};+ z_zn^irjw{Ikcf%@f>6y2H%R}t31TPoAHJ9>n14pMV;A*m{HyfyHNxV1M%tJP%Pq&L z0!;ifgl{J5=Y)Tjs2zlVj;Ngk%22-`{0oMHpb{(<)yg1UUSsh_%|84Y(e{Ev7ol@e zVk-k@fJ1K7Y^PihxqvGOT3QQ1-3xUHPffF%tAv(mY54oqw9&8!AnR_{t+Sz);hJz; z@4RE5lzHs4*G>lOIOkH`z>o&trVPWt5GP01*&sfPPIx+TrMu41W9{u>Pa{e+y5s`> z1|k>oHxjvszlq4j{LQ3sI*|)}w*c&$1F&xaz`n)Qi!qLw4!MAyH5Hc5LNyB;(~_KQ z$Oft%X=ZJhGjt11ACQOUU~R#{wcq7n0rbRxI4tJqC(!nECN0sCzkpzb&|;ij7$mfS zgb!B4E3X6Q`plJ<$a$TBb$AUNFrHs<6{oN@v#8M2N-b0JF*~Qc72=u)5BQ= z;-y<%TU=D@EP@nxvIK``Qce!xO69_^8P2^RJURG@Ywl)c2-Q#0nUs2ZPp?u>?};~b zN*8rtY{5RCOw9w!oP*&cdJ)3?pk6G1&Zfft&ab9+y@t55Z`XZg z9Ss8>++4_&7;ykc!+>L(i@0ryDZ-k#?ZDn8V!anjSnnkg)_bXh^)Ax`pSp>( z-z`;qRb$#|le%_pB1TUP{0;DJl2QQ8^+v-FLCp@2RadhE@fHU)J0ljVW^OwS@ROYE zdi4RK-Jx!zoP)QjcT3KJ-5Wt7 za}!E3UFLpqJBtvN6hk^0AFai$MSa3+pSX3)!F*4cn=u2;n1P$QV2+XkhIIQzxGH%- zp{JVL9WXUj@z)D4-+1K&3haY%MJ2`2TidTEQA@>*PX2llF>^)by~@=74|C)JHB%US z(-ku|Q|Iv@bsk%&^LPk0$rW&g%Iik>Nf9?=pQ;aHpQ>B1Pt}L8PpPY<=NdgA0wx7x zE7ihZZW_Th5qpw)h}g{hA%sqdv%vUzBJU1YW4Bg?Bhe9Z6=uJ?wW_HK;%TNJf+ZS` z=`6V24!LT10cNs$c_FtOWImlNEy{F)taEoS(O@-`*b`x{nM8}%$Dsh5a;4dkbBF*+ z167;k`u7}VsIdw*2|MTX$(s3GXwNaEAy@Zk=BTZFErIDZtQEXB4`p*n4?1!Qzn08e zi&Jki>0WDSBVytT58o|md(WgEH^%Z%#jYZ%hvKh-_OODzi`TbK(9LNut_X_3x?Sz$ zlZ=JKQe8GZ-JB^bnm%T6-#Rx{aYa!}Ymr>!t%44*C0^R3t|prG@EUS>HBr})unAGz zYW%<|^KN&;%bXgs>Cu`Ixfw|u0yiN#<1FFZ>7zy)iQGr-@E~m{bS#KW<6@|FgP&%a z8->fVX0nk|*FWx{A(hp|%yY4K)Rz5z6q(}hQF_8vof0EfSY4TS7y+U&B$|-vsEBk7 zp<~4xAajkLt5YILL@;?&3?J79eHaz($lVZE0t+-T1ZU_dD@Jrm${1Mb|E9fW3=DD$ zLHr5w#8`M4-Ult9dm%FCel*0RKm(Eyl7{a#kmMNBSvs%ZZ6stP;dGdq2`MSQnRoAt ze#*46S>S}RY{VX~T+!e4B@$os&?756DR>OIAVR)aDo7(t5@xhiOaq=N5fKmK9c>^c zi_cJ0LmrYTtGiY{0Z|JnXjH(gK8%m(;My{HdHS88#T(y+#AbmcIxK31WI9RoEOm?~d^_VT zmLXaybfG0vj5w^{iurm%orH8iPpD}oNP`7$IKx1)=txin;?VLugWcJ+Wy(aZR6h%n z5RLTBl0kGqYYw$#vmPcDHXvZmzHx-M24f(WpvlnH@R)pK4X_jBkr*^Wp?_)^wE&yf z_02p3Ic(J?=_1CKKsP>=vrZL~#mI0jeNuwj2vY+l!_)?7=7Z&bC0J?xB^s~uFB7ak zAJRklzY`P{cF`4YB>WSE4-!}bJpi~Ot~ljYGX6Ev_zKzSmh8iwJ0dbt?1dfPdTN){ z!&8}9{D$s-m=6;bmfT9z*9iYQwcvxKCMh>eD$a4Jtt1ER8;SZl$-y8`5cMF*!B9am zzLkuBos2(7+O)Sp(?rxmB+4M?*YWYIqvKb{#%~h=5-^`6`~kv0MHF_Sv-=fN|0hHM z$&a_hfJLmm+o3+A&-EFqY&uuuEzgl0i2odMsEs5C)eb1+36g_q2NV({IVg7o ziP}VRQ15^uLUfP*o$k?>=pKC;dz9|m61s0Wx^K79eY>4Sz;fbxp0v(gL`za_v{=?b zGb3#RNc2k%j)8qfh19IY@YUKzeILj1>y6#T=h2X23>laF zmiMOZiTNWjrByk=6~Ic>`A+^cQeA?Lo$h4T`BiELPaEhH`POE zJISx6stA>n`~cO)pW2BKrh)J(RWM@C0(_+p#4gj*+zg&oDLWi6@n9d$sE7wf15trA zR7)J!09^Z(__2?Nd4F@y$iqX%5`7WKC=RPPZT%ZH#Cx@RUk zfaGCu%!7^|^8piZanPTCCStG!9W*j;5&k<_4xebpz z?3b28ECNGX3W83DC#en)j|ni#YXub-VK;Rc%g z+)vzkv9aE5FiQe6CnySnT@H`^B!2(b;HO36STJn+V}_@jx?Y!Z$OSofOZ+qlkh4hQ zGl-g@+mJeqgr`*`E7Q=0ZJa@zazQr`rvR}Vh*OC=6)6@>atfi1$%Jj6ipvu98qz+6 zR18!BzJ}t^OM>g*=V;%xq}tK5yRh9%;`gXKhQSc)Qg^DkR*&(?gkDIa%j`r7q0 zEEAjK^ZBz#!*a1XIiEj=G^`MtQ}cO`*sxM;9+uCGVneprJTjkOCEPl1YQhpRIXQoc z@aVkr&3l9==gk@|Abp^>TM5i{TV4AWBkM7yWn3`{qwl<$HEzIcgr605PRBF%;^~yw;*|kwf_H3X zsr{Hk_IlnzccrI4*<2p3-arjDAd!YRl@P8T7vRSXVL37WQzg zt{8^f+*LfXu9&;Lif%hE-FB6ZChvonlz6@2WfgJCQm?oCHVK6jTtRxh#!PJjyMRf- zq|%iZSkZMH*Em~H7hGYUEgV@e+I+k4>jLJS+ofn+&AWj~J8cuolP6-KYJ|WvXJl}? zt^IbvxiDtO%+K`JJZg6L-l2Zs#=Ww>2l%-tsm+s=G}vqgZ1&}q%+!@NG#Q_mf%`4P z-~%R@eAGrJX6Q!$jZ%Qm@;jtHe^7JLkz=LC(Qs~P^dpUTNSY;W8d$JhN&$X8PKv&> z^A5>1ZH2zg6IX`EMK2F0M$_PSCS%!e!SXK-Pt=|OWz^iJ(?Eo)GJKOV47#4Vk~&uk z+w{m`t^^^$?63}mH6&pg1_($f{h=AQRoK+ItmKT?PV96>Xr~=r!0Yd+Ed#)}S`3(W z&>gN$%t&LSsm=7qH$gOJ?G9}&?rnUhUnRS1l0u{Df?kXT4cNY%D`^9oytV?bx77Y) zx~<8ZCVYAKV0NA~{!Z!AaB@X_B)Mmv)TVXUhkjm3=1ZmakJR~6`_C)2^VRrle!isM zrMHIB)?JdiKyM|`)&ePDZJsZAgSgIf2h4PZQs$k+G}_1X(->2oaK025FgMQ^3Kk7Z zLCWiGMlxC1xZWSi5NZ~ke{P15oa|Wcw^11%d;Yxljz42b>S9AR+ORV*Cl@06sG`L{+{eE?w zALHb#_HzY_DQArzxkiqkD`GZ0*t5=WNYlQ~uf2*|W4YvSko>Ahxe#z^@`jH`$5S5F zpjIEFv_8<{@T_C~;NU=qCyuZ7BL{fQ-y`{5(QMS`xV>^AS0fj3`*7zI@T&no@AEVE zHTZAXY%^P*qL=ZPNyT{RW{v0kkIWcOjk=#H(1v4<~19m$OPm`2ZMl*z7Y%~GtK ztPeot@hkG5;3+J;H=RABMBD!ab+3%aR`(D6XGZn6%Gy6$ACFpHUwPzxDEG^IxdOR{ zD|9P%S`yO5zY%(g&G-aOsrN|j9x-}34itrlqY!mRp_EW*#WU+KdcLyxzf4A9&3r&S zRmm3{i(`Qhis!#jpOFp~e$df7fSr5&$^;awMQ(TFUO&AyF6*PfmAcipUX)pSlGim= zrA_NX^Weux+P657KcuHPmKKNjme@RTh>zm8;C&ANu!u;26_xe>W!in?;Degm#cK}l z^&^=G_zm$~i&q;xtCU+$pP=hM**IlRGfE0xct&t-+23rWSuEj)WE$a~e&{R1VgU%k z1bW*Ybq^c&p1x^I;HFZWyyUD*xDj~G6`6{S-;{}jTua8ZS7f50Tp@hz9?G6fu#yts znF&=-dLMU?OvvP~%;YC#@>fv_Qc3h&#OhH8#Y;k`a%DfV&A>r+j7SAlP$=0I>-A7U zEhPPHh2=BxZi=5eEmK+O{0#-tc~V{T$cMR7ZG#e`%bEV3|{8WkuGT45vM9}qS!xpn$F1m{H^+qgQp zxMMq~xaQ}gmjbtS6al!sqnK0V!WNF+Q?`^;IMj8tl1UK?I!ZWMF6`jAT34x%xby<^ zi^63~M-2r+91vtVzBaxtUO|vEM7V3|Y&LDJLvC2!$Ti67@+UYIjMCz?p>j1=?J=%W z_H%;#7jBp9jm0lf=YFp{W}=u5Q!g3o!2l4PLSTEC)T}zXF=aIqki6v zV_)lXs6(Xu^##Br46T?AmDHgU8B2OVGEAbca9WJ_L}MKJ;7xIUAB)=u)VfpA3R*uL zOVCLB9S!7Stf;;1)-PRYO0JDGa_S*?k1&ql+QUwT87T3Cq&E8zH{Pw_ZBH4B*PUgx zW%`RBJPn~)>RTc`PJJfLb=3yy1O^#9pKg2CQ+e3+bT&6p*R}R}G?EQ$9)1R9t z37i)O(0d!)>eaqh;wVVS&32?=L+F<%0Do(MHyIbmec)~dZ!3WPL^gAKKO3W)8XiU( zWQ>HC0ghck*KL9yqeXrt0(V!Muv8TW(=r7z>X)Qgyp~|^#Ev47oayU<@VF2kE_GjD0tEPq5;%7c=vm~u8A8v zagiB5sCAtH5?=NUXRpI8gIv&lEva}m`t+Y3!py&cYp|yM;n#y#l)pi*Y`pssQ2w$> zWAw@5t`yx~uBgdN`@H4)^{IYwV!R&g+>eRYbr!JnCQB}C?-xUf?pNQS73(`U>a2|0 z7DJ&fZfft`OW?*nd zr!H4C>9AeW%3R40#O&at!Igt_@Lrm6dc)@mwG$fN$73D@u9O$`c?CSH`{hJV7m&k=2Czqrp^2yT8+=`MFvH$m#G~zKL-c{BXh5qp{R|0a8 zP;d0G0YF!Bb3`$MZ~iC!S~4#5J^&FWX6U zG{kuSZK92UB<~-#6DkC=M=~o)a(^Pu++!ry zEam=8axGHsFC^D0vAMsJ+&C%sHInSe#? zbSKxhwS}6uWQCsFlI4DV%NJXAKGgp&4is@ZpG1_~c!4IDyZj16-zZ!0MwzLdPEWp# z{&OGlpS#^3y$GKUPkeepcwvP_sRflY^pHOikLM7f!Q1^2`ZU6|guZJ+v0<#xxYofY z5!WpbQCBm@;rS~aX4&b(K!n=q`19U$ywLS+^y6mA_mCg4w{N?@zY-N-N}IgVU+7zW zH?wn#a-0)t%NmGS`dV4^hGx8xpBkD#-k(5%=Q^7wkl!W{JQ}`?#as7XGiJ=d^FU7$ zzsK+T>>(%6j_JKAeVw-?qOa8c3w6~x4v}3zwWx`?2_no)ZVau zsJ>OAF2@O|$&J{*xV5!P>v1bd zTotNBn1>nj7!&-SStu-CzsTlMB558)lB5Hz>n|A2-jJJzr)bZ9&~+?+;LwXEx#m4k zT=}=x{`sBN&P3BfpwP vrDZ(Q_s@4>5ZWgtuQ2Z(T1|9{8nv;eh`EEOyZK diff --git a/textproc.asm b/textproc.asm index 3f8065b..ab2bb02 100644 --- a/textproc.asm +++ b/textproc.asm @@ -244,8 +244,6 @@ AfterManualPurchase ldx tankNr lda TankStatusColoursTable,x sta colpf2s - lda activeWeapon,x - sta PositionOnTheList ; we are clearing list of the weapons mva #$ff LastWeapon @@ -284,24 +282,27 @@ AfterPurchase ; in xbyte there is the address of the line that ; is being processed now mwa #ListOfWeapons xbyte - ldx #$00 ; number of the checked weapon + ldx #$00 ; index of the checked weapon stx HowManyOnTheList1 ; amounts of weapons (shells, bullets) in both lists stx HowManyOnTheList2 ; Creating full list of the available weapons for displaying -; in X there is a number of the weapon to be checked, +; in X there is an index of the weapon to be checked, ; in 'Xbyte' address of the first char in filled screen line CreateList + stx temp ; number of weapon will be necessary later ; checking if the weapon of the given number is present lda WeaponUnits,x jeq NoWeapon + + ldy tanknr bit isInventory - ;bmi itIsInventory + bmi itIsInventory ; checking if we can afford buying this weapon - ldy tanknr + lda moneyH,y cmp WeaponPriceH,x bne @+ @@ -312,11 +313,23 @@ CreateList bcs notInventory itIsInventory - + lda TanksWeaponsTableL,y + sta temp2 + lda TanksWeaponsTableH,y + sta temp2+1 + ldy temp + lda (temp2),y + jeq noWeapon + + txa ; lda weapon index + cmp activeWeapon,y + sne:sta PositionOnTheList + + + notInventory ; we have enough cash and the weapon can be ; added to the list - stx temp ; number of weapon will be necessary later ; first parentheses and other special chars ; (it's easier this way) @@ -341,53 +354,31 @@ notInventory ldy #$4 ; 4 chars from the beginning of the line sta (xbyte),y - ;now number of purchased units (shells) - clc - lda xbyte - adc #23 ; 23 chars from the beginning of the line - sta displayposition - lda xbyte+1 - adc #$00 - sta displayposition+1 + ;now number of units (shells) to be purchased + + adw xbyte #23 displayposition ; 23 chars from the beginning of the line lda WeaponUnits,x sta decimal jsr displaybyte ldx temp ;getting back number of the weapon ; and now price of the weapon - clc - lda xbyte - adc #27 ; 27 chars from the beginning of the line - sta displayposition - lda xbyte+1 - adc #$00 - sta displayposition+1 + adw xbyte #27 displayposition ; 27 chars from the beginning of the line lda WeaponPriceL,x sta decimal lda WeaponPriceH,x sta decimal+1 jsr displaydec - lda temp ;getting back number of the weapon - pha ;and saving it on the stack - + lda temp ; weapon number again jsr HowManyBullets sta decimal - pla - sta temp ; let's store weapon number again - - clc - lda xbyte - adc #1 ; 1 char from the beginning of the screen - sta displayposition - lda xbyte+1 - adc #$00 - sta displayposition+1 + adw xbyte #1 displayposition jsr displaybyte ; and now name of the weapon and finisheeeedd !!!! - ldx temp ;weapon number + ldx temp ;weapon index mva #0 temp+1 ; this number is only in X ; times 16 (it's length of the names of weapons) ldy #3 ; Rotate 4 times @@ -399,7 +390,7 @@ notInventory adw temp #NamesOfWeapons-6 modify - ldy #6 ; from 6th char + ldy #6 ; from 6th char on screen @ lda (modify),y @@ -409,7 +400,7 @@ notInventory bne @- - ; in X there is what we need + ; in X there is what we need (weapon index) ; If on screen after the purchase there is still ; present the weapon purchased recently, @@ -440,12 +431,7 @@ SecondList inc HowManyOnTheList2 ; If everything is copied then next line NextLineOfTheList - clc - lda xbyte - adc #40 - sta xbyte - bcc TooLittleCash - inc xbyte+1 + adw xbyte #40 TooLittleCash NoWeapon @@ -671,6 +657,8 @@ SecondSelected ;-------------------------------------------------- weaponPtr = temp isPriceZero = tempXRoller + bit isInventory + bmi @+ lda WhichList bne PurchaseDeffensive