mirror of
https://github.com/pret/pokeruby.git
synced 2026-09-30 07:21:48 -04:00
Robin Xyifer
73 lines
2.6 KiB
ObjectPascal
Vendored
73 lines
2.6 KiB
ObjectPascal
Vendored
FallarborTown_House1_MapScripts:: @ 8153BAE
|
|
map_script MAP_SCRIPT_ON_TRANSITION, FallarborTown_House1_OnTransition
|
|
.byte 0
|
|
|
|
FallarborTown_House1_OnTransition:: @ 8153BB4
|
|
end
|
|
|
|
FallarborTown_CozmosHouse_EventScript_ProfCozmo:: @ 8153BB5
|
|
lock
|
|
faceplayer
|
|
goto_if_set FLAG_RECEIVED_TM_RETURN, FallarborTown_CozmosHouse_EventScript_GaveMeteorite
|
|
checkitem ITEM_METEORITE, 1
|
|
compare VAR_RESULT, 1
|
|
goto_if_eq FallarborTown_CozmosHouse_EventScript_PlayerHasMeteorite
|
|
msgbox FallarborTown_CozmosHouse_Text_MeteoriteWillNeverBeMineNow, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FallarborTown_CozmosHouse_EventScript_PlayerHasMeteorite:: @ 8153BDA
|
|
call_if_unset FLAG_TEMP_2, FallarborTown_CozmosHouse_EventScript_NoticeMeteorite
|
|
call_if_set FLAG_TEMP_2, FallarborTown_CozmosHouse_EventScript_AskForMeteorite
|
|
compare VAR_RESULT, NO
|
|
goto_if_eq FallarborTown_CozmosHouse_EventScript_DeclineGiveMeteorite
|
|
msgbox FallarborTown_CozmosHouse_Text_PleaseUseThisTM, MSGBOX_DEFAULT
|
|
giveitem ITEM_TM27_RETURN
|
|
compare VAR_RESULT, 0
|
|
goto_if_eq Common_EventScript_ShowBagIsFull
|
|
setvar VAR_0x8004, ITEM_METEORITE
|
|
call Common_EventScript_PlayerHandedOverTheItem
|
|
setflag FLAG_RECEIVED_TM_RETURN
|
|
msgbox FallarborTown_CozmosHouse_Text_ReallyGoingToHelpMyResearch, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FallarborTown_CozmosHouse_EventScript_NoticeMeteorite:: @ 8153C2D
|
|
msgbox FallarborTown_CozmosHouse_Text_MeteoriteWillNeverBeMineNow, MSGBOX_DEFAULT
|
|
msgbox FallarborTown_CozmosHouse_Text_IsThatMeteoriteMayIHaveIt, MSGBOX_YESNO
|
|
return
|
|
|
|
FallarborTown_CozmosHouse_EventScript_AskForMeteorite:: @ 8153C3E
|
|
msgbox FallarborTown_CozmosHouse_Text_MayIHaveMeteorite, MSGBOX_YESNO
|
|
return
|
|
|
|
FallarborTown_CozmosHouse_EventScript_DeclineGiveMeteorite:: @ 8153C47
|
|
setflag FLAG_TEMP_2
|
|
msgbox FallarborTown_CozmosHouse_Text_CrushedWithDisappointment, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FallarborTown_CozmosHouse_EventScript_GaveMeteorite:: @ 8153C54
|
|
msgbox FallarborTown_CozmosHouse_Text_ReallyGoingToHelpMyResearch, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FallarborTown_CozmosHouse_EventScript_CozmosWife:: @ 8153C5E
|
|
lock
|
|
faceplayer
|
|
goto_if_set FLAG_RECEIVED_TM_RETURN, FallarborTown_CozmosHouse_EventScript_CozmoIsHappy
|
|
goto_if_set FLAG_DEFEATED_EVIL_TEAM_MT_CHIMNEY, FallarborTown_CozmosHouse_EventScript_CozmoIsSad
|
|
msgbox FallarborTown_CozmosHouse_Text_CozmoWentToMeteorFalls, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FallarborTown_CozmosHouse_EventScript_CozmoIsSad:: @ 8153C7C
|
|
msgbox FallarborTown_CozmosHouse_Text_FeelSorryForCozmo, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FallarborTown_CozmosHouse_EventScript_CozmoIsHappy:: @ 8153C86
|
|
msgbox FallarborTown_CozmosHouse_Text_CozmoIsSoHappy, MSGBOX_DEFAULT
|
|
release
|
|
end
|