From a2e3fe71cc99e7514f6fb1c8799f81dff9b3ef46 Mon Sep 17 00:00:00 2001
From: pkali <pawel.kalinowski@gmail.com>
Date: Thu, 5 Dec 2024 01:03:47 -0500
Subject: [PATCH] WIP better init

---
 averybreakout.asm |  19 ++++++++++++-------
 averybreakout.xex | Bin 10523 -> 10628 bytes
 lib/ATARISYS.ASM  |   3 ++-
 3 files changed, 14 insertions(+), 8 deletions(-)

diff --git a/averybreakout.asm b/averybreakout.asm
index 63e9b85..19cd6a2 100644
--- a/averybreakout.asm
+++ b/averybreakout.asm
@@ -2,6 +2,10 @@
 ;build 006, 2010-05-12
 ;CLEAR!
 ;あめでと
+;---------------------------------------------------
+.IFNDEF TARGET
+    .def TARGET = 800 ; 5200
+.ENDIF
 ;---------------------------------------------------
 
          OPT r+  ; saves 10 bytes, and probably works :) https://github.com/tebe6502/Mad-Assembler/issues/10
@@ -303,11 +307,11 @@ main
     mva #"9" Lives
     jsr clearscreen
     mva #$0 LevelType
-    jsr initialize.ClearTables
     jsr BuildLevelFromBuffer
     jsr LevelScreen
 gameloop
-    RMTsong song_main_menu
+    jsr initialize.ClearTables
+     RMTsong song_main_menu
     jsr MainScreen
     RMTsong song_ingame
     jsr PlayLevel
@@ -1223,8 +1227,6 @@ brickcolorTab
     mva #>font CHBAS
     mva #$00 PCOLR0 ; = $02C0 ;- - rejestr-cień COLPM0
 
-    jsr cyclecolorsReset
-    
     mva #$7C COLBAKS
     
     mva #0 dliCount
@@ -1247,6 +1249,7 @@ brickcolorTab
     vdli DLI
 
 ClearTables
+    jsr cyclecolorsReset
 
 ; prepare mem address tables (for "snake" routine)
     
@@ -1685,7 +1688,7 @@ LNColtable ; Left Nibble color Table
 debittable
     .byte %00001111
     .byte %11110000
-
+clear_vars_start
 dxTableL    :maxBalls .byte 0
 dxTableH    :maxBalls .byte 0
 dyTableL    :maxBalls .byte 0
@@ -1711,7 +1714,8 @@ xposMemTable
     :maxBalls*maxMemory .byte 0
 yposMemTable
     :maxBalls*maxMemory .byte 0
-;addressess of the tables with 
+clear_vars_end
+;addressess of the tables with snake pixels
 xposMemTableAdrL
     :maxMemory .byte 0
 xposMemTableAdrH
@@ -1734,6 +1738,7 @@ dyDisp
 ballDisp
     dta d"  "
 marginLine :40 .byte 0
+    .ds $400  ; buffer for RMT player
     .align $100
 PLAYER
 ;--------------------------------
@@ -1748,7 +1753,7 @@ song_main_menu  = $00
 song_ingame     = $07
 song_game_over  = $12
 
-    icl 'art/rmtplayr.a65'
+    icl 'art/rmtplayr_modified.asm'
     org $6000
 MODUL
     ins 'art/muzyka.rmt',+6
diff --git a/averybreakout.xex b/averybreakout.xex
index 6c0455dd510183125ab3df06f980ef07ede144fa..258ec01e0777ea1e7a8454840bed89b6993ed0c0 100644
GIT binary patch
delta 1005
zcmXw1OK2Nc6diqRONyLKv7u_>rqd5aQe2`GFVvFY(0bv9DY(gTG&X@68nrP^f)hLc
z$m${^N{T>58=LZ|sxsA#+>tewKXuWNcu}wn4TE-FB=sVMq^qG6(uQL7jzZya-@WhL
zckj99y>E`+I#K=H?@MSc`CGx0$WQy<iQhRSWTQedrg6g4w}pSBT9>nbc%c9N4`M;#
z-~r*2C?$vsk$b_g9t<~lyHfzg`G@{_SF$!6sCDEA_;)?R#=+Woe%|d$)O<bXcX?Cz
z8Tsq`2R);AM)URk8=jM2jpsMILixE@{)i^TZAtt`5=Rmu#>J1NjCQL$Tu5o$eCx!Q
z*0X}w(B$P!GHZEFc+H(m<bM@jOlMYZt467@Q+-P{zGoZ^g?XWI%m>ZIg3!KT0v>OB
zt>2VVXwoZ}a{C^s;&Q_FYMlLh!EKbvn?^}iGo>PDuPAHsYO(eBK@iq^CI?wFy^zaw
zA9j48#+Arm<A}YxI>2}kkz<irmKL7(`9J5_rxjXCC1SH)Y<sL_WmR6w-h>FLF=+22
z;I8ctM59DabW2o(94bz}Qi<(yrdxHwtwf_``yIF)h{*&gvlV+*7ZCef_)HQ%l8A%y
z6HE8P_>R2+S>L2R47oyMpM`4ZY=SuIEY`LIZ94*Xy6s$T+rudMC}YS8)b%XbFbV-W
z5FOQyf`kjOI9Ol1+9^zOtRGsCN$nVz5HNl(eG}FTk5-hGUzTkT>FO|jI;M@vKNdY^
z81|oX*(7#ay}vD>GvK0Qs+)87W5@+;AN7jE8~_z3b@sg63w514DI3aSWVgDWg1n#@
zFU^9@z#M}8YQtsiHTw`si3rt)k-qk|!*KlvhrM`d?7<M~r*OABcgQ>q{>{1j5-guN
z0b*@=b|g4tbRs5K>Jn&Hz#KvRiHn3W<KRPPFYF%GJW34?gG9)6&OPDjDV0Tb29YVd
zL#c{?jhQ?`$!aJCq#H+aUG&{%pbe_VLMYV-HifO2M{G&@RdioN_jPpNKsmFdp8>yD
zpFw1g-J?$-bnYy&7wM~JFXOh~Th=EX_|kLu0>S5yop#_W1iQ-*mn<%`ROBspk)zv;
uYf>rZ3ODr&VD2VeWS*ve5zO1vFN1Y7^=YuqrhWyitEnupTH*B@9sdEq5yR~O

delta 894
zcmXw%Z)h839LF!cr1@i<!OeMYv%8IoNmf}l`XWk3ita^Mf4}zbHt=nkOg6-#_)4LR
z%$<ms5Im3;c`#N&?`fAb*Z8K8qbv9#8EhW+ZfIwPBAIOCkb*Ko<L?5(!}oc9zvuWq
zpWm0edGR}~@qRR-@V@@NEGovw(buzAGxFvcxtQjH{Lfjrm*!!A$5Uf(UC6}c)2HNj
z({u~<)V+AJ7Eg8(-mrX$YGXIL7`WQJ9&3g~dF!-sCh<mdF0nWiP@0j0bI$~C;3gWM
zj^xGZ&1s`GvL()(yl8BNC1c_EU#}{#rNXZ&paPFIm{PysH&-SrA8}#vclgqIS_xXb
z_>0;$ZpkNyE-Qv3znCrERlhQ=<<5TNHPiZ$?SNHfyTAq31s-6JfPcmW?Cu1e`_*OX
zT2NmuAN|vWb;TGtak#M5?>=}0&YSiQ=-l1~eWlff{VrHsUrXgX=ez@rv&@6G#ivr&
z$!FmB|0h%Lt<kEkr98F=JEHRw4;2-JyxPfoN2z_=i^kGvLV%t^4s;-AI#<^^eJ|>F
z3RM5Bz-5JIzLR;{5-{_xtf`Pw=~3?6T0gKL>a{lQ5!CCIA*;p`*d{$R&~aqvu`*2c
zu|YjL(4?>C#y7~uuo9!o3{ng-(gZOkA?txj%?T`A6IdL1oaNAOWN}u0tld-4dH%^=
zmG=o#q@;Yl-!wk0-&zvw2zr0(D>gy#Rvi7DXb`>Oi`8D(PGC9aMd&dJ?L$cBl*4l`
z?}51?%;@XYM(TjMaRc?$>iSEcBP#&fN%T&10?rY;2hw~7rPdgJ@~w}!vFhW)JKBRJ
zwkGiQv*nC^9uu!DZ0FDk51<`!KZia`jkxrBD~E$A>~YLK3{Wt(go)$!9(YH#N6~ws
ze9*LIl;)2iWl<hpcvwhK#02%B7phutU$Z@su2|B17CYz4Vfu#vdET^ErTHGPNxYL0
z;SY65C_T|=@xW}QUz@}_U{P>O0k?Jm>xji6w<Nl?DXdRpG3b^;ZtZQX&tP%bErs2$
WBkrs)`@t0rFO5%xnukZ{LjM7jH=Bk4

diff --git a/lib/ATARISYS.ASM b/lib/ATARISYS.ASM
index 3fa62a6..3a609a2 100644
--- a/lib/ATARISYS.ASM
+++ b/lib/ATARISYS.ASM
@@ -721,4 +721,5 @@ scr32   = @dmactl(narrow|dma|players|missiles|lineX1)
     _F4    = 20
     _space = 33
 .ende
-EOL = $9b
\ No newline at end of file
+
+EOL = $9b