mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
ad50e94b50
Resolves #697
60 lines
1.4 KiB
NASM
60 lines
1.4 KiB
NASM
ToddPhoneCalleeScript:
|
|
gettrainername STRING_BUFFER_3, CAMPER, TODD1
|
|
checkflag ENGINE_TODD
|
|
iftrue .WantsBattle
|
|
farscall PhoneScript_AnswerPhone_Male
|
|
checkflag ENGINE_TODD_SATURDAY_MORNING
|
|
iftrue .NotSaturday
|
|
readvar VAR_WEEKDAY
|
|
ifnotequal SATURDAY, .NotSaturday
|
|
checktime MORN
|
|
iftrue ToddSaturdayMorning
|
|
|
|
.NotSaturday:
|
|
checkflag ENGINE_GOLDENROD_DEPT_STORE_SALE_IS_ON
|
|
iftrue .SaleOn
|
|
farsjump ToddNoItemScript
|
|
|
|
.WantsBattle:
|
|
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_34
|
|
farsjump ToddForwardScript
|
|
|
|
.SaleOn:
|
|
farsjump ToddHurryScript
|
|
|
|
ToddPhoneCallerScript:
|
|
gettrainername STRING_BUFFER_3, CAMPER, TODD1
|
|
farscall PhoneScript_GreetPhone_Male
|
|
checkflag ENGINE_TODD
|
|
iftrue .TryForSale
|
|
checkflag ENGINE_TODD_SATURDAY_MORNING
|
|
iftrue .TryForSale
|
|
checkflag ENGINE_FLYPOINT_GOLDENROD
|
|
iffalse .NoGoldenrod
|
|
farscall PhoneScript_Random2
|
|
ifequal 0, ToddWantsBattle
|
|
|
|
.TryForSale:
|
|
farscall PhoneScript_Random2
|
|
ifequal 0, ToddDeptStoreSale
|
|
|
|
.NoGoldenrod:
|
|
farscall PhoneScript_Random3
|
|
ifequal 0, ToddFoundRare
|
|
farsjump Phone_GenericCall_Male
|
|
|
|
ToddSaturdayMorning:
|
|
setflag ENGINE_TODD_SATURDAY_MORNING
|
|
|
|
ToddWantsBattle:
|
|
getlandmarkname STRING_BUFFER_5, LANDMARK_ROUTE_34
|
|
setflag ENGINE_TODD
|
|
farsjump PhoneScript_WantsToBattle_Male
|
|
|
|
ToddFoundRare:
|
|
farsjump Phone_CheckIfUnseenRare_Male
|
|
|
|
ToddDeptStoreSale:
|
|
setflag ENGINE_GOLDENROD_DEPT_STORE_SALE_IS_ON
|
|
farsjump ToddItemScript
|