pokeemerald/data/maps/Route124_DivingTreasureHuntersHouse/scripts.inc
2021-07-20 15:18:31 -04:00

349 lines
15 KiB
C++

Route124_DivingTreasureHuntersHouse_MapScripts::
map_script MAP_SCRIPT_ON_TRANSITION, Route124_DivingTreasureHuntersHouse_OnTransition
.byte 0
Route124_DivingTreasureHuntersHouse_OnTransition:
setflag FLAG_LANDMARK_HUNTERS_HOUSE
end
Route124_DivingTreasureHuntersHouse_EventScript_TreasureHunter::
lock
faceplayer
goto_if_set FLAG_MET_DIVING_TREASURE_HUNTER, Route124_DivingTreasureHuntersHouse_EventScript_SkipGreeting
msgbox Route124_DivingTreasureHuntersHouse_Text_Greeting, MSGBOX_DEFAULT
setflag FLAG_MET_DIVING_TREASURE_HUNTER
goto Route124_DivingTreasureHuntersHouse_EventScript_CheckPlayerHasShard
end
Route124_DivingTreasureHuntersHouse_EventScript_SkipGreeting::
msgbox Route124_DivingTreasureHuntersHouse_Text_HaveYouSeenAnyShards, MSGBOX_DEFAULT
goto Route124_DivingTreasureHuntersHouse_EventScript_CheckPlayerHasShard
end
Route124_DivingTreasureHuntersHouse_EventScript_CheckPlayerHasShard::
call Route124_DivingTreasureHuntersHouse_EventScript_GetPlayersShards
compare VAR_TEMP_1, 0
goto_if_eq Route124_DivingTreasureHuntersHouse_EventScript_NoShards
goto Route124_DivingTreasureHuntersHouse_EventScript_HasShard
end
Route124_DivingTreasureHuntersHouse_EventScript_GetPlayersShards::
setvar VAR_TEMP_1, 0
checkitem ITEM_RED_SHARD, 1
compare VAR_RESULT, TRUE
call_if_eq Route124_DivingTreasureHuntersHouse_EventScript_HasRedShard
checkitem ITEM_YELLOW_SHARD, 1
compare VAR_RESULT, TRUE
call_if_eq Route124_DivingTreasureHuntersHouse_EventScript_HasYellowShard
checkitem ITEM_BLUE_SHARD, 1
compare VAR_RESULT, TRUE
call_if_eq Route124_DivingTreasureHuntersHouse_EventScript_HasBlueShard
checkitem ITEM_GREEN_SHARD, 1
compare VAR_RESULT, TRUE
call_if_eq Route124_DivingTreasureHuntersHouse_EventScript_HasGreenShard
return
Route124_DivingTreasureHuntersHouse_EventScript_HasRedShard::
addvar VAR_TEMP_1, 1
return
Route124_DivingTreasureHuntersHouse_EventScript_HasYellowShard::
addvar VAR_TEMP_1, 2
return
Route124_DivingTreasureHuntersHouse_EventScript_HasBlueShard::
addvar VAR_TEMP_1, 4
return
Route124_DivingTreasureHuntersHouse_EventScript_HasGreenShard::
addvar VAR_TEMP_1, 8
return
Route124_DivingTreasureHuntersHouse_EventScript_HasShard::
msgbox Route124_DivingTreasureHuntersHouse_Text_ThatsAShardIllTradeYou, MSGBOX_DEFAULT
goto Route124_DivingTreasureHuntersHouse_EventScript_ShowTradeOptions
end
Route124_DivingTreasureHuntersHouse_EventScript_ShowTradeOptions::
message Route124_DivingTreasureHuntersHouse_Text_WhatDoYouWantToTrade
waitmessage
switch VAR_TEMP_1
case 1, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsR
case 2, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsY
case 3, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRY
case 4, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsB
case 5, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRB
case 6, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsYB
case 7, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRYB
case 8, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsG
case 9, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRG
case 10, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsYG
case 11, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRYG
case 12, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsBG
case 13, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRBG
case 14, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsYBG
case 15, Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRYBG
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsR::
multichoice 0, 0, MULTI_SHARDS_R, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsY::
multichoice 0, 0, MULTI_SHARDS_Y, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRY::
multichoice 0, 0, MULTI_SHARDS_RY, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsB::
multichoice 0, 0, MULTI_SHARDS_B, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRB::
multichoice 0, 0, MULTI_SHARDS_RB, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsYB::
multichoice 0, 0, MULTI_SHARDS_YB, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRYB::
multichoice 0, 0, MULTI_SHARDS_RYB, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 3, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsG::
multichoice 0, 0, MULTI_SHARDS_G, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRG::
multichoice 0, 0, MULTI_SHARDS_RG, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsYG::
multichoice 0, 0, MULTI_SHARDS_YG, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRYG::
multichoice 0, 0, MULTI_SHARDS_RYG, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 3, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsBG::
multichoice 0, 0, MULTI_SHARDS_BG, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRBG::
multichoice 0, 0, MULTI_SHARDS_RBG, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 3, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsYBG::
multichoice 0, 0, MULTI_SHARDS_YBG, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 3, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardOptionsRYBG::
multichoice 0, 0, MULTI_SHARDS_RYBG, FALSE
switch VAR_RESULT
case 0, Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard
case 1, Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard
case 2, Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard
case 3, Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard
case 4, Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_TradeRedShard::
setvar VAR_0x8008, ITEM_RED_SHARD
setvar VAR_0x8009, ITEM_FIRE_STONE
goto Route124_DivingTreasureHuntersHouse_EventScript_TryTradeShard
Route124_DivingTreasureHuntersHouse_EventScript_TradeYellowShard::
setvar VAR_0x8008, ITEM_YELLOW_SHARD
setvar VAR_0x8009, ITEM_THUNDER_STONE
goto Route124_DivingTreasureHuntersHouse_EventScript_TryTradeShard
Route124_DivingTreasureHuntersHouse_EventScript_TradeBlueShard::
setvar VAR_0x8008, ITEM_BLUE_SHARD
setvar VAR_0x8009, ITEM_WATER_STONE
goto Route124_DivingTreasureHuntersHouse_EventScript_TryTradeShard
Route124_DivingTreasureHuntersHouse_EventScript_TradeGreenShard::
setvar VAR_0x8008, ITEM_GREEN_SHARD
setvar VAR_0x8009, ITEM_LEAF_STONE
goto Route124_DivingTreasureHuntersHouse_EventScript_TryTradeShard
Route124_DivingTreasureHuntersHouse_EventScript_TryTradeShard::
bufferitemname 0, VAR_0x8008
bufferitemname 1, VAR_0x8009
msgbox Route124_DivingTreasureHuntersHouse_Text_YoullTradeShardForStone, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
checkitemspace VAR_0x8009, 1
compare VAR_RESULT, TRUE
goto_if_eq Route124_DivingTreasureHuntersHouse_EventScript_TradeShard
checkitem VAR_0x8008, 2
compare VAR_RESULT, FALSE
goto_if_eq Route124_DivingTreasureHuntersHouse_EventScript_TradeShard
goto Route124_DivingTreasureHuntersHouse_EventScript_BagFull
end
Route124_DivingTreasureHuntersHouse_EventScript_TradeShard::
removeitem VAR_0x8008
giveitem VAR_0x8009
msgbox Route124_DivingTreasureHuntersHouse_Text_ItsADeal, MSGBOX_DEFAULT
call Route124_DivingTreasureHuntersHouse_EventScript_GetPlayersShards
compare VAR_TEMP_1, 0
goto_if_eq Route124_DivingTreasureHuntersHouse_EventScript_EndTrade
msgbox Route124_DivingTreasureHuntersHouse_Text_TradeSomethingElse, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq Route124_DivingTreasureHuntersHouse_EventScript_ShowTradeOptions
goto Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade
end
Route124_DivingTreasureHuntersHouse_EventScript_BagFull::
msgbox Route124_DivingTreasureHuntersHouse_Text_BagFull, MSGBOX_DEFAULT
release
end
Route124_DivingTreasureHuntersHouse_EventScript_DeclineTrade::
msgbox Route124_DivingTreasureHuntersHouse_Text_ComeBackIfYouChangeMind, MSGBOX_DEFAULT
release
end
Route124_DivingTreasureHuntersHouse_EventScript_NoShards::
msgbox Route124_DivingTreasureHuntersHouse_Text_YouHaventGotAnyShards, MSGBOX_DEFAULT
release
end
Route124_DivingTreasureHuntersHouse_EventScript_EndTrade::
release
end
Route124_DivingTreasureHuntersHouse_EventScript_ShardTradeBoard::
msgbox Route124_DivingTreasureHuntersHouse_Text_ShardTradeBoard, MSGBOX_SIGN
end
Route124_DivingTreasureHuntersHouse_Text_Greeting:
.string "I'm the DIVING TREASURE HUNTER!\p"
.string "I'm the awesome dude who makes\n"
.string "deep-sea dives to gather treasures\l"
.string "resting at the bottom.$"
Route124_DivingTreasureHuntersHouse_Text_HaveYouSeenAnyShards:
.string "Tell me, have you seen any SHARDS of\n"
.string "tools made in ancient times?$"
Route124_DivingTreasureHuntersHouse_Text_YouHaventGotAnyShards:
.string "You haven't got any treasures\n"
.string "for me…\p"
.string "If you see any SHARDS, like the RED\n"
.string "SHARD, you've got to trade it with me!$"
Route124_DivingTreasureHuntersHouse_Text_ThatsAShardIllTradeYou:
.string "Oh, hey! That…\n"
.string "That's a SHARD! I'm looking for those!\p"
.string "Oh, man, you've got to trade that\n"
.string "with me! I'll give you something good!$"
Route124_DivingTreasureHuntersHouse_Text_WhatDoYouWantToTrade:
.string "What do you want to trade?$"
Route124_DivingTreasureHuntersHouse_Text_YoullTradeShardForStone:
.string "You'll trade your {STR_VAR_1} for\n"
.string "my {STR_VAR_2}, then?$"
Route124_DivingTreasureHuntersHouse_Text_ItsADeal:
.string "It's a done deal!\n"
.string "Use that wisely!$"
Route124_DivingTreasureHuntersHouse_Text_TradeSomethingElse:
.string "Do you want to trade something else?$"
Route124_DivingTreasureHuntersHouse_Text_BagFull:
.string "Whoops, your BAG's full.\n"
.string "Get rid of some items, friend!$"
Route124_DivingTreasureHuntersHouse_Text_ComeBackIfYouChangeMind:
.string "No? That's a downer.\n"
.string "Well, if you change your mind, come back.$"
Route124_DivingTreasureHuntersHouse_Text_ShardTradeBoard:
.string "{CLEAR_TO 0x0a}Wanted item{CLEAR_TO 0x7c}Trade item\n"
.string "{CLEAR_TO 0x0f}RED SHARD{CLEAR_TO 0x59}{LEFT_ARROW}{RIGHT_ARROW}{CLEAR_TO 0x7b}FIRE STONE{CLEAR_TO 0xc8}\p"
.string "{CLEAR_TO 0x0a}Wanted item{CLEAR_TO 0x7c}Trade item\n"
.string "{CLEAR_TO 0x06}YELLOW SHARD{CLEAR_TO 0x59}{LEFT_ARROW}{RIGHT_ARROW}{CLEAR_TO 0x73}THUNDERSTONE{CLEAR_TO 0xc8}\p"
.string "{CLEAR_TO 0x0a}Wanted item{CLEAR_TO 0x7c}Trade item\n"
.string "{CLEAR_TO 0x0c}BLUE SHARD{CLEAR_TO 0x59}{LEFT_ARROW}{RIGHT_ARROW}{CLEAR_TO 0x79}WATER STONE{CLEAR_TO 0xc8}\p"
.string "{CLEAR_TO 0x0a}Wanted item{CLEAR_TO 0x7c}Trade item\n"
.string "{CLEAR_TO 0x08}GREEN SHARD{CLEAR_TO 0x59}{LEFT_ARROW}{RIGHT_ARROW}{CLEAR_TO 0x7b}LEAF STONE$"