pokecrystal-board/engine/phone/scripts/reena.asm

40 lines
1022 B
NASM

ReenaPhoneCalleeScript:
gettrainername STRING_BUFFER_3, COOLTRAINERF, REENA1
checkflag ENGINE_REENA_READY_FOR_REMATCH
iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_REENA_SUNDAY_MORNING
iftrue .NotSunday
readvar VAR_WEEKDAY
ifnotequal SUNDAY, .NotSunday
checktime MORN
iftrue ReenaSundayMorning
.NotSunday:
farsjump ReenaForwardScript
.WantsBattle:
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_27
farsjump ReenaHurryScript
ReenaPhoneCallerScript:
gettrainername STRING_BUFFER_3, COOLTRAINERF, REENA1
farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_REENA_READY_FOR_REMATCH
iftrue .Generic
checkflag ENGINE_REENA_SUNDAY_MORNING
iftrue .Generic
farscall PhoneScript_Random2
ifequal 0, ReenaWantsBattle
.Generic:
farsjump Phone_GenericCall_Female
ReenaSundayMorning:
setflag ENGINE_REENA_SUNDAY_MORNING
ReenaWantsBattle:
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_27
setflag ENGINE_REENA_READY_FOR_REMATCH
farsjump PhoneScript_WantsToBattle_Female