ref: 9a927c1b3efa2eca886f346a4fcca0eb57278faf
dir: /engine/phone/scripts/dana.asm/
DanaPhoneCalleeScript: gettrainername STRING_BUFFER_3, LASS, DANA1 checkflag ENGINE_DANA iftrue .WantsBattle farscall PhoneScript_AnswerPhone_Female checkflag ENGINE_DANA_THURSDAY_NIGHT iftrue .NotThursday checkflag ENGINE_DANA_HAS_THUNDERSTONE iftrue .HasThunderstone readvar VAR_WEEKDAY ifnotequal THURSDAY, .NotThursday checktime NITE iftrue DanaThursdayNight .NotThursday: farsjump DanaHangUpScript .WantsBattle: getlandmarkname STRING_BUFFER_5, ROUTE_38 farsjump DanaReminderScript .HasThunderstone: getlandmarkname STRING_BUFFER_5, ROUTE_38 farsjump DanaComePickUpScript DanaPhoneCallerScript: gettrainername STRING_BUFFER_3, LASS, DANA1 farscall PhoneScript_GreetPhone_Female checkflag ENGINE_DANA iftrue .Generic checkflag ENGINE_DANA_THURSDAY_NIGHT iftrue .Generic checkflag ENGINE_DANA_HAS_THUNDERSTONE iftrue .Generic farscall PhoneScript_Random3 ifequal 0, DanaWantsBattle checkevent EVENT_DANA_GAVE_THUNDERSTONE iftrue .Thunderstone farscall PhoneScript_Random2 ifequal 0, DanaHasThunderstone .Thunderstone: farscall PhoneScript_Random11 ifequal 0, DanaHasThunderstone .Generic: farscall PhoneScript_Random3 ifequal 0, DanaFoundRare farsjump Phone_GenericCall_Female DanaThursdayNight: setflag ENGINE_DANA_THURSDAY_NIGHT DanaWantsBattle: getlandmarkname STRING_BUFFER_5, ROUTE_38 setflag ENGINE_DANA farsjump PhoneScript_WantsToBattle_Female DanaFoundRare: farsjump Phone_CheckIfUnseenRare_Female DanaHasThunderstone: setflag ENGINE_DANA_HAS_THUNDERSTONE getlandmarkname STRING_BUFFER_5, ROUTE_38 farsjump PhoneScript_FoundItem_Female