mirror of https://github.com/pret/pokecrystal.git
41 lines
985 B
NASM
41 lines
985 B
NASM
ErinPhoneCalleeScript:
|
|
gettrainername STRING_BUFFER_3, PICNICKER, ERIN1
|
|
checkflag ENGINE_ERIN
|
|
iftrue .WantsBattle
|
|
farscall PhoneScript_AnswerPhone_Female
|
|
checkflag ENGINE_ERIN_SATURDAY_NIGHT
|
|
iftrue .NotSaturday
|
|
readvar VAR_WEEKDAY
|
|
ifnotequal SATURDAY, .NotSaturday
|
|
checktime NITE
|
|
iftrue ErinSaturdayNight
|
|
|
|
.NotSaturday:
|
|
farsjump ErinWorkingHardScript
|
|
|
|
.WantsBattle:
|
|
getlandmarkname STRING_BUFFER_5, ROUTE_46
|
|
farsjump ErinComeBattleScript
|
|
|
|
ErinPhoneCallerScript:
|
|
gettrainername STRING_BUFFER_3, PICNICKER, ERIN1
|
|
farscall PhoneScript_GreetPhone_Female
|
|
checkflag ENGINE_ERIN
|
|
iftrue .GenericCall
|
|
checkflag ENGINE_ERIN_SATURDAY_NIGHT
|
|
iftrue .GenericCall
|
|
farscall PhoneScript_Random3
|
|
ifequal 0, ErinWantsBattle
|
|
ifequal 1, ErinWantsBattle
|
|
|
|
.GenericCall:
|
|
farsjump Phone_GenericCall_Female
|
|
|
|
ErinSaturdayNight:
|
|
setflag ENGINE_ERIN_SATURDAY_NIGHT
|
|
|
|
ErinWantsBattle:
|
|
getlandmarkname STRING_BUFFER_5, ROUTE_46
|
|
setflag ENGINE_ERIN
|
|
farsjump PhoneScript_WantsToBattle_Female
|