cascade wipe by qkumba

This commit is contained in:
4am 2019-10-18 11:18:33 -04:00
parent 76176c9955
commit 70a3e105d9
2 changed files with 100 additions and 1 deletions

View File

@ -1 +1 @@
RIPPLE STARWHITE DIAGONAL STAGGERWHITE.UD RADIAL STAGGER.LR SOFT.UD BIT.FIZZLE MEETINTHEMIDDLE CRYSTAL R.BY.PIXEL SUNRISE SUNSET CORNER.CIRCLE RIPPLE2 RADIAL2 SPLIT.UD.INTRO HALF.FIZZLE RADIAL3 BAR.DISSOLVE FOURSPIRAL IRIS AND CHECKERBOARD LR.BY.PIXEL RADIAL4 STAGGERWHITE.LR SOFT.UD.OUT ONESQUARE FIZZLE STAR DIAMOND TWOPASS.LR HALF.MOSAIC RADIAL5 FOURSQUARE STAGGER.UD INTERLOCK.LR SOFT.UD.IN BLOCK.MOSAIC INTERLOCK.UD BLOCK.FIZZLE SPIRAL [eof] # # transition effects for HGR slideshows # # Each Mega-Attract Module that is an HGR slideshow (see attract.conf) # will use a single transition effect for the length of the module. # Transition effects are loaded in the order listed in this file. Each line # of this file is a filename (not including comments, like this one). The # name of the next transition effect is stored in the global prefs, so this # file should not contain duplicates. # # Transition effects are binary files loaded at $6000 and called with # hi-res page 1 showing and the next HGR graphic already loaded at $4000. # A transition effect has full use of main memory, including zero page and # text page if needed. LC RAM banks 1 and 2 are reserved for the launcher. # # Important: LC RAM bank 1 will be read/write on entry and must be read/write # on exit. If you need ROM routines, you are responsible for switching to ROM # then switching back to RAM bank 1 (read/write) before returning. #
RIPPLE STARWHITE DIAGONAL STAGGERWHITE.UD RADIAL STAGGER.LR SOFT.UD BIT.FIZZLE MEETINTHEMIDDLE CRYSTAL R.BY.PIXEL SUNRISE SUNSET CORNER.CIRCLE RIPPLE2 RADIAL2 SPLIT.UD.INTRO HALF.FIZZLE RADIAL3 BAR.DISSOLVE FOURSPIRAL IRIS CASCADE AND CHECKERBOARD LR.BY.PIXEL RADIAL4 STAGGERWHITE.LR SOFT.UD.OUT ONESQUARE FIZZLE STAR DIAMOND TWOPASS.LR HALF.MOSAIC RADIAL5 FOURSQUARE STAGGER.UD INTERLOCK.LR SOFT.UD.IN BLOCK.MOSAIC INTERLOCK.UD BLOCK.FIZZLE SPIRAL [eof] # # transition effects for HGR slideshows # # Each Mega-Attract Module that is an HGR slideshow (see attract.conf) # will use a single transition effect for the length of the module. # Transition effects are loaded in the order listed in this file. Each line # of this file is a filename (not including comments, like this one). The # name of the next transition effect is stored in the global prefs, so this # file should not contain duplicates. # # Transition effects are binary files loaded at $6000 and called with # hi-res page 1 showing and the next HGR graphic already loaded at $4000. # A transition effect has full use of main memory, including zero page and # text page if needed. LC RAM banks 1 and 2 are reserved for the launcher. # # Important: LC RAM bank 1 will be read/write on entry and must be read/write # on exit. If you need ROM routines, you are responsible for switching to ROM # then switching back to RAM bank 1 (read/write) before returning. #

99
src/fx/fx.hgr.cascade.a Executable file
View File

@ -0,0 +1,99 @@
;license:MIT
;(c) 2019 by qkumba
!cpu 6502
!to "build/FX/CASCADE",plain
*=$6000
ldx #191
--- lda #$40
sta $e6
lsr
sta $29
jsr vposn
lsr $e6
ldy #$27
- lda ($26), y
sta $2000, y
dey
bpl -
stx maxline + 1
ldx #0
stx $28
beq + ;always
-- lda $26
sta $28
lda $27
sta $29
+ inx
jsr vposn
ldy #$27
- lda ($28), y
sta ($26), y
dey
bpl -
maxline
cpx #$d1 ;SMC
bne --
ldy #5
-- tya
pha
dex
jsr vposn
lda $26
sta $28
lda $27
eor #$60
sta $29
ldy #$27
- lda ($28), y
sta ($26), y
dey
bpl -
pla
tay
dey
bne --
txa
beq done
dex
lda $c000
bpl ---
vposn txa
pha
and #$c0
sta $26
lsr
lsr
ora $26
sta $26
pla
sta $27
asl
asl
asl
rol $27
asl
rol $27
asl
ror $26
lda $27
and #$1f
ora $e6
sta $27
done rts