pokecrystal-board/engine/phone/scripts/beverly.asm
2020-03-15 19:50:39 -04:00

27 lines
733 B
NASM

BeverlyPhoneCalleeScript:
gettrainername STRING_BUFFER_3, POKEFANF, BEVERLY1
farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_BEVERLY_HAS_NUGGET
iftrue .HasNugget
farsjump BeverlyHangUpScript
.HasNugget:
getlandmarkname STRING_BUFFER_5, LANDMARK_NATIONAL_PARK
farsjump BeverlyComePickUpScript
BeverlyPhoneCallerScript:
gettrainername STRING_BUFFER_3, POKEFANF, BEVERLY1
farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_BEVERLY_HAS_NUGGET
iftrue .HasNugget
farscall PhoneScript_Random4
ifequal 0, .FoundNugget
.HasNugget:
farsjump Phone_GenericCall_Female
.FoundNugget:
setflag ENGINE_BEVERLY_HAS_NUGGET
getlandmarkname STRING_BUFFER_5, LANDMARK_NATIONAL_PARK
farsjump PhoneScript_FoundItem_Female