mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
50 lines
1.1 KiB
NASM
50 lines
1.1 KiB
NASM
ChadPhoneCalleeScript:
|
|
trainertotext SCHOOLBOY, CHAD1, MEM_BUFFER_0
|
|
checkflag ENGINE_CHAD
|
|
iftrue .WantsBattle
|
|
farscall PhoneScript_AnswerPhone_Male
|
|
checkflag ENGINE_CHAD_FRIDAY_MORNING
|
|
iftrue .NotFriday
|
|
checkcode VAR_WEEKDAY
|
|
ifnotequal FRIDAY, .NotFriday
|
|
checktime MORN
|
|
iftrue ChadFridayMorning
|
|
|
|
.NotFriday:
|
|
farjump UnknownScript_0xa0980
|
|
|
|
.WantsBattle:
|
|
landmarktotext ROUTE_38, MEM_BUFFER_2
|
|
farjump UnknownScript_0xa0a7d
|
|
|
|
ChadPhoneCallerScript:
|
|
trainertotext SCHOOLBOY, CHAD1, MEM_BUFFER_0
|
|
farscall PhoneScript_GreetPhone_Male
|
|
farscall PhoneScript_Random2
|
|
ifequal 0, ChadOakGossip
|
|
checkflag ENGINE_CHAD
|
|
iftrue .Generic
|
|
checkflag ENGINE_CHAD_FRIDAY_MORNING
|
|
iftrue .Generic
|
|
farscall PhoneScript_Random2
|
|
ifequal 0, ChadWantsBattle
|
|
|
|
.Generic:
|
|
farscall PhoneScript_Random3
|
|
ifequal 0, ChadFoundRare
|
|
farjump Phone_GenericCall_Male
|
|
|
|
ChadFridayMorning:
|
|
setflag ENGINE_CHAD_FRIDAY_MORNING
|
|
|
|
ChadWantsBattle:
|
|
landmarktotext ROUTE_38, MEM_BUFFER_2
|
|
setflag ENGINE_CHAD
|
|
farjump PhoneScript_WantsToBattle_Male
|
|
|
|
ChadFoundRare:
|
|
farjump Phone_CheckIfUnseenRare_Male
|
|
|
|
ChadOakGossip:
|
|
farjump ChadOakGossipScript
|