pokecrystal-board/engine/phone/scripts/parry.asm
mid-kid e3e0bcd653 #641 fixes and additions. (#646)
Name a lot of text labels according to our conventions
2019-10-20 18:24:17 -04:00

41 lines
992 B
NASM

ParryPhoneCalleeScript:
gettrainername STRING_BUFFER_3, HIKER, PARRY1
checkflag ENGINE_PARRY
iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_PARRY_FRIDAY_AFTERNOON
iftrue .WantsRematch
readvar VAR_WEEKDAY
ifnotequal FRIDAY, .WantsRematch
checktime DAY
iftrue ParryFridayDay
.WantsRematch:
farsjump ParryBattleWithMeScript
.WantsBattle:
getlandmarkname STRING_BUFFER_5, ROUTE_45
farsjump ParryHaventYouGottenToScript
ParryPhoneCallerScript:
gettrainername STRING_BUFFER_3, HIKER, PARRY1
farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_PARRY
iftrue .GenericCall
checkflag ENGINE_PARRY_FRIDAY_AFTERNOON
iftrue .GenericCall
farscall PhoneScript_Random2
ifequal 0, ParryWantsBattle
ifequal 1, ParryWantsBattle
.GenericCall:
farsjump Phone_GenericCall_Male
ParryFridayDay:
setflag ENGINE_PARRY_FRIDAY_AFTERNOON
ParryWantsBattle:
getlandmarkname STRING_BUFFER_5, ROUTE_45
setflag ENGINE_PARRY
farsjump PhoneScript_WantsToBattle_Male