mirror of https://github.com/pret/pokecrystal.git
40 lines
968 B
NASM
40 lines
968 B
NASM
ReenaPhoneCalleeScript:
|
|
gettrainername STRING_BUFFER_3, COOLTRAINERF, REENA1
|
|
checkflag ENGINE_REENA
|
|
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
|
|
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
|
|
farsjump PhoneScript_WantsToBattle_Female
|