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

BuenaPhoneCalleeScript:
	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
	iftrue BuenaPhoneScript_Rocket
	readvar VAR_HOUR
	ifgreater 17, BuenaPhoneScript_AfterMidnight1
	scall BuenaPhoneScript_CheckTimeOfDay1
	sjump BuenaPhoneScript_Random1

BuenaPhoneCallerScript:
	checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
	iftrue BuenaPhoneScript_Rocket
	scall BuenaPhoneScript_CheckTimeOfDay2
	sjump BuenaPhoneScript_Random2

BuenaPhoneScript_CheckTimeOfDay1:
	checktime MORN
	iftrue .morn
	checktime DAY
	iftrue .day
	writetext UnknownText_0xa0d42
	buttonsound
	end

.morn
	writetext UnknownText_0xa0c28
	buttonsound
	end

.day
	writetext UnknownText_0xa0c72
	buttonsound
	end

BuenaPhoneScript_AfterMidnight1:
	writetext UnknownText_0xa0caf
	end

BuenaPhoneScript_CheckTimeOfDay2:
	readvar VAR_HOUR
	ifgreater 17, BuenaPhoneScript_AfterMidnight2
	checktime MORN
	iftrue .morn
	checktime DAY
	iftrue .day
	writetext UnknownText_0xa0e29
	buttonsound
	end

.morn
	writetext UnknownText_0xa0d96
	buttonsound
	end

.day
	writetext UnknownText_0xa0dcf
	buttonsound
	end

BuenaPhoneScript_AfterMidnight2:
	writetext UnknownText_0xa0e01
	buttonsound
	end

BuenaPhoneScript_Rocket:
	writetext UnknownText_0xa0e5e
	end

BuenaPhoneScript_Random2:
	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 UnknownText_0xa0efb
	sjump .finish

.one
	writetext UnknownText_0xa0fcf
	sjump .finish

.two
	writetext UnknownText_0xa109d
	sjump .finish

.three
	writetext UnknownText_0xa1143
	sjump .finish

.four
	writetext UnknownText_0xa1244
	sjump .finish

.five
	writetext UnknownText_0xa1318
	sjump .finish

.six
	writetext UnknownText_0xa13d8
	sjump .finish

.seven
	writetext UnknownText_0xa1488
	sjump .finish

.eight
	writetext UnknownText_0xa15de
	sjump .finish

.nine
	writetext UnknownText_0xa1717
	sjump .finish

.ten
	writetext UnknownText_0xa183d
	sjump .finish

.eleven
	writetext UnknownText_0xa19b1
	sjump .finish

.twelve
	writetext UnknownText_0xa1ac0
	sjump .finish

.thirteen
	writetext UnknownText_0xa1bed

.finish
	end

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

.zero
	writetext UnknownText_0xa1c88
	end

.one
	writetext UnknownText_0xa1d5f
	end

.two
	writetext UnknownText_0xa1e2f
	end

INCLUDE "data/phone/text/buena.asm"
PhoneScript1 -> PhoneCalleeScript, and PhoneScript2 -> PhoneCallerScript 2018-12-31 13:32:04 -08:00			`BuenaPhoneCalleeScript:`
Fix mislabeled engine flags. 2015-07-10 05:12:28 -07:00			`checkflag ENGINE_ROCKETS_IN_RADIO_TOWER`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`iftrue BuenaPhoneScript_Rocket`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`readvar VAR_HOUR`
Script commands don't have underscores 2018-02-02 18:09:17 -08:00			`ifgreater 17, BuenaPhoneScript_AfterMidnight1`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`scall BuenaPhoneScript_CheckTimeOfDay1`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump BuenaPhoneScript_Random1`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
PhoneScript1 -> PhoneCalleeScript, and PhoneScript2 -> PhoneCallerScript 2018-12-31 13:32:04 -08:00			`BuenaPhoneCallerScript:`
Fix mislabeled engine flags. 2015-07-10 05:12:28 -07:00			`checkflag ENGINE_ROCKETS_IN_RADIO_TOWER`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`iftrue BuenaPhoneScript_Rocket`
			`scall BuenaPhoneScript_CheckTimeOfDay2`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump BuenaPhoneScript_Random2`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`BuenaPhoneScript_CheckTimeOfDay1:`
Remove checkmorn/checkday/checknite macros 2018-02-02 18:20:13 -08:00			`checktime MORN`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`iftrue .morn`
Remove checkmorn/checkday/checknite macros 2018-02-02 18:20:13 -08:00			`checktime DAY`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`iftrue .day`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0d42`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.morn`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0c28`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.day`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0c72`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Phone scripts and specials 2015-11-17 09:29:37 -08:00			`BuenaPhoneScript_AfterMidnight1:`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0caf`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Phone scripts and specials 2015-11-17 09:29:37 -08:00			`BuenaPhoneScript_CheckTimeOfDay2:`
Rename more script commands for consistency and predictability Fixes #540 2019-03-10 12:31:59 -07:00			`readvar VAR_HOUR`
Script commands don't have underscores 2018-02-02 18:09:17 -08:00			`ifgreater 17, BuenaPhoneScript_AfterMidnight2`
Remove checkmorn/checkday/checknite macros 2018-02-02 18:20:13 -08:00			`checktime MORN`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`iftrue .morn`
Remove checkmorn/checkday/checknite macros 2018-02-02 18:20:13 -08:00			`checktime DAY`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`iftrue .day`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0e29`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.morn`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0d96`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.day`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0dcf`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Phone scripts and specials 2015-11-17 09:29:37 -08:00			`BuenaPhoneScript_AfterMidnight2:`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0e01`
buttonsound 2015-11-29 19:29:45 -08:00			`buttonsound`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Phone scripts and specials 2015-11-17 09:29:37 -08:00			`BuenaPhoneScript_Rocket:`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0e5e`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Phone scripts and specials 2015-11-17 09:29:37 -08:00			`BuenaPhoneScript_Random2:`
Update some event flags. 2015-06-24 20:20:04 -07:00			`checkevent EVENT_BEAT_ELITE_FOUR`
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`iftrue .PostE4`
More enumeration of constants, more annotations of scripts. 2015-07-15 12:48:44 -07:00			`random 11`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .Jumptable`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`.PostE4:`
More enumeration of constants, more annotations of scripts. 2015-07-15 12:48:44 -07:00			`random 14`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Phone scripts and specials 2015-11-17 09:29:37 -08:00			`.Jumptable:`
Script commands don't have underscores 2018-02-02 18:09:17 -08: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 09:29:37 -08:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.zero`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0efb`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.one`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa0fcf`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.two`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa109d`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.three`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1143`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.four`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1244`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.five`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1318`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.six`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa13d8`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.seven`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1488`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.eight`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa15de`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.nine`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1717`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.ten`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa183d`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.eleven`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa19b1`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.twelve`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1ac0`
Rename some call/jump script commands to avoid confusion with jr/jp asm instructions Fixes #580 2019-03-10 13:39:31 -07:00			`sjump .finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.thirteen`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1bed`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.finish`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Phone scripts and specials 2015-11-17 09:29:37 -08:00			`BuenaPhoneScript_Random1:`
More enumeration of constants, more annotations of scripts. 2015-07-15 12:48:44 -07:00			`random 3`
Script commands don't have underscores 2018-02-02 18:09:17 -08: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-22 23:06:11 -07:00
Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.zero`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1c88`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.one`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1d5f`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`

Local labels starting with lowercase letters are no longer decorated with a trailing colon 2016-04-10 12:01:49 -07:00			`.two`
Stop using the preprocessor. 2015-01-20 00:01:23 -08:00			`writetext UnknownText_0xa1e2f`
Dump the phone scripts. This is one of the last major incbins. The rest is mostly mobile code. 2014-07-22 23:06:11 -07:00			`end`
Phone scripts and specials 2015-11-17 09:29:37 -08:00
data/phone_text → data/phone/text 2018-01-09 16:51:30 -08:00			`INCLUDE "data/phone/text/buena.asm"`