pokecrystal/engine/phone/scripts/buena.asm

BuenaPhoneCalleeScript:
	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
	iftrue BuenaPhoneScript_Rocket
	readvar VAR_HOUR
	ifgreater 17, BuenaPhoneScript_AfterMidnightCallee
	scall BuenaPhoneScript_CheckTimeOfDayCallee
	sjump BuenaPhoneScript_RandomCallee

BuenaPhoneCallerScript:
	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
	iftrue BuenaPhoneScript_Rocket
	scall BuenaPhoneScript_CheckTimeOfDayCaller
	sjump BuenaPhoneScript_RandomCaller

BuenaPhoneScript_CheckTimeOfDayCallee:
	checktime MORN
	iftrue .morn
	checktime DAY
	iftrue .day
	writetext BuenaPhoneNiteAnswerText
	promptbutton
	end

.morn
	writetext BuenaPhoneMorningAnswerText
	promptbutton
	end

.day
	writetext BuenaPhoneDayAnswerText
	promptbutton
	end

BuenaPhoneScript_AfterMidnightCallee:
	writetext BuenaPhoneMidnightAnswerText
	end

BuenaPhoneScript_CheckTimeOfDayCaller:
	readvar VAR_HOUR
	ifgreater 17, BuenaPhoneScript_AfterMidnightCaller
	checktime MORN
	iftrue .morn
	checktime DAY
	iftrue .day
	writetext BuenaPhoneNiteText
	promptbutton
	end

.morn
	writetext BuenaPhoneMorningText
	promptbutton
	end

.day
	writetext BuenaPhoneDayText
	promptbutton
	end

BuenaPhoneScript_AfterMidnightCaller:
	writetext BuenaPhoneMidnightText
	promptbutton
	end

BuenaPhoneScript_Rocket:
	writetext BuenaPhoneRocketText
	end

BuenaPhoneScript_RandomCaller:
	checkevent EVENT_BEAT_ELITE_FOUR
	iftrue .PostE4
	random 11
	sjump .Jumptable

.PostE4:
	random 14

.Jumptable:
	ifequal 0, .zero
	ifequal 1, .one
	ifequal 2, .two
	ifequal 3, .three
	ifequal 4, .four
	ifequal 5, .five
	ifequal 6, .six
	ifequal 7, .seven
	ifequal 8, .eight
	ifequal 9, .nine
	ifequal 10, .ten
	ifequal 11, .eleven
	ifequal 12, .twelve
	ifequal 13, .thirteen

.zero
	writetext BuenaPhoneWentOutWithBenText
	sjump .finish

.one
	writetext BuenaPhoneReceptionistText
	sjump .finish

.two
	writetext BuenaPhoneLuckyNumberShowText
	sjump .finish

.three
	writetext BuenaPhoneStressedFromWorkText
	sjump .finish

.four
	writetext BuenaPhoneProfessorOakText
	sjump .finish

.five
	writetext BuenaPhoneGotAColdText
	sjump .finish

.six
	writetext BuenaPhoneRadioCardQuestionsText
	sjump .finish

.seven
	writetext BuenaPhonePikachuFanClubText
	sjump .finish

.eight
	writetext BuenaPhoneRadioTowerDirectorText
	sjump .finish

.nine
	writetext BuenaPhoneWhenDoYouRelaxText
	sjump .finish

.ten
	writetext BuenaPhoneStarterPokemonText
	sjump .finish

.eleven
	writetext BuenaPhoneCompanyVacationText
	sjump .finish

.twelve
	writetext BuenaPhoneBenAndFernText
	sjump .finish

.thirteen
	writetext BuenaPhoneGoingShoppingText

.finish
	end

BuenaPhoneScript_RandomCallee:
	random 3
	ifequal 0, .zero
	ifequal 1, .one
	ifequal 2, .two

.zero
	writetext BuenaPhoneFavoriteSlotMachineAnswerText
	end

.one
	writetext BuenaPhonePokegearAnswerText
	end

.two
	writetext BuenaPhoneCoopedUpInRadioTowerAnswerText
	end

INCLUDE "data/phone/text/buena.asm"
PhoneScript1 -> PhoneCalleeScript, and PhoneScript2 -> PhoneCallerScript 2018-12-31 21:32:04 +00:00			`BuenaPhoneCalleeScript:`
Fix mislabeled engine flags. 2015-07-10 12:12:28 +00:00			`checkflag ENGINE_ROCKETS_IN_RADIO_TOWER`
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`iftrue BuenaPhoneScript_Rocket`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 19:31:59 +00:00			`readvar VAR_HOUR`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`ifgreater 17, BuenaPhoneScript_AfterMidnightCallee`
			`scall BuenaPhoneScript_CheckTimeOfDayCallee`
			`sjump BuenaPhoneScript_RandomCallee`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
PhoneScript1 -> PhoneCalleeScript, and PhoneScript2 -> PhoneCallerScript 2018-12-31 21:32:04 +00:00			`BuenaPhoneCallerScript:`
Fix mislabeled engine flags. 2015-07-10 12:12:28 +00:00			`checkflag ENGINE_ROCKETS_IN_RADIO_TOWER`
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`iftrue BuenaPhoneScript_Rocket`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`scall BuenaPhoneScript_CheckTimeOfDayCaller`
			`sjump BuenaPhoneScript_RandomCaller`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`BuenaPhoneScript_CheckTimeOfDayCallee:`
Remove checkmorn/checkday/checknite macros 2018-02-03 02:20:13 +00:00			`checktime MORN`
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`iftrue .morn`
Remove checkmorn/checkday/checknite macros 2018-02-03 02:20:13 +00:00			`checktime DAY`
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`iftrue .day`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneNiteAnswerText`
Rename buttonsound to promptbutton 2019-11-03 17:48:54 +00:00			`promptbutton`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.morn`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneMorningAnswerText`
Rename buttonsound to promptbutton 2019-11-03 17:48:54 +00:00			`promptbutton`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.day`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneDayAnswerText`
Rename buttonsound to promptbutton 2019-11-03 17:48:54 +00:00			`promptbutton`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`BuenaPhoneScript_AfterMidnightCallee:`
			`writetext BuenaPhoneMidnightAnswerText`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`BuenaPhoneScript_CheckTimeOfDayCaller:`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 19:31:59 +00:00			`readvar VAR_HOUR`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`ifgreater 17, BuenaPhoneScript_AfterMidnightCaller`
Remove checkmorn/checkday/checknite macros 2018-02-03 02:20:13 +00:00			`checktime MORN`
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`iftrue .morn`
Remove checkmorn/checkday/checknite macros 2018-02-03 02:20:13 +00:00			`checktime DAY`
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`iftrue .day`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneNiteText`
Rename buttonsound to promptbutton 2019-11-03 17:48:54 +00:00			`promptbutton`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.morn`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneMorningText`
Rename buttonsound to promptbutton 2019-11-03 17:48:54 +00:00			`promptbutton`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.day`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneDayText`
Rename buttonsound to promptbutton 2019-11-03 17:48:54 +00:00			`promptbutton`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`BuenaPhoneScript_AfterMidnightCaller:`
			`writetext BuenaPhoneMidnightText`
Rename buttonsound to promptbutton 2019-11-03 17:48:54 +00:00			`promptbutton`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

Phone scripts and specials 2015-11-17 17:29:37 +00:00			`BuenaPhoneScript_Rocket:`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneRocketText`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`BuenaPhoneScript_RandomCaller:`
Update some event flags. 2015-06-25 03:20:04 +00:00			`checkevent EVENT_BEAT_ELITE_FOUR`
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`iftrue .PostE4`
More enumeration of constants, more annotations of scripts. 2015-07-15 19:48:44 +00:00			`random 11`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .Jumptable`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`.PostE4:`
More enumeration of constants, more annotations of scripts. 2015-07-15 19:48:44 +00:00			`random 14`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Phone scripts and specials 2015-11-17 17:29:37 +00:00			`.Jumptable:`
Script commands don't have underscores 2018-02-03 02:09:17 +00:00			`ifequal 0, .zero`
			`ifequal 1, .one`
			`ifequal 2, .two`
			`ifequal 3, .three`
			`ifequal 4, .four`
			`ifequal 5, .five`
			`ifequal 6, .six`
			`ifequal 7, .seven`
			`ifequal 8, .eight`
			`ifequal 9, .nine`
			`ifequal 10, .ten`
			`ifequal 11, .eleven`
			`ifequal 12, .twelve`
			`ifequal 13, .thirteen`
Phone scripts and specials 2015-11-17 17:29:37 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.zero`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneWentOutWithBenText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.one`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneReceptionistText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.two`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneLuckyNumberShowText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.three`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneStressedFromWorkText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.four`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneProfessorOakText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.five`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneGotAColdText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.six`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneRadioCardQuestionsText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.seven`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhonePikachuFanClubText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.eight`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneRadioTowerDirectorText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.nine`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneWhenDoYouRelaxText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.ten`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneStarterPokemonText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.eleven`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneCompanyVacationText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.twelve`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneBenAndFernText`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 20:39:31 +00:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.thirteen`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneGoingShoppingText`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`BuenaPhoneScript_RandomCallee:`
More enumeration of constants, more annotations of scripts. 2015-07-15 19:48:44 +00:00			`random 3`
Script commands don't have underscores 2018-02-03 02:09:17 +00:00			`ifequal 0, .zero`
			`ifequal 1, .one`
			`ifequal 2, .two`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.zero`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneFavoriteSlotMachineAnswerText`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.one`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhonePokegearAnswerText`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 19:01:49 +00:00			`.two`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`writetext BuenaPhoneCoopedUpInRadioTowerAnswerText`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-23 06:06:11 +00:00			`end`
Phone scripts and specials 2015-11-17 17:29:37 +00:00
data/phone_text → data/phone/text 2018-01-10 00:51:30 +00:00			`INCLUDE "data/phone/text/buena.asm"`