summaryrefslogtreecommitdiff
path: root/data/scripts/seagallop.inc
diff options
context:
space:
mode:
Diffstat (limited to 'data/scripts/seagallop.inc')
-rw-r--r--data/scripts/seagallop.inc207
1 files changed, 207 insertions, 0 deletions
diff --git a/data/scripts/seagallop.inc b/data/scripts/seagallop.inc
new file mode 100644
index 000000000..c14cda778
--- /dev/null
+++ b/data/scripts/seagallop.inc
@@ -0,0 +1,207 @@
+EventScript_1A8EC5:: @ 81A8EC5
+ compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
+ goto_if_ge EventScript_1A911E
+ compare VAR_MAP_SCENE_CINNABAR_ISLAND, 4
+ goto_if_ge EventScript_1A8F12
+ multichoice 19, 6, MULTICHOICE_ISLAND_23, FALSE
+ switch VAR_RESULT
+ case 0, EventScript_1A8FF9
+ case 1, EventScript_1A9004
+ case 2, EventScript_CancelSail
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_1A8F12:: @ 81A8F12
+ multichoice 19, 5, MULTICHOICE_SEAGALLOP_V23, FALSE
+ switch VAR_RESULT
+ case 0, EventScript_1A8FE3
+ case 1, EventScript_1A8FF9
+ case 2, EventScript_1A9004
+ case 3, EventScript_CancelSail
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_1A8F54:: @ 81A8F54
+ compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
+ goto_if_ge EventScript_1A911E
+ compare VAR_MAP_SCENE_CINNABAR_ISLAND, 4
+ goto_if_ge EventScript_1A8FA1
+ multichoice 19, 6, MULTICHOICE_ISLAND_13, FALSE
+ switch VAR_RESULT
+ case 0, EventScript_1A8FEE
+ case 1, EventScript_1A9004
+ case 2, EventScript_CancelSail
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_1A8FA1:: @ 81A8FA1
+ multichoice 19, 5, MULTICHOICE_SEAGALLOP_V13, FALSE
+ switch VAR_RESULT
+ case 0, EventScript_1A8FE3
+ case 1, EventScript_1A8FEE
+ case 2, EventScript_1A9004
+ case 3, EventScript_CancelSail
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_1A8FE3:: @ 81A8FE3
+ setvar VAR_0x8006, SEAGALLOP_VERMILION_CITY
+ goto EventScript_1A909E
+ end
+
+EventScript_1A8FEE:: @ 81A8FEE
+ setvar VAR_0x8006, SEAGALLOP_ONE_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A8FF9:: @ 81A8FF9
+ setvar VAR_0x8006, SEAGALLOP_TWO_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A9004:: @ 81A9004
+ setvar VAR_0x8006, SEAGALLOP_THREE_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A900F:: @ 81A900F
+ compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
+ goto_if_ge EventScript_1A911E
+ compare VAR_MAP_SCENE_CINNABAR_ISLAND, 4
+ goto_if_ge EventScript_1A905C
+ multichoice 19, 6, MULTICHOICE_ISLAND_12, FALSE
+ switch VAR_RESULT
+ case 0, EventScript_1A8FEE
+ case 1, EventScript_1A8FF9
+ case 2, EventScript_CancelSail
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_1A905C:: @ 81A905C
+ multichoice 19, 5, MULTICHOICE_SEAGALLOP_V12, FALSE
+ switch VAR_RESULT
+ case 0, EventScript_1A8FE3
+ case 1, EventScript_1A8FEE
+ case 2, EventScript_1A8FF9
+ case 3, EventScript_CancelSail
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_1A909E:: @ 81A909E
+ specialvar VAR_RESULT, sub_8147500
+ getnumberstring 0, VAR_RESULT
+ compare VAR_0x8004, SEAGALLOP_VERMILION_CITY
+ goto_if_eq EventScript_1A90BE
+ compare VAR_0x8004, SEAGALLOP_VERMILION_CITY
+ goto_if_ne EventScript_1A90CC
+ end
+
+EventScript_1A90BE:: @ 81A90BE
+ msgbox Text_17FB67
+ goto EventScript_1A90DA
+ end
+
+EventScript_1A90CC:: @ 81A90CC
+ msgbox Text_1A641B
+ goto EventScript_1A90DA
+ end
+
+EventScript_1A90DA:: @ 81A90DA
+ closemessage
+ delay 20
+ special sub_8110AB4
+ compare VAR_RESULT, 2
+ goto_if_eq EventScript_1A7AE0
+ special sub_8112364
+ fadescreen FADE_TO_BLACK
+ special ScrSpecial_SeagallopFerry
+ waitstate
+ end
+
+EventScript_CancelSail:: @ 81A90F6
+ specialvar VAR_RESULT, sub_8147594
+ compare VAR_RESULT, 1
+ goto_if_eq EventScript_1A9108
+ release
+ end
+
+EventScript_1A9108:: @ 81A9108
+ closemessage
+ applymovement 6, Movement_FaceOriginalDirection
+ applymovement OBJ_EVENT_ID_PLAYER, Movement_1A911C
+ waitmovement 0
+ releaseall
+ end
+
+Movement_1A911C:: @ 81A911C
+ walk_up
+ step_end
+
+EventScript_1A911E:: @ 81A911E
+ setvar VAR_0x8005, 0
+ special Special_DrawSeagallopDestinationMenu
+ waitstate
+ specialvar VAR_0x8006, Special_GetSelectedSeagallopDestination
+ switch VAR_0x8006
+ case SEAGALLOP_VERMILION_CITY, EventScript_SailToVermilionCity
+ case SEAGALLOP_ONE_ISLAND, EventScript_1A91E0
+ case SEAGALLOP_TWO_ISLAND, EventScript_1A91EB
+ case SEAGALLOP_THREE_ISLAND, EventScript_1A91F6
+ case SEAGALLOP_FOUR_ISLAND, EventScript_1A9201
+ case SEAGALLOP_MORE, EventScript_1A917F
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_1A917F:: @ 81A917F
+ setvar VAR_0x8005, 1
+ special Special_DrawSeagallopDestinationMenu
+ waitstate
+ specialvar VAR_0x8006, Special_GetSelectedSeagallopDestination
+ switch VAR_0x8006
+ case SEAGALLOP_FOUR_ISLAND, EventScript_1A9201
+ case SEAGALLOP_FIVE_ISLAND, EventScript_1A920C
+ case SEAGALLOP_SIX_ISLAND, EventScript_1A9217
+ case SEAGALLOP_SEVEN_ISLAND, EventScript_1A9222
+ case SEAGALLOP_MORE, EventScript_1A911E
+ case SCR_MENU_CANCEL, EventScript_CancelSail
+ end
+
+EventScript_SailToVermilionCity:: @ 81A91D5
+ setvar VAR_0x8006, SEAGALLOP_VERMILION_CITY
+ goto EventScript_1A909E
+ end
+
+EventScript_1A91E0:: @ 81A91E0
+ setvar VAR_0x8006, SEAGALLOP_ONE_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A91EB:: @ 81A91EB
+ setvar VAR_0x8006, SEAGALLOP_TWO_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A91F6:: @ 81A91F6
+ setvar VAR_0x8006, SEAGALLOP_THREE_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A9201:: @ 81A9201
+ setvar VAR_0x8006, SEAGALLOP_FOUR_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A920C:: @ 81A920C
+ setvar VAR_0x8006, SEAGALLOP_FIVE_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A9217:: @ 81A9217
+ setvar VAR_0x8006, SEAGALLOP_SIX_ISLAND
+ goto EventScript_1A909E
+ end
+
+EventScript_1A9222:: @ 81A9222
+ setvar VAR_0x8006, SEAGALLOP_SEVEN_ISLAND
+ goto EventScript_1A909E
+ end