ref: cb8505e022f7030d4a144b43bf1e6557a0cb49fa
dir: /engine/phone/scripts/elm.asm/
ElmPhoneCalleeScript: readvar VAR_SPECIALPHONECALL ifequal SPECIALCALL_POKERUS, .pokerus checkevent EVENT_SHOWED_TOGEPI_TO_ELM iftrue .discovery checkevent EVENT_GOT_TOGEPI_EGG_FROM_ELMS_AIDE iffalse .next checkevent EVENT_TOGEPI_HATCHED iftrue .egghatched .next checkevent EVENT_GOT_TOGEPI_EGG_FROM_ELMS_AIDE iftrue .eggunhatched checkevent EVENT_ELMS_AIDE_IN_LAB iftrue .assistant checkevent EVENT_GAVE_MYSTERY_EGG_TO_ELM iftrue .checkingegg checkevent EVENT_ELM_CALLED_ABOUT_STOLEN_POKEMON iftrue .stolen checkevent EVENT_GOT_MYSTERY_EGG_FROM_MR_POKEMON iftrue .sawmrpokemon farwritetext ElmPhoneHealYourMonText end .sawmrpokemon farwritetext ElmPhoneSawMrPokemonText end .stolen farwritetext ElmPhonePokemonStolenText end .checkingegg farwritetext ElmPhoneCheckingTheEggText end .assistant farwritetext ElmPhoneAssistantText end .eggunhatched farwritetext ElmPhoneHowIsTheEggText end .egghatched farwritetext ElmPhoneEggHatchedText setevent EVENT_TOLD_ELM_ABOUT_TOGEPI_OVER_THE_PHONE end .discovery random 2 ifequal 0, .nextdiscovery farwritetext ElmPhoneDiscoveredHatchTimeText end .nextdiscovery farwritetext ElmPhoneInvestigatingEggMovesText end .pokerus farwritetext ElmPhoneDiscoveredPokerusText specialphonecall SPECIALCALL_NONE end ElmPhoneCallerScript: readvar VAR_SPECIALPHONECALL ifequal SPECIALCALL_ROBBED, .disaster ifequal SPECIALCALL_ASSISTANT, .assistant ifequal SPECIALCALL_WEIRDBROADCAST, .rocket ifequal SPECIALCALL_SSTICKET, .gift ifequal SPECIALCALL_MASTERBALL, .gift farwritetext ElmPhoneDiscoveredPokerusText specialphonecall SPECIALCALL_NONE end .disaster farwritetext ElmPhoneDisasterText specialphonecall SPECIALCALL_NONE setevent EVENT_ELM_CALLED_ABOUT_STOLEN_POKEMON end .assistant farwritetext ElmPhoneEggAssistantText specialphonecall SPECIALCALL_NONE clearevent EVENT_ELMS_AIDE_IN_VIOLET_POKEMON_CENTER setevent EVENT_ELMS_AIDE_IN_LAB end .rocket farwritetext ElmPhoneRadioTowerRocketTakeoverText specialphonecall SPECIALCALL_NONE end .gift farwritetext ElmPhoneGiftText specialphonecall SPECIALCALL_NONE end .neat ; unreferenced farwritetext ElmPhoneGotAholdOfSomethingNeatText specialphonecall SPECIALCALL_NONE end