From 29512ad0211863f1fcfbe7e1b6b77a02916d0d07 Mon Sep 17 00:00:00 2001 From: 4am Date: Tue, 14 Dec 2021 14:02:51 -0500 Subject: [PATCH] shave some bytes --- src/fx/fx.hgr.fizzle.a | 97 ++++++++++++++----------------------- src/index/artwork.idx.a | 2 +- src/index/attract.idx.a | 2 +- src/index/cache00.idx.a | 2 +- src/index/cache01.idx.a | 2 +- src/index/cache10.idx.a | 2 +- src/index/cache11.idx.a | 2 +- src/index/coverfade.idx.a | 2 +- src/index/credits.idx.a | 2 +- src/index/decrunch.idx.a | 2 +- src/index/dfx.idx.a | 2 +- src/index/dgr.fizzle.idx.a | 2 +- src/index/dgr.idx.a | 2 +- src/index/dhgr.idx.a | 2 +- src/index/dtitle.idx.a | 2 +- src/index/fx.idx.a | 2 +- src/index/gamehelp.idx.a | 2 +- src/index/gr.fizzle.idx.a | 2 +- src/index/gr.idx.a | 2 +- src/index/helptext.idx.a | 2 +- src/index/hgr0.idx.a | 2 +- src/index/hgr1.idx.a | 2 +- src/index/hgr2.idx.a | 2 +- src/index/hgr3.idx.a | 2 +- src/index/hgr4.idx.a | 2 +- src/index/hgr5.idx.a | 2 +- src/index/hgr6.idx.a | 2 +- src/index/joystick.idx.a | 2 +- src/index/miniattract.idx.a | 2 +- src/index/prelaunch.idx.a | 2 +- src/index/search00.idx.a | 2 +- src/index/search01.idx.a | 2 +- src/index/search10.idx.a | 2 +- src/index/search11.idx.a | 2 +- src/index/sfx.idx.a | 2 +- src/index/slideshow.idx.a | 2 +- src/index/title.idx.a | 2 +- 37 files changed, 72 insertions(+), 97 deletions(-) diff --git a/src/fx/fx.hgr.fizzle.a b/src/fx/fx.hgr.fizzle.a index 096a1dc51..8db424b38 100644 --- a/src/fx/fx.hgr.fizzle.a +++ b/src/fx/fx.hgr.fizzle.a @@ -1,71 +1,46 @@ ;license:MIT -;(c) 2017-2018 by qkumba +;(c) 2017-2021 by qkumba/4am/John Brooks !cpu 6502 !to "build/FX.INDEXED/FIZZLE",plain *=$6000 - ;init RNG - - ldx #1 - stx @rnd1+1 + ldx #(end-start+1) ; copy LFSR code to zero page +- ldy start-2, x + sty $FE, x dex - stx @rnd2+1 - - ;iterate - -@loop - ldy @rnd1+1 - ldx @rnd2+1 - lsr @rnd2+1 - ror @rnd1+1 - bcc + - - ;feedback polynomial forms #$100D for period of 8191 - - lda @rnd1+1 - eor #$0d - sta @rnd1+1 - lda @rnd2+1 - eor #$10 - sta @rnd2+1 - - ;little hack to avoid missing offset zero - ;screen hole at $xxFF is missed instead - -+ tya - eor #$ff - sta $26 - sta $3c - txa - - ;target page 1 + bne - + jmp loop +start +!pseudopc 0 { + ;X=0 + ;Y=0 +loop txa +loop1 eor #$1B ; LFSR form 0x1B00 with period 8191 +wait dex + bne wait + tax +loop2 txa ora #$20 - sta $27 + sta