shave another 197109 cycles off HGR per-pixel fizzle fade

now 45% faster than yesterday
This commit is contained in:
4am 2020-09-03 19:38:38 -04:00
parent a48216f841
commit ab80cfa04b

View File

@ -17,12 +17,13 @@ rnd2=$ff
;iterate ;iterate
ldx #0
@loop @loop
lda rnd1 lda rnd1
@loop2
eor #$ff eor #$ff
sta $26 sta $26
sta $3c sta $3c
ldx rnd2
lsr rnd2 lsr rnd2
ror rnd1 ror rnd1
bcc + bcc +
@ -62,14 +63,14 @@ rnd2=$ff
;wait while checking for keypress ;wait while checking for keypress
ldx $c000 lda $c000
bmi @exit bmi @exit
;exit condition 2 ;exit condition 2
ldx rnd1 lda rnd1
dex cmp #1
bne @loop bne @loop2
@exit rts @exit rts