Ensure anchor points are applied when landing after warp by creating a new setup script

engine/board/menu.asm

@@ -93,7 +93,7 @@ BoardMenuScript::
 	res 2, [hl]
 	ld a, BOARDEVENT_VIEW_MAP_MODE
 	ldh [hCurBoardEvent], a
-	ld a, TRUE
+	ld a, 100
 	ld [wViewMapModeRange], a
 	ld a, [wMapGroup]
 	ld [wBeforeViewMapMapGroup], a

engine/board/spaces.asm

@@ -271,7 +271,7 @@ PromptPlayerToChooseBranchDirection:
 .EnterViewMapMode:
 	ld a, BOARDEVENT_VIEW_MAP_MODE
 	ldh [hCurBoardEvent], a
-	ld a, TRUE
+	ld a, 100
 	ld [wViewMapModeRange], a
 	ld a, [wMapGroup]
 	ld [wBeforeViewMapMapGroup], a

engine/overworld/warp_connection.asm

@@ -412,3 +412,24 @@ GetMapScreenCoords::
 	and 1
 	ld [wPlayerMetatileX], a
 	ret
+
+AnchorPointAfterWarp:
+; if wCurSpaceNextSpace is not an anchor point, override any anchor point we pass through
+	ld a, [wCurSpaceNextSpace]
+	cp NEXT_SPACE_IS_ANCHOR_POINT
+	ret c
+	ld a, [wCurMapAnchorEventCount]
+	and a
+	ret z
+; if we have arrived to an anchor point, load its associated next space to wCurSpaceNextSpace right now.
+; note that the next space of an anchor point could be another anchor point.
+	ld c, a
+	ld hl, wCurMapAnchorEventsPointer
+	ld a, [hli]
+	ld h, [hl]
+	ld l, a
+	ld a, [wXCoord]
+	ld d, a
+	ld a, [wYCoord]
+	ld e, a
+	jp CheckAndApplyAnchorPoint