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

73 lines
1.7 KiB
NASM

GinaPhoneCalleeScript:
gettrainername STRING_BUFFER_3, PICNICKER, GINA1
checkflag ENGINE_GINA
iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_GINA_SUNDAY_AFTERNOON
iftrue .NotSunday
checkflag ENGINE_GINA_HAS_LEAF_STONE
iftrue .HasLeafStone
readvar VAR_WEEKDAY
ifnotequal SUNDAY, .NotSunday
checktime DAY
iftrue GinaSundayDay
.NotSunday:
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue .Rockets
farsjump UnknownScript_0xa0960
.Rockets:
farsjump UnknownScript_0xa05c6
.WantsBattle:
getlandmarkname STRING_BUFFER_5, ROUTE_34
farsjump UnknownScript_0xa0a69
.HasLeafStone:
getlandmarkname STRING_BUFFER_5, ROUTE_34
farsjump UnknownScript_0xa0abd
GinaPhoneCallerScript:
gettrainername STRING_BUFFER_3, PICNICKER, GINA1
farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue GinaRockets
checkflag ENGINE_GINA
iftrue .Generic
checkflag ENGINE_GINA_SUNDAY_AFTERNOON
iftrue .Generic
checkflag ENGINE_GINA_HAS_LEAF_STONE
iftrue .Generic
checkevent EVENT_GINA_GAVE_LEAF_STONE
iftrue .GaveLeafStone
farscall PhoneScript_Random2
ifequal 0, GinaHasLeafStone
.GaveLeafStone:
farscall PhoneScript_Random11
ifequal 0, GinaHasLeafStone
checkflag ENGINE_FLYPOINT_GOLDENROD
iffalse .Generic
farscall PhoneScript_Random3
ifequal 0, GinaWantsBattle
.Generic:
farsjump Phone_GenericCall_Female
GinaSundayDay:
setflag ENGINE_GINA_SUNDAY_AFTERNOON
GinaWantsBattle:
getlandmarkname STRING_BUFFER_5, ROUTE_34
setflag ENGINE_GINA
farsjump PhoneScript_WantsToBattle_Female
GinaRockets:
farsjump UnknownScript_0xa05c6
GinaHasLeafStone:
setflag ENGINE_GINA_HAS_LEAF_STONE
getlandmarkname STRING_BUFFER_5, ROUTE_34
farsjump PhoneScript_FoundItem_Female