Apple-2-Tools/4cade
1
0
Fork 0
mirror of https://github.com/a2-4am/4cade.git synced 2024-09-30 15:54:42 +00:00
Code Issues Projects Releases Wiki Activity

shave some cycles (better A management allows us to remove an LDA in INC macro)

Browse Source
This commit is contained in:
4am 2020-11-21 19:02:58 -05:00
parent 1ab825a37e
commit abe5cdc25b
1 changed files with 16 additions and 56 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

72
src/fx/fx.dhgr.soft.diagonal.a
View File

@ -12,22 +12,22 @@ col = $FE
counter = $FF counter = $FF
!macro INC_HGR_HI_BY .blocks { !macro INC_HGR_HI_BY .blocks {
lda dst+1 ; lda dst+1
adc #(.blocks*4) adc #(.blocks*4)
sta dst+1 sta dst+1
eor #$60 eor #$60
sta src+1 sta src+1
} }
!macro INC_HGR_HI { !macro SET_HGR_HI {
+INC_HGR_HI_BY 1 sta src+1
eor #$60
sta dst+1
} }
!macro RESET_HGR_HI { !macro RESET_HGR_HI {
txa txa
sta src+1 +SET_HGR_HI
eor #$60
sta dst+1
} }
; note: .copymask is an immediate value, not an indexed array or a memory address ; note: .copymask is an immediate value, not an indexed array or a memory address
@ -40,7 +40,8 @@ counter = $FF
} }
!macro COPY_WITH_MASK_IMM_AND_INC .copymask { !macro COPY_WITH_MASK_IMM_AND_INC .copymask {
+COPY_WITH_MASK_IMM .copymask +COPY_WITH_MASK_IMM .copymask
+INC_HGR_HI lda dst+1
+INC_HGR_HI_BY 1
} }
!macro COPY_BYTE { !macro COPY_BYTE {
@ -50,7 +51,8 @@ counter = $FF
!macro COPY_BYTE_AND_INC { !macro COPY_BYTE_AND_INC {
+COPY_BYTE +COPY_BYTE
+INC_HGR_HI lda dst+1
+INC_HGR_HI_BY 1
} }
!source "src/fx/macros.a" !source "src/fx/macros.a"
@ -74,75 +76,52 @@ RowLoop
sta dst sta dst
lda hgrrowhi, x lda hgrrowhi, x
tax tax
sta src+1 +SET_HGR_HI
eor #$60
sta dst+1
+BRANCH_IF_Y_IS_OFFSCREEN @block2 +BRANCH_IF_Y_IS_OFFSCREEN @block2
; +COPY_WITH_MASK_IMM_AND_INC %00000000 +INC_HGR_HI_BY 3
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
adc #12
sta dst+1
eor #$60
sta src+1
+COPY_WITH_MASK_IMM_AND_INC %10000001 +COPY_WITH_MASK_IMM_AND_INC %10000001
+COPY_WITH_MASK_IMM %10000001 +COPY_WITH_MASK_IMM %10000001
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block2 @block2
iny iny
+BRANCH_IF_Y_IS_OFFSCREEN @block3 +BRANCH_IF_Y_IS_OFFSCREEN @block3
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
+INC_HGR_HI_BY 2 +INC_HGR_HI_BY 2
+COPY_WITH_MASK_IMM_AND_INC %10000110 +COPY_WITH_MASK_IMM_AND_INC %10000110
+COPY_WITH_MASK_IMM_AND_INC %10000001 +COPY_WITH_MASK_IMM_AND_INC %10000001
+COPY_WITH_MASK_IMM_AND_INC %10000001 +COPY_WITH_MASK_IMM_AND_INC %10000001
+COPY_WITH_MASK_IMM %10010110 +COPY_WITH_MASK_IMM %10010110
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block3 @block3
iny iny
+BRANCH_IF_Y_IS_OFFSCREEN @block4 +BRANCH_IF_Y_IS_OFFSCREEN @block4
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
+INC_HGR_HI_BY 2 +INC_HGR_HI_BY 2
+COPY_WITH_MASK_IMM_AND_INC %10000111 +COPY_WITH_MASK_IMM_AND_INC %10000111
+COPY_WITH_MASK_IMM_AND_INC %10000111 +COPY_WITH_MASK_IMM_AND_INC %10000111
+COPY_WITH_MASK_IMM_AND_INC %10000111 +COPY_WITH_MASK_IMM_AND_INC %10000111
+COPY_WITH_MASK_IMM %10000111 +COPY_WITH_MASK_IMM %10000111
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block4 @block4
iny iny
+BRANCH_IF_Y_IS_OFFSCREEN @block5 +BRANCH_IF_Y_IS_OFFSCREEN @block5
; +COPY_WITH_MASK_IMM_AND_INC %00000000 +INC_HGR_HI_BY 1
+INC_HGR_HI
+COPY_WITH_MASK_IMM_AND_INC %10011001 +COPY_WITH_MASK_IMM_AND_INC %10011001
+COPY_WITH_MASK_IMM_AND_INC %10000001 +COPY_WITH_MASK_IMM_AND_INC %10000001
+COPY_WITH_MASK_IMM_AND_INC %10011111 +COPY_WITH_MASK_IMM_AND_INC %10011111
+COPY_WITH_MASK_IMM_AND_INC %10000111 +COPY_WITH_MASK_IMM_AND_INC %10000111
+COPY_WITH_MASK_IMM_AND_INC %10000111 +COPY_WITH_MASK_IMM_AND_INC %10000111
+COPY_WITH_MASK_IMM %10011001 +COPY_WITH_MASK_IMM %10011001
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block5 @block5
iny iny
+BRANCH_IF_Y_IS_OFFSCREEN @block6 +BRANCH_IF_Y_IS_OFFSCREEN @block6
; +COPY_WITH_MASK_IMM_AND_INC %00000000 +INC_HGR_HI_BY 1
+INC_HGR_HI
+COPY_WITH_MASK_IMM_AND_INC %10011111 +COPY_WITH_MASK_IMM_AND_INC %10011111
+COPY_WITH_MASK_IMM_AND_INC %10011111 +COPY_WITH_MASK_IMM_AND_INC %10011111
+COPY_WITH_MASK_IMM_AND_INC %10011111 +COPY_WITH_MASK_IMM_AND_INC %10011111
+COPY_WITH_MASK_IMM_AND_INC %10011111 +COPY_WITH_MASK_IMM_AND_INC %10011111
+COPY_WITH_MASK_IMM_AND_INC %10011111 +COPY_WITH_MASK_IMM_AND_INC %10011111
+COPY_WITH_MASK_IMM %10011111 +COPY_WITH_MASK_IMM %10011111
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block6 @block6
iny iny
@ -171,7 +150,6 @@ RowLoop
@switchtoaux @switchtoaux
sta $C003 sta $C003
sta $C005 sta $C005
tya
+BRANCH_IF_Y_IS_OFFSCREEN @block6_aux +BRANCH_IF_Y_IS_OFFSCREEN @block6_aux
+COPY_BYTE_AND_INC +COPY_BYTE_AND_INC
+COPY_BYTE_AND_INC +COPY_BYTE_AND_INC
@ -197,67 +175,49 @@ RowLoop
@block5_aux @block5_aux
dey dey
+BRANCH_IF_Y_IS_OFFSCREEN @block4_aux +BRANCH_IF_Y_IS_OFFSCREEN @block4_aux
; +COPY_WITH_MASK_IMM_AND_INC %00000000 +INC_HGR_HI_BY 1
+INC_HGR_HI
+COPY_WITH_MASK_IMM_AND_INC %11111100 +COPY_WITH_MASK_IMM_AND_INC %11111100
+COPY_WITH_MASK_IMM_AND_INC %11111100 +COPY_WITH_MASK_IMM_AND_INC %11111100
+COPY_WITH_MASK_IMM_AND_INC %11111100 +COPY_WITH_MASK_IMM_AND_INC %11111100
+COPY_WITH_MASK_IMM_AND_INC %11111100 +COPY_WITH_MASK_IMM_AND_INC %11111100
+COPY_WITH_MASK_IMM_AND_INC %11111100 +COPY_WITH_MASK_IMM_AND_INC %11111100
+COPY_WITH_MASK_IMM %11111100 +COPY_WITH_MASK_IMM %11111100
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block4_aux @block4_aux
dey dey
+BRANCH_IF_Y_IS_OFFSCREEN @block3_aux +BRANCH_IF_Y_IS_OFFSCREEN @block3_aux
; +COPY_WITH_MASK_IMM_AND_INC %00000000 +INC_HGR_HI_BY 1
+INC_HGR_HI
+COPY_WITH_MASK_IMM_AND_INC %11001100 +COPY_WITH_MASK_IMM_AND_INC %11001100
+COPY_WITH_MASK_IMM_AND_INC %11110000 +COPY_WITH_MASK_IMM_AND_INC %11110000
+COPY_WITH_MASK_IMM_AND_INC %11111100 +COPY_WITH_MASK_IMM_AND_INC %11111100
+COPY_WITH_MASK_IMM_AND_INC %11110000 +COPY_WITH_MASK_IMM_AND_INC %11110000
+COPY_WITH_MASK_IMM_AND_INC %11110000 +COPY_WITH_MASK_IMM_AND_INC %11110000
+COPY_WITH_MASK_IMM %11001100 +COPY_WITH_MASK_IMM %11001100
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block3_aux @block3_aux
dey dey
+BRANCH_IF_Y_IS_OFFSCREEN @block2_aux +BRANCH_IF_Y_IS_OFFSCREEN @block2_aux
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
+INC_HGR_HI_BY 2 +INC_HGR_HI_BY 2
+COPY_WITH_MASK_IMM_AND_INC %11110000 +COPY_WITH_MASK_IMM_AND_INC %11110000
+COPY_WITH_MASK_IMM_AND_INC %11110000 +COPY_WITH_MASK_IMM_AND_INC %11110000
+COPY_WITH_MASK_IMM_AND_INC %11110000 +COPY_WITH_MASK_IMM_AND_INC %11110000
+COPY_WITH_MASK_IMM %11110000 +COPY_WITH_MASK_IMM %11110000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block2_aux @block2_aux
dey dey
+BRANCH_IF_Y_IS_OFFSCREEN @block1_aux +BRANCH_IF_Y_IS_OFFSCREEN @block1_aux
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
+INC_HGR_HI_BY 2 +INC_HGR_HI_BY 2
+COPY_WITH_MASK_IMM_AND_INC %10110000 +COPY_WITH_MASK_IMM_AND_INC %10110000
+COPY_WITH_MASK_IMM_AND_INC %11000000 +COPY_WITH_MASK_IMM_AND_INC %11000000
+COPY_WITH_MASK_IMM_AND_INC %11000000 +COPY_WITH_MASK_IMM_AND_INC %11000000
+COPY_WITH_MASK_IMM %10110000 +COPY_WITH_MASK_IMM %10110000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM %00000000
+RESET_HGR_HI +RESET_HGR_HI
@block1_aux @block1_aux
dey dey
+BRANCH_IF_Y_IS_OFFSCREEN @switchtomain +BRANCH_IF_Y_IS_OFFSCREEN @switchtomain
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
+INC_HGR_HI_BY 3 +INC_HGR_HI_BY 3
+COPY_WITH_MASK_IMM_AND_INC %11000000 +COPY_WITH_MASK_IMM_AND_INC %11000000
+COPY_WITH_MASK_IMM %11000000 +COPY_WITH_MASK_IMM %11000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM_AND_INC %00000000
; +COPY_WITH_MASK_IMM %00000000
@switchtomain @switchtomain
sta $C002 sta $C002
sta $C004 sta $C004