shithub: pokered

ref: 8701ef4d61a6a55ee71aa1a964d4f7d10eded87e
dir: /scripts/Route8Gate.asm/

Route8Gate_Script:
	call EnableAutoTextBoxDrawing
	ld hl, Route8Gate_ScriptPointers
	ld a, [wRoute8GateCurScript]
	jp CallFunctionInTable

Route8Gate_ScriptPointers:
	dw Route8GateScript0
	dw Route8GateScript1

Route8GateScript_1e1d7:
	ld hl, wd730
	set 7, [hl]
	ld a, $10
	ld [wSimulatedJoypadStatesEnd], a
	ld a, $1
	ld [wSimulatedJoypadStatesIndex], a
	xor a
	ld [wSpritePlayerStateData2MovementByte1], a
	ld [wOverrideSimulatedJoypadStatesMask], a
	ret

Route8GateScript0:
	ld a, [wd728]
	bit 6, a
	ret nz
	ld hl, CoordsData_1e22c
	call ArePlayerCoordsInArray
	ret nc
	ld a, PLAYER_DIR_LEFT
	ld [wPlayerMovingDirection], a
	xor a
	ldh [hJoyHeld], a
	farcall RemoveGuardDrink
	ldh a, [hItemToRemoveID]
	and a
	jr nz, .asm_1e220
	ld a, $2
	ldh [hSpriteIndexOrTextID], a
	call DisplayTextID
	call Route8GateScript_1e1d7
	ld a, $1
	ld [wRoute8GateCurScript], a
	ret
.asm_1e220
	ld hl, wd728
	set 6, [hl]
	ld a, $3
	ldh [hSpriteIndexOrTextID], a
	jp DisplayTextID

CoordsData_1e22c:
	dbmapcoord  2,  3
	dbmapcoord  2,  4
	db -1 ; end

Route8GateScript1:
	ld a, [wSimulatedJoypadStatesIndex]
	and a
	ret nz
	call Delay3
	xor a
	ld [wJoyIgnore], a
	ld [wRoute8GateCurScript], a
	ret

Route8Gate_TextPointers:
	dw Route8GateText1
	dw Route8GateText2
	dw Route8GateText3