From 53a236afe249e6a0a5f9b6c40f187dc01be730c6 Mon Sep 17 00:00:00 2001 From: Pecusx Date: Wed, 6 Nov 2024 13:34:20 +0100 Subject: [PATCH] PlasmaBlast! --- game.asm | 1 + scorch.asm | 2 +- scorch.xex | Bin 32631 -> 32699 bytes weapons.asm | 29 +++++++++++++++++++++++------ 4 files changed, 25 insertions(+), 7 deletions(-) diff --git a/game.asm b/game.asm index c9664ff..357ac49 100644 --- a/game.asm +++ b/game.asm @@ -639,6 +639,7 @@ MetodOfDeath bcs MetodOfDeath tay lda weaponsOfDeath,y + ;lda #32 ; plama blast only jsr ExplosionDirect mva #sfx_silencer sfx_effect diff --git a/scorch.asm b/scorch.asm index 5ddce43..c401730 100644 --- a/scorch.asm +++ b/scorch.asm @@ -41,7 +41,7 @@ ;--------------------------------------------------- .macro build - dta d"1.50" ; number of this build (4 bytes) + dta d"1.51" ; number of this build (4 bytes) .endm .macro RMTSong diff --git a/scorch.xex b/scorch.xex index 6285deda68f7ccf1458dac3ec7d0d26c6ab36b8c..90de7f3ff58e0d7a56c9027856afb03800505491 100644 GIT binary patch delta 7647 zcmZu$3tSUd*3Tp%Kx9IU&;}5=KokO~L9OE3))(R^s34DkMkNXX1+7}e?(!(3_=v{e zl>#anQwA9|ibZR)ny%VP30v#5t8MMJ{rah8YuoLnZr9g#y z?lN#dvhI3Cf}sPs=AaGp`4|anwsuPq%0eGk@B;|-yaj0aeAwtrqP+_AHTDj0%3=6E zJ{**i-I>8JZmFSps%0yU-pOoPqUlk8#GUslk1IdE;MegGF$>TSo6xtvM@8$=s0y@u z1E0-W_?c`e&$DHG5W9+xWmoewTaIe8(A+9Cc{93!UAS}vcm(<;;uS-UXjX;T`J+a>BJ;vK9p@hmFqb(y8-UC#q2I5m--H`QVpg$@phG-+JH~1#-=ZN<#?e6R+ZJ6k$x># z#+spzvR*k+sL{I5&?Ry<-+hiQk+8;8_eJ`SoGpMW6(XV0sr*vkJt$dHA?*K*gsT%z%+Y>LNAG)&U`uf$*GUIlq25PCq5`hk58GdqhpjNcyk zS>&=D>kg%BWsY^H(uCT|Kqfc%=`7Fj>?f!aJ2hd2?Zv#6J<2QDW8$E7p*Kv_IsQW! z&3QV?Q`RJ!X zDb|3F5EHnIZd4H2Aw^ajx4l?TwYwf_mGGZ9`*$EkrifGtHShI)62%&E{yywRk1Al* zAQNX!`<1eUukA9onbmiTS+j{<1p66vHrN+0v5t^}?z%A6xlyVQ_5^zs?XD`Lkl?J7dSj3pr-Y7BrDQt;Kh{q% z!TA`a;?<$XfkhiZ?}I?v*G-KXzIP+H5o{+QJ>BYe zjgjNQ&o8Frc=PjLP}4WJj){NGS{lS_tYtxPmQ%&|S&ysG+h%)$V-fHS*7N}iQ>@G)*o41F zv6O&SF_Bd(i}}~s#k_`H;*jh*s@io-g{Wn^Tk3&Mr%F(uFN>JqrRY)-;+LWaMd&aA zbARCDI+K!3*k}H*)T8iyf`mXcB-Bl1vtahpZUEiMUT zS942BBy73+`&{-7_qklQ6|F3`hw<_~iIn_bf*v)Bq}@4rcA!9J6|7A>Vb6AS8%M_truy*2xQS9~8Lo_*L@mZ| z$Bjv9SZ>nYGL$AeRfd4pv#v@N^WJj!?o+jy+f&^m>4)Fvwv43R$@If>I83J>L0EDV zmb9mAnXNimj4g|3_tR5P*;4ONdu&Wfr+ml|YP3(g z;BexfkM_Gg)e4`E?mXFR=FFElq1OZk0-Co@$=-GgxNvA<+N9z(^Z81pOE6kri#adQ zq_H&y*;o3Mj50Zfe!1J|^#k-agu2fdPn=M-?2h^N>i~i3*>yt2Ok3dzf(IFfuMQns zHEl(k`EjKZ%tSA1sZ_#b?``h3Cs2?BXSbo-1zokA4-h-tZEcB+g=w2VcRTe?VE;DAELFdJbpsu80y*`qp$KHo5Ex2kOofu@(hkh z$PYPVY~CHS6Yh3yr6a%%^epc6cw54_u&c)Ald5|4O}oS)ah+6sEfMGoa&O?3tN1So z33UJLZRbf9jHvY?MhLd!5 z!Ycvt?Ds^V0~p&?t+7i^RBPNr=%WxD1mP-uWMFzpahjbv3NOj&M;HJ?B!zO^^B?5GV2~2>Tp>B5<>*pn?k zu7+E0x?JUzF%xmkh-Jx_DpR@R-_)`NobwKe-$?)HH^po|cMSSQ=yU5}ay^;C!G`Gm z4aNVlq4xjZkZ%a5%J6!_Sc=C^LrDk(36ucNl|B37;*aFyTr(iEtUuQ=N07fQodNm|3kwZvS!yaxkqxdy;3eASR=-0ij8sUa1mCFZo z$nTJL8F_!!LZnb2NV^KV3c4)9PrOV{#_;)(T0Mw1A4F?}@qh3#acM6s?Jayd{5Ky3 z{O^%y#4|d+X;IwycWB>H(DM!ZC@_~WGioq(373qDl1G9p@QzVB=yr^Xi3dV(Y?rYs zpD?85@*xh*w*eo%tw0HGj3V)aQPG+wRAJ?}a92BUt{*)i{%!?#NKbi*{SXN_6)GVa zgc7+4M5qNvR{-#7L9uwp=(xD}^_*3hNY)E}b}3S4kTgXnXhD86GA>Afh#G%1I#Qut zZ&$cF@Xw=7p^tz(AgKb#Lm)_~%a|Zs@vliDmnk_|DuQ0>$#j$NvIWA6(r#{8DR8&>@ zB)aFn^F{0E?TunSQN9pd9OQBe2;Z-Z9_l*D|77eo9&!OOA9?U}N7pvtZ>Ih`}Dx4#GewzbH~L{A-H^8nr2=u`zCkLW3>74r>=ffDXz#tnS^?lE= zvGqOlW>rs*`XOiv=|OgW8NG?GPKl|y*vR~Dy&IA#rK+E6{Irn}~Y8UwUW*Pg5WW9^nYTiv_0S88XxmjBwa z*H*kXvo5`EUY(=v)w+*rf2e=H`c+oG1@yfE-98CkkeA#xdu5=KJ-B>oFtrX>O?}RP zbT!JUhLrKZ)bK%1ps%-YI_3itUaz^#FB{=!CP*j7GL_?gcnJsdGDX7GR80aw9VxHZHE zaPBmnV)#b8Kbnner!5Lgsv{gjRe+$7^9z6wsZuFY`e~Y$`UESd$5D^*@aYCB2``zh zAL@9O4+5Kb4%|Vscs#su0~oFYOgFQm^A(a@wNDsUg?@H;ccQ^WDY8Dpx3uj;B5ZuHvW0p3D? zdL5p|&t3$GW&)UQfY2z022mbi7B&)LLsf$ao4gF%jJN}?AU!>ut>vS@XV!wo)Nr+4 z87X-H|~h4EG{h2nGMS#ftA;nJjjW(f>Ce*P-+6?gKbHCFucg!imxsbZnz^JKhR4+ib1>y$Z&&4WhY|v%{+HRTLjBZr@_AhYQTz)^!BlENz=z3C`IB zE=eq_0ac)<+pU%%v=dQTzTyySS_lhHX912}*ZxcDawSf+c$Tj(mGKIUJK{}H*LF5k`!j3d8BlM8LnTOe~d!k1}giL#?p*n^ZpE=W_IOi>Y~7 zKQ{t9=jMRh^_!QY9KI?!S!Ix+AdFYcOO!8!H^zJCjgdy}#vjZ}ieHq)^zGtq3NkdP zlIgZ`e*|T{z#5%W6u)P7ONo-ZK#1-b4c3z>;g9F@t(0=X!l<^rTnkT>FiL%M>1c8gtu+5@- zZhjplLX{l0tOne<+-yq%rn%J~KN~4i*%9+H08sC09l;zYc%P zNXEyqVynPclUM>gO9SAlCj@NtBst?r?HP5xOj1jQcb3QBs}jw;y1^6V-OSwH3md#I ziy?5o*7vd*bhd{HG4E(8HfSS1YP+3qVRA)_B@CxkFdx1 zB45oJFmSUF!oPywTx16oUzmfdzHhXiqQRv!dIKQ^@DuAqrgn(SepNg&^1(hwGx|i2P(QV?a@p=el>S2)r(K(ro?n-g1g|ZK@l7f zvt_jg((9IW8YcH3vNWUiW^@ND@)D>yctoC7-kr(h;yHOS8FkH|!Eit@c}D~em5&7Z z-K#K>;i!(m_Lx%^?{nmW7AR9drUHL(8VtcJ#6DRfZ!+MGf~UWW&NVY;d@e5{Nvxxh z>YHyBIsQyDBWw0G;8mOU5uH!nk8&}UpR5IDR*OuYX?{BS-~dd{$WM;i*r2ejO^5?I&!WZjN}Bu)K+RBk`)-Vd?R zfv#&z;sM-UfI^D0z5eiLF5PtlcvApG6Wj~`QZPDg`u^irXznewtX_S^1aBP%Z>?=g zGqtm&B#yGUBw?+Var5)Mi<#9eza5;D=bhbJ>VjG=q+NJpp}y*=KDZ+Cv}-J$N+Ya!Bjy?EGcb1WMt%C!SP3i5{P09|=lk7c;5Ot>xa}{{x=y#+d*B delta 7681 zcmZu$3s_TEw$4dHfS40Q6b*{Ffq({3BD9Ln>eL6~QBXmUfJ7xN1RwZli&!rYIf}&y z-Yuo6MkC`vj)Fq9I%!P@Z!0CVI%hgk?X)`m)N)JjwD+{Nt?kUnUHb&>k)o(kM+#Y zc2>gB54?7LiTiVsA2_jtL3 zx{hKq(O2ob9464>HR$1T7%=wfg3!7w;V#pehOXPB5%Y(rF#~QyWdgLe~6A7jKFhV_h1zJm}x5v|>3f;!yuy!R3 ze}|82ret-d^J`pHG*7wq(&$o#t3cnY`!jb*RJW-==nClg5v8p_U+h5r|AE#$ho+Pw z$Mbv^Yv&iTB|Oh=;5F<u#}m)j5uCIr=FBrIc`!%yKrtyIn2nQGXL!UxK2RqoOPw zWo5Xf-f}g$Rbm#%yB;0g2g0JPZduJowKWMySq79i+7~5`_90R2ix(HS>kGd_An%P-8{NzQ7lC7a7A=kY^*hUy6!1_+{2& zgOTILdb0ve&P0Z--1S=pdQsb;dRU-mOv`Uef0_HG6)H-oc*Y)$D0$ux_OoCTSf1K8$8R z9_1-VJk9Y2xVL}z?vt2sVp07x+R zSCGT`WEwQ!;SE18mtL3)n*G4@Yf?o1l=el z(gGvaj0{_;%p@WsOT|90BO;+9y<{6dpc|#=K`BrhVdZS8zt982)^1yiP4`U^YqPSe zU_YbH0@LATjzl>a^+8>z&Pu3G&a4%Fu(la#v<|yQrYRG%&};aAMw-UcSw-&3nm%D# zdzsuc+&5fQwR(10go*7naxoHVadK#)HZiL`_yf~ZRyZG{skk)M60)ugR9eG#v3*uw zIH>BnbDxBcq^NNG^(aGVRJO56H>1CdD+99#N=tJDTxaAsV)PnHj(3gzgc@}&*Dy~- ziTFswm=ZAH>H_`?hgr@qc1)4;a|q|4WpXf3zSnU@4tMF1yL+3nP)at(rM62d(k`h8 zuVOg@6pv5>Z~$cU2vLaCidYWzN7HZyI))?1XKJIfIs&Y|1mJmg0n>+fkDsN|<*=Ea z5%|jZNn^e&=n59@8#sHhnzc8``%Bz1ZsV;=HTn{3(890>N0>OP9}_?rcTu5L0tA$d zOHefRJg!G$V&FoHt^96BiH6rZHfZ4Zb}c{XXw#w#Hg|0ED!2w%&ovaLvSkt^!e62& z>KfKXj;pX0@w?eIyq+y+mK`{yJ#bo!2G<(z>O$JvwSo$LT*%OCQCA^4xfXq2h>j8H z4g@~>n8Yk{BjyileJcM)BLt)9tOf#w%S+NAm`T~Y>-5A)k?_F5}6j8>lh8sB++VZvB6u6;KSL*S5o=)t_&J=rWds` zZH2zcf`*T08~Nj|(=_QP2!Z@uHk&jjL9@%>OoZkjn*(Bb+Zb<{ZE>xly^lHRY)BcP z4mL1}=TtE<)F{8k0Yk(?pBi#}8ayv{#IP@Rfc|Y)v-iB$a6xQb>dc}R+of`~=bFW_ zJMxl1lg8dibo5!js!`VF*jo;Z7yy`U4)vb1oH?U))kl8*X^=qm9yp_A<~`%nz_Y~T zKgUk1nDPNK=ImHK=^n4ten0 zTj%h&iMb=sS)BEe`{8b$XPbk(K+o>ohU+Fy54&n{p4Has?zm;mGS6A zui{%1Csqv2-fKUry?WI`SaqD$x+z$Aa8s@BffWKHh$)5woVV@hqMcyI5(0v01Ox}! zCJ6|6Bk{F>hB5#`ct5rbq7hyV(CEG|0V2TNfl9qwcBWGAjiFCLc%aU4&cQXNF~O%bau6J;MFw0MOoiS_*M`b>Bj?$ZH|^YYsqV_Fmmj z%>lsAW!g8dBLInbSDbNNnH^#U2$=wVleYEhF8jURAK>&RCKkUHXAG>(cD+t}58#2g zDC%!m6CXw`#*4cS*snFG!R9Bp*O#^XH&Cg&t@=q{xaJD z@!>(ZCQRMIeeqGMpEii3`LFoVR0|GGFu~ua64GK@irUX>n`N+-mbSu{Dv*qKFU_9d z??ZU0A(Fvo6Q-#Fqiog_T&?FLEGEnjX2HR)W=|vKxv7&zP}FRkHaVSIi(j1_P1WMJ zCPzo{n^L&#pKW0CxaU6G$mSbwmFhs?wykU~S7O`7T9{s}NHl4>%DD@|G%nwqjP~M` z#H6r^n^9MJ{|-UkU(S_ZsT7pljw=!H z(6>OJ+fI%oQ#iyterQ9{Z#Go_`we;KF_ay@V4g;u#AnULBO!>O1aQ9W@kbE{dVmwA z%t5hR2{gQ()9NkI`z#&uo}QX@NWTMJe33g2yuOEDnleK*H-}y0U5I<9Y^hkeRYYjz zR`kwR2p35sXqz~kk6_nLq^o`2X+f$74_lEbMkT#_8291F6* zj%4HFM{CG|giX1BuYb!B2OO}}ZRyS>%o?~{2vBn&?6COPz$qXNG#3AqJYN3`YM+A~ z+;FS-CuU9%OSxkvN+bqFq|>g_3JD;vu{%J#2Jnb^fUtIiu;Yp7g)z@@4q+BqF9f*d zNSjWw7o%VR**=}#B?BTbw2B7rB4dw1+QJ83lT#{22j2f3b8L={H8~2u|hfThB8-@WiY%XhI^VocHxpK}c1P~=qFt6feQ={?VleGG!=V1{nfcuP^nxuL> zJADk=DUJngaig2%Zds?D&4ariw1Yz3#K)%^wNgIEd4QPgdFBTG%hY7*G!C4WMA3N0 zv?nMR-aKtebQ;+8QDWB{dpb|){?Svj^QBhL>ojZkyh*bqXx9r&0)Bg13$+p3QzlgO z?J{sTAicN&?{)L53VnNp{>n~4u=0;`hO$Q)1pm1|BS06*q?~2rN^q!^`zr%6YzjyrX-c@TGMq)fviFto%r}>Z!*D@^23O>*MW12RPXKNHcKSs48$M%_TAAbQlGp0KX%9NLa>mmX zAVt&68PrYu!AukU{pU;%j9i#y3KUAw_d7wr{j_ii1=mUP+|4<58zA(53ZU)}2It4Q@+uSm5fR?euLQ<+-HRI-(mD`!@9SM^p+ zhSqD^n?)f#THB61Wro84))vdLmmF27)=gl=zW?VIQ zRA5pi%BqA6^yu6%BdYd8ey-)U>`A0);se-5CKip;FHyNhE|)FkEbJC858Qe_xGppP=e%fYI7YwQK)JEw zch8!%>AkwMR>B9P*vp3sKkyNNgduSL@Fr$p4?j-0&u5Sx9`|%)`2V*Cu9UTNTZkp# z+^3DIgfe#^T7+w!UX^63Asj=AfnZnrCjdNhwOXQk=41LLfSZsM?=2`gxNgxMirb&j z%yq1pA5Hxeo9CM;6J9&t6zhJG*MLQg0-rNp+6gb*2o~K8Hoa`~5FReW9rH&MZfDm5 z-;HFY5G1u``}Y7YG7Ip3&o@#Rux5d4^v&}2L5Mc4$+Xu7X=u_iE%+!8?piQ|O2GeE zFx8f@vAbIMsNW55aslmq8D1;ET?ja61z*qzaaSbG&tj{&Y7?~>;02_-2Bcg7tF7!> zByGOi@3sO@Kl9q$-^?{%Ioa?nL>KPQ_cWtr_~ybCI4@+;6h@oQ+}ZPMxD5plyT^t^ zKtKRpz{wUH7RlpkQ{@`3?#+w|em)yBch>5ystA z&2iIHkVY?rG|WfQc^wnjXEjwfe%T;*VOr9;B%zTHwQj#b-vl)Czlie zB>;TPT)=~AWAsP&LAYrsRzn@M;j4#xX{HXxFERb@=ssYkF$LxZq$ve+bl>g0wE3^P zPdNaQgHZ67HB)q~3Trgi-2 z$kU&&@q;K67cwSlG(N!00>pcdiK15Eub3^`JNserXDNKH-=Az;T0}8;!sP0 z1utHftxnjOkf1dyP|ttjQ_JF%%QI0CzPW6w{I3VFEwJaalJ1_Bty7AJsBi3CL>-mWQveigMu&57#qH;398MFzp_)9WV=}(EU3*$P#xM2 z>Npy|kui}vgzsilQ~U8V%V!NImm;NPZw$emGTga*7gQP&SHz4PQO?|L@M^SBmJQK@ zf%bxdz6S;>!4TfEA_-QUi6gu2Ho$)vhv0~R7veb*`-8Esh@LdF5?1_nhU|jMdW^PN zNlulrbwUK>6osqP^?@gBP!!Zk#_g62Az z7o07&16OH4G~1q>zh9-rC{kh{hpu3#HiM6vkQq~P1^dejOiBr#0A*njT(U9StVZ0c zASGTV2BA!;Rml<;m~GvEl}6`}aEHMLxFhge00WixxEFj84axxx_yIlZgy6LiWxb3h zLa80LYyxPy;%tZqrnybNfCdt%x>4FTz^MLBMgmi0R4u`pG{M9|0bXhW75G6U4*zdv zR4Vvr5-x!IXoPUrHxkUVgq-oHgpE44k<3&jF7gG6TFJy`HTpE-PR4x*Hi+A#fEjYy z)mhF1|S4@J^N**{tz4~G4y`cSSaLw zp0xl9qLWum&;evx8+&yiZwN6!h}gDj(lW6W0&NLzNdssw)XQM;$A_YRuvO0K(~AnY z7f^>F1oDO!+iwd05GI^t0OCXOr>jD#Wc>XqH>hb-Hm*3?y2krc`$TM9gUr zI@{Bn@6xrpuL&JHsgsph34Xv&JjDv(Pf)03uk+^}<)iiBXm{#)`NI#Hn$aX4-D#BqU6Aei7N z2Q(z~E)jZiKRsq7u3sIQKGz9)3k(b=dXK=}^5a0r_e-s0IHDum9ocCYM-c(oA64c^ zoz4xBPNu}W0(hsu)qR6ra5C%h;Oencqyii%+xb@!j&`twf`a z{=#(P@F%$+DnU%6@de8arQ!(Mjqh8`A;pJNxa$J}?Dg*J;M+IB=#zQz)G53+FE;R} z3?}|Cj2y@_hbWF1xa-BRuK&@xKjp>i=N};q2e5}Bzdq7^o#{V}HTh`dx-2meekL>a znZbtw@>$_>cy9g^sj|auS848oPEo77Y9+BaD8%)qRBJ0+l9rYRnUpN-gnfGYYHF;??5f6D1y~{@Ohrd@0{F?6J~#!myY>y29WB4K5`Lq$Q7l46g1{L6lx47zQGx z0r*WoS~B*ROQ2wz<{$ofp-zNR^=}vJMC)%CE8rNi81Gr5)A>7AcleM>pKDojOG~Z7 zH5(5FE#%p6xCdd2FxnIrn9IA489bZM&D}JUQu%L!t2WQ3Q?lJjpi6Ek6FT?aW^wrc E0UEc&RsaA1 diff --git a/weapons.asm b/weapons.asm index 51bfc98..5f04fe3 100644 --- a/weapons.asm +++ b/weapons.asm @@ -783,19 +783,36 @@ LaserMisses ; idea only .... mva #sfx_plasma_1_2 sfx_effect mva #0 drawFunction - lda #60 + mva #$04 ExplosionRadius + jmp CalculateExplosionRange + adw ydraw #4 + sbw xdraw #4 + + lda ydraw + lsr + lsr + lsr + sta yc + lda #30 + sbc yc sta yc ; blink counter 60 -@ +columnloop + mva #8 fs ;lines counter +linesloop lda yc - and #$01 - eor #$01 + beq @+ + lda random +@ and #$01 sta color mwa xdraw xbyte mwa #0 ybyte jsr draw - + inw xdraw + dec fs + bne linesloop + sbw xdraw #8 dec yc - bne @- + bpl columnloop ; at this point color allways = 0 inc color ; set color to 1