From cd41f59175dd94147b7a42625ca37a0dd634cdfe Mon Sep 17 00:00:00 2001 From: Pecusx Date: Tue, 2 Aug 2022 14:40:12 +0200 Subject: [PATCH] Better set PM width (prepare to new Game Over screen) --- scorch.asm | 63 +++++++++++++++++++++++++++++++-------------------- scorch.xex | Bin 41588 -> 41611 bytes textproc.asm | 37 +++++++++++++++++++++++++++++- 3 files changed, 74 insertions(+), 26 deletions(-) diff --git a/scorch.asm b/scorch.asm index 1bab099..c476ff8 100644 --- a/scorch.asm +++ b/scorch.asm @@ -178,21 +178,8 @@ MainGameLoop jsr RmtSongSelect jsr DisplayResults - ;check demo mode - ldx numberOfPlayers - dex -checkForHuman ; if all in skillTable other than 0 then switch to DEMO MODE - lda skillTable,x - beq peopleAreHere - dex - bpl checkForHuman - ; no people, just wait a bit - pause 150 - jmp noKey + jsr DemoModeOrKey -peopleAreHere - jsr getkey -noKey ldx NumberOfPlayers dex CalculateGains @@ -244,8 +231,10 @@ skipzeroing bpl CalculateGains lda GameIsOver - jne START - + beq NoGameOverYet + ;jsr GameOverScreen + jmp START +NoGameOverYet inc CurrentRoundNr lda #$0 sta dmactls ; issue #72 @@ -269,9 +258,8 @@ skipzeroing lda #song_ingame jsr RmtSongSelect + jsr SetPMWidth lda #0 - sta sizep0 ; P0-P1 widths - sta sizep0+1 sta colpf2s ; status line "off" sta colpf1s @@ -928,13 +916,7 @@ SetunPlots ; sta dmactls lda #$03 ; P/M on sta pmcntl - lda #$00 - sta sizep0 ; P0-P3 widths - sta sizep0+1 - sta sizep0+2 - sta sizep0+3 - lda #%01010101 - sta sizem ; all missiles, double width + jsr SetPMWidth lda #%00100000 ; P/M priorities (multicolor players on) sta gtictls jsr PMoutofScreen @@ -974,6 +956,17 @@ ClearResults rts .endp ;-------------------------------------------------- +.proc SetPMWidth + lda #$00 + sta sizep0 ; P0-P3 widths + sta sizep0+1 + sta sizep0+2 + sta sizep0+3 + lda #%01010101 + sta sizem ; all missiles, double width + rts +.endp +;-------------------------------------------------- .proc DLIinterruptGraph ;sta dliA ;sty dliY @@ -1393,6 +1386,26 @@ getkeyend bne WaitForKeyRelease rts .endp +;-------------------------------------------------- +.proc DemoModeOrKey +;-------------------------------------------------- + ;check demo mode + ldx numberOfPlayers + dex +checkForHuman ; if all in skillTable other than 0 then switch to DEMO MODE + lda skillTable,x + beq peopleAreHere + dex + bpl checkForHuman + ; no people, just wait a bit + pause 150 + jmp noKey + +peopleAreHere + jsr getkey +noKey + rts +.endp ;-------------------------------------------------- .proc RmtSongSelect diff --git a/scorch.xex b/scorch.xex index e3526ad71b5f7dc1c678897d7ded388c89d814a5..5057b836d2205dc73d33d2bef83b478ae58f3d13 100644 GIT binary patch delta 15921 zcmbt*349bq_W#V}4mk$GG2D%!f{PFpVYmsnl7u0E7l@+6B@9CF#1lGKlZ2$>Od17* zsT#69Asy3kBH$92aoL}OOn!!K{i(YiARZu55?X~tROI)qp2>ltKmVUUBU7rdu3{3(xTRT&S$v;x-5&=8p7pmV7H(QL*DIGx%dVe9ng-1yljjm!a3)zd zk9cR2;GfC5xy1Wt_Htw)adTQc+KwzC?%wv`OrBg=5`ns~kU=?mPghJp!)uduw|X+fwND$v70Q()^y2iHie|Bq2GS^}r9!ldYCrz7iT?m`y#)*ay@`Z36WLLCXE>xrQ$ zS`t_3L=W5&_P1?3;f5^+)uS%3!q1n>!YEm*)O|$18HJyyc!6?rvg=+ZT5NUM7H>7V zWX{zKRFC35f7)Lrc-gQwlrc#}alR*;tl#;)LRlxtsu&Cpf){rYU%XIll{KZ8`3f4_zclw7|k>gJW=j1Z=OW7Xe_^ShdLc|SYeeR%uXS< z^^lcV;Hru5gvPkfhaL``6;tIps~nbT)+)S$S*fUu%YMQy31zIwkW&`Fs@^Kwf2r}nlw01 zCLxQ~4XbaU?7dR4k)+9BOs{ul`^A-2_zu>~1ih;FbdA)03XG2)JCeT-Nwz;O|| z%+@%M0Bq|#(l{4jTjvrdkbS1$8q(Yjn`l=bBNx_?8sMxU&h{x23ac@f-a3Lx?$Lb3 z49?Ium~Cz(f$zmV1dy)~@vlVOOH%fbk*|=H@!?08ziez~eTZE#weBGXPAhO;0d6Z0 z|H__w83Cu1KD6IVr}}Y;xZk24DG~o+QID30|7B4>DG^_{sK-jgH!aSpDT?V>x@N%+ zjPrSC_`JnF@0&hv+z#)I9ZhY(Jm_&#WpH_ z!eqXaawnl_uqChu-?S*{;u%X-v|{x>MDb@8w1f9)s$BH0rA^irC0>ksSBVk_YD_tB z;u;I~HFUxfti&ek4^^g(*qJAf#cJP!GBiu9(5UEQj-p(=9;-+(L96&iR%JrH-17yK zZoDQYXkwx!cGHwQ#3ap`xg}HnYhznUouyQIbYi+Cnn=|Xr}5)RdRk&ll}Ry;=tOPC$ir2hOvnATg9EVUs#WKCnrPQRm$xACLkkRC~BM7A5z;{SvgCe-o5k z&_|AJ!j2BUK#o+9KoXv4LM_^y5CoL@xF;~$_nExG^{~gePak6S(rc3j@sTFAuY4p; z)>GWEKc~r#-dRVDzktPXI)+wd3PSmnkdvpt^BF@$R92ZbNWl_vq?G7G+=B&Au#`dg zJ>F8n6rm?Lg^Q?KZc4hC% zUY}E%vnfZKQ$2^~s5yVjc`xU5PV$^<=48yddyZ?)<8vD42y+)J0H(ZCR?wwW93=CC$e_b`Wv&taWiO6lA>o3a;PhtDH{5dyo>35r;^IZKflOe>JJnAO?p-(xeGlE)`?L$ zd4sxoClw2*I**ElG{Q^~RTt0}lPFL&_+DYu%X4wbFfl-o%%`Z_K(QUf#q4zndkx)! zlVA-_0*u=v-a*CrROJh(cqdg0sW^|SMHDhn1u8C}&?#8(Bk#hzFkvJcY=&oQ``p9% zRP%wv2Fk{uM5X}>3Mg030+Zb6S$2P3%auZ2z;ZAjG%jtk`SV=22zhSHiG1rX8>Q`ndoVjt=oRGviD z-c-m_`%oNc;4U%DozGOBOnoNCQ?cOj=eu?Yl|_XO9(#*fDDdZ9cb+CD$^}Bf7W;Ah zWr#Qz1F;yFnnb0Wrd?y6A}yR|#Mzf=iTcf!IHQH1 z4Pk#uAnebGzd-z)_zT4^Nd0l*&+~qXYVT=Od(WZTdl5%Y3-|48CUVGuC>u39|#}!PBJ01PYG)**4U!%>v#mQv&_nPdGbS#Q z;5iaHA{2=e>tK4x}{yHzix>M zi<`}4Qe?s&Gp4WiC8c%^_*i)UCq){aw?l)5)n+@y{LZR&C{*=l%>FDUFolpv9p`R` zqEC}+)PAy1r1qBuK^-6q8?YXWF}oMpRxJR=%v$>U zqiww?e$-yH`8;)>t}<2Zq$ewSMOq@&-x|aX{v*2=zKH8qY*m{pN+`n4wP6PfFo^9f zmau5BRMtJruc%dfQtdu9jZqKGQ_oX7Mrw1J6B83_nCCH0zbZ6A?-3fWr-UZK3$g35 z;19Gp+b#P|@D@J)GfY}-AQ*U`;Pl#11|vdY)+;kahCNc8GRxa1KpVwcgxj;MC#j*ViS}6M5(|zeM};V1d6NbWtDLmPGM`(?v|C zIms{xdeheA@X6JJ^WpG$s_nR(q@3tFj_uKSs>U(+c${>Y)h-iyozOm`T`I$MLP2;U zZ)~4POkE&rg!vQcNY-F;v2-D;&n)bsgX`4q2rq(#{rUw>!l95z_}oy?B?dlxtUs56wT4L9~edt?O@FqUvv zFGU~SWkvD^I;gL=(mMZQ5ZNc6pP1e^FncW zET0z|g2$ut`OpYFd(97Bg~x64LzD5if4(F2&UQ08j+xPpwRbW*njt6`g}rF@@3k`T zdvB<3;QH#apDPfs_<0lCUE_Y?RJfzST-c)sj~+#crvh3e5xxfRehYYx&$|*FVvwmW zI|^5%f`l$=$wxO4D`ExkN`L|a5db@yTNo9i69A=uWKi$I+!YX@p(6}e2CfOTJC+z@ zO4)?~4{sn`0t5&<4qd=S8*~l0-=_=5htb^~rfUZ7Wy#{mWMl&Yqk9942OoXFA!Jxh z;9`W*vCm8hui%}VzF7Y(Ji8D^HL=DhqdHqog1y zT{IMO$DnAP%$WJ*VnmPetVcvR*Ev=%P*WL*l?|dh8$=I`0U)duy+!=3KX}Mv{NYo+ zE{p1MC0OK+84IyAHqfEFtx=9+_prgSr%|YFVs_LdRD5|4%qLbK4pd@{Mx+wMGzK>! z@g3_>I~Z;0fhKtMRyx8;t&?o1at%e5JF3k}9k1NO8#N5bsKKb3Gt62nz?!F;11Sax z25*qS=6U~8!wg}?F18u4B7zBr7@TZD8)1fU`7-!C2pEnymXU~!-D&87n20rIWedy> zLAS8@1Z0i13GbX4z>Z0G87E1nT4I_ftd=0coe>Rm8C%}B6a+Rf0(@087PgmTtJ-@N zThiWZDOR#~6kEpL(QFNS$FT+Mos2E(osMAQVH=uUOU0X5qYFWN){N&A@R>tfmWpFo z1NfZ48t|M-4U9wL*a*hN2u23Q{sYP((H=pW6hWEBlv*UTtVCi^RTnEVX z9TQ?Et+UXYd-qMq>X$}8#DoUWnHYKQsrn+MQFq5i)N#nJ+5iQn;WADY!rF?|j5GOG(BP0bQS`vws6cuuZvVng&JlrWwr&ZCx=~R!wbx=C% zf+-80>83tRH(k~x05$Y`Ia{~$LWSMA7&{BLAiHY8RA3i<{&e^VHEuz0#}S5L{uElP z%W$!P$hY^IAq4IfyW&ESklms=4fh=(p(I-M1Z;IKMoPY8FrP#b<%Yc;vk1m}ax%T% z zPE@9#4TCyL?Ebt~Kz;QUt(Tl~GiIbUs3Gj@B?6v&UJ3Mn|czCwObA@JhoT zr#e^*#p)^b6N%dG-R5rZ>OVGVXPwG8G2Nn!7O%G`H{iO~cO5P*_LrM16=sW=g8N!= z0^#N^LCCw_xGIEi(4%bvQ74d4ymmr~L$jlNaVSMgK0JX~-!tGH<@{ne58dl0kfT3% zgFkq!ul@Xkmx0A;X{ba2l~74L(afrov?#~f#dxdx!F%XX`6N>JqqoY`7*&c(+{XA) z+~XS80BvQZqcsWXwrKc$t5QKZgH z8q-U~XwrC7sTf0~SLaQN{lS}7u21D3*B3Xk(d znZJx(mwf8<4Z1`kT)nho{y^TiTE&iOV|LkTTH`N6)S@=nqqbT(tqR%Gu*c}s*IO}piVp1`qMi49u#kYxD4N?T8hr$Z zioR%15!6+sFDlk^b!B{s^}NmRaosC@b63xaZA_D!#8#^JJ=I3Fp6Y3;C8%Fh)HwdW zOg+V3HXch4bgTQCZrw%OzD9H1DZ2F|+IC9HSTHD6UaGdzW*xSJs8jW8DR;p*^C|ot zAic3*AU~E^IYzRVvF3fI4|Y*K>Cpak?LR&i3!1W`yp?iKuZXPFD942?!&S{#Zuqfy zBxzltr&vm2KizU{{4+M6J(Cm(L5)`7+d9NX?^1$Jb%(lArJ!4(=9Xs@<# z^(m^QV+bYa8ZD7Zj4KX9WRSeW&G>T_fYKv}mwrhqjoj3*!CU1Du&fuA{_QDw>S;JWs9~@tblYV+BQ!5FlzLmz` zcLo0)9eIXc8%lJ?v?R8D2T!@RHu$+`>seZ2{X{)Wn?LtxSEy|s@hnyUW0ZQb(toIW z&M3vQ(mCpjYCKCl&*2i>=`*t#N%`&)qIw6>&mu$(#Iv-A&)k987{uLjI)0sF~(t7hsjlPE-yFQiBI~=N3UK*?&>{&hD35lErQ^_Iiq}CdmkAB+Ei& zU5eb`89qhKlGPMBG10aiCk79Cpg-X8%*kC$YMr7Kf z$Fj5OT*;v#pIpYkVYy8V=eX2Ol-2Q!%?V($!GoaJaK_~%@TX2@+)a@Mp0Q^`ohw?L zB*O!oEVoUR9lKUJabG!2R;S706q(zx1}}(Rp+@MO`f27S8qF;yOSGgYA zgc#aH8OHb{5F&pWDeBiK-H>gf_345Q7d+mWUjq@B zIY4AKdBt>DX~HdmSJ+ZNU1pgWWgRF;WQp?jLJWZ2=`?H}KIJ4zhmOT--^pc-1o5Lj1N5;z%=v9qD`|Hlg2yXNq88II&ML}VFzj&F1Ejy0(~ z^6LRQlvT>o%U2g%wwgO1g}gp#^3vY?z8OgB1M3G^F3~}Y@2jdAU99Fvo{(`GBK^#m zpQ;$n`5?<2irG*G2PTvmV6jCbd;vPl#rio!Si>AW7LD=lD8RD>nvG9Zmm#gtG4w$r z5*v?{gdu$3tT$xjs+mySgHoCdM=Qii*9OiG|Jk-~eyKM|g7=oXOy1X-pRli*G!7NT zCo{rbCjds>19sF`2%^7x zrO>i*I1iLi2MD$aLwv2H0wfV_hRKU)Ggi~CNW<4F(SQK@0{!YhD#PH#nhY@G&(Jx$ zvikx8(x_aIGAe5_^lq%k-dIg_7wXRbK2xWKpBu68opqB)N#hY|`~4GR(x}*zN=NR` z?vq08{(|Ehgj#>$@nYdc$9L>bH-$=*m-p+PLKEOs0U+;qkx=8$KQ0K0W2lt7{K}Dc zKjN zw5&mR32+j(q8ESq5kJAPKyfDQ!2DG~hADKoS+m;w(z0zx(b%+XyHMyzd(`gVc3eVv z`|(XeA%n3n7|*h;LY}{J*$YCxV=Q2{9`~U9!tqKWe}tV_6Wh`d*lfei?QL^%5adio z95M>`ax8cUE7Ar;+-@W6ftYG}dqj2XqwuEm6+Oq1NBpc) zbm?adf<1OMce%*uvw|C!u)G>>W#~$?SFYiM1lt*V zzsY(A%PK&{2DV~fW{ETGnl!HFE#v}z3zJ1_ZG4?*Cv9qgt~*`^$gM$w1G|B$4Rq`4 zqzx!9Q{!P#FF*3UI<_5bb}$ff$yFqxD71 z1QC-SNK^?C1Ow_BGqqHF5mC=0Fhw$vvd1pvPn1=cvA)jWLY~?8Yo($GhV;pLV&BOU zwmcD5x_YcfWdLJp$CFMp!bDcDM)qopopKy$O zf~$Rk>;Gir#mQc9h?GEq+FRm<0&WWLGpp^GT!}-;NBaiHy9cw_UKPG=M#I+%5@OKMQSn_EQkt{6x4B+gz8aUazrX@C_IgWlB(19* zH}i!r*8)tzVza2+JYv)ki= zR2)Rb!4#M7cMo7!a)|hk(c?p7_2|$9?9{3BoLaqKByT;r*-125}09N4ADlvuw_Uo>JMeefPEBP|ZgEM(E=7#9>~EH_jd zhZhe1fmE9Sz!~W`8m(Z+XoPiJiEvxA-xHdw+l)mUL2O~C9^!RCjA|Q1u>`?QC`ub( z43#Ao%x43Qa=d}lm91~H-b=~znbAplR1Iv!my346VteCBXaNhVIfiJl{JI=7vu2QAv_Q4ok*2ycrJ8Ek7LOnTrXbI*Kpk9*ndj> zEeHTYZ~U7G`8K>7m!SV9%)c;-hXgO$TvY-bZ5H3=&aBtF;bbcCcs(A+XzA$(uTK9E zi5LF7<`0PbRekRtASb>3VE-%6tk*b$S7a+NH$f<9@L=ve9&9^Q8N*6_sCWNP; z|5eEE&Sx+}qkZZ_y?K@G|2nE{6IG@U6W_TmhCm;%muLd5z*Ll3e93sG)}B0hvZ9`H zEo+UF0-+`r9Dm+l;4^uiQ(vO`6?V0bwnClMQB|d_FH%s&OK4c&8idVWqK=AnHbAUy zhgdzX1H|W!sWJmZC(Pk-TFOJ zkt-gc!H1|I23Jv`BKS0|f!3Py@D;qe-k&EF`SS(AUo<>Utf99E_ZQtC`IU?6AD~;1 zM_ygP;@3q$M+93CD(Y*fx|3?j4Mk!e9r#|Er^vBpy-}ES1O;HJc@(MVei7;D{tBd{ zS4G!7KuS8{=DIFwXC1` zh9aXAXG4)e-|5fK_UEn4&K8QQ3-)z|ZYavSIO)AICX7Pm5K=Zpg-y9*Bp*TT5@0#3 zP_4!3FA+)sy)m}*>Wx>2fBB6zf2nJwQ0m|4+AeJL#Wj>>UEI1EcZ*voJoax`YrIg3 zAWeH)F;>dfXIb0tO4DCpZ;7ilL}?5VV$_%B6w};iX-)~vb<>4X;q|FqOQoKG(CsDkXKtNK>qp5th zth1D-Y+22cp&2ZA&t&h}VR11Td}T;z8zf|^ifSkwkttiFuf@NFRP=&R4=7c1FB6UT zS;SvUU0hgZP1gT`QCI|{@bYWUUyG0oJ_BMau0u?te=Vl4lzvkhP1;+LF^sN{Iel8#_mTEIX5&N124yP=D%JQFM##r;k5e6|JaRv{&G~F&t)!v5 z-8MUND%jqOf#H|$f*Az`w31qTM$#)-Q&f8sI~${57#6lL+DN>ZMb$-&N^F-Dh`F%u zO(Jq9Zl!`x_zMovok*Y7j*={^AV&OY2-J`~}@X z!G^oTW=m;D9e0NLq_iNuBAquf$?zlZ($dC%5=k`n6)XJSoBNuyMd z*;rYS$s(X0b_rAI+*|N|!6SuJi(EyaqT#|0rXi6ubUu{Ae72f)1SA$_ihX5ej(8LE zcgM*1{sf=1MB#H5?$u0ZaG*T!N_pTYSs#hl&;rDkTVg_qfduy;-sXx4)dudNHHr8 zCDs}9Rucke>&D5pCyy3_2W157)67P^kB!)Z5o7th+C_vNU7@Fy4?k6~vGRqg9{sNP z(+%UNWd~h62@MJi@LdmX5^V@JdyFVG{LxTMAVx{YscrbsW^^1KI1AHZFiv!>pKof( z{_FKLV4X9twg503y*5UZUF3MG@DBm?dXMNM>fR&p*P3y<$3m|(BY~!` z4I2&H*@w_YU)iy9gB@iaSuNNnF~V~Z8e=+XjQkZ1cjDo`^127NR#cMOZ3s>1UV?PMD zfWNgFc0bhA_0Sgfz*+8x;)9!ctxbs*HnVD`L{cNwTALHTU>Eqw9S!iFI=}~Y)G{X+ zoNZ=U?R|9OpegaPSR169)~)FlH>3E?xEVhD+p+7Vb!vD1biY9(#!X#PEXjetzNUS8 z&NO7?q~&Y!Y5m{+`>P+KZ4>4$UMs!ad^}-j#=KRf((CV@Na}yntR=-|o)@ZLtl!o6 z-cOc&rlS?3j9FEG-M6PJWa4d|-jmr^+fH%4-qY^Yo0^)(LK<8>mNE&7` zU_j`qA(@WpY#IlVUE{Z-cn~sK!?qX7D*RcLn5-r{B8Mo)|5x3U14KW+k7K&)RlQfQ zUcGwt>ecJweU_8&TLM{QET^R1%f_s-+%aJ$x9CyzrwZ*9cUvZVwsNn`;(mHeF^RWW zIAI3&=ydLj>8#=t#UvDS8)hqJ@omEW^c-5?`Q;47!c9!$Y}q@9l7`@E$y+oji9b1w z`+7D5446VDjVJct7_xc_k;ahV2(o%Skw&nW!!wAR)8bHf*h$=d9e6qKj5InwgEewa zovxUGh1Uk#>*~!U9OZm*THDvu;BI1?(nm~UJUBhmlo+r9c$_B2^O{&^5%*cDrJpLA zk0xtBmRmsw44`ZDFoP(MNp})yA(1kO(k$f@B}ytH%EQu1qL`)Cpg2o9SJ7Z=0BP>n zv)t?#xwPlFk5_S%a=9}zxP>q3!xu`FZs^42GZoC$2fvVn&GikoGkbYUz#f5U(G9jA zUFy#j_SH`k=}F>JZy=4|Np2fhy@4p#G5&M1oQr2vmIQ|pp}0DDC()vu(SL-PNBg;F zm*VNBmBqn-6k<%=)hoEX<&bjtdTvo(WidB;wi^FYsGkP`=Fm7L}$|QU{3dgC~ zM7cR>HQR_5Q(3%4+6XCi(E+uIhNHL-UX+UkiH&+~F&~5|qPU_L8f-tvl2F`9v)qdD zLGa>s;)_#E_9fZdi95=knNX;mWbc>;6~FnI?}JKT2uBxV1_@gk$zGt>R3eu&4kcPN z)Um|*#dJ*JhO-rrWv7hW_@6737$B<&ABD!c&xTe6PKiHO)SRs_gnIi@yn=lYxl`f~-m+m}UVGmZ4%xEDeSVJ;RLarnD8fl3Z^3Y+v_%0FOBZf$nDdJuxiFa5( z$pb@)fiqRL4|%vp(|BDkb=FTyA&Yhuv@galb@NMhe}nB?=R3ETJWPU4V$XV*DP(X4 z`hiwLG>s1vx3%?QVzU6{PU0`N*G?g5wRH-q9gkL9#}gNDeWu`o&bA2-^;0jUDc z0^(9kyuqN5Ux~?-HWNU(hjJA&SVQ07wy~T9eiRA8peYf3MBG7o5Hf;Z;g^lg93JFQ zOs$0ID6K%DKy3w{k3DxVd~_?CG|{Yy7R`Ix;6&b~?kg1cTGYBi@g0l0zfgSFqShCR z?^)DPp}61TDxa*Fj;3lBti>>uQhm~LpA_&(VV{(`qahq+`?pJZO#50fRVkd{QHW5w z#p7x6XqKi@xisY0qGeBLjP@;h<@`#tILNPD6hEV4J)03X<@)k76$@4jmgs(qk}96G zlt(Kz=>dwLdtg7LMO3*cEu;;$79~!M{X~fp`)eS^%!ei>XyR3xa*xxA$kRJTnHEYW(|KDmq zE3Emp(3>_P)zT_?S526`1{Yat=o(>T=If8w=|4D|2Yq*>Jg{(as+ zlRC&KaVWVzm%T7`@+O$NU=caI8tXckPY$mnfo^!B3Q*L!Fg}?0q~{@*x0zgFt9q{F z8lKYO1A*p)+9{%wY0l7{dPL<_*}a`l`=ck`qIT;h3u0r5-I-EwE@GD&5NM8xN zmy|I;aJ+;9xQt@ih;!Jhlf8y!U}IQ@jRE5}iIb=}m8wrtaWYkxQgI4ZvnXVsW>ayx zAs0vj^TLGDT^E8eQ)Lg{abOA6d?2xmvN0%;Y0#&I8!#7Ka<|NN$T=-H2sr^uT`q`R zT4$GYGG_=mZcEcI>bzs84jqF<*G|SR=b>pHn&!*-Arow1UZ_6M<5GHT@A0~)4p{KjmUil`TfkfWL?c0I71V6f~nm7KIX55k4xDza=Y zH{Wpe7!6x^-+V4%MuV+d--7iSVN1&S)}8ID6M1Fx6nSl5V3OXZKPuP?lkn8|=_ zyI7aXCCA!VA0_A^*v#CGW)eI~LiKK|vL7(#8}pK51&;%;;~t|82r@>>&>1Mg8~U6; z=0}N;2LeL=`dQ%ciRuR1u>=1kU=LF|Z=TYJhsa#4#~6ENbk<2C6w0|FGc+|PG(PZe z=Wt%Rnh7=TN<#f*O+=_yz_A)KWs}-1GGWWv^zrZ-jrr4y?aR?=lqN>%{&cs}6KpW- zcC&d`C#by@K-V*7FNi0Y8vH<#vKUYzuM)`#THQFx-s?{&7g+8vs>^4(5mlsNmm*Z(<`39aXd z@QVCOvUxW1WYlJgWzm8ass4uwdFr=R$XCCk=)RSr`!*`9RsTzcbvjvYF~6ej741Ff z>6J0jpNvghw_{e{A}kfQ$zLGMWvY6n?E=9+^#W-;M&17{H*Ij!<_#B!Q4;~5&}r-Z zM^-P6D~s;LQnhDB2?Y);T|1Vr0H@i}VliX`U0J;1iE8yc(H5%b81=w?>M`oTNbQ;C zgoK2u;AXF9MqfT*21s!;X6!ZL_>eFIPOjD;{k=`Ff2}QsGodhdmN_LoS5_9ox;H@W zKE1q-I>Z0Bg2^587ygLxS*b@_F99b?nrTeA6wG`b93y)c}yrWqr2aq3+#mPy1g zdu6)W+u}3rDicElp3gPjjG5P)mwR((_8Jf(VT*g30~O37mb6P)yM_B;wOa3eZRT+P zUw3v|TIh$F>4yb74>M%Se&cY#T6frA)y!twg4t#}26GSCF6lEV%Y`y!hp@#imu2J# zW%8DcTw%+uG9j-ZU%i#u;?%onyji>p-YtA#^b{iUme39kE3hoIJlt0Ii}~8j>336S z#@$LUL-uZZ#bKI7><*9_UxO`1KTyPDOX14a)SMPs1U(NLo)D+fob6{{c+Vjw{K@g|5TQzIdw%LLvmw9jA{paB!| zFl0>Q==N#E#O;}#!q<~jd&nH_X0U1e%3!%Jw=U-rB5V%A7B&b^8H9=j_39e+1P=2D zejo=<5cLOw9oq^>2+Hj|cQ=#W+XVLHat~bhy$wH{%Zpvk&ip-B>KeBuEsj_24V}S? zQ|@IR@7rCD{zqJ)?piW>?u^c0#yG+aT7;f{s=x`K#V>w(4xY1f|2?4%pklo*v=NU# z-WRIDW6T1$&^^L;g%VM)-xrF(qxQZ~EFO>E7aD}evITr71y9?8&=5S*7lbC^@yG&a z!oBSdcPw+bolo7%JZ^@dTom3wwfu&So!H+9T^kr#S$tt7K%{{K)h&#Q z-U%9|exXzE!dwyrs9O>J;DbX9%srHnF{SL5&QxEc7yts`F_U`f|__>2$IN3{oe03O2Sbi9gB!t3j8TtnVwn2iQW8G04R(Ohma9>PqyJfwa+cU8 z+5yTO43Imj?JRNbdXU#4tdS1Es2Zo5wHP#OoMI02&`GfNIteVEw=Z?w5Q*&Ky#XsC z7$XefVhXK?B8>7C@Oco>59?4P5evK16$CL6I(C+z#sNXMupkCx4c){Mo^8lZ$NlMCguKpes1{zC|Fgj1l0=qoLSRJkx5a2UBUO7lkHEcBaNsf2PAy5>sGl z7?!M*f(YXQJE}4li33<=CgT3A8qeY2a~y41Bo1U1;Bzpmz%!ZZ81*6-!59+3xRGN0 z0i|9X6hRppLAi+;wMaNxi3F<3FK!q~+eT7#Bn?^FHX)9rJ4aIO*56v?zrMb)a)K#5 zmXPz?h4x@PUEQC_A=rbiPGX`6_M)qYF=_m+g$-uLQ1K7Uy1>EA!CPuKEL#0QIt3+A zV~Y~hLsQ&VG#EowwCTlbu_c>tiLY14#)xz5*hU{{$0w4QHQXJ zju{~-=)sdn=%gT@doK<6SHioz2 z_7dEsK#kvJr?~eROX$TFOj(cFIJI6V-Q}5m(c^Ko2aV?7h`BG%eS1svzP!LBc2=Bt zN!*CP$(|WkrJFeflPvG&xUXy8Ad?1&@fQ}})nHRyIK#q`V;C(a10&G9#hz)qgvPdXR>s&=ExC(sy3&mPf^H z#Kqjec$}a)D*|+$J+3NL{-H?N6TGcR`0K7cE_I+5iV64FImG*qd;9bEmCsW4mY6IX z%oec+?s&z)gmXT|u5b10M4Sb#ZW~P0!6X!?H7T*EcCLFg)I;ljU@)|iZwJb<75B3gOkj``Lz=iA67;fJ>=QWFP zHZq3UR4f;>Tg897e6ubQ2vi+oOtmOu#E}+d6fVV;d1Ci5$~dvd7?9F$WwCHRWA54K zv`Q{UG^0AWTiW`~)aLrVaoWjEeW8Rcl!M) zyjTL-+@vQfJ$AVu^Lk;kEM%I5mx6N{JlMSiU7{=JybKV#rIQ#_idv==e$TEwdY`_& zipf(@zju&!R`x)TfX*nI+bQaO1iOpAXiovGR;e#4#xu0k+jf8K9W#YJa%rY0{M8q; zYY(H*S38sP88hxC@gNOf``u?$>#crHwRrUt3W)Q~4E0m?vi@jl;HsKW=+^DD?Gsej zd`h>zPuo8A&Uj!zB3+~&q>YDg86h5`>L*_HfqveN5A-*Ginm)an>LP-?4zr{&va-z z4R@>Go2s4mu>jKeCrS=d?ztx-${gh!mZqOxCp@knZSm-)nO!*X_Qplgc>RDYJgy&i zg~zr1ARO*~;2^d2*GJ%dX)!CXUGyL|nBsM=P{Eq^X*0l|QY{rjC`8w&i2yOKSPYQ? z)kD;tnb>%c2I3tc(~^jRp&`g(fS=RZW)TDG->GCON1&|>o-o?zM3w(C4V)nIJ;oTd zqoYtyXj>XxzC0J%q#IxN?u+lnBgMHVY7sL|Jp3ow9 zwDOo|Pl>M7=<%sVj9d?c98C2_0!gC8gD8wkXr$In>BmmZEUQ8rgd=J1!<&hgsPt#R z$OUxxI+*y{{vLRMon7wQqnjv@!whaF;cl42_u<#p@3pZx{NPg>I9qa%8s<%}#SEi% zxLzCciC*n(evs>d8Aw(Bi?uXC5OyB)_I>CU^Fi;7hX$Arc{3j3`W>R-=<SqS&wnxT@bRh2ytwo1)u;6G{$VOa4VWENuCZ!>c^J zvCH=l?(ppV7u77ulR=|d$-(c@xbP<%{zaXC&(sZP!IDr)_~uY-I2lHKJQQ~}6!;Nb zg}(~Ku(?6U0SnuwNYWGouk8z}enCU=x(oOP1(P6lKnFsf<1h?vx(-7t1aVOg#k=EC zaJ0m;%Jw=(3#+rS8hd7EO=U3v(rKx5VegxEOU5W&!NbK;q;OJC8P=edqlF;@g4#ch1!4EuJkI+Kf|ENc3;|CrsN&UTd9pal zub!z$NU&#}s1T5Zk@Z7`pr|J+glcYPPTLufX*^S*edOBtV@0s_W${!+(6voGUD1q( zPzng{U1U!ysCwnnR?yvqloTJg@=2GjLH5ku$bT?pO1w}idw>nrPFElh?Fq-Q9p+47 zeSyzk%-X{Z8{&tXG1^}<#IN4q2b+Wa%x^*jE17XQ)Gt)2!~EcGxL@ba4p3&aIMk2R z+%SLJ5WjQhQWx$MZ}O`*`NiRWZu>I4APxlxue>7O;8%*o!G8GTL;VoOu=ZyDr5(*8 zh{7^xc<3fA7X08s9+Sdiki*iHC}F4GfzGG$*WW|3Zm0I4OYxq1q$htR#*{6;he!us zogDn$&JWgAhNGMXSuSK&tuXk$9Ri6^>>?udYufm&6uuezrg9yu0@1Ak?iwIBa%H)N zhbdRF%(bH57z4VznV>g&Cf{Xhb{kV;0Vm3ze*;@byc`dAGr(i6^oA6_vKw~_lCWiG zil3!i6n9`CK_yDMAnAHowW}<7GT)41{n0q>2Y+$xlgy>TyuzW0jSLnJ&2?fd^6A8@ zSYV+WyFA0#r7MrUqaVC5W!t^%K#Cvdz?=LAd(PHuqegi!GCsbG>N)*OmASthHv>O; zMX-^|2ZrI!O=0fbB<9WyW(huLn3uPYWee3=e7!I60QKo9w{o+W!>04)*0sercZ6mI zSZGj>J^+)QkS@GNSjGHs3@YQ?Q9wZ4o_qR*%3@>^I=e5|1F3PyIv5l&r4kO!br*3zum?6Nmw8`3W}Wo#Gno#&o*$lH#4 zQQm%hlaSBaSXdiR##SLmF3osZ$aQkhIOMIzJt)6?yp$JmQw9-RLfbin3)^rpd)NGQ zgeX5|_=DvTt8SU<^0fyDZbr+n=p_#UWR;#0eF0rQ^7-CEA{W#?F5~!;OCSN)Zv4 z9ng%8h(MYUjT3Tlc?a4vcjC%g>9~QD@|EGYZzP_Lk>C6x1a>KnJ zKRGsLUy)D{{D(Jj=^XxTWK|cI=sD1cW#1a^8@eq#C^SCYKQu9HLr}XLlA5p6hH>8K zok`E*my3QO@-myfC0P#_J*A+|qkRv5!o!t$CuZ4`q4N4|Ho!j^;59}T zLI=1NTP16~CX2hJlZ;W#R7=ij=^jZGYbO@TV<_`BX7%TR6S;h5UAq*EKDv<2ouChJ zF$Bo7o8=fP#!@kkWt&*pJsm_hHXIik7mg0yh6Nu-)i`>ym4*}0*2=QN+AlqOu0&0; zIc&v;Y4N_-!lU->4qFRtCsH3tiJ{9Mgm!7M(7uo*JYT=I zFhdIg)Hg-ApfOat4Gm|ej@E0zkX{MvS&G;(OAwwEw(GhaL2O~WDYkwfMzzIKXePJ` zMQQ!?v9g%u0yfepr;1IRsl7SeN6GP-(Mf7l71ZOkg59uT>I)GqF|fPo!exgmV|c)d z>J%M1(KGTImkqprIku`D!b`w*Q#kOOL-pZUmbk%PSmVV-KOd=QRXP|Nuo)KgrAXF6 zdm_~o?JzroB1i}u^A4_+?0D5LOy40aW~~=@2@>iu%LSakSuC78ye51VGu$4@<8k(1 z)x@$b>b2%}P?My2E0rO^Jsh=MnvA07#-?eH3n z)5nTT2zFi(@^*Pxod>HKAU%F;WOSo*OOu`n!Z+p0xs9DnREMkNH!&lVS3zcxh_jwF z<6s`s@W7Au%=xgbFEPurnJU}x28)^S(amiVED?KYm0*vUaWsot^k-sqb93{CGRl4Q zoUyBI)_1j+!f^-6s8;MewF>K#T{mCSxl)hLH#g;Y|FELxAb91-%41gkM`TZL zxSIwapn@2@hYA~li)a<>=i@7q_?KV`gaSEN5afd7SkXgg2#X6ANB;W@cHT|5Aj`cn zj|I>RfQ}HlAZ*y_p{ko|-FFp;nY8~~#hwD^f;Da+Lb`RK*Z%a4Po%8Z`;l{!W2;#|ak~oi zPF%YRbowqiH%-o2l9nbERObD?YwKMFvoB733kDgRtWxhdo+p+vEpcAMM^ITLa=1|7 zwloO`O1;%j_v7ypisbc~+lBSM*j+`lFK*32?!neV#16i<%SD-SLJ``w*DZ&JY<-^9 z{if99JV#4xwJtJ!AP`r0QTlS4{X9*7ie|q+(^t^!KhyN5Y4(deO@D@FucGPC((KhV z{W+SwhNiEi**tY*=g{mznw?9ti)eNp&0bHl^J#W5%`TwXB{W;0*&@weOS3o7>~%DI zBLW}W*}jyhTr7{3a;Q{@9rR4O3Bp@WC+1MZQ}Oydomhz1!gfI{fFzo67W^)5=f;`tVaeS-`Ya4`RDv#P#lrqw9i@p(m;uFy!zJ(~HN?2l2 zlAibWd$u2cxjxC&i2qzBnK8d2nO_$`gZ4pWSSh3Zwx}*+Gs+zU^#1MH9_F9CbmTI^xo{%jE5LU^LJ60X%NEI9H1sF8-GM|6wyv!3F>^EFoWcIwMQy$H zoDFZvbNzW_ZH%RA8fzWXC4XW(Ga$&jxQz-v0bdUZuOKNyyT&g2vc>`gl323_NoT)2 zhwN)Lz%4o$zet#_XdO@CeCDB)C+FigANq@Q%sp^$qx^EN810w&JkjcR`K*y>6An%@ zN*8^{|VZQrC{WxAPv%PcFE#;I)FQh4swH zA>rt3s0TYSR<$EwW0)mc{K|ZB01MCz^y32-d>|8r4`jHnXSsrWjK6<3e}B6_JR%t5 z4?Tb=bc;2V5QujVuxDCB)q!h(?Fe@Bw^)%U6}0=YXCmKfLO!Ggz$Z#)UozbzjprH}w)<-kC!1-8ymxlarwB+Up zC2tXK;M&ev_eFOI$AMHM zXt)y&Sp0RH!@Zp!0~r#qat(T)3}gy~51&aqC?0ebyOl{XcLKNI-8o z7Yo*1$_2P{>HdE-(tq>=080SE@uDRf2|%!c({Y~nvyCDd=|8T7>V{Db!H?I?3VyV1 zmh0c^QVSOrZs_>ys;X@)3D2yZTY|fQ?j;D%kHG{5M|g8q_31MPpUfREjog_TR=HO6 zR<9a(%~$K{%Ct5mS}0?-iJ6GRz$xx4@6lEExskfK&bk4tPRC$};SmJE*C?ZQBrqp+ z)S@ckGA!>OS3h@EICXg-oJxK8v%7A!+LQl0Dz;BjvUB+=ajWl@+J>Vo3D*przhFsW zng8{VziKrP9zSQ{s%?KgaH9K-Q|?)@swVi)Q_%y)I+s85=lqSE%C?ukb^O~CXX0+S zY4q#|A6ru3f9?I_C;JXa8hYa`cV)aFz4_tSr_2L}%wE3rZwJl~oc+kM4W)m1^TSq8 mY3CpB_Z!E0hq!ItaqdC8?|0u|i9RO{B%Z0gcW){^llZ?$?|(G_ diff --git a/textproc.asm b/textproc.asm index aeaa30c..da7a0a9 100644 --- a/textproc.asm +++ b/textproc.asm @@ -1832,11 +1832,46 @@ FinishResultDisplay lda #%00111110 ; normal screen width, DL on, P/M on sta dmactls lda #%00100100 ; playfield before P/M - sta gtictls + sta gtictls + jsr SetPMWidth jsr ColorsOfSprites mva #0 colpf1s mva #TextForegroundColor colpf2s VDLI DLIinterruptGameOver ; jsr SetDLI for Game Over screen + ; make text and color lines for each tank +; ldx NumberOfPlayers ;we start from the highest (best) tank +; dex ;and it is the last one +; stx ResultOfTankNr ;in TankSequence table +; ldy #0 ;witch line we are coloring +;FinalResultOfTheNextPlayer +; ldx ResultOfTankNr ;we are after a round, so we can use TankNr +; lda TankSequence,x ;and we keep here real number if the tank +; tax +; stx TankNr ;for which we are displaying results +; lda TankStatusColoursTable,x +; sta GameOverColoursTable,y +; ; +; iny +; dec ResultOfTankNr +; beq FinalResultOfTheNextPlayer +;MakeBlackLines +; cpy #$06 +; beq AllLinesReady +; lda #0 ; black line color for rest of tanks +; sta GameOverColoursTable,y +; iny +; bne MakeBlackLines +;AllLinesReady + ldx #(MaxPlayers-1) +MakeAllTanksVisible + lda #99 + sta eXistenZ,x + lda #0 + sta ActiveDefenceWeapon,x + dex + bpl MakeAllTanksVisible + + ; start music and animations lda #song_game_over jsr RmtSongSelect ; initial tank positions randomization