Apple-2-Tools/4cade
1
0
Fork 0
mirror of https://github.com/a2-4am/4cade.git synced 2024-11-23 12:33:32 +00:00
Code Issues Projects Releases Wiki Activity

fix white AND THEN FIZZLE THE PICTURE

Browse Source
This commit is contained in:
Peter Ferrie 2020-11-18 10:24:26 -08:00
parent e96e8eb9cb
commit afdaabfded
1 changed files with 20 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
src/fx/fx.dhgr.fizzle.white.a
View File

@ -22,6 +22,10 @@ addrs=$C0 ; [$40 bytes]
bne -
txa
tay
clv
php
bit <knownrts ; set V flag
php
pha
pha
rts
@ -38,7 +42,9 @@ loop2 lda addrs, x
sta $C003
sta $C005
+ sta <dst+2
lda #$FF
op ora #$FF ; SMC
sta <src+2
src ora $FD00, y ; SMC
dst sta $FD00, y
sta $C002
sta $C004
@ -54,8 +60,19 @@ dst sta $FD00, y
bmi exit
txa
bne loop1
exit lda #$FF ; last lousy byte (because LFSR never hits 0)
lda #$49
sta op
lda #$60
sta op + 1
lda #$B9
sta <src
plp
bvs loop
!byte $a9
exit plp
bvs exit
lda $4000 ; last lousy byte (because LFSR never hits 0)
sta $2000
rts
knownrts rts
}
end