mirror of
https://github.com/pkali/scorch_src.git
synced 2026-05-20 22:34:21 +02:00
Smarter bittable generation (thanks @jhusak)
This commit is contained in:
+7
-6
@@ -756,16 +756,17 @@ loop sta (temp),y
|
|||||||
iny
|
iny
|
||||||
cpy #screenheight+1
|
cpy #screenheight+1
|
||||||
bne @-
|
bne @-
|
||||||
; and bittables for fastes plot and point
|
; and bittables for fastest plot and point (thanks @jhusak)
|
||||||
ldy #0
|
ldy #0
|
||||||
@ tya
|
lda #$40
|
||||||
and #%00000111
|
@ asl
|
||||||
tax
|
adc #0
|
||||||
lda bittable,x
|
|
||||||
sta bittable1_long,y
|
sta bittable1_long,y
|
||||||
|
tax
|
||||||
eor #%11111111
|
eor #%11111111
|
||||||
sta bittable2_long,y
|
sta bittable2_long,y
|
||||||
iny
|
txa
|
||||||
|
dey
|
||||||
bne @-
|
bne @-
|
||||||
rts
|
rts
|
||||||
.endp
|
.endp
|
||||||
|
|||||||
+7
-6
@@ -659,16 +659,17 @@ next8lines
|
|||||||
iny
|
iny
|
||||||
cpy #screenheight+1
|
cpy #screenheight+1
|
||||||
bne @-
|
bne @-
|
||||||
; and bittables for fastes plot and point
|
; and bittables for fastest plot and point (thanks @jhusak)
|
||||||
ldy #0
|
ldy #0
|
||||||
@ tya
|
lda #$40
|
||||||
and #%00000111
|
@ asl
|
||||||
tax
|
adc #0
|
||||||
lda bittable,x
|
|
||||||
sta bittable1_long,y
|
sta bittable1_long,y
|
||||||
|
tax
|
||||||
eor #%11111111
|
eor #%11111111
|
||||||
sta bittable2_long,y
|
sta bittable2_long,y
|
||||||
iny
|
txa
|
||||||
|
dey
|
||||||
bne @-
|
bne @-
|
||||||
rts
|
rts
|
||||||
.endp
|
.endp
|
||||||
|
|||||||
+2
-2
@@ -200,8 +200,8 @@ sintable
|
|||||||
; :screenheight+1 .by >(display+screenBytes*#)
|
; :screenheight+1 .by >(display+screenBytes*#)
|
||||||
;----------------------------
|
;----------------------------
|
||||||
; now long (256 bytes) bittables are generated in RAM based on one bittable:
|
; now long (256 bytes) bittables are generated in RAM based on one bittable:
|
||||||
bittable
|
;bittable
|
||||||
.by $80,$40,$20,$10,$08,$04,$02,$01
|
; .by $80,$40,$20,$10,$08,$04,$02,$01
|
||||||
;bittable2
|
;bittable2
|
||||||
; .by $7f,$bf,$df,$ef,$f7,$fb,$fd,$fe
|
; .by $7f,$bf,$df,$ef,$f7,$fb,$fd,$fe
|
||||||
;----------------------------
|
;----------------------------
|
||||||
|
|||||||
BIN
Binary file not shown.
BIN
Binary file not shown.
Binary file not shown.
Reference in New Issue
Block a user