summaryrefslogtreecommitdiff
path: root/scripts/PokemonMansion2F.asm
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/PokemonMansion2F.asm')
-rwxr-xr-xscripts/PokemonMansion2F.asm140
1 files changed, 140 insertions, 0 deletions
diff --git a/scripts/PokemonMansion2F.asm b/scripts/PokemonMansion2F.asm
new file mode 100755
index 00000000..a7b90bcd
--- /dev/null
+++ b/scripts/PokemonMansion2F.asm
@@ -0,0 +1,140 @@
+PokemonMansion2F_Script:
+ call Mansion2Script_51fee
+ call EnableAutoTextBoxDrawing
+ ld hl, Mansion2TrainerHeader0
+ ld de, PokemonMansion2F_ScriptPointers
+ ld a, [wPokemonMansion2FCurScript]
+ call ExecuteCurMapScriptInTable
+ ld [wPokemonMansion2FCurScript], a
+ ret
+
+Mansion2Script_51fee:
+ ld hl, wCurrentMapScriptFlags
+ bit 5, [hl]
+ res 5, [hl]
+ ret z
+ CheckEvent EVENT_MANSION_SWITCH_ON
+ jr nz, .asm_52016
+ ld a, $e
+ lb bc, 2, 4
+ call Mansion2Script_5202f
+ ld a, $54
+ lb bc, 4, 9
+ call Mansion2Script_5202f
+ ld a, $5f
+ lb bc, 11, 3
+ call Mansion2Script_5202f
+ ret
+.asm_52016
+ ld a, $5f
+ lb bc, 2, 4
+ call Mansion2Script_5202f
+ ld a, $e
+ lb bc, 4, 9
+ call Mansion2Script_5202f
+ ld a, $e
+ lb bc, 11, 3
+ call Mansion2Script_5202f
+ ret
+
+Mansion2Script_5202f:
+ ld [wNewTileBlockID], a
+ predef_jump ReplaceTileBlock
+
+Mansion2Script_Switches:
+ ld a, [wSpriteStateData1 + 9]
+ cp SPRITE_FACING_UP
+ ret nz
+ xor a
+ ld [hJoyHeld], a
+ ld a, $5
+ ld [hSpriteIndexOrTextID], a
+ jp DisplayTextID
+
+PokemonMansion2F_ScriptPointers:
+ dw CheckFightingMapTrainers
+ dw DisplayEnemyTrainerTextAndStartBattle
+ dw EndTrainerBattle
+
+PokemonMansion2F_TextPointers:
+ dw Mansion2Text1
+ dw PickUpItemText
+ dw Mansion2Text3
+ dw Mansion2Text4
+ dw Mansion2Text5
+
+Mansion2TrainerHeader0:
+ dbEventFlagBit EVENT_BEAT_MANSION_2_TRAINER_0
+ db ($0 << 4) ; trainer's view range
+ dwEventFlagAddress EVENT_BEAT_MANSION_2_TRAINER_0
+ dw Mansion2BattleText1 ; TextBeforeBattle
+ dw Mansion2AfterBattleText1 ; TextAfterBattle
+ dw Mansion2EndBattleText1 ; TextEndBattle
+ dw Mansion2EndBattleText1 ; TextEndBattle
+
+ db $ff
+
+Mansion2Text1:
+ TX_ASM
+ ld hl, Mansion2TrainerHeader0
+ call TalkToTrainer
+ jp TextScriptEnd
+
+Mansion2BattleText1:
+ TX_FAR _Mansion2BattleText1
+ db "@"
+
+Mansion2EndBattleText1:
+ TX_FAR _Mansion2EndBattleText1
+ db "@"
+
+Mansion2AfterBattleText1:
+ TX_FAR _Mansion2AfterBattleText1
+ db "@"
+
+Mansion2Text3:
+ TX_FAR _Mansion2Text3
+ db "@"
+
+Mansion2Text4:
+ TX_FAR _Mansion2Text4
+ db "@"
+
+Mansion3Text6:
+Mansion2Text5:
+ TX_ASM
+ ld hl, Mansion2Text_520c2
+ call PrintText
+ call YesNoChoice
+ ld a, [wCurrentMenuItem]
+ and a
+ jr nz, .asm_520b9
+ ld a, $1
+ ld [wDoNotWaitForButtonPressAfterDisplayingText], a
+ ld hl, wCurrentMapScriptFlags
+ set 5, [hl]
+ ld hl, Mansion2Text_520c7
+ call PrintText
+ ld a, SFX_GO_INSIDE
+ call PlaySound
+ CheckAndSetEvent EVENT_MANSION_SWITCH_ON
+ jr z, .asm_520bf
+ ResetEventReuseHL EVENT_MANSION_SWITCH_ON
+ jr .asm_520bf
+.asm_520b9
+ ld hl, Mansion2Text_520cc
+ call PrintText
+.asm_520bf
+ jp TextScriptEnd
+
+Mansion2Text_520c2:
+ TX_FAR _Mansion2Text_520c2
+ db "@"
+
+Mansion2Text_520c7:
+ TX_FAR _Mansion2Text_520c7
+ db "@"
+
+Mansion2Text_520cc:
+ TX_FAR _Mansion2Text_520cc
+ db "@"