mirror of
https://github.com/a2-4am/4cade.git
synced 2024-11-23 12:33:32 +00:00
fix white AND THEN FIZZLE THE PICTURE
This commit is contained in:
parent
e96e8eb9cb
commit
afdaabfded
@ -22,6 +22,10 @@ addrs=$C0 ; [$40 bytes]
|
|||||||
bne -
|
bne -
|
||||||
txa
|
txa
|
||||||
tay
|
tay
|
||||||
|
clv
|
||||||
|
php
|
||||||
|
bit <knownrts ; set V flag
|
||||||
|
php
|
||||||
pha
|
pha
|
||||||
pha
|
pha
|
||||||
rts
|
rts
|
||||||
@ -38,7 +42,9 @@ loop2 lda addrs, x
|
|||||||
sta $C003
|
sta $C003
|
||||||
sta $C005
|
sta $C005
|
||||||
+ sta <dst+2
|
+ sta <dst+2
|
||||||
lda #$FF
|
op ora #$FF ; SMC
|
||||||
|
sta <src+2
|
||||||
|
src ora $FD00, y ; SMC
|
||||||
dst sta $FD00, y
|
dst sta $FD00, y
|
||||||
sta $C002
|
sta $C002
|
||||||
sta $C004
|
sta $C004
|
||||||
@ -54,8 +60,19 @@ dst sta $FD00, y
|
|||||||
bmi exit
|
bmi exit
|
||||||
txa
|
txa
|
||||||
bne loop1
|
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
|
sta $2000
|
||||||
rts
|
knownrts rts
|
||||||
}
|
}
|
||||||
end
|
end
|
||||||
|
Loading…
Reference in New Issue
Block a user