From 9f9bf04cda705d1077643383354eac5adc8fccf7 Mon Sep 17 00:00:00 2001 From: Pecusx Date: Sat, 9 Sep 2023 20:34:49 +0200 Subject: [PATCH] Meteors as compilation option --- Atari/gr_basics.asm | 4 +++- Atari/interrupts.asm | 4 ++-- scorch.asm | 2 ++ scorch.xex | Bin 56551 -> 56646 bytes 4 files changed, 7 insertions(+), 3 deletions(-) diff --git a/Atari/gr_basics.asm b/Atari/gr_basics.asm index 82d0bc2..92d6c25 100644 --- a/Atari/gr_basics.asm +++ b/Atari/gr_basics.asm @@ -161,12 +161,14 @@ ClearPlot rts .endp +.IF METEORS = 1 ; ----------------------------------------- .proc ExPlot ;ExPlot (EplotX, EplotY) ; EOR plot: ; Inverts color of a pixel ; Note: No coordinate control!!! ; With off-screen coordinates, it can damage main program. +; only for ingame meteors ; ----------------------------------------- ; let's calculate coordinates from xdraw and ydraw ;xbyte = xbyte/8 @@ -190,7 +192,7 @@ ClearPlot sta (EplotByte),y rts .endp - +.ENDIF ; ----------------------------------------- .proc point_plot ; ----------------------------------------- diff --git a/Atari/interrupts.asm b/Atari/interrupts.asm index 36286bc..f3ea4be 100644 --- a/Atari/interrupts.asm +++ b/Atari/interrupts.asm @@ -143,7 +143,7 @@ lab2 ; ------- RMT ------- SkipRMTVBL ; ------ meteors ------ start - .IF TARGET = 5200 .OR CART_VERSION = 1 + .IF METEORS = 1 ldx #0 bit Mcounter bpl MeteorOnSky @@ -287,7 +287,7 @@ exit rti .ENDIF ; ------ meteors plot/flight subroutine ------ start - .IF TARGET = 5200 .OR CART_VERSION = 1 + .IF METEORS = 1 GoMplot lda Mpoint1Y,x cmp #64 diff --git a/scorch.asm b/scorch.asm index 1301fd8..f8056b0 100644 --- a/scorch.asm +++ b/scorch.asm @@ -15,6 +15,8 @@ ;--------------------------------------------------- .def CART_VERSION = 0 ; if 1 - dual splash screen +.def METEORS = 1 +; if 1 - meteors on game .def XCORRECTION_FOR_PM = 0 ; if 1 - active x position of tanks correction fo PMG .def FASTER_GRAF_PROCS = 1 diff --git a/scorch.xex b/scorch.xex index 5e502e468039f47df4eea0f1885c6c653ff57ac8..9194879706abeb16a7c60e47e05e8f6c8c6f4a80 100644 GIT binary patch delta 6903 zcmZ`e3s_S}*4!JOfg55J1VkAW#Q?3bx|P~$>#tQxuhshCA#DjtD~VPDqD6cJgyEq? zgCh`-V2oVkB0&_bjct_Of1!r%+S@L6+qLS}D#~_iQ*CRz-O7J%g7&fdfB5Cj%z4b2 zGv_tOn|4Xx8A;dLZ2DY#wub-s^Ix;gZ&le#b1v ztE(y9#`sFUvt7~272x73d9YBJFWnbWj@h50XAy45Wty)J}w|YJVH=)-zaaz0$PFb#XED(=)mt0)8V{FkI9jOX{ z@gYWCvsqYx$o0kcnbY=IQDf)I=P6C zHssPMqKHi2a8AzT!;#uRH%(|rha%VS%N;Y`v&IcvPFJ{OM&JAC3U<|tSKPns5SgC) zad2p=Azx}AmulE3Rio7PBup1er{s`%x{$y{g|2A#-SRt0mTvTfMWA?tg5kQtG~T$2 z>%t$Qi_66sjl1{)5rtkQ{8IBN*vEiaUA+E#Y%H=F7LiLdGINv^BKVxZY@qFK_92YG|OiX?%;O7 z)%zzW8+-=Xx5%}P&qj)9t`Hpao$}OVj809#(ceuL=?cm&u7`eLa$ zUC}SU2j-uHJAhuwaOnnBG?!*DB5su-2cfx{$hF*UXUM8__?Y(xWL8o6 zic=;q7o?2*T{k&fNvLgOVqw`&7~Lsl?yr?P)=Hf|Lc^7{QWlnj1WN5p0DJY$1l*^# zO-FsHIK}Qv#i?puj&(f3d7#RCys@n{|DRF@)e^(DFshccZc7TUHnRhn9FjWpRPISU=m_9(;; zB)G_~ULhWa&B${4dOq&+$y{Tc!LHfPXjogm22>$_gg*i^In#GmKB41~tg`GZyC4fD z0UZ{Z+%x0O_6~N@c#wUYr0h=0$pKpZ_AWFO63&P@}1?cvPjgK1rWOh)O) zEqy-?rR22g!nie>a9qG;YrOC#$H6q*?#NBUM^Q+QC7k!JS;H<_&2N6l^wLA7kEP-| zdtxfCZ_ypE6D1(q^pQ`lG`X2N0@E!(EAsZmb#C7EyHM@=1glK$E1t?V_McXnph!3@ zQ~BF0GB~D%{6+s1WhL_BXS}I3wnJoGaRk{=JT89r8a15kbvJ6uS-VcgYSzHlC~MWW zB|5^H9}cFO!x_hD=7(HzvRD}<3g!?63p-x7<^8mpI%l@gn_p8?=hkK+`FF8u#>#Bx zqe2iLkDK^IW)s80JVEf|pTRGQ!$)A);~7qa;V^y~R!L?_9P`a8^Bl%8vO{-WNg}1X zodSHd;E3%bIm7;{$40A<4Qe@UZ-+3b1`CAHpC!fD9cASH&iLdn*24S@(`GNrFqB3+ zdOV|wX!OF`2i|9$a(RA+%co!dy(+|^$>?m6nfFHD`n$hC_3vqsv0uFko+V)~k&UIZ z^k2Q&s=a@P0gg(E`3wWV!Ry?0@LDl%U59BOOy%CZzk9-657S66fQ^3K^~9lok;TLz zSd_z3n8vdNJbM_B%_$LlAT9NXe1Ttst&A3exCUpq@mr)>3yVZq_5?zyINz>J#T#4m zEY$IQrQSSU>hisHzQ%f$8yf1^l^`=<(E< zBhc$MPWI>03{h4CC$mt1SW{3b|6UDs1El1UDj{EsUeiK?yo4iGKrHowFba2vcR=3e zr4U#x?e3TX!E#Tr!s69gtbi(^9TIC#YD2u#lmrUU@hY5Gsgi|pI?Yt9Gtz^3?Dsi2 zNfxRduJ^g}X<~{hDjzonf{Yg~aNm5J;Qh`S=DfX>@a6HN!M7&aN;7J7Ic?`J6f0B` z_A0qq9;=Ae_RIfe^?}_w8Rxt%A9R(ViWnwVi*D$ka)2NjzmdFH@tFVIRI`^I7HM*pwVwyUcp?Au$kbU?5BsF!(5c z2^RpPO%N`~%Bshu5K*-1mX1pMUQ$~%C*VoQyXp7@I^BJ#Dx9LeBj4^?LPu;M3wKYX z=WQTb_^jSQ_Uw+LN=fH#C3B~Ua|pAz)v6h2NQ$~qL&R^-!kBUS;6d&0tV;u}r7N5nUG(|$W#Ikj=`HAsZCo21rHAD0 zneF>sDqiFGH#xp1FP+VIA;jh*M?TBsivwz-E0~{v*MeCj4*BCOptMjxOI4N~LCd#* z${~|g*rEg_1ujqF3Q-Q&BNSW_eJoa^o*CJ?H)18|I7^`WR`+G~>4dL&3D$v{9xM%J zf~M5~_=5Ly10F8i9l;y~;=$Dqm%sGjk$>z((|*gweI1!Y49@JL`^3xeP5q#%TCGXN-d1tM1=n<51ZaJ|TarRZi%5Fe~iaD}1SbP#?PsYbc$g>*6LEAELNdk1dBA-pfPv z%|9e28|tFzr?-%ry5!Mx8n$zsGsEb^pG>^LwL9oEa=UH{VQ{l4a);}UWliJWj zSIY0$&USCAUqn&O#9^9E!vTLVO%*?r8s37nPaBkeXLTrU8yq*NQAPcsdrsrCl;8j0 z98RO*yQ>b&q^R5EY}1s{*Y*AV@*m)Ctc5Lq2%Jzz!7A_&}hb%KMH9d%>u#aTYM}NRt{O zKqva3B$3M;nmFQ8AC!b~nVJPS6Oxb`eL$SeG1Ld-c5`^d2PJAzSS}N9=G6ENE(=P$ z)exttauR)TBGpM29Mn<+@( zT@YACB{~FV$lEM1U6LywGwgnH)-s8Dhg`F$0Cn^smuco=JVj_>UhuB-Vuo^557AV8ByEBL!do^{Z{5jM1vG#;8nRgklX%wwfn zZFj&|FWhA=++kqI+=W*!yM^RiU!bm%-&>R6H|X%hgejs*eJt51YKa=o^|L7apnGrQ zU5M02Zk6*O6V1k-ioET#YJ7a7$8vD1;D?<`ofj%cAgkMci>Q*I+f*E#@G++HDwc zEj=wKz>79=FUaKK(8*`mbpDqdbLtm%xj}gdy5klzJWs9%s z9Bqt~5_}w1#`$=c|9vYc>3*9?$fi^Q695Z-B2Z!sgpVM((#Bk|itwEFoVIdpB^>E* zm3^I{%!}ku>lFP>vGRcJVru0Qw5%FkTOp^^ty&0wZAx#~M3a&hAPDZZ1%K!qhSBC- z&U@|;v__QYoKFh@2>kqVCOcT=WCRsVpqLh4abigZJrwBF^y*?>S}H*c_Q$*oTiheO zFZ6rh#xJrl)lU5$;C5-3b1!^CcRM@a^W|=5jlgiPJU5JA0f%S;H09GynM(t&RSEmg zUG8U@ez*GxrrPa(ki}KIpKKR)J0}B5P_=U|d?Krzb0F|5GJyeWuCf)<%3yfH1-8N7 zi|sQq*yvqo@t74|?&CqhD`Dfr4om}UCZ8OMi_Wcb6f@=m#!^0&o<7!IXXh4&#RxPn8;;o+@=;C#V<}lv0CI3Wc~^ z4!jsQAk7N*D?-A4S|vVpYoV6{X8VI7MbV<=hfxvP#lHr@@oRn}RY=CP=LM%30PRL1 zziK4?{L~&nI@=f1kcob3&x6R9do)#gb$vp#OeH~c2@#HF(@Xb~$2%SkoW7U4CP=^w z*?*DTjxZYBv8p3V{IqvOgda8n<7=Xov#b%^Rs6We`PB1~ zc9zibCSvG(4zk~0JGWCGl9k6M`^+z5(`$(S*jO4$V$-qd6Xq9nM#(^)^cwgFazk;# zzYC>~SOCv2A~%ms41K*AQ2rAX)fGYmud0p-;{guHzl}vLT2%N3dY$BT?T?SlcSk(2 zbTrRm%nKNEG9!jR=qmN<#J-~%Sxo3s1FL8xs^g(PPws~Q)>7xD^i;{X3oC*G>y-!W`c zKqqv&0^ME8c9AP@MvuPK0Iht;kAb4yB6p@HiqkWF6pbu2(VssZ5$|r_h+Q9xA3TfH z;s!yD>?;kP0jT|}Mvp0?E@C`AEu_yaLr~*GNRk;K1E;6O0OU=Pn9m-eNiti!(TV0? z*l=HW>|249Pi+$lF_T&LX^I~YBys~oK6s#S0P=f*xLjzDqn~ObE%vECjsxPt2li>9 zwM}8%fClgeAK<}%k{lr0?BgT40tN^A3S4sbBPcYjz{?7S=Hb2pwva47GtKW_H9Q58 zfs~&4UDCb-9eoVvkV`7%e^yK3wQfpsY&0dQ+i+fTax&K0y~0~`Pxz#}USZFgf4w-I z=6bFr&knsnojrHo+e-b&CE+~#`)Of$I_DZA4GlG&SP4ML_U`&Y6OB5|P;YJ)=Q5a6 zFz?$exJFO{Mo{`TLu1;F6!~i;Xx}A!06(M3U9c*J)#rif&-ikY>2LAtVK)!HRHOg` z1RHoE&$`+&{(+%&-+g;wVE3GN^Cb{oyZZP0|AEJMxbMUNm$2`J`+dZl4~E&l=wAQc fla${B)9n1yQ_SrY%VS_NmNjB`sQccZT*3bb=&$G^ delta 6977 zcmZ`e3s@6Z)|mtXgiHu1@=)M{@qyBc)~(dm+Wu=5aadcWfT9u}7Kw@hQGp@>VR#6U z;6*}|U&x7KZR#AUerm%$_%+9QM2AC@?})G2ALCprq_>j zh|yg9eD-PKUkdRr*$L#SLUgJGeV32U?m!Fi233g1Gz}tOMd`Ry6|d12Pz9?ydxmX` zNQbAbnRJLyEgqITP`bKvt4&JMs%}7WB8vJG`+)ucy}gGe=&nwcZDW#lNQh>=gep{u z$D-Xpl_*=9#1VobnmbkKxC*U)sn_d$`!r63A_^2& zz~oh^kTsXdqg60R{#dmQ`CiobO5TqQv-|Y_XtBPv9v#L-)+T#>RG}&S@?OizxU`KN4WED*)W`@o)kI?2e0)bnf}0R zH@ctcr~iSjtmS7yx}WvsNra<&aF=?O@I)5=PQ8$y&B=|3`JNtN6X_FdDSZ`oc#Q%+ zpZzCD1fZnfQQ?Z*g+gvUK9k!l1RWFdmis#IQOcg9uP9yjI(RHkK}=G#$`_B7FePwj zo^f$n_sdi+j?8}n@6Z2`$R6Ch>v^&8trBc`b#5%2nGmdo9oC)~vI6Zzp@}xXjA|2^ zp4eXJQS>^Gf)&#}aIOz+b~jin+#UMzMdLcZVfl|>xl@aSwqD(@{`*-Hp2~xp1VESo(C*F| z0L_D?9HF#FffcoFqGsTu#q&`{5}jy$C5cW_vT|C@BAUPPJbI_4Gw-&9L<_K^IFML? zz4pciMH;ExRF|y-&8O&Cs&k*H2&?u^7ur&B{oZNQb*XH*c8!$v)2@}m7Taa)1Fczx z1e;ACIS+-mtoQbY5F7FBz0-+sEH4SsoXBF!=?vD7&NK@Sm}CdqWN2xc;#0YAZ@Y{W zqv@H{%St59M4u_qbD6H=@qis%q0$q0WvHK&cCqW@)KBJ^Z1-_2wub}Ekq$?}f4Fym znVcMYLmt}GCabP^gZe}X6R#eVOzxU7Z=4_N7t&)?GCo@}!|gLA3~rUodty2-m`YZH z#5eelQ@tsm9`h*#C2{7js7keMTQW#X!z(ml8fh{owg!(h{73T5RD z8G%ej_7pmw$;=keyI>8vlhvu_fkBUe&m_~`Hfb__44ud_1+i`o8Px4GcDJ@z%EoH< zO4;k$W&G#`sr7G(bd&W;BCYRG4>a-8(@p-YpaI{~ObPu~?__PWB%6Q(FF{NCiavq#NPA!Xm z;@b@SV*@5wsIGyUelf_?U`Oo$ukslwfQSd($NJs4X0)mCuc<&Vu`t%rmX^;gK3U(uwWLexcWMAB%AWz20A(VyF+V14YDHW=|U| zR@-241055DQVfi&T7J_cFbk}V?1q3N&$&6gE+KrAp1p7aJKD?0E};~DV_HULB7m?V zzgqs260$TTz=@pfqe3DTq@!mmgA*V+3Lr4TMbRaYC0PlCN>jHp7C`trQ0iwA^p*NS zPVR;@wlT>tSJE5{+N#-TI=4Dn7RacxXVYq(a4eTPv}H@IiRgyA?5Ui`CxnkHr%s08 zA)xb}*KFb3&YmGJS`n63&7A~(Grbq3G^n>&F1}al7cHWSaa`3bzjv~Sd(M;MtNyJ}Qg+mCGR|gR-cuqA%gyB8a z3!+hqwoTfpI$K9tEy>z;sjZGg-|EdwWxiQjxeNS`wa`thl-9%E0JQ*rP#qzT+vebh zL`?vn5rb=H^Pgok@$x%az1=eNXO9-+wiEvn5~Tvj%>%5;PYTR{#R`nfv|5~Bw1g?*tkVZdh`?M?IygU zZhlZn4yrF2({RGEQl|8LCFjOy&eIMNrNa$%uRdO16vGVOs;1MJlj8z99Y|xCfm=Cr zDsuwnN|^WlNYZJ&Kao5VFV==DT}yKQZAtb2SW+~W6UdZhd(vf0l|vdWiMdra?nYNp z)*VCDF-*m{Ctbl*Ie~$jD*%2q2me|7r10k?d`G**=TsroBNj##YZg?hP$gC!Sgtso z3;xo5)-xH-dYzv=rC)gQVg;NU`ltX^7c&;nZ6m&XV6hk{(HS-ao?M^1Zamk4(0DFd zpGS4)@`KhqhYuS{XMtVBz#h_IrHO#GM0G_MaumQFK#HpB4dWsSaBzaI;`aeE2Gu44 zUE_;C*9?!;2Tz7WPve9`=|gElYVKdGh*rZlL-T%R<3c+xBXyjlQ~QNO{8hNXE)G;ZZqZF6>akT9>UIk>$JccVqW)k*xCZ!u z)FI_iD!-jTCKU>-RB$S#Yb7uO^#VcjY=TY$P10>5CiN~Of zgo^nQ9JqcyLCBwzK>IVP{e`4Ep)$HlcB-(cVdm^&HPabMK%IIqk3Xy4Uq~(rj_+0h zhz)eg^#r}YDZ*bjLkQ%zDnlbz>rGD`xR@yb6;6^LGOokbp3Uw@JXHH550f zsWQ9+KSl6VPfh)%h?@%6+l9J{Oo9P5odz3hP=g(G72$h$p15rn-9@G21&zyzCvjop zA|baMpJ-e}B;YR^=X;fdhqm$_iWP@iB5vS>=x2lN zwCNv{BqbTn39IGb_NEM8)2|?ir!g`t7J}*<472%9rQtNdmL87uNKvB;ufjp>I2=u+ z4w??XKzRI<-oj*OTLy0*Sx6AIINUgMQkiCWSbi67&0Ns&4*N2F9+lzs#&C^QPm#N9 zIte79b>4LDfO_SF2DK7hbcIZb#oDQfwKAGm<$aA;DOnm&I<+*R^qxjicBsryc29Fp zquE!vZ~wke%D*f>u&;Sv%f5kqukEw#duv}?IaAJ--z&dbKBan8bF~68a0?ne4he@9 zjH(kFP3MEAj&wQ%3Cq1<<@FCt2jq7z$(X<)ta>E`o<5XQ7Q>{DM@%?(P8si~%Uphna&Xj91(Aba zIvNz5Q>NrM%cRn~86~}kNrSR6o!$j(amCRHVioQ>sv>f+pDAxrZYAr_{Rm3kVSPcu zDm|5i^`>N^5<5%*!K?Ir?~(fglw3T5i0>@2$}^a>ByM~BON&pquvxJfy2#4-lEQ#Clgcf74x5nVytM7gTFi4Bck4Jf>U!hWumavO4$0Z(pVRJ z-5tmQU7uI7umfysUj)m(Z(q3b#Y&XC`kVj`Hf*(R3Ca0GvVc@k48Z|j*^uTtRa<^;IUKbQ?qz)szb*77Qj9=h*KPri_kZ<=w^bPP``vAYp6m&%(!AYhMDn;P@tBKrOE6Ef7Zfz^l*O z0b<1mO0_l8e1u8%qML{q%nu2V44FtNCIQs z-|pv=)EZo6iPT7IfLlup;KrRO5fF~#lhGsaWeiZ*Lsf1M>PKKMyen8xcP=zS_zL8K zgQsOr!rPwz{)z`=4EPz4xaodN^558LfFHD1cz!2A5q>xSjUTj5cz*rACkX%xtRwAV z@Q@N1>qv*_ejVv5Q5~Ohi`WUY0MKE822=VCI*@%3KU<<*I$PqrPB>x!L`t-g5~%T= z`=H}#1IkWtzD7h;VGUm;9D?2wnC)F{qF;xKeSiY+SL`bg{}Q?*2!Fh%JJ;v?Iv~3h z!>*smJIZ6h*!Nhx5K@rxSS|#&_m3q>inm3D%c4c-`a%3ePp0sz1K7~>_>A`sFgH07 zcp;_NGH-$ho}-n$-}7bY4^W0G4ykz@zTFchgb&#p9Q2$HWZmQqpBk?R59UA4F@COh zrq|c?_8ATygm?5lA+*=yj@~)ai2wmlO>oE$d#6sb>RA%P>~Et7An7664g|h^QNpe| zywvsC-d85PsK<`Jm5}omAKy#tz^9MT2)$8A{h+fEGN`4*GKd+&5HsF|m?5BTd@=sZ z@%cc~7bb(f{GfwhKtTDzUT_s*=td!q>yLO$QVJyhf#P9=F<54HvjxjsFIJul971Ra z;9&8;hpG-0^526b_;P>aa%-+LAo4XUWJBXJ(ilhb(GfaS>1w{es6|0A<_}ScU42sH4N=V+&3^wa}B$m;8cZ*jeYSre`VeTbL0LCMqB%zxGq@Ym4qiyDehGcG+a9WO8<#?U@uN-7gx%1DK8NNhEXjvp zdfud)3tMLL?e03h{nLeR|C-1{)uS6b}m@PTp&T=eOfkfWtz^PN?{k zS5F+^Z-Vy1e(#4to0^HyU;t#Kn8A=G8xBEH*20>>Px*ihq0^Rt3Y#c%Bgl7duTy0b z@Qehm=-;e^S4W#OrmVmR2VVd_*9K?FArUkl8kWP2K;h8>FIS(Ff5oLf*C#R&(QjTCgqyuoz34h zUp3q?C=PEqyrOx5vBP-5cpHAEwoYxmZG_^EXpXfCnqy7wRtp(tHIu41!%4DQ{x6=7 zn(rj#D*1@w-hVe+#QhB#rSxU?q_zmBygr3kjq_e#BphkR$6jCI9p8%54XDKc_J;4h zJ}cyp2B3`67WqMM`BgvmthU$>-XVMa(47~lc>MgS@JR&*uwmfr&0isM76o|MsfF&x z!Q552?^N)7XUB%dsh96WaB z53%!(^bC=VO)jdIUs6iCZNAO1HhFWb(n9CP#l_KTt01UD{ggS`v587C{vOzp>{!{6 zYlWt!+A75ve~#2Vx?}6M@55`bdwvtGeGKRM6u-$@tZ$Ik}%E_9(yArB35 zF!AhiZ#O~ro85yg7xF|9;(gw2^h{;xZ<(Khl=#@YK^{9<