From 37bb913a965f94048dfd6b3d6b13f6d88c82ba02 Mon Sep 17 00:00:00 2001
From: Pecusx <Pecus@poczta.fm>
Date: Wed, 23 Apr 2025 15:50:58 +0200
Subject: [PATCH] Logo sprites (test2)

---
 lumber.asm | 111 +++++++++++++++++++++++++++++++++++++++++++----------
 lumber.xex | Bin 29634 -> 29771 bytes
 2 files changed, 91 insertions(+), 20 deletions(-)

diff --git a/lumber.asm b/lumber.asm
index ba032bf..6a363a8 100644
--- a/lumber.asm
+++ b/lumber.asm
@@ -115,20 +115,21 @@ dl_over
     .by $85 ; DLI2 - last clouds
     :4 .by $05
     .by $85 ; DLI - horizon
-    :4 .by $05 
+    :3 .by $05 
     .by $41
     .wo dl_over
 ;---------------------------------------------------
 dl_title
     .by $10,$70
-    .by $44
+    .by $44+$80 ; DLI1 - Logo PM and colors
     .wo title_logo    ; title logo (menu?)
-    :2 .by $04
-    .by $84 ; DLI1 - second clouds
+    .by $04
+    .by $84 ; DLI2 - Logo PM and colors
+    .by $84 ; DLI3 - second clouds
     :3 .by $04
-    .by $84 ; DLI2 - last clouds
+    .by $84 ; DLI4 - last clouds
     :4 .by $05
-    .by $85 ; DLI - horizon
+    .by $85 ; DLI5 - horizon
     :3 .by $05 
     .by $41
     .wo dl_title
@@ -470,8 +471,25 @@ no_clouds_change
 .endp
 ;--------------------------------------------------
 .proc TitlesDLI1
-; Clouds, birds, color changes
+; Clouds, color changes
 ;--------------------------------------------------
+    pha
+    :3 sta WSYNC
+    mva #$70 HPOSP0
+    mva #$7a HPOSP1
+    lda #0
+    sta SIZEP0
+    mwa #TitlesDLI1.DLI2 VDSLST
+    pla
+    rti
+DLI2
+    pha
+    mva #$9a HPOSP1
+    lda #0
+    mwa #TitlesDLI1.DLI3 VDSLST
+    pla
+    rti
+DLI3
     pha
     ; set cloud 2 horizontal position
     lda clouds2Hpos
@@ -483,10 +501,10 @@ no_clouds_change
     sta HPOSP3
     adc #8
     sta HPOSM3
-    mwa #TitlesDLI1.DLI2 VDSLST
+    mwa #TitlesDLI1.DLI4 VDSLST
     pla
     rti
-DLI2
+DLI4
     pha
     ; set cloud 3 horizontal position
     lda clouds3Hpos
@@ -499,10 +517,10 @@ DLI2
     adc #8
     sta HPOSM3
     mva #>font_titles CHBASE
-    mwa #TitlesDLI1.DLI3 VDSLST
+    mwa #TitlesDLI1.DLI5 VDSLST
     pla
     rti
-DLI3
+DLI5
     pha
     :7 sta WSYNC
     ; mva LowCharsetBase CHBASE
@@ -657,6 +675,7 @@ gameOver
 ;--------------------------------------------------
     jsr MakeDarkScreen
     jsr HidePM
+    jsr PrepareTitlePM
     mva #0 StateFlag
     mva #>font_logo CHBAS
     mwa #dl_title dlptrs
@@ -715,6 +734,7 @@ EndOfStartScreen
 .proc GameOverScreen
 ;--------------------------------------------------
     jsr MakeDarkScreen
+    jsr PrepareTitlePM.clearP0_1
     jsr HidePM
     mva #3 StateFlag
     mva #>font_titles CHBAS
@@ -1246,7 +1266,7 @@ datalinesP0=17
     ; hoffset (16 - 40) - (all) birds hsize - 28
     randomize 16 40
     sta birdsOffset
-    jsr clearbirds
+    jsr PrepareTitlePM.clearP0_1
     jsr bird_a
     mva #0 SIZEP0_u
     sta SIZEP1_u
@@ -1257,14 +1277,6 @@ datalinesP0=17
     sta HPOSP0_u
     sta HPOSP1_u
 
-    rts
-clearbirds
-    ldx #(40+28-16)
-    lda #0
-@   sta PMmemory+$200+16,x
-    sta PMmemory+$280+16,x
-    dex
-    bpl @-
     rts
 bird_a
     ldx #datalines_bird-1
@@ -1553,6 +1565,65 @@ cloud8_M
 datalines_clouds=12
 .endp
 ;--------------------------------------------------
+.proc PrepareTitlePM
+;--------------------------------------------------
+    ; logo PM and other title screen PN (without clouds)
+    jsr clearP0_1
+    jsr logoPM
+    mva #1 SIZEP0_u
+    sta SIZEP1_u
+    mva GameColors+c_white PCOLR0
+    sta PCOLR1
+    lda #$58
+    sta HPOSP0_u
+    lda #$98
+    sta HPOSP1_u
+
+    rts
+clearP0_1
+    ldx #$7f
+    lda #0
+@   sta PMmemory+$200,x
+    sta PMmemory+$280,x
+    dex
+    bpl @-
+    rts
+logoPM
+    ldx #datalines_logo-1
+@   lda logo_data_a,x
+    sta PMmemory+$200+Hoffset_logo,x
+    lda logo_data_b,x
+    sta PMmemory+$280+Hoffset_logo,x
+    dey
+    dex
+    bpl @-
+    rts
+; logo data
+logo_data_a
+    dta %11111111
+    dta %11111111
+    ; DLI
+    dta %11111111
+    dta %11111111
+    dta %11111111
+    dta 0,0,0,0,0
+    dta %00011100
+    dta %00001000
+    dta 0
+logo_data_b
+    dta %11111111
+    dta %11111111
+    ; DLI
+    dta %11111111
+    dta %11111111
+    dta %11111111
+    dta 0,0,0,0,0
+    dta 0,0
+    dta %11111100
+Hoffset_logo=12
+datalines_logo=13
+.endp
+;--------------------------------------------------
 .proc SetPMl1
 ;--------------------------------------------------
     mva #$4f HPOSP2_d
diff --git a/lumber.xex b/lumber.xex
index a8da10672d1f57884cefab81452eeaadce191cd3..d0b36341c2c25f4b35f87cc69d4aede8162db176 100644
GIT binary patch
delta 4388
zcmb_geQ*@z8Q<HxBOyu2QJ@}>lsAEnhN%&uo!T0X4`ZPk6etw1m@J4&K)&q<NZpiX
zxe)RS+#9lYmmJ2!Ltfgge3W+l*cKf~au)-eNdM@J(s4RQMWr{4Q$U!e&$FA{Wyw(;
z+ndYo`+WW0=lwm;?fY)t{J_!qp~KzRCrny!%stXeW(j4Uji-egS8c7!<*IeVM}fat
zqsq#U`&{J<+4sDK**!C7O)fj`TX15z_n;`2H=l5f@0{&Ou&zgIb9V$|fp}jsmwYqK
zmRA-yPO`0)cNJV=6)!8~0+V8+OR|i4v9K{h%jqe(YK$X`*y+ki^0r2PL1}Jlj<pO}
zhLcv*wY0TJGw0Hr^VXMdq=Lb>QHQ|=nr-mOR1o=2>JV4YoXf+en)?RnV$EJU%&2xz
z(WuU*PP}9pTpH}r0v_yC)krp@%I)y8`>Tq+all8%88D&teE$H)t!#Uhw}APm*T{@|
znH{Yvl1C%9-^vKWVteTD^O^~$HTme+p|Chb{oLr7lSd+gk?>qyeWX|6kJwSP7jRmO
z0_&=oiSQkR{9=AEvH6laFN)rL63omGvK7*J`5-D*&m>#JWd1I4EKI}z7f72*{^{pg
zc)u-(hKK9O`d#GxeH9=1;Y&WLt7!M5UJH;vHE}`l^LyxLA|FMkh`fy6EozNE+97I(
zee|@b#eDRPs2%drHc@-YN83eSO79Z6lNK86sx(&44@-arSpmWw${sD?qo+i?Lac?e
z-$YPN1mFq~1SLdf2g!jj(SzKp)NzNhi#!*E8-@DcSH@@4@-p5-=auo9^r14+9Uvze
zA&t-%{VDQ0`;%B=kULcf^he!V?)kW9@3oI|x^mC&y$+Y7*AvD?%#QrE2^Pzpu+r~f
zp27gktyjt}O1F#oVfM9^ljQDz_Lh2v8qSJ2_2$n&G)BV@AwDd*CZ3fX6(3=^l>k{7
zjMbSg6`OW}_&1e26@=WhPBmE?cNk*;BbgHyjbS80D;Cxhr2(#KW!D~5o_x-xT(=uU
znJlh{TME<Dk0}mdIsmf-1Ib84wlGn-Y%eNjA#z%I4Kc}k2ua@GOY+0<BIB9_Nn`oa
zq+5k3heF8YNtGN4lQ%<_?tah>mKUP@g3aZ}sJgyyu-6Y!We1vL0i{b0bU_HVfyBQJ
z$y_!&K!z5ud?XBbz&6tg3nP`>dX#HzE*nr~PiEy%pvNpAYobaNJZ3VYB11MAsF{mC
z_67aO!bl~v2xU7ni&14y=8Kq-@z;=<niMmu(8bQo<ER=`wv8y;nc0LYdomfAk#9{+
zW@fNyZer%4o0541WjixJ9h%I;CXj5a=6nn3i<&0IOopCWV?m_K^mCN$%=`jX{mjVy
zeZLlUc8;I2kTNt)W@a+<%mND{mCSOKZOq90QPkP%WKr`!F_WQZ*4>oMFHx55)NCD^
z%>RLz3_bHee=_pGgXbrxuu;R83{B=iRM~%*6&8|Jru$IH_@KE(&&cMM^n`_xs?%na
z?aXXJmAy<)qRQSgt1TcanJN?p9yGV;85w=-3z}zPq>@>RvYnY_sIn*X6`7H(UD!%E
zL(^2>l+4p8+nM><&}6<mGcp%(Ll6}|KF$Vx`4nXj9%33;jKU7<;Zt$Hm<44dZ>SaD
z+Q+}1l3!P2v<o)iAAsL@+zWH9<si3`HGBq#gG|p3m|*?ea15dSQNJ26mGSL3grqQo
zWGR$#(8dLc0A4x_i`_pNZZHybp?zaPZ*gD}>{HVl)`UBN1ZS@N9y*~Xn$3lX&=c|W
zBs^Cn%{*91U-|&XK3!8V9}Yv4=mtE9G2W-_hqK{-JCmi(Uzl+Ed^T_dgX20|w)Wm9
zUJXR^^>P+jF;QQ{BJWMqSHZO?;rSRg^gk#kd6n`<E$CDJtc85aU!pGkX%?w0h9$t%
z$F;Cec|Dq~zgtwel||l#sL#Nox2SLji}a#|4mzm(?DMsYWthsNzsMqwoAC~ae-Yv(
zpWJ8vz}rZC?9pr09wmrpzzYoKiYbS*W;~?QH$=!xRU*m(DVh}vdaJV!>z>9?PI0KF
zIMi5Nm+&Oh2Jaw430ed}n6cgK%@(G3y)(880$J2Zwl(7Gji9`w9OjD^uC*}tIwq_8
zL&8M;%KlKzM14t9sHO;zFJe30rXMs-PEbzNA4{7=FuiP=@=eo*w8;sk*G$uR)AUT*
z<N{N>X}aAs`7P5NoXicjw@uqL)5g+a!@%@+(=@|0J)bh^ADik2P4#b2RIV>^EJGgu
z(FDXHkMOo)@wilp@F4OiV{aBmYOpX;G*ACmQzWlgcdC&Fi%+vYK%F2IWD99Q5N<I4
zhJ@U$YTasloH31iXt#RFP&Gr1k1?ENWe~K5pfyw&!(sc<IaND{uGyeGr(Qa%O5785
zM$W1U&*xIqsh?FNWIARMYw%Wks4_k3)_c^5Z0e$poehbdyY-xArJj@qrQU{ELp;Zr
z=HkPZ22-*7kY$y$2)?=W*2U`LcN;Ev=G4Kfiqux;aY3PB%$%Ew<#&8M%W#I?@pYWa
zGd_{DE;Tvr2zTG}X_uOVpTqU$t@^l9!|$yYlwbe8UDaL9$__oNS^3Se9s6oJPPH0W
zAkOkz2!3Vg_qz`D74&-r{aS^go|n;csp%Te>`ID*up)qtw#HqC7_He^YfTb>(CKDm
zVrb;)T1<!C*fd_A3VuG*uQRisbg4@Pd}uN!c{>Czb@<!@Ri{edQniFiJ5?>N(uAsY
zs5Gu>?JDh1lfYjxAOBzANM@V2BOlh&c2&aHS$MnZOI~XgYUfEBYufD1`);#whgK^l
zi^!@ldv$ZExHZf!ZZ4ht?{KJHt-~rSXO!d(NgHjHj7a81C+Hu9BLSb;g%flG#%%VM
R?>jFCrm|<Z%obns{|BewmN5VT

delta 4225
zcmb_feQ;D)6@UA7LqcF+nFJaG$lWBBVl+@fEw-DN?+@Al6{LP3$qNb+pg<eMN}(@e
zUJ^ncklc{VE^HegUCKpYrH$<f(^a%3vcZnew0}4{)X_gu1{HROj-?%E;yLeSck{?%
zJKCMizI%S>oZmh7oRfF&y>iX<oA+F4V`D<WnwQgN<<z8=3x4meDxuZmY4gBe8hljv
zE6?^<4N9J>wSEf*Rs7RdB~-M5(AMUudb_N=&_5`x8C;)pN)#^yUzvNQ!qr26x1nv?
zZ5Hm0j>V>tz5rd{FweDzKHac*-Vm+-nMw>QhqD)@n=8XXbB2*Qvgo#%OY-R(4FwBU
z^znDq6GJD$C*zu_WG7-Lhfd06b@UI7b6gAQwMO5RW!ltt_$s=;(YN?{Ny|00%y*1|
z@d1v1jN`64F6gsEf;sH{Xv^7AbxT>D(MR8E%yped66MdDAo6z2C4vH+!bgDAu;>gX
zX`i_psXqJFvli)XB;`J2=}52`x}@cxYvOD4A;MQounTv9c2?A7PBBhd$^u-^RvM7!
zDlZ_grHtGRkXZ-G!XSC0hYQ5d$ZH)u9iJLQMOG(Se2|>(sXx~NUvjRq{%{B4J9@dG
zcJSre`y$WQmWbT1-7gx)B<-?ja7lYpG)_y}CDC|M(uPFijHLZm<VD(Ik-N3|rtUK6
zmzw4%YCr}qUVtR`sYeVdX%|KO1$UdO-y%6~kwCJ5L{J0d7mQ>FN%3)>qjqwadXRXI
z!$aeOR^{gvTD70Qt*!F&GHtb=^!AcHl-#7eFdilU;&>b$lbq_Ozi;~NQhPyeSkN+z
zMTnc;eL?izriG#!ppR}WP<nff3U)~|-Srt=Rzr$rHne1PN^EO1J(d-nVWz3Q<T49)
zS|;^N4}!Rwk-ssR-zaCXA}G;p;D}{LMRN*i(CV|gNKH5VCc(o;5ZrUv0TvwsQ6Y1>
z;E~{LALkU~oKSyq-QpZcaw3>}6gfp?wkJaH0&)@^Daq-hL=8lJ=7%x_jU`GZ)=qX6
zBwHa@`w0n><pCS325h3d2IYI$L})ESulG!ZY7lY~)!IbKvO>DR1xqdSFF-K2tST!|
zX4^(ahl`G2nrx0la63@`$YHV*A!jffClh_!CbB1LK%w0VMpPAuCPixM(8jr-6*fmA
zn6IMj%*;B3oWXotW)$rB)Tv2i<~wNO%*-Z)CX{U#%FfI@iI6jx6q!-(o|@E|!KS$*
zGpp_h=9?%xGqZkjFsm&h#Zk@2Y^INEnnY$&^vqV9B2lJ2C_6LreT2p{qm1|cHpHAc
z-flCcXqwcSNzpT3u_+S4d<$hqW)!{wF=w6Z)cjwWNzpS;+!4&vC@ap?{9tl0pF(C*
z^vomU!6@+;&*KO<Qp3MCIhaQga{gb|+e~(uDp5%JqPa`YDAu;K+2%;p=_!<*nQ1}D
zS*GtI<m{O(Hjy1nBMR{s&0Ts%K^y0SR@xkiV7`vBGc(^n$QjK4m>I?1Y3+bhG)?mz
z!R$uanVIiR4(5|*M&TlE2%_47ud@kXzC=9&2NklChBeq>y}TIri*hI<d63nQ9_3jH
zc_|BPZ@~uq5ZKMdy>Obn9L%k351+x|1l6-~6|8?Rj=^=@Ykyqj=lgI7L16^3A}HmA
zjSB(+zN8x#dweq7U}We*=f;B8Vtf+pQ_Fg#eddwjXf<<0TQH($a3Lg&guEle-VbEM
zIy}jr_>e^lx6OMDPIm>`PCRT;KBgXn^WT3vcO}kP7;y3o7C&a0ypXbO4{v^^SDzV4
zqoJn!$ZQ(=YkuTj`1K8Y{|+1a&(&9XqxzZ=kknrqK}r3U?uk4=Lk)Sb1ep32<AkKX
zu4hE9`sP1GLs!A;eXtny&99`PQIyai0#F@YzI|O5Oy!MiqM=QezYF}sbYQzrd7i?(
z0Qkb{Y2zdwHnm@iFgsI2>T|Nb4D#m93mru#Sx*li&uPv$6Zs1bWab50^8$T&ox|Q(
zQt{p$3PBJ`_vPed2upHuO7{r@$?qd8`tW8Us4uE#_&U|ijSzj{394*977+3yL&pNG
z`H|1{2U>l=d>tF;p2$;{YQ$14O{zptJ!`4nwNz44<px!krMhmZ9!aV^pz60&|FTq%
z+p1ceEDdzJr4s?ok8Di3O##(QmTHEj+L2I2E?97`1@9d^ykn7zdUp*gwalnx(Ok2b
zd$n42qlOtZEIQkClRqLlAJ7^GV>krgsAfhrf*Al-vl~@R=3d<$s$y_`l67~aiiLb7
zSb=bNPP12QFVWK?bu83sVY;imd$|2jq&28^kr$Xe+8yqWW}3wwK2`0ufJ3Kkt!zAp
zw}#QqaA)*>(*y5<PPit>L!Dj^)C0z}`^h}zs>IVxci^gY`Qmi*AF@%&V#Q~9+VX!^
zvP}G(>9QWpgK8^(xLHtt_)-ar><y|1BKw2tk6u2|(|Y;hfcXLV*>-Ee&X0CKmDqW-
zJCAk)!eq-^XsKAHrKwHHaRw^_YJDK;F-5(#z0ID4f@_K8SvJ}8%{D8XsQcW5I(C$(
zm%%$j)JfdC7`!FRyPPSLVnlcOMkP)Q9pWY{0&vg5*9<`AOsil<8Pm#{QOdM3W=Kpc
zWkw0pBo>3T#%AJ0+ZD^O9%rw0X(dd?8zx+a#$q212yH86W9G;rkC|>v9f^*aw6JCR
z^q&OH`;0a*<|BU!(8`t~@n(Rwv=n`QcQ8=GI<XPdOKR-jvXN~rnh~3>FNkaihNxuy
ZlP-wVz?fcX`Lg>KEvD(aE5rjG{{a{3*FyjR