Several fixes for problems with staircases in Hera/AgaTower

This commit is contained in:
aerinon
2019-09-21 22:15:51 -06:00
parent 5eb0e6e379
commit 8e50c6d8eb
5 changed files with 22 additions and 17 deletions

View File

@@ -32,7 +32,7 @@ SpiralWarp: {
ldy #$00 : jsr ShiftQuadSimple
.skipXQuad
lda $01 : and #$02 : lsr : sta $06 : lda $aa : lsr : !sub $06
lda $aa : lsr : sta $06 : lda $01 : and #$02 : lsr : !sub $06
beq .skipYQuad
sta $06 : asl : !add $aa : sta $aa
ldy #$01 : jsr ShiftQuadSimple
@@ -82,7 +82,7 @@ LookupSpiralOffset: {
cmp #$01 : beq .done
; look up the quad
lda $a8 : and #$03 : beq .quad0
lda $a9 : ora $aa : and #$03 : beq .quad0
cmp #$01 : beq .quad1
cmp #$02 : beq .quad2
cmp #$03 : beq .quad3
@@ -90,7 +90,7 @@ LookupSpiralOffset: {
inc $01 : lda $22 : cmp #$98 : bcc .done ;gt ent and hc stairwell
inc $01 : bra .done
.quad1
lda $22 : cmp #$78 : bcc .done ;swamp/pod dual stairs
lda $22 : cmp #$98 : bcc .done ;swamp/pod dual stairs
inc $01 : bra .done
.quad2 ;ice room
lda #$03 : sta $01
@@ -139,6 +139,8 @@ SetCamera: {
lda CoordIndex,y : tax
lda $20,x : cmp #$78 : bcs .setQuad
!add #$78 : sta $04
lda CamQuadIndex,y : tax : lda $0603, x : pha
lda CameraIndex,y : tax : pla : sta $e3, x
.adj1
tya : asl : !add #$08 : tax : jsr AdjCamBounds : bra .done