From f890200a0d56f64670f2bcd9c6b4d4e73c895d08 Mon Sep 17 00:00:00 2001 From: Jeremy Rand Date: Fri, 24 Jul 2020 23:50:01 -0400 Subject: [PATCH] More spider work. --- BuGS/gameSpider.s | 21 +++++++++++++++++---- 1 file changed, 17 insertions(+), 4 deletions(-) diff --git a/BuGS/gameSpider.s b/BuGS/gameSpider.s index cb65834..60f3cef 100644 --- a/BuGS/gameSpider.s +++ b/BuGS/gameSpider.s @@ -37,6 +37,8 @@ SPIDER_RHS_TILE_OFFSET equ SPIDER_TOP_ROW_OFFSET+(GAME_NUM_TILES_WIDE-1)*SI SPIDER_STARTING_SHIFT equ 2 SPIDER_LHS_STARTING_SCREEN_OFFSET equ SCREEN_BYTES_PER_ROW*SPIDER_STARTING_SHIFT+6 +SPIDER_SPRITE_REFRESH_COUNT equ 4 + drawSpider entry lda spiderState @@ -199,7 +201,7 @@ spiderJump entry beq spiderJump_exploding lda spiderScreenShift - beq spiderJump_shift + bne spiderJump_shift lda spiderJumpTable,x sta jumpInst+1 @@ -244,6 +246,15 @@ updateSpider_cont anop tay + lda spiderSpriteRefresh + beq updateSpider_spriteRefresh + dec a + sta spiderSpriteRefresh + bra updateSpider_testState + +updateSpider_spriteRefresh anop + lda #SPIDER_SPRITE_REFRESH_COUNT + sta spiderSpriteRefresh lda spiderSprite beq updateSpider_resetSprite sec @@ -321,10 +332,10 @@ updateSpider_rightDiagDown_skipInc anop lda spiderShiftInTile dec a sta spiderShiftInTile - beq updateSpider_tilesDown + beq updateSpider_tilesRight cmp #5 - beq updateSpider_tilesRight + beq updateSpider_tilesDown rtl updateSpider_tilesRight anop @@ -413,7 +424,8 @@ addSpider entry lda #SPIDER_SPRITE_LAST_OFFSET sta spiderSprite -; Write this code + lda #SPIDER_SPRITE_REFRESH_COUNT + sta spiderSpriteRefresh addSpider_done anop rtl @@ -426,6 +438,7 @@ shootSpider entry spiderState dc i2'SPIDER_STATE_NONE' spiderSprite dc i2'0' +spiderSpriteRefresh dc i2'0' spiderScreenOffset dc i2'0' spiderScreenShift dc i2'0' spiderShiftInTile dc i2'0'