Rename map files, labels, and constants to be consistent and work with Polished Map

1 files changed, 199 insertions, 0 deletions

diff --git a/scripts/SilphCo4F.asm b/scripts/SilphCo4F.asm
new file mode 100755
index 00000000..7d5072f6
--- /dev/null
+++ b/scripts/SilphCo4F.asm
@@ -0,0 +1,199 @@
+SilphCo4F_Script:
+	call SilphCo4Script_19d21
+	call EnableAutoTextBoxDrawing
+	ld hl, SilphCo4TrainerHeader0
+	ld de, SilphCo4F_ScriptPointers
+	ld a, [wSilphCo4FCurScript]
+	call ExecuteCurMapScriptInTable
+	ld [wSilphCo4FCurScript], a
+	ret
+
+SilphCo4Script_19d21:
+	ld hl, wCurrentMapScriptFlags
+	bit 5, [hl]
+	res 5, [hl]
+	ret z
+	ld hl, SilphCo4GateCoords
+	call SilphCo4Script_19d5d
+	call SilphCo4Script_19d89
+	CheckEvent EVENT_SILPH_CO_4_UNLOCKED_DOOR1
+	jr nz, .asm_19d48
+	push af
+	ld a, $54
+	ld [wNewTileBlockID], a
+	lb bc, 6, 2
+	predef ReplaceTileBlock
+	pop af
+.asm_19d48
+	CheckEventAfterBranchReuseA EVENT_SILPH_CO_4_UNLOCKED_DOOR2, EVENT_SILPH_CO_4_UNLOCKED_DOOR1
+	ret nz
+	ld a, $54
+	ld [wNewTileBlockID], a
+	lb bc, 4, 6
+	predef_jump ReplaceTileBlock
+
+SilphCo4GateCoords:
+	db $06,$02
+	db $04,$06
+	db $FF
+
+SilphCo4Script_19d5d:
+	push hl
+	ld hl, wCardKeyDoorY
+	ld a, [hli]
+	ld b, a
+	ld a, [hl]
+	ld c, a
+	xor a
+	ld [$ffe0], a
+	pop hl
+.asm_19d69
+	ld a, [hli]
+	cp $ff
+	jr z, .asm_19d85
+	push hl
+	ld hl, $ffe0
+	inc [hl]
+	pop hl
+	cp b
+	jr z, .asm_19d7a
+	inc hl
+	jr .asm_19d69
+.asm_19d7a
+	ld a, [hli]
+	cp c
+	jr nz, .asm_19d69
+	ld hl, wCardKeyDoorY
+	xor a
+	ld [hli], a
+	ld [hl], a
+	ret
+.asm_19d85
+	xor a
+	ld [$ffe0], a
+	ret
+
+SilphCo4Script_19d89:
+	EventFlagAddress hl, EVENT_SILPH_CO_4_UNLOCKED_DOOR1
+	ld a, [$ffe0]
+	and a
+	ret z
+	cp $1
+	jr nz, .next
+	SetEventReuseHL EVENT_SILPH_CO_4_UNLOCKED_DOOR1
+	ret
+.next
+	SetEventAfterBranchReuseHL EVENT_SILPH_CO_4_UNLOCKED_DOOR2, EVENT_SILPH_CO_4_UNLOCKED_DOOR1
+	ret
+
+SilphCo4F_ScriptPointers:
+	dw CheckFightingMapTrainers
+	dw DisplayEnemyTrainerTextAndStartBattle
+	dw EndTrainerBattle
+
+SilphCo4F_TextPointers:
+	dw SilphCo4Text1
+	dw SilphCo4Text2
+	dw SilphCo4Text3
+	dw SilphCo4Text4
+	dw PickUpItemText
+	dw PickUpItemText
+	dw PickUpItemText
+
+SilphCo4TrainerHeader0:
+	dbEventFlagBit EVENT_BEAT_SILPH_CO_4F_TRAINER_0
+	db ($4 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_SILPH_CO_4F_TRAINER_0
+	dw SilphCo4BattleText2 ; TextBeforeBattle
+	dw SilphCo4AfterBattleText2 ; TextAfterBattle
+	dw SilphCo4EndBattleText2 ; TextEndBattle
+	dw SilphCo4EndBattleText2 ; TextEndBattle
+
+SilphCo4TrainerHeader1:
+	dbEventFlagBit EVENT_BEAT_SILPH_CO_4F_TRAINER_1
+	db ($3 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_SILPH_CO_4F_TRAINER_1
+	dw SilphCo4BattleText3 ; TextBeforeBattle
+	dw SilphCo4AfterBattleText3 ; TextAfterBattle
+	dw SilphCo4EndBattleText3 ; TextEndBattle
+	dw SilphCo4EndBattleText3 ; TextEndBattle
+
+SilphCo4TrainerHeader2:
+	dbEventFlagBit EVENT_BEAT_SILPH_CO_4F_TRAINER_2
+	db ($4 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_SILPH_CO_4F_TRAINER_2
+	dw SilphCo4BattleText4 ; TextBeforeBattle
+	dw SilphCo4AfterBattleText4 ; TextAfterBattle
+	dw SilphCo4EndBattleText4 ; TextEndBattle
+	dw SilphCo4EndBattleText4 ; TextEndBattle
+
+	db $ff
+
+SilphCo4Text1:
+	TX_ASM
+	ld hl, SilphCo4Text_19de0
+	ld de, SilphCo4Text_19de5
+	call SilphCo6Script_1a22f
+	jp TextScriptEnd
+
+SilphCo4Text_19de0:
+	TX_FAR _SilphCo4Text_19de0
+	db "@"
+
+SilphCo4Text_19de5:
+	TX_FAR _SilphCo4Text_19de5
+	db "@"
+
+SilphCo4Text2:
+	TX_ASM
+	ld hl, SilphCo4TrainerHeader0
+	call TalkToTrainer
+	jp TextScriptEnd
+
+SilphCo4BattleText2:
+	TX_FAR _SilphCo4BattleText2
+	db "@"
+
+SilphCo4EndBattleText2:
+	TX_FAR _SilphCo4EndBattleText2
+	db "@"
+
+SilphCo4AfterBattleText2:
+	TX_FAR _SilphCo4AfterBattleText2
+	db "@"
+
+SilphCo4Text3:
+	TX_ASM
+	ld hl, SilphCo4TrainerHeader1
+	call TalkToTrainer
+	jp TextScriptEnd
+
+SilphCo4BattleText3:
+	TX_FAR _SilphCo4BattleText3
+	db "@"
+
+SilphCo4EndBattleText3:
+	TX_FAR _SilphCo4EndBattleText3
+	db "@"
+
+SilphCo4AfterBattleText3:
+	TX_FAR _SilphCo4AfterBattleText3
+	db "@"
+
+SilphCo4Text4:
+	TX_ASM
+	ld hl, SilphCo4TrainerHeader2
+	call TalkToTrainer
+	jp TextScriptEnd
+
+SilphCo4BattleText4:
+	TX_FAR _SilphCo4BattleText4
+	db "@"
+
+SilphCo4EndBattleText4:
+	TX_FAR _SilphCo4EndBattleText4
+	db "@"
+
+SilphCo4AfterBattleText4:
+	TX_FAR _SilphCo4AfterBattleText4
+	db "@"