a bit faster

This commit is contained in:
Peter Ferrie 2019-10-23 10:59:08 -07:00
parent 704798d3bd
commit f45c85dd49

View File

@ -25,12 +25,10 @@ hgr1himirror = $BF40 ; $C0 bytes
!macro COPY_BIT .src1, .dest1, .sourcemasks, .copymasks { !macro COPY_BIT .src1, .dest1, .sourcemasks, .copymasks {
lda (.dest1),y lda (.dest1),y
and .sourcemasks,x eor (.src1),y ; merge source and destination bits
sta $00 and .copymasks,x ; isolate the bits to replace, zero the rest
lda (.src1),y eor (.dest1),y ; unmerge source and destination bits, leaves "to keep" destination bits intact
and .copymasks,x sta (.dest1),y ; write the result
ora $00
sta (.dest1),y
} }
!macro FX_PRECOMPUTED_1BIT .coords { !macro FX_PRECOMPUTED_1BIT .coords {
@ -178,7 +176,7 @@ Exit1 = * + 1
inc input+1 inc input+1
jmp InputLoop jmp InputLoop
Exit2 rts Exit2 rts
!if * and $fff { !if * and 1 {
!fill $1000 - (* and $fff) ;align 4096 for input data !byte 0 ;align 2 but avoids the fake allocation bug if it was aligned already
} }
} }