Add mirror scroll

2waymirror.asm

@@ -1,18 +1,31 @@
 pushpc
 
-org $8DF7F1
+org $8DF7E9
+dw $28DE, $28DF, $28EE, $28EF ; Scroll
 dw $2C62, $2C63, $2C72, $2C73 ; Mirror
 dw $2C62, $2C63, $2C72, $2D11 ; 2-Way Mirror
 
 org $87A93F
 JSL.l CheckMirrorWorld
 
+org $87A955
+JSL.l BlockEraseFix
+NOP #2
+
 pullpc
 
 CheckMirrorWorld:
 	LDA.l MirrorEquipment
+	BEQ + ; just scroll, so don't allow
 	DEC
 	BNE +
 	LDA.b $8A
 	AND.b #$40
 +	RTL
+
+BlockEraseFix:
+	LDA.l MirrorEquipment
+	BEQ +
+		STZ.w $05FC
+		STZ.w $05FD
++	RTL

quickswap.asm

@@ -83,10 +83,13 @@ LCode:
 RTS
 
 IsItemAvailable:
-        LDA.l InfiniteBombs : BEQ .finite
+	CPX.b #$14 : BNE .not_mirror
-        .infinite
+		LDA.b #$01 : RTL
-                CPX.b #$04 : BNE .finite
+	.not_mirror
-                LDA.b #$01 : RTL
+	LDA.l InfiniteBombs : BEQ .finite
-        .finite
+	.infinite
-                LDA.l EquipmentWRAM-1, X
+		CPX.b #$04 : BNE .finite
+		LDA.b #$01 : RTL
+	.finite
+		LDA.l EquipmentWRAM-1, X
 RTL

retro.asm

@@ -20,10 +20,11 @@ StoreBombCount:
 		PLA : STA.l BombsEquipment
 RTL
 SearchForEquippedItem:
-	LDA.l InfiniteBombs : BEQ +
+	LDA.b #$01 : LDX.b #$00 : RTL
-		LDA.b #$01 : LDX.b #$00 : RTL
+	; LDA.l InfiniteBombs : BEQ +
-	+
+	; 	LDA.b #$01 : LDX.b #$00 : RTL
-	LDA.l BowEquipment ; thing we wrote over
+	; +
+	; LDA.l BowEquipment ; thing we wrote over
 RTL
 
 DecrementArrows: