Apple-2-Tools/4cade
1
0
Fork 0
mirror of https://github.com/a2-4am/4cade.git synced 2025-01-02 06:30:47 +00:00
Code Issues Projects Releases Wiki Activity

shave some bytes

Browse Source
This commit is contained in:
4am 2020-10-26 00:52:58 -04:00
parent 5596943ed5
commit a9cd08e6b4
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/fx/fx.hgr.48boxes.common.a
View File

@ -16,9 +16,8 @@
; bytes in memory once you calculate the HGR base address for that row. ; bytes in memory once you calculate the HGR base address for that row.
; ;
; |BoxInitialStages| defines the initial grid of stages for each box. ; |BoxInitialStages| defines the initial grid of stages for each box.
; Negative stages (80..FF) are no-ops. ; Each stage is used an index into the |StagesHi| array
; Positive stages (00..7F) are indexes into the |StagesHi| array ; to find the drawing routine for that stage (if any).
; to find the drawing routine for this stage (if any).
; Each box's stage is incremented after each iteration through the main loop. ; Each box's stage is incremented after each iteration through the main loop.
; When the main loop iterates through all 48 boxes without drawing anything, ; When the main loop iterates through all 48 boxes without drawing anything,
; the program exits. ; the program exits.
@ -195,7 +194,6 @@ k_right_mask = 17
MainLoop ldx #48 MainLoop ldx #48
BoxLoop stx box BoxLoop stx box
ldy BoxStages-1, x ; for each box, get its current stage ldy BoxStages-1, x ; for each box, get its current stage
bmi NextBox ; if stage >= $80, nothing to do
lda StagesHi, y lda StagesHi, y
beq NextBox ; if stage's drawing routine is 0, nothing to do beq NextBox ; if stage's drawing routine is 0, nothing to do
sta j+2 sta j+2