Improve performance of line-up.s in test cpu cykels got from 840893 to 840595

This commit is contained in:
hugova 2025-03-29 21:00:31 +01:00
parent 147ceb73f2
commit 963cc1b258

View file

@ -40,8 +40,9 @@ selfmod:
LDA <V
STA case_1 +9
end_selfmod:
LDY #$01
jsr pixel_draw
LDY #$01
Sub_16 >btp_mem_pos, <btp_mem_pos, #$01, #$00 ;; Y has always a offset of at least 1
LDX X_pos
for_x:
LDA byte_to_paint
@ -60,18 +61,17 @@ increment_pixel_x_end:
BEQ end
Lag_16 >D, <D, #$00, #$02, case_2
case_1:
Sub_16 >D, <D, #>V, #<V, !
Sub_16 >D, <D, #>V, #<V,!
decrement_y_pos:
DEY
CPY #$ff
BNE for_x
move_8px_up:
LDY #$07
LDY #$08
Sub_16 >btp_mem_pos, <btp_mem_pos, #$40, #$01, !
jmp for_x
decrement_y_pos_end:
case_2:
Add_16 >D, <D, #>dy_2, #<dy_2, !
Add_16 >D, <D, #>dy_2, #<dy_2,!
JMP for_x
end:
RTS