mirror of
https://github.com/pret/pokefirered.git
synced 2026-06-02 22:04:27 -05:00
395 lines
13 KiB
C++
395 lines
13 KiB
C++
CeladonCity_GameCorner_PrizeRoom_MapScripts::
|
|
.byte 0
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_BaldingMan::
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_FancyThatPorygon, MSGBOX_NPC
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_OldMan::
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_RakedItInToday, MSGBOX_NPC
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_PrizeClerkMons::
|
|
lock
|
|
faceplayer
|
|
goto_if_unset FLAG_GOT_COIN_CASE, CeladonCity_GameCorner_PrizeRoom_EventScript_NeedCoinCase
|
|
goto_if_questlog EventScript_ReleaseEnd
|
|
showcoinsbox 0, 0
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_WeExchangeCoinsForPrizes
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ChoosePrizeMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ChoosePrizeMon::
|
|
message CeladonCity_GameCorner_PrizeRoom_Text_WhichPrize
|
|
waitmessage
|
|
multichoice 11, 0, MULTICHOICE_GAME_CORNER_POKEMON_PRIZES, FALSE
|
|
switch VAR_RESULT
|
|
case 0, CeladonCity_GameCorner_PrizeRoom_EventScript_Abra
|
|
case 1, CeladonCity_GameCorner_PrizeRoom_EventScript_Clefairy
|
|
case 2, CeladonCity_GameCorner_PrizeRoom_EventScript_DratiniPinsir
|
|
case 3, CeladonCity_GameCorner_PrizeRoom_EventScript_ScytherDratini
|
|
case 4, CeladonCity_GameCorner_PrizeRoom_EventScript_Porygon
|
|
case 5, CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
case 127, CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange::
|
|
hidecoinsbox 0, 0
|
|
release
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_Abra::
|
|
.ifdef FIRERED
|
|
setvar VAR_TEMP_1, SPECIES_ABRA
|
|
setvar VAR_TEMP_2, 180
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
setvar VAR_TEMP_1, SPECIES_ABRA
|
|
setvar VAR_TEMP_2, 120
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_Clefairy::
|
|
.ifdef FIRERED
|
|
setvar VAR_TEMP_1, SPECIES_CLEFAIRY
|
|
setvar VAR_TEMP_2, 500
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
setvar VAR_TEMP_1, SPECIES_CLEFAIRY
|
|
setvar VAR_TEMP_2, 750
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_DratiniPinsir::
|
|
.ifdef FIRERED
|
|
setvar VAR_TEMP_1, SPECIES_DRATINI
|
|
setvar VAR_TEMP_2, 2800
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
setvar VAR_TEMP_1, SPECIES_PINSIR
|
|
setvar VAR_TEMP_2, 2500
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ScytherDratini::
|
|
.ifdef FIRERED
|
|
setvar VAR_TEMP_1, SPECIES_SCYTHER
|
|
setvar VAR_TEMP_2, 5500
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
setvar VAR_TEMP_1, SPECIES_DRATINI
|
|
setvar VAR_TEMP_2, 4600
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_Porygon::
|
|
.ifdef FIRERED
|
|
setvar VAR_TEMP_1, SPECIES_PORYGON
|
|
setvar VAR_TEMP_2, 9999
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
setvar VAR_TEMP_1, SPECIES_PORYGON
|
|
setvar VAR_TEMP_2, 6500
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeMon::
|
|
getspeciesname 0, VAR_TEMP_1
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_YouWantPrize, MSGBOX_YESNO
|
|
compare VAR_RESULT, NO
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
checkcoins VAR_RESULT
|
|
compare VAR_RESULT, VAR_TEMP_2
|
|
goto_if_lt CeladonCity_GameCorner_PrizeRoom_EventScript_NotEnoughCoins
|
|
textcolor 3
|
|
switch VAR_TEMP_1
|
|
case SPECIES_ABRA, CeladonCity_GameCorner_PrizeRoom_EventScript_GiveAbra
|
|
case SPECIES_CLEFAIRY, CeladonCity_GameCorner_PrizeRoom_EventScript_GiveClefairy
|
|
case SPECIES_DRATINI, CeladonCity_GameCorner_PrizeRoom_EventScript_GiveDratini
|
|
case SPECIES_SCYTHER, CeladonCity_GameCorner_PrizeRoom_EventScript_GiveScyther
|
|
case SPECIES_PORYGON, CeladonCity_GameCorner_PrizeRoom_EventScript_GivePorygon
|
|
case SPECIES_PINSIR, CeladonCity_GameCorner_PrizeRoom_EventScript_GivePinsir
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_GiveAbra::
|
|
.ifdef FIRERED
|
|
givemon VAR_TEMP_1, 9, ITEM_NONE
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
givemon VAR_TEMP_1, 7, ITEM_NONE
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_CheckReceivedMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_GiveClefairy::
|
|
.ifdef FIRERED
|
|
givemon VAR_TEMP_1, 8, ITEM_NONE
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
givemon VAR_TEMP_1, 12, ITEM_NONE
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_CheckReceivedMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_GiveDratini::
|
|
.ifdef FIRERED
|
|
givemon VAR_TEMP_1, 18, ITEM_NONE
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
givemon VAR_TEMP_1, 24, ITEM_NONE
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_CheckReceivedMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_GiveScyther::
|
|
givemon VAR_TEMP_1, 25, ITEM_NONE
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_CheckReceivedMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_GivePorygon::
|
|
.ifdef FIRERED
|
|
givemon VAR_TEMP_1, 26, ITEM_NONE
|
|
.else
|
|
.ifdef LEAFGREEN
|
|
givemon VAR_TEMP_1, 18, ITEM_NONE
|
|
.endif
|
|
.endif
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_CheckReceivedMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_GivePinsir::
|
|
givemon VAR_TEMP_1, 18, ITEM_NONE
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_CheckReceivedMon
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_CheckReceivedMon::
|
|
compare VAR_RESULT, 0
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_ReceivedMonParty
|
|
compare VAR_RESULT, 1
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_ReceivedMonPC
|
|
compare VAR_RESULT, 2
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_PartyFull
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_PartyFull::
|
|
textcolor 3
|
|
msgbox Text_NoMoreRoomForPokemon
|
|
hidecoinsbox 0, 0
|
|
release
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_NicknamePartyMon::
|
|
getpartysize
|
|
subvar VAR_RESULT, 1
|
|
copyvar VAR_0x8004, VAR_RESULT
|
|
call EventScript_ChangePokemonNickname
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_NeedCoinCase::
|
|
textcolor 3
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_CoinCaseRequired
|
|
release
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_NotEnoughCoins::
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_NeedMoreCoins
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ReceivedMonParty::
|
|
removecoins VAR_TEMP_2
|
|
updatecoinsbox 0, 5
|
|
getspeciesname 0, VAR_TEMP_1
|
|
playfanfare MUS_LEVEL_UP
|
|
message Text_PlayerObtainedTheMon
|
|
waitmessage
|
|
waitfanfare
|
|
msgbox Text_GiveNicknameToThisMon, MSGBOX_YESNO
|
|
compare VAR_RESULT, YES
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_NicknamePartyMon
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ReceivedMonPC::
|
|
removecoins VAR_TEMP_2
|
|
updatecoinsbox 0, 5
|
|
getspeciesname 0, VAR_TEMP_1
|
|
playfanfare MUS_LEVEL_UP
|
|
message Text_PlayerObtainedTheMon
|
|
waitmessage
|
|
waitfanfare
|
|
msgbox Text_GiveNicknameToThisMon, MSGBOX_YESNO
|
|
compare VAR_RESULT, NO
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_TransferredToPC
|
|
call EventScript_NameReceivedBoxMon
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_TransferredToPC
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_TransferredToPC::
|
|
call EventScript_TransferredToPC
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_PrizeClerkTMs::
|
|
lock
|
|
faceplayer
|
|
goto_if_unset FLAG_GOT_COIN_CASE, CeladonCity_GameCorner_PrizeRoom_EventScript_NeedCoinCase
|
|
goto_if_questlog EventScript_ReleaseEnd
|
|
showcoinsbox 0, 0
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_WeExchangeCoinsForPrizes
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ChoosePrizeTM
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ChoosePrizeTM::
|
|
message CeladonCity_GameCorner_PrizeRoom_Text_WhichPrize
|
|
waitmessage
|
|
multichoice 11, 0, MULTICHOICE_GAME_CORNER_TMPRIZES, FALSE
|
|
switch VAR_RESULT
|
|
case 0, CeladonCity_GameCorner_PrizeRoom_EventScript_TM13
|
|
case 1, CeladonCity_GameCorner_PrizeRoom_EventScript_TM23
|
|
case 2, CeladonCity_GameCorner_PrizeRoom_EventScript_TM24
|
|
case 3, CeladonCity_GameCorner_PrizeRoom_EventScript_TM30
|
|
case 4, CeladonCity_GameCorner_PrizeRoom_EventScript_TM35
|
|
case 5, CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
case 127, CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_TM13::
|
|
setvar VAR_TEMP_1, ITEM_TM13
|
|
setvar VAR_TEMP_2, 4000
|
|
getmovename 1, MOVE_ICE_BEAM
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeTM
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_TM23::
|
|
setvar VAR_TEMP_1, ITEM_TM23
|
|
setvar VAR_TEMP_2, 3500
|
|
getmovename 1, MOVE_IRON_TAIL
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeTM
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_TM24::
|
|
setvar VAR_TEMP_1, ITEM_TM24
|
|
setvar VAR_TEMP_2, 4000
|
|
getmovename 1, MOVE_THUNDERBOLT
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeTM
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_TM30::
|
|
setvar VAR_TEMP_1, ITEM_TM30
|
|
setvar VAR_TEMP_2, 4500
|
|
getmovename 1, MOVE_SHADOW_BALL
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeTM
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_TM35::
|
|
setvar VAR_TEMP_1, ITEM_TM35
|
|
setvar VAR_TEMP_2, 4000
|
|
getmovename 1, MOVE_FLAMETHROWER
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeTM
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeTM::
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_YouWantTM, MSGBOX_YESNO
|
|
compare VAR_RESULT, NO
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_TryGivePrize
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeItem::
|
|
getitemname 0, VAR_TEMP_1
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_YouWantPrize, MSGBOX_YESNO
|
|
compare VAR_RESULT, NO
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_TryGivePrize
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_TryGivePrize::
|
|
getitemname 0, VAR_TEMP_1
|
|
checkcoins VAR_RESULT
|
|
compare VAR_RESULT, VAR_TEMP_2
|
|
goto_if_lt CeladonCity_GameCorner_PrizeRoom_EventScript_NotEnoughCoins
|
|
checkitemspace VAR_TEMP_1, 1
|
|
compare VAR_RESULT, FALSE
|
|
goto_if_eq CeladonCity_GameCorner_PrizeRoom_EventScript_BagFull
|
|
removecoins VAR_TEMP_2
|
|
updatecoinsbox 0, 5
|
|
giveitem VAR_TEMP_1
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_BagFull::
|
|
textcolor 3
|
|
msgbox Text_TooBadBagFull
|
|
hidecoinsbox 0, 0
|
|
release
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_PrizeClerkItems::
|
|
lock
|
|
faceplayer
|
|
goto_if_unset FLAG_GOT_COIN_CASE, CeladonCity_GameCorner_PrizeRoom_EventScript_NeedCoinCase
|
|
goto_if_questlog EventScript_ReleaseEnd
|
|
showcoinsbox 0, 0
|
|
msgbox CeladonCity_GameCorner_PrizeRoom_Text_WeExchangeCoinsForPrizes
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ChoosePrizeItem
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_ChoosePrizeItem::
|
|
message CeladonCity_GameCorner_PrizeRoom_Text_WhichPrize
|
|
waitmessage
|
|
multichoice 10, 0, MULTICHOICE_GAME_CORNER_BATTLE_ITEM_PRIZES, FALSE
|
|
switch VAR_RESULT
|
|
case 0, CeladonCity_GameCorner_PrizeRoom_EventScript_SmokeBall
|
|
case 1, CeladonCity_GameCorner_PrizeRoom_EventScript_MiracleSeed
|
|
case 2, CeladonCity_GameCorner_PrizeRoom_EventScript_Charcoal
|
|
case 3, CeladonCity_GameCorner_PrizeRoom_EventScript_MysticWater
|
|
case 4, CeladonCity_GameCorner_PrizeRoom_EventScript_YellowFlute
|
|
case 5, CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
case 127, CeladonCity_GameCorner_PrizeRoom_EventScript_EndPrizeExchange
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_SmokeBall::
|
|
setvar VAR_TEMP_1, ITEM_SMOKE_BALL
|
|
setvar VAR_TEMP_2, 800
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeItem
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_MiracleSeed::
|
|
setvar VAR_TEMP_1, ITEM_MIRACLE_SEED
|
|
setvar VAR_TEMP_2, 1000
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeItem
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_Charcoal::
|
|
setvar VAR_TEMP_1, ITEM_CHARCOAL
|
|
setvar VAR_TEMP_2, 1000
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeItem
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_MysticWater::
|
|
setvar VAR_TEMP_1, ITEM_MYSTIC_WATER
|
|
setvar VAR_TEMP_2, 1000
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeItem
|
|
end
|
|
|
|
CeladonCity_GameCorner_PrizeRoom_EventScript_YellowFlute::
|
|
setvar VAR_TEMP_1, ITEM_YELLOW_FLUTE
|
|
setvar VAR_TEMP_2, 1600
|
|
goto CeladonCity_GameCorner_PrizeRoom_EventScript_ConfirmPrizeItem
|
|
end
|