From 20e0098013c92f55cd00b5c711e956e27917c95b Mon Sep 17 00:00:00 2001
From: Pecusx <Pecus@poczta.fm>
Date: Sun, 2 Mar 2025 00:18:41 +0100
Subject: [PATCH] Power flash

---
 art/animations.asm |  12 ++++++++++++
 lumber.asm         |   8 ++++++++
 lumber.xex         | Bin 19809 -> 19856 bytes
 3 files changed, 20 insertions(+)

diff --git a/art/animations.asm b/art/animations.asm
index 46a868d..bc1b5c7 100644
--- a/art/animations.asm
+++ b/art/animations.asm
@@ -103,6 +103,7 @@
     mwa #gamescreen_r_ph2p3 animation_addr
     waitRTC
     mwa #gamescreen_r_ph2p4 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_r_ph3p1 animation_addr
     waitRTC
@@ -138,6 +139,7 @@ AnimationR2 = AnimationR1
     mwa #gamescreen_l_ph2p3 animation_addr
     waitRTC
     mwa #gamescreen_l_ph2p4 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_l_ph3p1 animation_addr
     waitRTC
@@ -173,6 +175,7 @@ AnimationL2 = AnimationL1
     mwa #gamescreen_r_ph2p7 animation_addr
     waitRTC
     mwa #gamescreen_r_ph2p8 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_r_ph3p6 animation_addr
     waitRTC
@@ -207,6 +210,7 @@ AnimationL2 = AnimationL1
     mwa #gamescreen_l_ph2p7 animation_addr
     waitRTC
     mwa #gamescreen_l_ph2p8 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_l_ph3p6 animation_addr
     waitRTC
@@ -241,6 +245,7 @@ AnimationL2 = AnimationL1
     mwa #gamescreen_r_ph2p3 animation_addr
     waitRTC
     mwa #gamescreen_r_ph2p4 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_r_ph3p1 animation_addr
     waitRTC
@@ -274,6 +279,7 @@ AnimationR5 = AnimationR4
     mwa #gamescreen_l_ph2p3 animation_addr
     waitRTC
     mwa #gamescreen_l_ph2p4 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_l_ph3p1 animation_addr
     waitRTC
@@ -307,6 +313,7 @@ AnimationL5 = AnimationL4
     mwa #gamescreen_r_ph2p7 animation_addr
     waitRTC
     mwa #gamescreen_r_ph2p8 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_r_ph3p6 animation_addr
     waitRTC
@@ -339,6 +346,7 @@ AnimationL5 = AnimationL4
     mwa #gamescreen_l_ph2p7 animation_addr
     waitRTC
     mwa #gamescreen_l_ph2p8 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_l_ph3p6 animation_addr
     waitRTC
@@ -371,6 +379,7 @@ AnimationL5 = AnimationL4
     mwa #gamescreen_r_ph2p3 animation_addr
     waitRTC
     mwa #gamescreen_r_ph2p4 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_r_ph3p1 animation_addr
     waitRTC
@@ -406,6 +415,7 @@ AnimationR8 = AnimationR7
     mwa #gamescreen_l_ph2p3 animation_addr
     waitRTC
     mwa #gamescreen_l_ph2p4 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_l_ph3p1 animation_addr
     waitRTC
@@ -441,6 +451,7 @@ AnimationL8 = AnimationL7
     mwa #gamescreen_r_ph2p7 animation_addr
     waitRTC
     mwa #gamescreen_r_ph2p8 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_r_ph3p6 animation_addr
     waitRTC
@@ -475,6 +486,7 @@ AnimationL8 = AnimationL7
     mwa #gamescreen_l_ph2p7 animation_addr
     waitRTC
     mwa #gamescreen_l_ph2p8 animation_addr
+    jsr RestoreRedBar
     waitRTC
     mwa #gamescreen_l_ph3p6 animation_addr
     waitRTC
diff --git a/lumber.asm b/lumber.asm
index ad1764c..0dc665c 100644
--- a/lumber.asm
+++ b/lumber.asm
@@ -453,6 +453,13 @@ LevelOver
     bpl @-
     rts
 .endp
+
+;--------------------------------------------------
+.proc RestoreRedBar
+;--------------------------------------------------
+    mva #$38 COLOR2 ; red
+    rts
+.endp
 ;--------------------------------------------------
 .proc initialize
 ;--------------------------------------------------
@@ -621,6 +628,7 @@ not_max_lev
 ;--------------------------------------------------
 .proc PowerUp
 ;--------------------------------------------------
+    mva #$3F COLOR2 ; red
     inc PowerValue
     lda PowerValue
     cmp #49
diff --git a/lumber.xex b/lumber.xex
index a6f1a79002181767739c6d9cf92fc99c976a4bb3..9a9a09fa7864c6c002b0e288b5dc7f2dd657619c 100644
GIT binary patch
delta 2149
zcmb`ITWAwO6o#{#OVhNLAoW5;nbIN_Q*E_i!Ani*rPWmMTJLV_t<j#Y;EQjm+Kr~T
zpbRQ%iX{?os_O+GN*@9WT3kg~6a*i95TOWST?Hvf6=#yhteJo>*@xMkZ~i%F&Yqbw
zAFc}*ZwL=AmkHk=T`8MhC)~kg)t31&8GY<PN;k0~0nn`uQpDaZ!07D`By_Tm5Uy-G
z752-z%RHeMne+5A!-aYQ#pFc9um?vwwIX=dpZW^Y8RdYkfaU^okuDfB=$PrzMLOgD
zQ8rqCgtl4u@)(1)p?@Gg#Ndxk)@H1QsW~xYPN3#`y4bLpHOJuf;|xw_%`w<{n8Bw9
zX-h;!(LAr!3Iox2Dvhr!)+aI=19TF|Y$bw*f!Gv<O^C@7sa7tKs9NnKb@=M)l}Ayy
zJ5m0u+?*sfwZcc1t8;wmKKk5~Mk{!<l1Hm})MP=}2sGese}kR+!-M`=Z5iv^ETSog
z+j+EuN9`7bW6ce?G0>13&1#FLz|nN&`r66+DpYJ;UH{M0THgIS9<Aq5ixuGyfhud7
zHf7SZ&#FrAi~T%0z$3|uu-06~@{}7-o;(#Sp7va4c@kBy=-P94MV|BIxBijzuMF_0
znMZ3Z2%9bcoTtBu+GP<<ZTa0i+QXy0R)l{CX5!^7n{&g-lc++4!)@|Bc`9gd9{j#_
zrlV0E74f&$`Wc~aS})UulT}S3DCf{HUbbOlxD>Qf&?}4@;#Eswyacoo)~%r35}>!n
zxCb;3BW_AOFkTE2@y6`~#qh%WQ;OS@#V|18d*Pjs64BWque!H3?o3XDfgQDs#f3;T
z`A$~OqXQs~MH5loV>n2$5*?bNmDF4lUFBFL5z*`ESY4{7OQR95gBEsL-|^gyOTun2
zmktqU;}<u0*mJu-^$JCmUa~M`Q%>I#A^ApD&LrQ;%Grl!F7-ZtJZMa4Q}R#^)%lq2
zt{q00ZiMLuZM;(dt8`?QtyU@83N#vOIzFg73^Cpt=}RvrM5orKoH(;nGc%v|rIv$d
z1*;Fa@()YnZe~_@8g?|<L+?0=9w3TbpcaAV1l0wa15_tyc2FIliJ;nPa$eU6raSc-
u`qZzAAkmu;`SHzQRmn%$SfKTZW+gg@Uj-KnG5jmI*!fDnCIYT+tNR0AoRzNt

delta 1937
zcmcJQT}TvB6vubg&x~v{t+0$MS|qJ$wNX%MYJRU#QJQHr+Lv2rnjQ-Rt(?u32C_>*
zg<)GuUTLBz2%)8-ltw6qUh*q-4I+YUUqXl;x_8%gC#J`39`2p_o&Py=?&02ZuiWB%
zH@QdG61mq;t|unta_2C~+r3f{(dPzK2gHOv0=nBk;@G@gV6?jdagFSy7^ml-X-*Q=
zSpR7?&c9qu)M8P!fCSOw)S~SDjmjtJYY)8HsmC`!ASk2YU!!tb3bpwYR5SJHJkG2u
zj?pm;l@ko6IR1k25e9!YvN05`nT9im!f`ZQZ4)#5!r>S^dolpS;R4E|48A%{M`D&F
zCE<gdsv)|bbnORQ>s1jw6HvK8mPk(2CJ>V(F$Y29Nv3p}xa3SL$;Cq19Ne|dhUb?q
zu6llonB-I|*&;8sdXoE+{l8HNZ8f4iBg)qyyt$wWkCiUo5el(KXPo)bUL&eDq8dHI
zcS;xG7e#3}uh51&iX)%24bLmG;hiP_De+yb(z7)w)-Nqs{1PK7HKH;-!uEoize;^T
zZw-b$XhesMh}R>$w6KPiIP%$M7-}4`j57?oxj?_BU@;1fsK|)6>kwX0Zo^`Mjg@)!
zoYd+BGdp^}5!D${y$<1t@^q{gEi`QCNafwcHgm*t-iXsGa#D(cHke?iVQq$R(k0Y}
z8!9TBCqbD6HC4+Z7I_k;e4zN)XDa>l0d2EW6QE2m5>LqlOpOCiEbgezaTu`t;@wf+
zap;`34p^pnk86p;BG+fTW4xcCvpSnGH|KPDdqk-XZ4me`E{{u1(4xs4$<;GMmr?BW
zIMuZj=LY&8-|w_U(<VrJA+}epYaRpt`W_Oq>H8QYu&28{FgaXO3t8<jN#`F9g7=;%
zUGUx)rHhX*bhNyE*`-Y@Gjc~3)mfSD!4UK^T`$vhnT$$xRyiD2mg}V`OP~v(q1|0-
zv}Sg<I9r3sIH+rO;3p$t*O2F%)<8PA#GZL%^xtNFY7A&tHAag<?@rPCfTst5qEV1P
zfieQ}C@8}qkAN}+@-QfaAP)h(NwPS9d|>MN+Aa?QPj3yBgx}jU<~|j*RZ6SbpN{t7
V-}W3%z}BjqnA_rwLBM=f?jKUQM)d#y