pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2025-01-23 09:16:20 -08:00
Code Issues Packages Projects Releases Wiki Activity

Rename more script commands for consistency and predictability

Browse Source 
Fixes #540
This commit is contained in:
Rangi 2019-03-10 15:31:59 -04:00
parent 6393ecb7e5
commit e002b536af
157 changed files with 1494 additions and 1004 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
constants/battle_tower_constants.asm
View File

@ -7,7 +7,7 @@ BATTLETOWER_NUM_UNIQUE_TRAINERS EQU 70
BATTLETOWER_TRAINERDATALENGTH EQU $24 BATTLETOWER_TRAINERDATALENGTH EQU $24
BATTLE_TOWER_STRUCT_LENGTH EQUS "(NAME_LENGTH + BATTLETOWER_PARTY_LENGTH * NICKNAMED_MON_STRUCT_LENGTH + BATTLETOWER_TRAINERDATALENGTH)" BATTLE_TOWER_STRUCT_LENGTH EQUS "(NAME_LENGTH + BATTLETOWER_PARTY_LENGTH * NICKNAMED_MON_STRUCT_LENGTH + BATTLETOWER_TRAINERDATALENGTH)"
; BattleTowerAction writebyte arguments (see engine/events/battle_tower/battle_tower.asm) ; BattleTowerAction setval arguments (see engine/events/battle_tower/battle_tower.asm)
const_def const_def
const BATTLETOWERACTION_CHECK_EXPLANATION_READ const BATTLETOWERACTION_CHECK_EXPLANATION_READ
const BATTLETOWERACTION_SET_EXPLANATION_READ const BATTLETOWERACTION_SET_EXPLANATION_READ

28
constants/script_constants.asm
View File

@ -2,12 +2,12 @@
PLAYER EQU 0 PLAYER EQU 0
LAST_TALKED EQU -2 LAST_TALKED EQU -2
; memory constants ; string buffer constants
const_def const_def
const MEM_BUFFER_0 ; use wStringBuffer3 const STRING_BUFFER_3 ; use wStringBuffer3
const MEM_BUFFER_1 ; use wStringBuffer4 const STRING_BUFFER_4 ; use wStringBuffer4
const MEM_BUFFER_2 ; use wStringBuffer5 const STRING_BUFFER_5 ; use wStringBuffer5
NUM_MEM_BUFFERS EQU const_value NUM_STRING_BUFFERS EQU const_value
; checkmoney/takemoney accounts ; checkmoney/takemoney accounts
const_def const_def
@ -34,7 +34,13 @@ NUM_MEM_BUFFERS EQU const_value
const PHONE_CONTACTS_FULL ; 1 const PHONE_CONTACTS_FULL ; 1
const PHONE_CONTACT_REFUSED ; 2 const PHONE_CONTACT_REFUSED ; 2
; writecode/checkcode arguments ; trainertext arguments
const_def
const TRAINERTEXT_SEEN
const TRAINERTEXT_WIN
const TRAINERTEXT_LOSS
; readvar/writevar/loadvar arguments
; _GetVarAction.VarActionTable indexes (see engine/overworld/variables.asm) ; _GetVarAction.VarActionTable indexes (see engine/overworld/variables.asm)
const_def const_def
const VAR_STRINGBUFFER2 ; 00 const VAR_STRINGBUFFER2 ; 00
@ -223,7 +229,7 @@ NUM_FRUIT_TREES EQU const_value + -1
const SWARM_DUNSPARCE ; 0 const SWARM_DUNSPARCE ; 0
const SWARM_YANMA ; 1 const SWARM_YANMA ; 1
; ActivateFishingSwarm writebyte arguments ; ActivateFishingSwarm setval arguments
const_def const_def
const FISHSWARM_NONE ; 0 const FISHSWARM_NONE ; 0
const FISHSWARM_QWILFISH ; 1 const FISHSWARM_QWILFISH ; 1
@ -256,14 +262,14 @@ NUM_FRUIT_TREES EQU const_value + -1
const BUGCONTEST_BOXED_MON ; 1 const BUGCONTEST_BOXED_MON ; 1
const BUGCONTEST_NO_CATCH ; 2 const BUGCONTEST_NO_CATCH ; 2
; HealMachineAnim writebyte arguments ; HealMachineAnim setval arguments
; HealMachineAnim.Pointers indexes (see engine/events/heal_machine_anim.asm) ; HealMachineAnim.Pointers indexes (see engine/events/heal_machine_anim.asm)
const_def const_def
const HEALMACHINE_POKECENTER ; 0 const HEALMACHINE_POKECENTER ; 0
const HEALMACHINE_ELMS_LAB ; 1 const HEALMACHINE_ELMS_LAB ; 1
const HEALMACHINE_HALL_OF_FAME ; 2 const HEALMACHINE_HALL_OF_FAME ; 2
; UnownPuzzle writebyte arguments ; UnownPuzzle setval arguments
; LoadUnownPuzzlePiecesGFX.LZPointers indexes (see engine/games/unown_puzzle.asm) ; LoadUnownPuzzlePiecesGFX.LZPointers indexes (see engine/games/unown_puzzle.asm)
const_def const_def
const UNOWNPUZZLE_KABUTO ; 0 const UNOWNPUZZLE_KABUTO ; 0
@ -272,7 +278,7 @@ NUM_FRUIT_TREES EQU const_value + -1
const UNOWNPUZZLE_HO_OH ; 3 const UNOWNPUZZLE_HO_OH ; 3
NUM_UNOWN_PUZZLES EQU const_value NUM_UNOWN_PUZZLES EQU const_value
; DisplayUnownWords writebyte arguments ; DisplayUnownWords setval arguments
; UnownWalls and MenuHeaders_UnownWalls indexes (see data/events/unown_walls.asm) ; UnownWalls and MenuHeaders_UnownWalls indexes (see data/events/unown_walls.asm)
const_def const_def
const UNOWNWORDS_ESCAPE ; 0 const UNOWNWORDS_ESCAPE ; 0
@ -280,7 +286,7 @@ NUM_UNOWN_PUZZLES EQU const_value
const UNOWNWORDS_WATER ; 2 const UNOWNWORDS_WATER ; 2
const UNOWNWORDS_HO_OH ; 3 const UNOWNWORDS_HO_OH ; 3
; MoveTutor writebyte arguments ; MoveTutor setval arguments
const_def 1 const_def 1
const MOVETUTOR_FLAMETHROWER ; 1 const MOVETUTOR_FLAMETHROWER ; 1
const MOVETUTOR_THUNDERBOLT ; 2 const MOVETUTOR_THUNDERBOLT ; 2

4
docs/bugs_and_glitches.md
View File

@ -1388,8 +1388,8 @@ First, edit `UsedSurfScript` in [engine/events/overworld.asm](/engine/events/ove
callasm .empty_fn ; empty function callasm .empty_fn ; empty function
copybytetovar wBuffer2 readmem wBuffer2
writevarcode VAR_MOVEMENT writevar VAR_MOVEMENT
special ReplaceKrisSprite special ReplaceKrisSprite
special PlayMapMusic special PlayMapMusic

265
docs/event_commands.md
View File

@ -7,340 +7,555 @@ Until this document is filled out, the [G/S Scripting Compendium](https://hax.ii
## `$00`: <code>scall <i>script</i></code> ## `$00`: <code>scall <i>script</i></code>
## `$01`: <code>farscall <i>script</i></code> ## `$01`: <code>farscall <i>script</i></code>
## `$02`: <code>ptcall <i>script</i></code> ## `$02`: <code>ptcall <i>script</i></code>
## `$03`: <code>jump <i>script</i></code> ## `$03`: <code>jump <i>script</i></code>
## `$04`: <code>farjump <i>script</i></code> ## `$04`: <code>farjump <i>script</i></code>
## `$05`: <code>ptjump <i>script</i></code> ## `$05`: <code>ptjump <i>script</i></code>
## `$06`: <code>ifequal <i>byte</i>, <i>script</i></code> ## `$06`: <code>ifequal <i>byte</i>, <i>script</i></code>
## `$07`: <code>ifnotequal <i>byte</i>, <i>script</i></code> ## `$07`: <code>ifnotequal <i>byte</i>, <i>script</i></code>
## `$08`: <code>iffalse <i>script</i></code> ## `$08`: <code>iffalse <i>script</i></code>
## `$09`: <code>iftrue <i>script</i></code> ## `$09`: <code>iftrue <i>script</i></code>
## `$0A`: <code>ifgreater <i>byte</i>, <i>script</i></code> ## `$0A`: <code>ifgreater <i>byte</i>, <i>script</i></code>
## `$0B`: <code>ifless <i>byte</i>, <i>script</i></code> ## `$0B`: <code>ifless <i>byte</i>, <i>script</i></code>
## `$0C`: <code>jumpstd <i>std_script</i></code> ## `$0C`: <code>jumpstd <i>std_script</i></code>
## `$0D`: <code>callstd <i>std_script</i></code> ## `$0D`: <code>callstd <i>std_script</i></code>
## `$0E`: <code>callasm <i>asm</i></code> ## `$0E`: <code>callasm <i>asm</i></code>
## `$0F`: <code>special <i>special_pointer</i></code> ## `$0F`: <code>special <i>special_pointer</i></code>
## `$10`: <code>ptcallasm <i>asm</i></code> ## `$10`: <code>ptcallasm <i>asm</i></code>
## `$11`: <code>checkmapscene <i>map</i></code> ## `$11`: <code>checkmapscene <i>map</i></code>
## `$12`: <code>setmapscene <i>map</i>, <i>scene_id</i></code> ## `$12`: <code>setmapscene <i>map</i>, <i>scene_id</i></code>
## `$13`: `checkscene` ## `$13`: `checkscene`
## `$14`: <code>setscene <i>scene_id</i></code> ## `$14`: <code>setscene <i>scene_id</i></code>
## `$15`: <code>writebyte <i>value</i></code>
## `$16`: <code>addvar <i>value</i></code> ## `$15`: <code>setval <i>value</i></code>
<code>[wScriptVar] = <i>value</i></code>
## `$16`: <code>addval <i>value</i></code>
<code>[wScriptVar] += <i>value</i></code>
## `$17`: <code>random <i>value</i></code> ## `$17`: <code>random <i>value</i></code>
## `$18`: `checkver` ## `$18`: `checkver`
## `$19`: <code>copybytetovar <i>address</i></code>
## `$1A`: <code>copyvartobyte <i>address</i></code> ## `$19`: <code>readmem <i>address</i></code>
## `$1B`: <code>loadvar <i>address</i>, <i>value</i></code> <code>[wScriptVar] = [<i>address</i>]</code>
## `$1C`: <code>checkcode <i>variable</i></code>
## `$1D`: <code>writevarcode <i>variable</i></code> ## `$1A`: <code>writemem <i>address</i></code>
<code>[<i>address</i>] = [wScriptVar]</code>
## `$1B`: <code>loadmem <i>address</i>, <i>value</i></code>
<code>[<i>address</i>] = <i>value</i></code>
## `$1C`: <code>readvar <i>variable</i></code>
<code>[wScriptVar] = GetVarAction(<i>variable</i>)</code>
## `$1D`: <code>writevar <i>variable</i></code>
<code>GetVarAction(<i>variable</i>) = [wScriptVar]</code>
## `$1E`: <code>loadvar <i>variable</i>, <i>value</i></code>
<code>GetVarAction(<i>variable</i>) = <i>value</i></code>
## `$1E`: <code>writecode <i>variable</i>, <i>value</i></code>
## `$1F`: <code>giveitem <i>item_id</i>[, <i>quantity</i>=1]</code> ## `$1F`: <code>giveitem <i>item_id</i>[, <i>quantity</i>=1]</code>
## `$20`: <code>takeitem <i>item_id</i>[, <i>quantity</i>=1]</code> ## `$20`: <code>takeitem <i>item_id</i>[, <i>quantity</i>=1]</code>
## `$21`: <code>checkitem <i>item_id</i></code> ## `$21`: <code>checkitem <i>item_id</i></code>
## `$22`: <code>givemoney <i>account</i>, <i>value</i></code> ## `$22`: <code>givemoney <i>account</i>, <i>value</i></code>
## `$23`: <code>takemoney <i>account</i>, <i>value</i></code> ## `$23`: <code>takemoney <i>account</i>, <i>value</i></code>
## `$24`: <code>checkmoney <i>account</i>, <i>value</i></code> ## `$24`: <code>checkmoney <i>account</i>, <i>value</i></code>
## `$25`: <code>givecoins <i>value</i></code> ## `$25`: <code>givecoins <i>value</i></code>
## `$26`: <code>takecoins <i>value</i></code> ## `$26`: <code>takecoins <i>value</i></code>
## `$27`: <code>checkcoins <i>value</i></code> ## `$27`: <code>checkcoins <i>value</i></code>
## `$28`: <code>addcellnum <i>contact_id</i></code> ## `$28`: <code>addcellnum <i>contact_id</i></code>
## `$29`: <code>delcellnum <i>contact_id</i></code> ## `$29`: <code>delcellnum <i>contact_id</i></code>
## `$2A`: <code>checkcellnum <i>contact_id</i></code> ## `$2A`: <code>checkcellnum <i>contact_id</i></code>
## `$2B`: <code>checktime <i>time</i></code> ## `$2B`: <code>checktime <i>time</i></code>
## `$2C`: <code>checkpoke <i>mon_id</i></code> ## `$2C`: <code>checkpoke <i>mon_id</i></code>
## `$2D`: <code>givepoke <i>mon_id</i>, <i>level</i>[, <i>item</i>=0[, <i>trainer</i>=0, <i>ot_name</i>, <i>nickname</i>]]</code> ## `$2D`: <code>givepoke <i>mon_id</i>, <i>level</i>[, <i>item</i>=0[, <i>trainer</i>=0, <i>ot_name</i>, <i>nickname</i>]]</code>
## `$2E`: <code>giveegg <i>mon_id</i>, <i>level</i></code> ## `$2E`: <code>giveegg <i>mon_id</i>, <i>level</i></code>
## `$2F`: <code>givepokemail <i>pointer</i></code> ## `$2F`: <code>givepokemail <i>pointer</i></code>
## `$30`: <code>checkpokemail <i>pointer</i></code> ## `$30`: <code>checkpokemail <i>pointer</i></code>
## `$31`: <code>checkevent <i>event_flag</i></code> ## `$31`: <code>checkevent <i>event_flag</i></code>
## `$32`: <code>clearevent <i>event_flag</i></code> ## `$32`: <code>clearevent <i>event_flag</i></code>
## `$33`: <code>setevent <i>event_flag</i></code> ## `$33`: <code>setevent <i>event_flag</i></code>
## `$34`: <code>checkflag <i>engine_flag</i></code> ## `$34`: <code>checkflag <i>engine_flag</i></code>
## `$35`: <code>clearflag <i>engine_flag</i></code> ## `$35`: <code>clearflag <i>engine_flag</i></code>
## `$36`: <code>setflag <i>engine_flag</i></code> ## `$36`: <code>setflag <i>engine_flag</i></code>
## `$37`: `wildon` ## `$37`: `wildon`
## `$38`: `wildoff` ## `$38`: `wildoff`
## `$39`: <code>xycompare <i>pointer</i></code> ## `$39`: <code>xycompare <i>pointer</i></code>
## `$3A`: <code>warpmod <i>warp_id</i>, <i>map</i></code> ## `$3A`: <code>warpmod <i>warp_id</i>, <i>map</i></code>
## `$3B`: <code>blackoutmod <i>map</i></code> ## `$3B`: <code>blackoutmod <i>map</i></code>
## `$3C`: <code>warp <i>map</i>, <i>x</i>, <i>y</i></code> ## `$3C`: <code>warp <i>map</i>, <i>x</i>, <i>y</i></code>
## `$3D`: <code>readmoney <i>account</i>, <i>memory</i></code>
## `$3E`: <code>readcoins <i>memory</i></code> ## `$3D`: <code>getmoney <i>string_buffer</i>, <i>account</i></code>
## `$3F`: <code>vartomem <i>memory</i></code> <code>GetStringBuffer(<i>string_buffer</i>) = PrintNum(GetMoneyAccount(<i>account</i>))</code>
## `$40`: <code>pokenamemem <i>mon_id</i>, <i>memory</i></code>
## `$41`: <code>itemtotext <i>item_id</i>, <i>memory</i></code> ## `$3E`: <code>getcoins <i>string_buffer</i></code>
## `$42`: <code>mapnametotext <i>memory</i></code> <code>GetStringBuffer(<i>string_buffer</i>) = PrintNum([wCoins])</code>
## `$43`: <code>trainertotext <i>trainer_id</i>, <i>trainer_group</i>, <i>memory</i></code>
## `$44`: <code>stringtotext <i>text_pointer</i>, <i>memory</i></code> ## `$3F`: <code>getnum <i>string_buffer</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = PrintNum([wScriptVar])</code>
## `$40`: <code>getmonname <i>string_buffer</i>, <i>mon_id</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = GetPokemonName(<i>mon_id</i>)</code>
If <code><i>mon_id</i></code> = `USE_SCRIPT_VAR`, then it uses `[wScriptVar]` instead.
## `$41`: <code>getitemname <i>string_buffer</i>, <i>item_id</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = GetItemName(<i>item_id</i>)</code>
If <code><i>item_id</i></code> = `USE_SCRIPT_VAR`, then it uses `[wScriptVar]` instead.
## `$42`: <code>getcurlandmarkname <i>string_buffer</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = GetLandmarkName(GetWorldMapLocation())</code>
## `$43`: <code>gettrainername <i>string_buffer</i>, <i>trainer_group</i>, <i>trainer_id</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = GetTrainerName(<i>trainer_group</i>, <i>trainer_id</i>)</code>
## `$44`: <code>getstring <i>string_buffer</i>, <i>text_pointer</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = CopyName1([wScriptBank], <i>text_pointer</i>)</code>
## `$45`: `itemnotify` ## `$45`: `itemnotify`
## `$46`: `pocketisfull` ## `$46`: `pocketisfull`
## `$47`: `opentext` ## `$47`: `opentext`
## `$48`: <code>refreshscreen [<i>dummy</i>=0]</code> ## `$48`: <code>refreshscreen [<i>dummy</i>=0]</code>
## `$49`: `closetext` ## `$49`: `closetext`
## `$4A`: <code>loadbytec2cf <i>byte</i></code> ## `$4A`: <code>loadbytec2cf <i>byte</i></code>
## `$4B`: <code>farwritetext <i>text_pointer</i></code> ## `$4B`: <code>farwritetext <i>text_pointer</i></code>
## `$4C`: <code>writetext <i>text_pointer</i></code> ## `$4C`: <code>writetext <i>text_pointer</i></code>
## `$4D`: <code>repeattext <i>byte1</i>, <i>byte2</i></code> ## `$4D`: <code>repeattext <i>byte1</i>, <i>byte2</i></code>
## `$4E`: `yesorno` ## `$4E`: `yesorno`
## `$4F`: <code>loadmenu <i>menu_header</i></code> ## `$4F`: <code>loadmenu <i>menu_header</i></code>
## `$50`: `closewindow` ## `$50`: `closewindow`
## `$51`: <code>jumptextfaceplayer <i>text_pointer</i></code> ## `$51`: <code>jumptextfaceplayer <i>text_pointer</i></code>
## `$52`: <code>farjumptext <i>text_pointer</i></code> ## `$52`: <code>farjumptext <i>text_pointer</i></code>
## `$53`: <code>jumptext <i>text_pointer</i></code> ## `$53`: <code>jumptext <i>text_pointer</i></code>
## `$54`: `waitbutton` ## `$54`: `waitbutton`
## `$55`: `buttonsound` ## `$55`: `buttonsound`
## `$56`: <code>pokepic <i>mon_id</i></code> ## `$56`: <code>pokepic <i>mon_id</i></code>
## `$57`: `closepokepic` ## `$57`: `closepokepic`
## `$58`: `_2dmenu` ## `$58`: `_2dmenu`
## `$59`: `verticalmenu` ## `$59`: `verticalmenu`
## `$5A`: `loadpikachudata` ## `$5A`: `loadpikachudata`
## `$5B`: `randomwildmon` ## `$5B`: `randomwildmon`
## `$5C`: `loadmemtrainer`
## `$5C`: `loadtemptrainer`
`[wOtherTrainer] = [wTempTrainer]`
## `$5D`: <code>loadwildmon <i>mon_id</i>, <i>level</i></code> ## `$5D`: <code>loadwildmon <i>mon_id</i>, <i>level</i></code>
## `$5E`: <code>loadtrainer <i>trainer_group</i>, <i>trainer_id</i></code> ## `$5E`: <code>loadtrainer <i>trainer_group</i>, <i>trainer_id</i></code>
## `$5F`: `startbattle` ## `$5F`: `startbattle`
## `$60`: `reloadmapafterbattle` ## `$60`: `reloadmapafterbattle`
## `$61`: <code>catchtutorial <i>byte</i></code> ## `$61`: <code>catchtutorial <i>byte</i></code>
## `$62`: <code>trainertext <i>which_text</i></code>
## `$62`: <code>trainertext <i>text_id</i></code>
## `$63`: <code>trainerflagaction <i>action</i></code> ## `$63`: <code>trainerflagaction <i>action</i></code>
## `$64`: <code>winlosstext <i>win_text_pointer</i>, <i>loss_text_pointer</i></code> ## `$64`: <code>winlosstext <i>win_text_pointer</i>, <i>loss_text_pointer</i></code>
## `$65`: `scripttalkafter` ## `$65`: `scripttalkafter`
## `$66`: `endifjustbattled` ## `$66`: `endifjustbattled`
## `$67`: `checkjustbattled` ## `$67`: `checkjustbattled`
## `$68`: <code>setlasttalked <i>object_id</i></code> ## `$68`: <code>setlasttalked <i>object_id</i></code>
## `$69`: <code>applymovement <i>object_id</i>, <i>data_pointer</i></code> ## `$69`: <code>applymovement <i>object_id</i>, <i>data_pointer</i></code>
## `$6A`: <code>applymovement2 <i>data_pointer</i></code>
## `$6A`: <code>applymovementlasttalked <i>data_pointer</i></code>
## `$6B`: `faceplayer` ## `$6B`: `faceplayer`
## `$6C`: <code>faceobject <i>object1</i>, <i>object2</i></code> ## `$6C`: <code>faceobject <i>object1</i>, <i>object2</i></code>
## `$6D`: <code>variablesprite <i>variable_sprite_id</i>, <i>sprite_id</i></code> ## `$6D`: <code>variablesprite <i>variable_sprite_id</i>, <i>sprite_id</i></code>
## `$6E`: <code>disappear <i>object_id</i></code> ## `$6E`: <code>disappear <i>object_id</i></code>
## `$6F`: <code>appear <i>object_id</i></code> ## `$6F`: <code>appear <i>object_id</i></code>
## `$70`: <code>follow <i>object2</i>, <i>object1</i></code> ## `$70`: <code>follow <i>object2</i>, <i>object1</i></code>
## `$71`: `stopfollow` ## `$71`: `stopfollow`
## `$72`: <code>moveobject <i>object_id</i>, <i>x</i>, <i>y</i></code> ## `$72`: <code>moveobject <i>object_id</i>, <i>x</i>, <i>y</i></code>
## `$73`: <code>writeobjectxy <i>object_id</i></code> ## `$73`: <code>writeobjectxy <i>object_id</i></code>
## `$74`: <code>loademote <i>emote_id</i></code> ## `$74`: <code>loademote <i>emote_id</i></code>
## `$75`: <code>showemote <i>emote_id</i>, <i>object_id</i>, <i>length</i></code> ## `$75`: <code>showemote <i>emote_id</i>, <i>object_id</i>, <i>length</i></code>
## `$76`: <code>turnobject <i>object_id</i>, <i>facing</i></code> ## `$76`: <code>turnobject <i>object_id</i>, <i>facing</i></code>
## `$77`: <code>follownotexact <i>object2</i>, <i>object1</i></code> ## `$77`: <code>follownotexact <i>object2</i>, <i>object1</i></code>
## `$78`: <code>earthquake <i>param</i></code> ## `$78`: <code>earthquake <i>param</i></code>
## `$79`: <code>changemap <i>bank</i>, <i>blockdata_pointer</i></code>
## `$79`: <code>changemapblocks <i>blockdata_pointer</i></code>
<code>ChangeMap(<i>blockdata_pointer</i>)</code>
## `$7A`: <code>changeblock <i>x</i>, <i>y</i>, <i>block</i></code> ## `$7A`: <code>changeblock <i>x</i>, <i>y</i>, <i>block</i></code>
## `$7B`: `reloadmap` ## `$7B`: `reloadmap`
## `$7C`: `reloadmappart` ## `$7C`: `reloadmappart`
## `$7D`: <code>writecmdqueue <i>queue_pointer</i></code> ## `$7D`: <code>writecmdqueue <i>queue_pointer</i></code>
## `$7E`: <code>delcmdqueue <i>byte</i></code> ## `$7E`: <code>delcmdqueue <i>byte</i></code>
## `$7F`: <code>playmusic <i>music_id</i></code> ## `$7F`: <code>playmusic <i>music_id</i></code>
## `$80`: `encountermusic` ## `$80`: `encountermusic`
## `$81`: <code>musicfadeout <i>music_id</i>, <i>length</i></code> ## `$81`: <code>musicfadeout <i>music_id</i>, <i>length</i></code>
## `$82`: `playmapmusic` ## `$82`: `playmapmusic`
## `$83`: `dontrestartmapmusic` ## `$83`: `dontrestartmapmusic`
## `$84`: <code>cry <i>mon_id</i></code> ## `$84`: <code>cry <i>mon_id</i></code>
## `$85`: <code>playsound <i>sfx_id</i></code> ## `$85`: <code>playsound <i>sfx_id</i></code>
## `$86`: `waitsfx` ## `$86`: `waitsfx`
## `$87`: `warpsound` ## `$87`: `warpsound`
## `$88`: `specialsound` ## `$88`: `specialsound`
## `$89`: <code>autoinput <i>input_pointer</i></code> ## `$89`: <code>autoinput <i>input_pointer</i></code>
## `$8A`: <code>newloadmap <i>which_method</i></code> ## `$8A`: <code>newloadmap <i>which_method</i></code>
## `$8B`: <code>pause <i>length</i></code> ## `$8B`: <code>pause <i>length</i></code>
## `$8C`: <code>deactivatefacing <i>length</i></code> ## `$8C`: <code>deactivatefacing <i>length</i></code>
## `$8D`: <code>priorityjump <i>script</i></code> ## `$8D`: <code>priorityjump <i>script</i></code>
## `$8E`: `warpcheck` ## `$8E`: `warpcheck`
## `$8F`: <code>ptpriorityjump <i>script</i></code> ## `$8F`: <code>ptpriorityjump <i>script</i></code>
## `$90`: `return` ## `$90`: `return`
## `$91`: `end` ## `$91`: `end`
## `$92`: <code>reloadandreturn <i>which_method</i></code> ## `$92`: <code>reloadandreturn <i>which_method</i></code>
## `$93`: `endall` ## `$93`: `endall`
## `$94`: <code>pokemart <i>dialog_id</i>, <i>mart_id</i></code> ## `$94`: <code>pokemart <i>dialog_id</i>, <i>mart_id</i></code>
## `$95`: <code>elevator <i>floor_list</i></code> ## `$95`: <code>elevator <i>floor_list</i></code>
## `$96`: <code>trade <i>trade_id</i></code> ## `$96`: <code>trade <i>trade_id</i></code>
## `$97`: <code>askforphonenumber <i>contact_id</i></code> ## `$97`: <code>askforphonenumber <i>contact_id</i></code>
## `$98`: <code>phonecall <i>call_id</i></code> ## `$98`: <code>phonecall <i>call_id</i></code>
## `$99`: `hangup` ## `$99`: `hangup`
## `$9A`: <code>describedecoration <i>byte</i></code> ## `$9A`: <code>describedecoration <i>byte</i></code>
## `$9B`: <code>fruittree <i>tree_id</i></code> ## `$9B`: <code>fruittree <i>tree_id</i></code>
## `$9C`: <code>specialphonecall <i>call_id</i></code> ## `$9C`: <code>specialphonecall <i>call_id</i></code>
## `$9D`: `checkphonecall` ## `$9D`: `checkphonecall`
## `$9E`: <code>verbosegiveitem <i>item_id</i>[, <i>quantity</i>=1]</code> ## `$9E`: <code>verbosegiveitem <i>item_id</i>[, <i>quantity</i>=1]</code>
## `$9F`: <code>verbosegiveitem2 <i>item_id</i>, <i>variable</i></code>
## `$9F`: <code>verbosegiveitemvar <i>item_id</i>, <i>variable</i></code>
## `$A0`: <code>swarm <i>swarm_id</i>, <i>map</i></code> ## `$A0`: <code>swarm <i>swarm_id</i>, <i>map</i></code>
## `$A1`: `halloffame` ## `$A1`: `halloffame`
## `$A2`: `credits` ## `$A2`: `credits`
## `$A3`: <code>warpfacing <i>facing</i>, <i>map</i>, <i>x</i>, <i>y</i></code> ## `$A3`: <code>warpfacing <i>facing</i>, <i>map</i>, <i>x</i>, <i>y</i></code>
## `$A4`: <code>battletowertext <i>memory</i></code>
## `$A5`: <code>landmarktotext <i>landmark_id</i>, <i>memory</i></code> ## `$A4`: <code>battletowertext <i>bttext_id</i></code>
## `$A6`: <code>trainerclassname <i>trainer_group</i>, <i>memory</i></code>
## `$A7`: <code>name <i>type</i>, <i>id</i>, <i>memory</i></code> ## `$A5`: <code>getlandmarkname <i>string_buffer</i>, <i>landmark_id</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = GetLandmarkName(<i>landmark_id</i>)</code>
## `$A6`: <code>gettrainerclassname <i>string_buffer</i>, <i>trainer_group</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = GetName(TRAINER_NAME, <i>trainer_group</i>)</code>
## `$A7`: <code>getname <i>string_buffer</i>, <i>type</i>, <i>id</i></code>
<code>GetStringBuffer(<i>string_buffer</i>) = GetName(<i>type</i>, <i>id</i>)</code>
## `$A8`: <code>wait <i>duration</i></code> ## `$A8`: <code>wait <i>duration</i></code>
## `$A9`: `checksave` ## `$A9`: `checksave`

176
docs/move_effect_commands.md
View File

@ -5,354 +5,530 @@ Defined in [macros/scripts/battle_commands.asm](/macros/scripts/battle_commands.
## `$01`: `checkturn` ## `$01`: `checkturn`
## `$02`: `checkobedience` ## `$02`: `checkobedience`
## `$03`: `usedmovetext` ## `$03`: `usedmovetext`
## `$04`: `doturn` ## `$04`: `doturn`
## `$05`: `critical` ## `$05`: `critical`
## `$06`: `damagestats` ## `$06`: `damagestats`
## `$07`: `stab` ## `$07`: `stab`
## `$08`: `damagevariation` ## `$08`: `damagevariation`
## `$09`: `checkhit` ## `$09`: `checkhit`
## `$0A`: `lowersub` ## `$0A`: `lowersub`
## `$0B`: `hittargetnosub` ## `$0B`: `hittargetnosub`
## `$0C`: `raisesub` ## `$0C`: `raisesub`
## `$0D`: `failuretext` ## `$0D`: `failuretext`
## `$0E`: `applydamage` ## `$0E`: `applydamage`
## `$0F`: `criticaltext` ## `$0F`: `criticaltext`
## `$10`: `supereffectivetext` ## `$10`: `supereffectivetext`
## `$11`: `checkfaint` ## `$11`: `checkfaint`
## `$12`: `buildopponentrage` ## `$12`: `buildopponentrage`
## `$13`: `poisontarget` ## `$13`: `poisontarget`
## `$14`: `sleeptarget` ## `$14`: `sleeptarget`
## `$15`: `draintarget` ## `$15`: `draintarget`
## `$16`: `eatdream` ## `$16`: `eatdream`
## `$17`: `burntarget` ## `$17`: `burntarget`
## `$18`: `freezetarget` ## `$18`: `freezetarget`
## `$19`: `paralyzetarget` ## `$19`: `paralyzetarget`
## `$1A`: `selfdestruct` ## `$1A`: `selfdestruct`
## `$1B`: `mirrormove` ## `$1B`: `mirrormove`
## `$1C`: `statup` ## `$1C`: `statup`
## `$1D`: `statdown` ## `$1D`: `statdown`
## `$1E`: `payday` ## `$1E`: `payday`
## `$1F`: `conversion` ## `$1F`: `conversion`
## `$20`: `resetstats` ## `$20`: `resetstats`
## `$21`: `storeenergy` ## `$21`: `storeenergy`
## `$22`: `unleashenergy` ## `$22`: `unleashenergy`
## `$23`: `forceswitch` ## `$23`: `forceswitch`
## `$24`: `endloop` ## `$24`: `endloop`
## `$25`: `flinchtarget` ## `$25`: `flinchtarget`
## `$26`: `ohko` ## `$26`: `ohko`
## `$27`: `recoil` ## `$27`: `recoil`
## `$28`: `mist` ## `$28`: `mist`
## `$29`: `focusenergy` ## `$29`: `focusenergy`
## `$2A`: `confuse` ## `$2A`: `confuse`
## `$2B`: `confusetarget` ## `$2B`: `confusetarget`
## `$2C`: `heal` ## `$2C`: `heal`
## `$2D`: `transform` ## `$2D`: `transform`
## `$2E`: `screen` ## `$2E`: `screen`
## `$2F`: `poison` ## `$2F`: `poison`
## `$30`: `paralyze` ## `$30`: `paralyze`
## `$31`: `substitute` ## `$31`: `substitute`
## `$32`: `rechargenextturn` ## `$32`: `rechargenextturn`
## `$33`: `mimic` ## `$33`: `mimic`
## `$34`: `metronome` ## `$34`: `metronome`
## `$35`: `leechseed` ## `$35`: `leechseed`
## `$36`: `splash` ## `$36`: `splash`
## `$37`: `disable` ## `$37`: `disable`
## `$38`: `cleartext` ## `$38`: `cleartext`
## `$39`: `charge` ## `$39`: `charge`
## `$3A`: `checkcharge` ## `$3A`: `checkcharge`
## `$3B`: `traptarget` ## `$3B`: `traptarget`
## `$3C`: `effect0x3c` ## `$3C`: `effect0x3c`
## `$3D`: `rampage` ## `$3D`: `rampage`
## `$3E`: `checkrampage` ## `$3E`: `checkrampage`
## `$3F`: `constantdamage` ## `$3F`: `constantdamage`
## `$40`: `counter` ## `$40`: `counter`
## `$41`: `encore` ## `$41`: `encore`
## `$42`: `painsplit` ## `$42`: `painsplit`
## `$43`: `snore` ## `$43`: `snore`
## `$44`: `conversion2` ## `$44`: `conversion2`
## `$45`: `lockon` ## `$45`: `lockon`
## `$46`: `sketch` ## `$46`: `sketch`
## `$47`: `defrostopponent` ## `$47`: `defrostopponent`
## `$48`: `sleeptalk` ## `$48`: `sleeptalk`
## `$49`: `destinybond` ## `$49`: `destinybond`
## `$4A`: `spite` ## `$4A`: `spite`
## `$4B`: `falseswipe` ## `$4B`: `falseswipe`
## `$4C`: `healbell` ## `$4C`: `healbell`
## `$4D`: `kingsrock` ## `$4D`: `kingsrock`
## `$4E`: `triplekick` ## `$4E`: `triplekick`
## `$4F`: `kickcounter` ## `$4F`: `kickcounter`
## `$50`: `thief` ## `$50`: `thief`
## `$51`: `arenatrap` ## `$51`: `arenatrap`
## `$52`: `nightmare` ## `$52`: `nightmare`
## `$53`: `defrost` ## `$53`: `defrost`
## `$54`: `curse` ## `$54`: `curse`
## `$55`: `protect` ## `$55`: `protect`
## `$56`: `spikes` ## `$56`: `spikes`
## `$57`: `foresight` ## `$57`: `foresight`
## `$58`: `perishsong` ## `$58`: `perishsong`
## `$59`: `startsandstorm` ## `$59`: `startsandstorm`
## `$5A`: `endure` ## `$5A`: `endure`
## `$5B`: `checkcurl` ## `$5B`: `checkcurl`
## `$5C`: `rolloutpower` ## `$5C`: `rolloutpower`
## `$5D`: `effect0x5d` ## `$5D`: `effect0x5d`
## `$5E`: `furycutter` ## `$5E`: `furycutter`
## `$5F`: `attract` ## `$5F`: `attract`
## `$60`: `happinesspower` ## `$60`: `happinesspower`
## `$61`: `present` ## `$61`: `present`
## `$62`: `damagecalc` ## `$62`: `damagecalc`
## `$63`: `frustrationpower` ## `$63`: `frustrationpower`
## `$64`: `safeguard` ## `$64`: `safeguard`
## `$65`: `checksafeguard` ## `$65`: `checksafeguard`
## `$66`: `getmagnitude` ## `$66`: `getmagnitude`
## `$67`: `batonpass` ## `$67`: `batonpass`
## `$68`: `pursuit` ## `$68`: `pursuit`
## `$69`: `clearhazards` ## `$69`: `clearhazards`
## `$6A`: `healmorn` ## `$6A`: `healmorn`
## `$6B`: `healday` ## `$6B`: `healday`
## `$6C`: `healnite` ## `$6C`: `healnite`
## `$6D`: `hiddenpower` ## `$6D`: `hiddenpower`
## `$6E`: `startrain` ## `$6E`: `startrain`
## `$6F`: `startsun` ## `$6F`: `startsun`
## `$70`: `attackup` ## `$70`: `attackup`
## `$71`: `defenseup` ## `$71`: `defenseup`
## `$72`: `speedup` ## `$72`: `speedup`
## `$73`: `specialattackup` ## `$73`: `specialattackup`
## `$74`: `specialdefenseup` ## `$74`: `specialdefenseup`
## `$75`: `accuracyup` ## `$75`: `accuracyup`
## `$76`: `evasionup` ## `$76`: `evasionup`
## `$77`: `attackup2` ## `$77`: `attackup2`
## `$78`: `defenseup2` ## `$78`: `defenseup2`
## `$79`: `speedup2` ## `$79`: `speedup2`
## `$7A`: `specialattackup2` ## `$7A`: `specialattackup2`
## `$7B`: `specialdefenseup2` ## `$7B`: `specialdefenseup2`
## `$7C`: `accuracyup2` ## `$7C`: `accuracyup2`
## `$7D`: `evasionup2` ## `$7D`: `evasionup2`
## `$7E`: `attackdown` ## `$7E`: `attackdown`
## `$7F`: `defensedown` ## `$7F`: `defensedown`
## `$80`: `speeddown` ## `$80`: `speeddown`
## `$81`: `specialattackdown` ## `$81`: `specialattackdown`
## `$82`: `specialdefensedown` ## `$82`: `specialdefensedown`
## `$83`: `accuracydown` ## `$83`: `accuracydown`
## `$84`: `evasiondown` ## `$84`: `evasiondown`
## `$85`: `attackdown2` ## `$85`: `attackdown2`
## `$86`: `defensedown2` ## `$86`: `defensedown2`
## `$87`: `speeddown2` ## `$87`: `speeddown2`
## `$88`: `specialattackdown2` ## `$88`: `specialattackdown2`
## `$89`: `specialdefensedown2` ## `$89`: `specialdefensedown2`
## `$8A`: `accuracydown2` ## `$8A`: `accuracydown2`
## `$8B`: `evasiondown2` ## `$8B`: `evasiondown2`
## `$8C`: `statupmessage` ## `$8C`: `statupmessage`
## `$8D`: `statdownmessage` ## `$8D`: `statdownmessage`
## `$8E`: `statupfailtext` ## `$8E`: `statupfailtext`
## `$8F`: `statdownfailtext` ## `$8F`: `statdownfailtext`
## `$90`: `effectchance` ## `$90`: `effectchance`
## `$91`: `statdownanim` ## `$91`: `statdownanim`
## `$92`: `statupanim` ## `$92`: `statupanim`
## `$93`: `switchturn` ## `$93`: `switchturn`
## `$94`: `fakeout` ## `$94`: `fakeout`
## `$95`: `bellydrum` ## `$95`: `bellydrum`
## `$96`: `psychup` ## `$96`: `psychup`
## `$97`: `rage` ## `$97`: `rage`
## `$98`: `doubleflyingdamage` ## `$98`: `doubleflyingdamage`
## `$99`: `doubleundergrounddamage` ## `$99`: `doubleundergrounddamage`
## `$9A`: `mirrorcoat` ## `$9A`: `mirrorcoat`
## `$9B`: `checkfuturesight` ## `$9B`: `checkfuturesight`
## `$9C`: `futuresight` ## `$9C`: `futuresight`
## `$9D`: `doubleminimizedamage` ## `$9D`: `doubleminimizedamage`
## `$9E`: `skipsuncharge` ## `$9E`: `skipsuncharge`
## `$9F`: `thunderaccuracy` ## `$9F`: `thunderaccuracy`
## `$A0`: `teleport` ## `$A0`: `teleport`
## `$A1`: `beatup` ## `$A1`: `beatup`
## `$A2`: `ragedamage` ## `$A2`: `ragedamage`
## `$A3`: `resettypematchup` ## `$A3`: `resettypematchup`
## `$A4`: `allstatsup` ## `$A4`: `allstatsup`
## `$A5`: `bidefailtext` ## `$A5`: `bidefailtext`
## `$A6`: `raisesubnoanim` ## `$A6`: `raisesubnoanim`
## `$A7`: `lowersubnoanim` ## `$A7`: `lowersubnoanim`
## `$A8`: `beatupfailtext` ## `$A8`: `beatupfailtext`
## `$A9`: `clearmissdamage` ## `$A9`: `clearmissdamage`
## `$AA`: `movedelay` ## `$AA`: `movedelay`
## `$AB`: `hittarget` ## `$AB`: `hittarget`
## `$AC`: `tristatuschance` ## `$AC`: `tristatuschance`
## `$AD`: `supereffectivelooptext` ## `$AD`: `supereffectivelooptext`
## `$AE`: `startloop` ## `$AE`: `startloop`
## `$AF`: `curl` ## `$AF`: `curl`
## `$FE`: `endturn` ## `$FE`: `endturn`
## `$FF`: `endmove` ## `$FF`: `endmove`

39
docs/movement_commands.md
View File

@ -5,80 +5,119 @@ Defined in [macros/scripts/movement.asm](/macros/scripts/movement.asm) and [engi
## `$00`−`$03`: <code>turn_head <i>direction</i></code> ## `$00`−`$03`: <code>turn_head <i>direction</i></code>
## `$04`−`$07`: <code>turn_step <i>direction</i></code> ## `$04`−`$07`: <code>turn_step <i>direction</i></code>
## `$08`−`$0B`: <code>slow_step <i>direction</i></code> ## `$08`−`$0B`: <code>slow_step <i>direction</i></code>
## `$0C`−`$0F`: <code>step <i>direction</i></code> ## `$0C`−`$0F`: <code>step <i>direction</i></code>
## `$10`−`$13`: <code>big_step <i>direction</i></code> ## `$10`−`$13`: <code>big_step <i>direction</i></code>
## `$14`−`$17`: <code>slow_slide_step <i>direction</i></code> ## `$14`−`$17`: <code>slow_slide_step <i>direction</i></code>
## `$18`−`$1B`: <code>slide_step <i>direction</i></code> ## `$18`−`$1B`: <code>slide_step <i>direction</i></code>
## `$1C`−`$1F`: <code>fast_slide_step <i>direction</i></code> ## `$1C`−`$1F`: <code>fast_slide_step <i>direction</i></code>
## `$20`−`$23`: <code>turn_away <i>direction</i></code> ## `$20`−`$23`: <code>turn_away <i>direction</i></code>
## `$24`−`$27`: <code>turn_in <i>direction</i></code> ## `$24`−`$27`: <code>turn_in <i>direction</i></code>
## `$28`−`$2B`: <code>turn_waterfall <i>direction</i></code> ## `$28`−`$2B`: <code>turn_waterfall <i>direction</i></code>
## `$2C`−`$2F`: <code>slow_jump_step <i>direction</i></code> ## `$2C`−`$2F`: <code>slow_jump_step <i>direction</i></code>
## `$30`−`$33`: <code>jump_step <i>direction</i></code> ## `$30`−`$33`: <code>jump_step <i>direction</i></code>
## `$34`−`$37`: <code>fast_jump_step <i>direction</i></code> ## `$34`−`$37`: <code>fast_jump_step <i>direction</i></code>
## `$38`: `remove_sliding` ## `$38`: `remove_sliding`
## `$39`: `set_sliding` ## `$39`: `set_sliding`
## `$3A`: `remove_fixed_facing` ## `$3A`: `remove_fixed_facing`
## `$3B`: `fix_facing` ## `$3B`: `fix_facing`
## `$3C`: `show_object` ## `$3C`: `show_object`
## `$3D`: `hide_object` ## `$3D`: `hide_object`
## `$3E`−`$46`: <code>step_sleep <i>length</i></code> ## `$3E`−`$46`: <code>step_sleep <i>length</i></code>
## `$47`: `step_end` ## `$47`: `step_end`
## `$48`: <code>step_48 <i>param</i></code> ## `$48`: <code>step_48 <i>param</i></code>
## `$49`: `remove_object` ## `$49`: `remove_object`
## `$4A`: `step_loop` ## `$4A`: `step_loop`
## `$4B`: `step_4b` ## `$4B`: `step_4b`
## `$4C`: `teleport_from` ## `$4C`: `teleport_from`
## `$4D`: `teleport_to` ## `$4D`: `teleport_to`
## `$4E`: `skyfall` ## `$4E`: `skyfall`
## `$4F`: <code>step_dig <i>length</i></code> ## `$4F`: <code>step_dig <i>length</i></code>
## `$50`: `step_bump` ## `$50`: `step_bump`
## `$51`: `fish_got_bite` ## `$51`: `fish_got_bite`
## `$52`: `fish_cast_rod` ## `$52`: `fish_cast_rod`
## `$53`: `hide_emote` ## `$53`: `hide_emote`
## `$54`: `show_emote` ## `$54`: `show_emote`
## `$55`: <code>step_shake <i>displacement</i></code> ## `$55`: <code>step_shake <i>displacement</i></code>
## `$56`: `tree_shake` ## `$56`: `tree_shake`
## `$57`: <code>rock_smash <i>length</i></code> ## `$57`: <code>rock_smash <i>length</i></code>
## `$58`: <code>return_dig <i>length</i></code> ## `$58`: <code>return_dig <i>length</i></code>
## `$59`: `skyfall_top` ## `$59`: `skyfall_top`

4
engine/events/bug_contest/contest.asm
View File

@ -7,11 +7,11 @@ GiveParkBalls:
ret ret
BugCatchingContestBattleScript:: BugCatchingContestBattleScript::
writecode VAR_BATTLETYPE, BATTLETYPE_CONTEST loadvar VAR_BATTLETYPE, BATTLETYPE_CONTEST
randomwildmon randomwildmon
startbattle startbattle
reloadmapafterbattle reloadmapafterbattle
copybytetovar wParkBallsRemaining readmem wParkBallsRemaining
iffalse BugCatchingContestOutOfBallsScript iffalse BugCatchingContestOutOfBallsScript
end end

2
engine/events/forced_movement.asm
View File

@ -1,5 +1,5 @@
Script_ForcedMovement:: Script_ForcedMovement::
checkcode VAR_FACING readvar VAR_FACING
ifequal DOWN, .down ifequal DOWN, .down
ifequal UP, .up ifequal UP, .up
ifequal LEFT, .left ifequal LEFT, .left

6
engine/events/fruit_trees.asm
View File

@ -1,8 +1,8 @@
FruitTreeScript:: FruitTreeScript::
callasm GetCurTreeFruit callasm GetCurTreeFruit
opentext opentext
copybytetovar wCurFruit readmem wCurFruit
itemtotext USE_SCRIPT_VAR, MEM_BUFFER_0 getitemname STRING_BUFFER_3, USE_SCRIPT_VAR
writetext FruitBearingTreeText writetext FruitBearingTreeText
buttonsound buttonsound
callasm TryResetFruitTrees callasm TryResetFruitTrees
@ -14,7 +14,7 @@ FruitTreeScript::
.fruit .fruit
writetext HeyItsFruitText writetext HeyItsFruitText
copybytetovar wCurFruit readmem wCurFruit
giveitem ITEM_FROM_MEM giveitem ITEM_FROM_MEM
iffalse .packisfull iffalse .packisfull
buttonsound buttonsound

4
engine/events/misc_scripts_2.asm
View File

@ -12,8 +12,8 @@ RepelWoreOffScript::
HiddenItemScript:: HiddenItemScript::
opentext opentext
copybytetovar wEngineBuffer3 readmem wEngineBuffer3
itemtotext USE_SCRIPT_VAR, MEM_BUFFER_0 getitemname STRING_BUFFER_3, USE_SCRIPT_VAR
writetext .found_text writetext .found_text
giveitem ITEM_FROM_MEM giveitem ITEM_FROM_MEM
iffalse .bag_full iffalse .bag_full

26
engine/events/overworld.asm
View File

@ -414,8 +414,8 @@ UsedSurfScript:
callasm .empty_fn ; empty function callasm .empty_fn ; empty function
copybytetovar wBuffer2 readmem wBuffer2
writevarcode VAR_MOVEMENT writevar VAR_MOVEMENT
special ReplaceKrisSprite special ReplaceKrisSprite
special PlayMapMusic special PlayMapMusic
@ -624,7 +624,7 @@ FlyFunction:
farscall Script_AbortBugContest farscall Script_AbortBugContest
special WarpToSpawnPoint special WarpToSpawnPoint
callasm DelayLoadingNewSprites callasm DelayLoadingNewSprites
writecode VAR_MOVEMENT, PLAYER_NORMAL loadvar VAR_MOVEMENT, PLAYER_NORMAL
newloadmap MAPSETUP_FLY newloadmap MAPSETUP_FLY
callasm FlyToAnim callasm FlyToAnim
special WaitSFX special WaitSFX
@ -871,7 +871,7 @@ dig_incave
applymovement PLAYER, .DigOut applymovement PLAYER, .DigOut
farscall Script_AbortBugContest farscall Script_AbortBugContest
special WarpToSpawnPoint special WarpToSpawnPoint
writecode VAR_MOVEMENT, PLAYER_NORMAL loadvar VAR_MOVEMENT, PLAYER_NORMAL
newloadmap MAPSETUP_DOOR newloadmap MAPSETUP_DOOR
playsound SFX_WARP_FROM playsound SFX_WARP_FROM
applymovement PLAYER, .DigReturn applymovement PLAYER, .DigReturn
@ -958,7 +958,7 @@ TeleportFunction:
applymovement PLAYER, .TeleportFrom applymovement PLAYER, .TeleportFrom
farscall Script_AbortBugContest farscall Script_AbortBugContest
special WarpToSpawnPoint special WarpToSpawnPoint
writecode VAR_MOVEMENT, PLAYER_NORMAL loadvar VAR_MOVEMENT, PLAYER_NORMAL
newloadmap MAPSETUP_TELEPORT newloadmap MAPSETUP_TELEPORT
playsound SFX_WARP_FROM playsound SFX_WARP_FROM
applymovement PLAYER, .TeleportTo applymovement PLAYER, .TeleportTo
@ -1025,7 +1025,7 @@ Script_StrengthFromMenu:
Script_UsedStrength: Script_UsedStrength:
callasm SetStrengthFlag callasm SetStrengthFlag
writetext .UsedStrength writetext .UsedStrength
copybytetovar wBuffer6 readmem wBuffer6
cry 0 cry 0
pause 3 pause 3
writetext .StrengthAllowedItToMoveBoulders writetext .StrengthAllowedItToMoveBoulders
@ -1390,11 +1390,11 @@ RockSmashScript:
special WaitSFX special WaitSFX
playsound SFX_STRENGTH playsound SFX_STRENGTH
earthquake 84 earthquake 84
applymovement2 MovementData_0xcf55 applymovementlasttalked MovementData_0xcf55
disappear -2 disappear -2
callasm RockMonEncounter callasm RockMonEncounter
copybytetovar wTempWildMonSpecies readmem wTempWildMonSpecies
iffalse .done iffalse .done
randomwildmon randomwildmon
startbattle startbattle
@ -1609,7 +1609,7 @@ Fishing_CheckFacingUp:
Script_FishCastRod: Script_FishCastRod:
reloadmappart reloadmappart
loadvar hBGMapMode, $0 loadmem hBGMapMode, $0
special UpdateTimePals special UpdateTimePals
loademote EMOTE_ROD loademote EMOTE_ROD
callasm LoadFishingGFX callasm LoadFishingGFX
@ -1735,7 +1735,7 @@ BikeFunction:
Script_GetOnBike: Script_GetOnBike:
reloadmappart reloadmappart
special UpdateTimePals special UpdateTimePals
writecode VAR_MOVEMENT, PLAYER_BIKE loadvar VAR_MOVEMENT, PLAYER_BIKE
writetext GotOnTheBikeText writetext GotOnTheBikeText
waitbutton waitbutton
closetext closetext
@ -1743,7 +1743,7 @@ Script_GetOnBike:
end end
Script_GetOnBike_Register: Script_GetOnBike_Register:
writecode VAR_MOVEMENT, PLAYER_BIKE loadvar VAR_MOVEMENT, PLAYER_BIKE
closetext closetext
special ReplaceKrisSprite special ReplaceKrisSprite
end end
@ -1755,7 +1755,7 @@ Script_GetOnBike_Register:
Script_GetOffBike: Script_GetOffBike:
reloadmappart reloadmappart
special UpdateTimePals special UpdateTimePals
writecode VAR_MOVEMENT, PLAYER_NORMAL loadvar VAR_MOVEMENT, PLAYER_NORMAL
writetext GotOffTheBikeText writetext GotOffTheBikeText
waitbutton waitbutton
@ -1766,7 +1766,7 @@ FinishGettingOffBike:
end end
Script_GetOffBike_Register: Script_GetOffBike_Register:
writecode VAR_MOVEMENT, PLAYER_NORMAL loadvar VAR_MOVEMENT, PLAYER_NORMAL
jump FinishGettingOffBike jump FinishGettingOffBike
Script_CantGetOffBike: Script_CantGetOffBike:

70
engine/events/std_scripts.asm
View File

@ -113,7 +113,7 @@ PokecenterNurseScript:
pause 10 pause 10
special HealParty special HealParty
playmusic MUSIC_NONE playmusic MUSIC_NONE
writebyte HEALMACHINE_POKECENTER setval HEALMACHINE_POKECENTER
special HealMachineAnim special HealMachineAnim
pause 30 pause 30
special RestartMapMusic special RestartMapMusic
@ -203,7 +203,7 @@ HomepageScript:
Radio1Script: Radio1Script:
opentext opentext
writebyte MAPRADIO_POKEMON_CHANNEL setval MAPRADIO_POKEMON_CHANNEL
special MapRadio special MapRadio
closetext closetext
end end
@ -211,7 +211,7 @@ Radio1Script:
Radio2Script: Radio2Script:
; Lucky Channel ; Lucky Channel
opentext opentext
writebyte MAPRADIO_LUCKY_CHANNEL setval MAPRADIO_LUCKY_CHANNEL
special MapRadio special MapRadio
closetext closetext
end end
@ -244,32 +244,32 @@ MartSignScript:
farjumptext MartSignText farjumptext MartSignText
DayToTextScript: DayToTextScript:
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal MONDAY, .Monday ifequal MONDAY, .Monday
ifequal TUESDAY, .Tuesday ifequal TUESDAY, .Tuesday
ifequal WEDNESDAY, .Wednesday ifequal WEDNESDAY, .Wednesday
ifequal THURSDAY, .Thursday ifequal THURSDAY, .Thursday
ifequal FRIDAY, .Friday ifequal FRIDAY, .Friday
ifequal SATURDAY, .Saturday ifequal SATURDAY, .Saturday
stringtotext .SundayText, MEM_BUFFER_0 getstring STRING_BUFFER_3, .SundayText
end end
.Monday: .Monday:
stringtotext .MondayText, MEM_BUFFER_0 getstring STRING_BUFFER_3, .MondayText
end end
.Tuesday: .Tuesday:
stringtotext .TuesdayText, MEM_BUFFER_0 getstring STRING_BUFFER_3, .TuesdayText
end end
.Wednesday: .Wednesday:
stringtotext .WednesdayText, MEM_BUFFER_0 getstring STRING_BUFFER_3, .WednesdayText
end end
.Thursday: .Thursday:
stringtotext .ThursdayText, MEM_BUFFER_0 getstring STRING_BUFFER_3, .ThursdayText
end end
.Friday: .Friday:
stringtotext .FridayText, MEM_BUFFER_0 getstring STRING_BUFFER_3, .FridayText
end end
.Saturday: .Saturday:
stringtotext .SaturdayText, MEM_BUFFER_0 getstring STRING_BUFFER_3, .SaturdayText
end end
.SundayText: .SundayText:
db "SUNDAY@" db "SUNDAY@"
@ -321,7 +321,7 @@ BugContestResultsScript:
farwritetext ContestResults_ReadyToJudgeText farwritetext ContestResults_ReadyToJudgeText
waitbutton waitbutton
special BugContestJudging special BugContestJudging
vartomem MEM_BUFFER_0 getnum STRING_BUFFER_3
ifequal 1, BugContestResults_FirstPlace ifequal 1, BugContestResults_FirstPlace
ifequal 2, BugContestResults_SecondPlace ifequal 2, BugContestResults_SecondPlace
ifequal 3, BugContestResults_ThirdPlace ifequal 3, BugContestResults_ThirdPlace
@ -383,7 +383,7 @@ BugContestResults_CleanUp:
BugContestResults_FirstPlace: BugContestResults_FirstPlace:
setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1 setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
itemtotext SUN_STONE, MEM_BUFFER_1 getitemname STRING_BUFFER_4, SUN_STONE
farwritetext ContestResults_PlayerWonAPrizeText farwritetext ContestResults_PlayerWonAPrizeText
waitbutton waitbutton
verbosegiveitem SUN_STONE verbosegiveitem SUN_STONE
@ -391,7 +391,7 @@ BugContestResults_FirstPlace:
jump BugContestResults_ReturnAfterWinnersPrize jump BugContestResults_ReturnAfterWinnersPrize
BugContestResults_SecondPlace: BugContestResults_SecondPlace:
itemtotext EVERSTONE, MEM_BUFFER_1 getitemname STRING_BUFFER_4, EVERSTONE
farwritetext ContestResults_PlayerWonAPrizeText farwritetext ContestResults_PlayerWonAPrizeText
waitbutton waitbutton
verbosegiveitem EVERSTONE verbosegiveitem EVERSTONE
@ -399,7 +399,7 @@ BugContestResults_SecondPlace:
jump BugContestResults_ReturnAfterWinnersPrize jump BugContestResults_ReturnAfterWinnersPrize
BugContestResults_ThirdPlace: BugContestResults_ThirdPlace:
itemtotext GOLD_BERRY, MEM_BUFFER_1 getitemname STRING_BUFFER_4, GOLD_BERRY
farwritetext ContestResults_PlayerWonAPrizeText farwritetext ContestResults_PlayerWonAPrizeText
waitbutton waitbutton
verbosegiveitem GOLD_BERRY verbosegiveitem GOLD_BERRY
@ -614,7 +614,7 @@ InitializeEventsScript:
AskNumber1MScript: AskNumber1MScript:
special RandomPhoneMon special RandomPhoneMon
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -699,7 +699,7 @@ AskNumber1MScript:
AskNumber2MScript: AskNumber2MScript:
special RandomPhoneMon special RandomPhoneMon
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -790,7 +790,7 @@ RegisteredNumberMScript:
end end
NumberAcceptedMScript: NumberAcceptedMScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -914,7 +914,7 @@ NumberAcceptedMScript:
end end
NumberDeclinedMScript: NumberDeclinedMScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -1038,7 +1038,7 @@ NumberDeclinedMScript:
end end
PhoneFullMScript: PhoneFullMScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -1162,7 +1162,7 @@ PhoneFullMScript:
end end
RematchMScript: RematchMScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -1268,7 +1268,7 @@ RematchMScript:
end end
GiftMScript: GiftMScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_BIRDKEEPER_JOSE, .Jose ifequal PHONE_BIRDKEEPER_JOSE, .Jose
ifequal PHONE_BUG_CATCHER_WADE, .Wade ifequal PHONE_BUG_CATCHER_WADE, .Wade
ifequal PHONE_SCHOOLBOY_ALAN, .Alan ifequal PHONE_SCHOOLBOY_ALAN, .Alan
@ -1307,7 +1307,7 @@ GiftMScript:
end end
PackFullMScript: PackFullMScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_BIRDKEEPER_JOSE, .Jose ifequal PHONE_BIRDKEEPER_JOSE, .Jose
ifequal PHONE_YOUNGSTER_JOEY, .Joey ifequal PHONE_YOUNGSTER_JOEY, .Joey
@ -1378,7 +1378,7 @@ PackFullMScript:
RematchGiftMScript: RematchGiftMScript:
opentext opentext
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_YOUNGSTER_JOEY, .Joey ifequal PHONE_YOUNGSTER_JOEY, .Joey
ifequal PHONE_BIRDKEEPER_VANCE, .Vance ifequal PHONE_BIRDKEEPER_VANCE, .Vance
@ -1402,7 +1402,7 @@ RematchGiftMScript:
end end
AskNumber1FScript: AskNumber1FScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -1438,7 +1438,7 @@ AskNumber1FScript:
end end
AskNumber2FScript: AskNumber2FScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -1481,7 +1481,7 @@ RegisteredNumberFScript:
end end
NumberAcceptedFScript: NumberAcceptedFScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -1533,7 +1533,7 @@ NumberAcceptedFScript:
end end
NumberDeclinedFScript: NumberDeclinedFScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -1585,7 +1585,7 @@ NumberDeclinedFScript:
end end
PhoneFullFScript: PhoneFullFScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -1637,7 +1637,7 @@ PhoneFullFScript:
end end
RematchFScript: RematchFScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
ifequal PHONE_PICNICKER_LIZ, .Liz ifequal PHONE_PICNICKER_LIZ, .Liz
@ -1683,7 +1683,7 @@ RematchFScript:
end end
GiftFScript: GiftFScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_PICNICKER_GINA, .Gina ifequal PHONE_PICNICKER_GINA, .Gina
ifequal PHONE_LASS_DANA, .Dana ifequal PHONE_LASS_DANA, .Dana
@ -1707,7 +1707,7 @@ GiftFScript:
end end
PackFullFScript: PackFullFScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_PICNICKER_GINA, .Gina ifequal PHONE_PICNICKER_GINA, .Gina
ifequal PHONE_LASS_DANA, .Dana ifequal PHONE_LASS_DANA, .Dana
@ -1741,7 +1741,7 @@ PackFullFScript:
end end
RematchGiftFScript: RematchGiftFScript:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_PICNICKER_ERIN, .Erin ifequal PHONE_PICNICKER_ERIN, .Erin
.Erin: .Erin:
@ -1751,7 +1751,7 @@ RematchGiftFScript:
end end
GymStatue1Script: GymStatue1Script:
mapnametotext MEM_BUFFER_0 getcurlandmarkname STRING_BUFFER_3
opentext opentext
farwritetext GymStatue_CityGymText farwritetext GymStatue_CityGymText
waitbutton waitbutton
@ -1759,7 +1759,7 @@ GymStatue1Script:
end end
GymStatue2Script: GymStatue2Script:
mapnametotext MEM_BUFFER_0 getcurlandmarkname STRING_BUFFER_3
opentext opentext
farwritetext GymStatue_CityGymText farwritetext GymStatue_CityGymText
buttonsound buttonsound

12
engine/events/trainer_scripts.asm
View File

@ -2,30 +2,30 @@ TalkToTrainerScript::
faceplayer faceplayer
trainerflagaction CHECK_FLAG trainerflagaction CHECK_FLAG
iftrue AlreadyBeatenTrainerScript iftrue AlreadyBeatenTrainerScript
loadmemtrainer loadtemptrainer
encountermusic encountermusic
jump StartBattleWithMapTrainerScript jump StartBattleWithMapTrainerScript
SeenByTrainerScript:: SeenByTrainerScript::
loadmemtrainer loadtemptrainer
encountermusic encountermusic
showemote EMOTE_SHOCK, LAST_TALKED, 30 showemote EMOTE_SHOCK, LAST_TALKED, 30
callasm TrainerWalkToPlayer callasm TrainerWalkToPlayer
applymovement2 wMovementBuffer applymovementlasttalked wMovementBuffer
writeobjectxy LAST_TALKED writeobjectxy LAST_TALKED
faceobject PLAYER, LAST_TALKED faceobject PLAYER, LAST_TALKED
jump StartBattleWithMapTrainerScript jump StartBattleWithMapTrainerScript
StartBattleWithMapTrainerScript: StartBattleWithMapTrainerScript:
opentext opentext
trainertext $0 trainertext TRAINERTEXT_SEEN
waitbutton waitbutton
closetext closetext
loadmemtrainer loadtemptrainer
startbattle startbattle
reloadmapafterbattle reloadmapafterbattle
trainerflagaction SET_FLAG trainerflagaction SET_FLAG
loadvar wRunningTrainerBattleScript, -1 loadmem wRunningTrainerBattleScript, -1
AlreadyBeatenTrainerScript: AlreadyBeatenTrainerScript:
scripttalkafter scripttalkafter

2
engine/overworld/events.asm
View File

@ -849,7 +849,7 @@ SelectMenuScript:
StartMenuCallback: StartMenuCallback:
SelectMenuCallback: SelectMenuCallback:
copybytetovar hMenuReturn readmem hMenuReturn
ifequal HMENURETURN_SCRIPT, .Script ifequal HMENURETURN_SCRIPT, .Script
ifequal HMENURETURN_ASM, .Asm ifequal HMENURETURN_ASM, .Asm
end end

148
engine/overworld/scripting.asm
View File

@ -84,16 +84,16 @@ ScriptCommandTable:
dw Script_setmapscene ; 12 dw Script_setmapscene ; 12
dw Script_checkscene ; 13 dw Script_checkscene ; 13
dw Script_setscene ; 14 dw Script_setscene ; 14
dw Script_writebyte ; 15 dw Script_setval ; 15
dw Script_addvar ; 16 dw Script_addval ; 16
dw Script_random ; 17 dw Script_random ; 17
dw Script_checkver ; 18 dw Script_checkver ; 18
dw Script_copybytetovar ; 19 dw Script_readmem ; 19
dw Script_copyvartobyte ; 1a dw Script_writemem ; 1a
dw Script_loadvar ; 1b dw Script_loadmem ; 1b
dw Script_checkcode ; 1c dw Script_readvar ; 1c
dw Script_writevarcode ; 1d dw Script_writevar ; 1d
dw Script_writecode ; 1e dw Script_loadvar ; 1e
dw Script_giveitem ; 1f dw Script_giveitem ; 1f
dw Script_takeitem ; 20 dw Script_takeitem ; 20
dw Script_checkitem ; 21 dw Script_checkitem ; 21
@ -124,14 +124,14 @@ ScriptCommandTable:
dw Script_warpmod ; 3a dw Script_warpmod ; 3a
dw Script_blackoutmod ; 3b dw Script_blackoutmod ; 3b
dw Script_warp ; 3c dw Script_warp ; 3c
dw Script_readmoney ; 3d dw Script_getmoney ; 3d
dw Script_readcoins ; 3e dw Script_getcoins ; 3e
dw Script_vartomem ; 3f dw Script_getnum ; 3f
dw Script_pokenamemem ; 40 dw Script_getmonname ; 40
dw Script_itemtotext ; 41 dw Script_getitemname ; 41
dw Script_mapnametotext ; 42 dw Script_getcurlandmarkname ; 42
dw Script_trainertotext ; 43 dw Script_gettrainername ; 43
dw Script_stringtotext ; 44 dw Script_getstring ; 44
dw Script_itemnotify ; 45 dw Script_itemnotify ; 45
dw Script_pocketisfull ; 46 dw Script_pocketisfull ; 46
dw Script_opentext ; 47 dw Script_opentext ; 47
@ -157,7 +157,7 @@ endc
dw Script_verticalmenu ; 59 dw Script_verticalmenu ; 59
dw Script_loadpikachudata ; 5a dw Script_loadpikachudata ; 5a
dw Script_randomwildmon ; 5b dw Script_randomwildmon ; 5b
dw Script_loadmemtrainer ; 5c dw Script_loadtemptrainer ; 5c
dw Script_loadwildmon ; 5d dw Script_loadwildmon ; 5d
dw Script_loadtrainer ; 5e dw Script_loadtrainer ; 5e
dw Script_startbattle ; 5f dw Script_startbattle ; 5f
@ -171,7 +171,7 @@ endc
dw Script_checkjustbattled ; 67 dw Script_checkjustbattled ; 67
dw Script_setlasttalked ; 68 dw Script_setlasttalked ; 68
dw Script_applymovement ; 69 dw Script_applymovement ; 69
dw Script_applymovement2 ; 6a dw Script_applymovementlasttalked ; 6a
dw Script_faceplayer ; 6b dw Script_faceplayer ; 6b
dw Script_faceobject ; 6c dw Script_faceobject ; 6c
dw Script_variablesprite ; 6d dw Script_variablesprite ; 6d
@ -186,7 +186,7 @@ endc
dw Script_turnobject ; 76 dw Script_turnobject ; 76
dw Script_follownotexact ; 77 dw Script_follownotexact ; 77
dw Script_earthquake ; 78 dw Script_earthquake ; 78
dw Script_changemap ; 79 dw Script_changemapblocks ; 79
dw Script_changeblock ; 7a dw Script_changeblock ; 7a
dw Script_reloadmap ; 7b dw Script_reloadmap ; 7b
dw Script_reloadmappart ; 7c dw Script_reloadmappart ; 7c
@ -224,15 +224,15 @@ endc
dw Script_specialphonecall ; 9c dw Script_specialphonecall ; 9c
dw Script_checkphonecall ; 9d dw Script_checkphonecall ; 9d
dw Script_verbosegiveitem ; 9e dw Script_verbosegiveitem ; 9e
dw Script_verbosegiveitem2 ; 9f dw Script_verbosegiveitemvar ; 9f
dw Script_swarm ; a0 dw Script_swarm ; a0
dw Script_halloffame ; a1 dw Script_halloffame ; a1
dw Script_credits ; a2 dw Script_credits ; a2
dw Script_warpfacing ; a3 dw Script_warpfacing ; a3
dw Script_battletowertext ; a4 dw Script_battletowertext ; a4
dw Script_landmarktotext ; a5 dw Script_getlandmarkname ; a5
dw Script_trainerclassname ; a6 dw Script_gettrainerclassname ; a6
dw Script_name ; a7 dw Script_getname ; a7
dw Script_wait ; a8 dw Script_wait ; a8
dw Script_checksave ; a9 dw Script_checksave ; a9
@ -496,7 +496,7 @@ Script__2dmenu:
Script_battletowertext: Script_battletowertext:
; script command 0xa4 ; script command 0xa4
; parameters: pointer, memory ; parameters: bttext_id
call SetUpTextBox call SetUpTextBox
call GetScriptByte call GetScriptByte
@ -511,7 +511,7 @@ Script_verbosegiveitem:
call Script_giveitem call Script_giveitem
call CurItemName call CurItemName
ld de, wStringBuffer1 ld de, wStringBuffer1
ld a, MEM_BUFFER_1 ld a, STRING_BUFFER_4
call CopyConvertedText call CopyConvertedText
ld b, BANK(GiveItemScript) ld b, BANK(GiveItemScript)
ld de, GiveItemScript ld de, GiveItemScript
@ -539,7 +539,7 @@ ReceivedItemText:
text_far UnknownText_0x1c4719 text_far UnknownText_0x1c4719
text_end text_end
Script_verbosegiveitem2: Script_verbosegiveitemvar:
; script command 0x9f ; script command 0x9f
; parameters: item, var ; parameters: item, var
@ -562,7 +562,7 @@ Script_verbosegiveitem2:
ld [wScriptVar], a ld [wScriptVar], a
call CurItemName call CurItemName
ld de, wStringBuffer1 ld de, wStringBuffer1
ld a, MEM_BUFFER_1 ld a, STRING_BUFFER_4
call CopyConvertedText call CopyConvertedText
ld b, BANK(GiveItemScript) ld b, BANK(GiveItemScript)
ld de, GiveItemScript ld de, GiveItemScript
@ -754,12 +754,12 @@ Script_swarm:
Script_trainertext: Script_trainertext:
; script command 0x62 ; script command 0x62
; parameters: which_text ; parameters: text_id
call GetScriptByte call GetScriptByte
ld c, a ld c, a
ld b, 0 ld b, 0
ld hl, wWalkingX ld hl, wSeenTextPointer
add hl, bc add hl, bc
add hl, bc add hl, bc
ld a, [hli] ld a, [hli]
@ -972,7 +972,7 @@ SetFlagsForMovement_2:
farcall _SetFlagsForMovement_2 farcall _SetFlagsForMovement_2
ret ret
Script_applymovement2: Script_applymovementlasttalked:
; script command 0x6a ; script command 0x6a
; parameters: data ; parameters: data
; apply movement to last talked ; apply movement to last talked
@ -1250,9 +1250,9 @@ Script_showemote:
ShowEmoteScript: ShowEmoteScript:
loademote EMOTE_FROM_MEM loademote EMOTE_FROM_MEM
applymovement2 .Show applymovementlasttalked .Show
pause 0 pause 0
applymovement2 .Hide applymovementlasttalked .Hide
end end
.Show: .Show:
@ -1307,7 +1307,7 @@ Script_randomwildmon:
ld [wBattleScriptFlags], a ld [wBattleScriptFlags], a
ret ret
Script_loadmemtrainer: Script_loadtemptrainer:
; script command 0x5c ; script command 0x5c
ld a, (1 << 7) | 1 ld a, (1 << 7) | 1
@ -1702,7 +1702,7 @@ DoScene:
.no_scene .no_scene
ret ret
Script_copybytetovar: Script_readmem:
; script command 0x19 ; script command 0x19
; parameters: address ; parameters: address
@ -1714,7 +1714,7 @@ Script_copybytetovar:
ld [wScriptVar], a ld [wScriptVar], a
ret ret
Script_copyvartobyte: Script_writemem:
; script command 0x1a ; script command 0x1a
; parameters: address ; parameters: address
@ -1726,7 +1726,7 @@ Script_copyvartobyte:
ld [hl], a ld [hl], a
ret ret
Script_loadvar: Script_loadmem:
; script command 0x1b ; script command 0x1b
; parameters: address, value ; parameters: address, value
@ -1738,7 +1738,7 @@ Script_loadvar:
ld [hl], a ld [hl], a
ret ret
Script_writebyte: Script_setval:
; script command 0x15 ; script command 0x15
; parameters: value ; parameters: value
@ -1746,7 +1746,7 @@ Script_writebyte:
ld [wScriptVar], a ld [wScriptVar], a
ret ret
Script_addvar: Script_addval:
; script command 0x16 ; script command 0x16
; parameters: value ; parameters: value
@ -1809,7 +1809,7 @@ Script_random:
add c add c
ret ret
Script_checkcode: Script_readvar:
; script command 0x1c ; script command 0x1c
; parameters: variable_id ; parameters: variable_id
@ -1819,7 +1819,7 @@ Script_checkcode:
ld [wScriptVar], a ld [wScriptVar], a
ret ret
Script_writevarcode: Script_writevar:
; script command 0x1d ; script command 0x1d
; parameters: variable_id ; parameters: variable_id
@ -1829,7 +1829,7 @@ Script_writevarcode:
ld [de], a ld [de], a
ret ret
Script_writecode: Script_loadvar:
; script command 0x1e ; script command 0x1e
; parameters: variable_id, value ; parameters: variable_id, value
@ -1854,9 +1854,9 @@ Script_checkver:
.gs_version: .gs_version:
db GS_VERSION db GS_VERSION
Script_pokenamemem: Script_getmonname:
; script command 0x40 ; script command 0x40
; parameters: pokemon (0 aka USE_SCRIPT_VAR to use wScriptVar), memory ; parameters: string_buffer, mon_id (0 aka USE_SCRIPT_VAR to use wScriptVar)
call GetScriptByte call GetScriptByte
and a and a
@ -1867,9 +1867,9 @@ Script_pokenamemem:
call GetPokemonName call GetPokemonName
ld de, wStringBuffer1 ld de, wStringBuffer1
ConvertMemToText: GetStringBuffer:
call GetScriptByte call GetScriptByte
cp NUM_MEM_BUFFERS cp NUM_STRING_BUFFERS
jr c, .ok jr c, .ok
xor a xor a
.ok .ok
@ -1881,9 +1881,9 @@ CopyConvertedText:
call CopyName2 call CopyName2
ret ret
Script_itemtotext: Script_getitemname:
; script command 0x41 ; script command 0x41
; parameters: item (0 aka USE_SCRIPT_VAR to use wScriptVar), memory ; parameters: string_buffer, item_id (0 aka USE_SCRIPT_VAR to use wScriptVar)
call GetScriptByte call GetScriptByte
and a ; USE_SCRIPT_VAR and a ; USE_SCRIPT_VAR
@ -1893,11 +1893,11 @@ Script_itemtotext:
ld [wNamedObjectIndexBuffer], a ld [wNamedObjectIndexBuffer], a
call GetItemName call GetItemName
ld de, wStringBuffer1 ld de, wStringBuffer1
jr ConvertMemToText jr GetStringBuffer
Script_mapnametotext: Script_getcurlandmarkname:
; script command 0x42 ; script command 0x42
; parameters: memory ; parameters: string_buffer
ld a, [wMapGroup] ld a, [wMapGroup]
ld b, a ld b, a
@ -1909,29 +1909,29 @@ ConvertLandmarkToText:
ld e, a ld e, a
farcall GetLandmarkName farcall GetLandmarkName
ld de, wStringBuffer1 ld de, wStringBuffer1
jp ConvertMemToText jp GetStringBuffer
Script_landmarktotext: Script_getlandmarkname:
; script command 0xa5 ; script command 0xa5
; parameters: id, memory ; parameters: string_buffer, landmark_id
call GetScriptByte call GetScriptByte
jr ConvertLandmarkToText jr ConvertLandmarkToText
Script_trainertotext: Script_gettrainername:
; script command 0x43 ; script command 0x43
; parameters: trainer_id, trainer_group, memory ; parameters: string_buffer, trainer_group, trainer_id
call GetScriptByte call GetScriptByte
ld c, a ld c, a
call GetScriptByte call GetScriptByte
ld b, a ld b, a
farcall GetTrainerName farcall GetTrainerName
jr ConvertMemToText jr GetStringBuffer
Script_name: Script_getname:
; script command 0xa7 ; script command 0xa7
; parameters: type, id, memory ; parameters: string_buffer, type, id
call GetScriptByte call GetScriptByte
ld [wNamedObjectTypeBuffer], a ld [wNamedObjectTypeBuffer], a
@ -1941,19 +1941,19 @@ ContinueToGetName:
ld [wCurSpecies], a ld [wCurSpecies], a
call GetName call GetName
ld de, wStringBuffer1 ld de, wStringBuffer1
jp ConvertMemToText jp GetStringBuffer
Script_trainerclassname: Script_gettrainerclassname:
; script command 0xa6 ; script command 0xa6
; parameters: id, memory ; parameters: string_buffer, trainer_group
ld a, TRAINER_NAME ld a, TRAINER_NAME
ld [wNamedObjectTypeBuffer], a ld [wNamedObjectTypeBuffer], a
jr ContinueToGetName jr ContinueToGetName
Script_readmoney: Script_getmoney:
; script command 0x3d ; script command 0x3d
; parameters: account, memory ; parameters: string_buffer, account
call ResetStringBuffer1 call ResetStringBuffer1
call GetMoneyAccount call GetMoneyAccount
@ -1961,11 +1961,11 @@ Script_readmoney:
lb bc, PRINTNUM_RIGHTALIGN | 3, 6 lb bc, PRINTNUM_RIGHTALIGN | 3, 6
call PrintNum call PrintNum
ld de, wStringBuffer1 ld de, wStringBuffer1
jp ConvertMemToText jp GetStringBuffer
Script_readcoins: Script_getcoins:
; script command 0x3e ; script command 0x3e
; parameters: memory ; parameters: string_buffer
call ResetStringBuffer1 call ResetStringBuffer1
ld hl, wStringBuffer1 ld hl, wStringBuffer1
@ -1973,11 +1973,11 @@ Script_readcoins:
lb bc, PRINTNUM_RIGHTALIGN | 2, 6 lb bc, PRINTNUM_RIGHTALIGN | 2, 6
call PrintNum call PrintNum
ld de, wStringBuffer1 ld de, wStringBuffer1
jp ConvertMemToText jp GetStringBuffer
Script_vartomem: Script_getnum:
; script command 0x3f ; script command 0x3f
; parameters: memory ; parameters: string_buffer
call ResetStringBuffer1 call ResetStringBuffer1
ld de, wScriptVar ld de, wScriptVar
@ -1985,7 +1985,7 @@ Script_vartomem:
lb bc, PRINTNUM_RIGHTALIGN | 1, 3 lb bc, PRINTNUM_RIGHTALIGN | 1, 3
call PrintNum call PrintNum
ld de, wStringBuffer1 ld de, wStringBuffer1
jp ConvertMemToText jp GetStringBuffer
ResetStringBuffer1: ResetStringBuffer1:
ld hl, wStringBuffer1 ld hl, wStringBuffer1
@ -1994,9 +1994,9 @@ ResetStringBuffer1:
call ByteFill call ByteFill
ret ret
Script_stringtotext: Script_getstring:
; script command 0x44 ; script command 0x44
; parameters: text_pointer, memory ; parameters: string_buffer, text_pointer
call GetScriptByte call GetScriptByte
ld e, a ld e, a
@ -2006,7 +2006,7 @@ Script_stringtotext:
ld hl, CopyName1 ld hl, CopyName1
rst FarCall rst FarCall
ld de, wStringBuffer2 ld de, wStringBuffer2
jp ConvertMemToText jp GetStringBuffer
Script_givepokemail: Script_givepokemail:
; script command 0x2f ; script command 0x2f
@ -2551,7 +2551,7 @@ Script_delcmdqueue:
ld [wScriptVar], a ld [wScriptVar], a
ret ret
Script_changemap: Script_changemapblocks:
; script command 0x79 ; script command 0x79
; parameters: map_data_pointer ; parameters: map_data_pointer

14
engine/phone/scripts/alan.asm
View File

@ -1,5 +1,5 @@
AlanPhoneCalleeScript: AlanPhoneCalleeScript:
trainertotext SCHOOLBOY, ALAN1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SCHOOLBOY, ALAN1
checkflag ENGINE_ALAN checkflag ENGINE_ALAN
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
@ -7,7 +7,7 @@ AlanPhoneCalleeScript:
iftrue .NotWednesday iftrue .NotWednesday
checkflag ENGINE_ALAN_HAS_FIRE_STONE checkflag ENGINE_ALAN_HAS_FIRE_STONE
iftrue .FireStone iftrue .FireStone
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal WEDNESDAY, .NotWednesday ifnotequal WEDNESDAY, .NotWednesday
checktime DAY checktime DAY
iftrue AlanWednesdayDay iftrue AlanWednesdayDay
@ -16,15 +16,15 @@ AlanPhoneCalleeScript:
farjump UnknownScript_0xa0970 farjump UnknownScript_0xa0970
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_36, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_36
farjump UnknownScript_0xa0a73 farjump UnknownScript_0xa0a73
.FireStone: .FireStone:
landmarktotext ROUTE_36, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_36
farjump UnknownScript_0xa0ac5 farjump UnknownScript_0xa0ac5
AlanPhoneCallerScript: AlanPhoneCallerScript:
trainertotext SCHOOLBOY, ALAN1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SCHOOLBOY, ALAN1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_ALAN checkflag ENGINE_ALAN
iftrue .Generic iftrue .Generic
@ -50,11 +50,11 @@ AlanWednesdayDay:
setflag ENGINE_ALAN_WEDNESDAY_AFTERNOON setflag ENGINE_ALAN_WEDNESDAY_AFTERNOON
AlanWantsBattle: AlanWantsBattle:
landmarktotext ROUTE_36, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_36
setflag ENGINE_ALAN setflag ENGINE_ALAN
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
AlanHasFireStone: AlanHasFireStone:
setflag ENGINE_ALAN_HAS_FIRE_STONE setflag ENGINE_ALAN_HAS_FIRE_STONE
landmarktotext ROUTE_36, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_36
farjump PhoneScript_FoundItem_Male farjump PhoneScript_FoundItem_Male

16
engine/phone/scripts/anthony.asm
View File

@ -1,11 +1,11 @@
AnthonyPhoneCalleeScript: AnthonyPhoneCalleeScript:
trainertotext HIKER, ANTHONY2, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, HIKER, ANTHONY2
checkflag ENGINE_ANTHONY checkflag ENGINE_ANTHONY
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_ANTHONY_FRIDAY_NIGHT checkflag ENGINE_ANTHONY_FRIDAY_NIGHT
iftrue .NotFriday iftrue .NotFriday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal FRIDAY, .NotFriday ifnotequal FRIDAY, .NotFriday
checktime NITE checktime NITE
iftrue AnthonyFridayNight iftrue AnthonyFridayNight
@ -16,15 +16,15 @@ AnthonyPhoneCalleeScript:
farjump UnknownScript_0xa0950 farjump UnknownScript_0xa0950
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_33, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_33
farjump UnknownScript_0xa0a5f farjump UnknownScript_0xa0a5f
.AlreadySwarming: .AlreadySwarming:
landmarktotext ROUTE_33, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_33
farjump UnknownScript_0xa0afa farjump UnknownScript_0xa0afa
AnthonyPhoneCallerScript: AnthonyPhoneCallerScript:
trainertotext HIKER, ANTHONY2, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, HIKER, ANTHONY2
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_FLYPOINT_GOLDENROD checkflag ENGINE_FLYPOINT_GOLDENROD
iffalse .TriesSwarm iffalse .TriesSwarm
@ -44,7 +44,7 @@ AnthonyFridayNight:
setflag ENGINE_ANTHONY_FRIDAY_NIGHT setflag ENGINE_ANTHONY_FRIDAY_NIGHT
AnthonyWantsBattle: AnthonyWantsBattle:
landmarktotext ROUTE_33, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_33
setflag ENGINE_ANTHONY setflag ENGINE_ANTHONY
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
@ -52,9 +52,9 @@ AnthonyTriesDunsparceSwarm:
checkflag ENGINE_DUNSPARCE_SWARM checkflag ENGINE_DUNSPARCE_SWARM
iftrue .Generic iftrue .Generic
setflag ENGINE_DUNSPARCE_SWARM setflag ENGINE_DUNSPARCE_SWARM
pokenamemem DUNSPARCE, MEM_BUFFER_1 getmonname STRING_BUFFER_4, DUNSPARCE
swarm SWARM_DUNSPARCE, DARK_CAVE_VIOLET_ENTRANCE swarm SWARM_DUNSPARCE, DARK_CAVE_VIOLET_ENTRANCE
landmarktotext DARK_CAVE, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, DARK_CAVE
farjump UnknownScript_0xa05de farjump UnknownScript_0xa05de
.Generic: .Generic:

16
engine/phone/scripts/arnie.asm
View File

@ -1,11 +1,11 @@
ArniePhoneCalleeScript: ArniePhoneCalleeScript:
trainertotext BUG_CATCHER, ARNIE1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BUG_CATCHER, ARNIE1
checkflag ENGINE_ARNIE checkflag ENGINE_ARNIE
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_ARNIE_TUESDAY_MORNING checkflag ENGINE_ARNIE_TUESDAY_MORNING
iftrue .NotTuesday iftrue .NotTuesday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal TUESDAY, .NotTuesday ifnotequal TUESDAY, .NotTuesday
checktime MORN checktime MORN
iftrue ArnieTuesdayMorning iftrue ArnieTuesdayMorning
@ -16,15 +16,15 @@ ArniePhoneCalleeScript:
farjump UnknownScript_0xa0968 farjump UnknownScript_0xa0968
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_35, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_35
farjump UnknownScript_0xa0a6e farjump UnknownScript_0xa0a6e
.AlreadySwarming: .AlreadySwarming:
landmarktotext ROUTE_35, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_35
farjump UnknownScript_0xa0aff farjump UnknownScript_0xa0aff
ArniePhoneCallerScript: ArniePhoneCallerScript:
trainertotext BUG_CATCHER, ARNIE1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BUG_CATCHER, ARNIE1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_ARNIE checkflag ENGINE_ARNIE
iftrue .Swarm iftrue .Swarm
@ -44,7 +44,7 @@ ArnieTuesdayMorning:
setflag ENGINE_ARNIE_TUESDAY_MORNING setflag ENGINE_ARNIE_TUESDAY_MORNING
ArnieWantsBattle: ArnieWantsBattle:
landmarktotext ROUTE_35, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_35
setflag ENGINE_ARNIE setflag ENGINE_ARNIE
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
@ -52,9 +52,9 @@ ArnieYanmaSwarm: ; start swarm
checkflag ENGINE_YANMA_SWARM checkflag ENGINE_YANMA_SWARM
iftrue ArnieYanmaAlreadySwarming iftrue ArnieYanmaAlreadySwarming
setflag ENGINE_YANMA_SWARM setflag ENGINE_YANMA_SWARM
pokenamemem YANMA, MEM_BUFFER_1 getmonname STRING_BUFFER_4, YANMA
swarm SWARM_YANMA, ROUTE_35 swarm SWARM_YANMA, ROUTE_35
landmarktotext ROUTE_35, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_35
farjump UnknownScript_0xa05ce farjump UnknownScript_0xa05ce
ArnieFoundRare: ArnieFoundRare:

10
engine/phone/scripts/beth.asm
View File

@ -1,11 +1,11 @@
BethPhoneCalleeScript: BethPhoneCalleeScript:
trainertotext COOLTRAINERF, BETH1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, COOLTRAINERF, BETH1
checkflag ENGINE_BETH checkflag ENGINE_BETH
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_BETH_FRIDAY_AFTERNOON checkflag ENGINE_BETH_FRIDAY_AFTERNOON
iftrue .NotFriday iftrue .NotFriday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal FRIDAY, .NotFriday ifnotequal FRIDAY, .NotFriday
checktime DAY checktime DAY
iftrue BethFridayAfternoon iftrue BethFridayAfternoon
@ -14,11 +14,11 @@ BethPhoneCalleeScript:
farjump UnknownScript_0xa0918 farjump UnknownScript_0xa0918
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_26, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_26
farjump BethBattleReminderScript farjump BethBattleReminderScript
BethPhoneCallerScript: BethPhoneCallerScript:
trainertotext COOLTRAINERF, BETH1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, COOLTRAINERF, BETH1
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_BETH checkflag ENGINE_BETH
iftrue .Generic iftrue .Generic
@ -34,6 +34,6 @@ BethFridayAfternoon:
setflag ENGINE_BETH_FRIDAY_AFTERNOON setflag ENGINE_BETH_FRIDAY_AFTERNOON
BethWantsBattle: BethWantsBattle:
landmarktotext ROUTE_26, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_26
setflag ENGINE_BETH setflag ENGINE_BETH
farjump PhoneScript_WantsToBattle_Female farjump PhoneScript_WantsToBattle_Female

8
engine/phone/scripts/beverly.asm
View File

@ -1,16 +1,16 @@
BeverlyPhoneCalleeScript: BeverlyPhoneCalleeScript:
trainertotext POKEFANF, BEVERLY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, POKEFANF, BEVERLY1
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_BEVERLY_HAS_NUGGET checkflag ENGINE_BEVERLY_HAS_NUGGET
iftrue .HasNugget iftrue .HasNugget
farjump UnknownScript_0xa0900 farjump UnknownScript_0xa0900
.HasNugget: .HasNugget:
landmarktotext NATIONAL_PARK, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, NATIONAL_PARK
farjump UnknownScript_0xa0aa5 farjump UnknownScript_0xa0aa5
BeverlyPhoneCallerScript: BeverlyPhoneCallerScript:
trainertotext POKEFANF, BEVERLY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, POKEFANF, BEVERLY1
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_BEVERLY_HAS_NUGGET checkflag ENGINE_BEVERLY_HAS_NUGGET
iftrue .HasNugget iftrue .HasNugget
@ -22,5 +22,5 @@ BeverlyPhoneCallerScript:
.FoundNugget: .FoundNugget:
setflag ENGINE_BEVERLY_HAS_NUGGET setflag ENGINE_BEVERLY_HAS_NUGGET
landmarktotext NATIONAL_PARK, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, NATIONAL_PARK
farjump PhoneScript_FoundItem_Female farjump PhoneScript_FoundItem_Female

4
engine/phone/scripts/bill.asm
View File

@ -20,8 +20,8 @@ BillPhoneCalleeScript:
.main .main
farwritetext BillPhoneGenericText farwritetext BillPhoneGenericText
buttonsound buttonsound
checkcode VAR_BOXSPACE readvar VAR_BOXSPACE
vartomem MEM_BUFFER_0 getnum STRING_BUFFER_3
ifequal 0, .full ifequal 0, .full
ifless PARTY_LENGTH, .nearlyfull ifless PARTY_LENGTH, .nearlyfull
farwritetext BillPhoneNotFullText farwritetext BillPhoneNotFullText

10
engine/phone/scripts/brent.asm
View File

@ -1,11 +1,11 @@
BrentPhoneCalleeScript: BrentPhoneCalleeScript:
trainertotext POKEMANIAC, BRENT1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, POKEMANIAC, BRENT1
checkflag ENGINE_BRENT checkflag ENGINE_BRENT
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_BRENT_MONDAY_MORNING checkflag ENGINE_BRENT_MONDAY_MORNING
iftrue .NotMonday iftrue .NotMonday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal MONDAY, .NotMonday ifnotequal MONDAY, .NotMonday
checktime MORN checktime MORN
iftrue BrentMondayMorning iftrue BrentMondayMorning
@ -14,11 +14,11 @@ BrentPhoneCalleeScript:
farjump UnknownScript_0xa0998 farjump UnknownScript_0xa0998
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_43, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_43
farjump UnknownScript_0xa0a87 farjump UnknownScript_0xa0a87
BrentPhoneCallerScript: BrentPhoneCallerScript:
trainertotext POKEMANIAC, BRENT1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, POKEMANIAC, BRENT1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
farscall PhoneScript_Random2 farscall PhoneScript_Random2
ifequal 0, BrentBillTrivia ifequal 0, BrentBillTrivia
@ -36,7 +36,7 @@ BrentMondayMorning:
setflag ENGINE_BRENT_MONDAY_MORNING setflag ENGINE_BRENT_MONDAY_MORNING
BrentWantsBattle: BrentWantsBattle:
landmarktotext ROUTE_43, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_43
setflag ENGINE_BRENT setflag ENGINE_BRENT
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

4
engine/phone/scripts/buena.asm
View File

@ -1,7 +1,7 @@
BuenaPhoneCalleeScript: BuenaPhoneCalleeScript:
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue BuenaPhoneScript_Rocket iftrue BuenaPhoneScript_Rocket
checkcode VAR_HOUR readvar VAR_HOUR
ifgreater 17, BuenaPhoneScript_AfterMidnight1 ifgreater 17, BuenaPhoneScript_AfterMidnight1
scall BuenaPhoneScript_CheckTimeOfDay1 scall BuenaPhoneScript_CheckTimeOfDay1
jump BuenaPhoneScript_Random1 jump BuenaPhoneScript_Random1
@ -36,7 +36,7 @@ BuenaPhoneScript_AfterMidnight1:
end end
BuenaPhoneScript_CheckTimeOfDay2: BuenaPhoneScript_CheckTimeOfDay2:
checkcode VAR_HOUR readvar VAR_HOUR
ifgreater 17, BuenaPhoneScript_AfterMidnight2 ifgreater 17, BuenaPhoneScript_AfterMidnight2
checktime MORN checktime MORN
iftrue .morn iftrue .morn

10
engine/phone/scripts/chad.asm
View File

@ -1,11 +1,11 @@
ChadPhoneCalleeScript: ChadPhoneCalleeScript:
trainertotext SCHOOLBOY, CHAD1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SCHOOLBOY, CHAD1
checkflag ENGINE_CHAD checkflag ENGINE_CHAD
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_CHAD_FRIDAY_MORNING checkflag ENGINE_CHAD_FRIDAY_MORNING
iftrue .NotFriday iftrue .NotFriday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal FRIDAY, .NotFriday ifnotequal FRIDAY, .NotFriday
checktime MORN checktime MORN
iftrue ChadFridayMorning iftrue ChadFridayMorning
@ -14,11 +14,11 @@ ChadPhoneCalleeScript:
farjump UnknownScript_0xa0980 farjump UnknownScript_0xa0980
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_38, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_38
farjump UnknownScript_0xa0a7d farjump UnknownScript_0xa0a7d
ChadPhoneCallerScript: ChadPhoneCallerScript:
trainertotext SCHOOLBOY, CHAD1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SCHOOLBOY, CHAD1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
farscall PhoneScript_Random2 farscall PhoneScript_Random2
ifequal 0, ChadOakGossip ifequal 0, ChadOakGossip
@ -38,7 +38,7 @@ ChadFridayMorning:
setflag ENGINE_CHAD_FRIDAY_MORNING setflag ENGINE_CHAD_FRIDAY_MORNING
ChadWantsBattle: ChadWantsBattle:
landmarktotext ROUTE_38, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_38
setflag ENGINE_CHAD setflag ENGINE_CHAD
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

14
engine/phone/scripts/dana.asm
View File

@ -1,5 +1,5 @@
DanaPhoneCalleeScript: DanaPhoneCalleeScript:
trainertotext LASS, DANA1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, LASS, DANA1
checkflag ENGINE_DANA checkflag ENGINE_DANA
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
@ -7,7 +7,7 @@ DanaPhoneCalleeScript:
iftrue .NotThursday iftrue .NotThursday
checkflag ENGINE_DANA_HAS_THUNDERSTONE checkflag ENGINE_DANA_HAS_THUNDERSTONE
iftrue .HasThunderstone iftrue .HasThunderstone
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal THURSDAY, .NotThursday ifnotequal THURSDAY, .NotThursday
checktime NITE checktime NITE
iftrue DanaThursdayNight iftrue DanaThursdayNight
@ -16,15 +16,15 @@ DanaPhoneCalleeScript:
farjump UnknownScript_0xa0978 farjump UnknownScript_0xa0978
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_38, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_38
farjump UnknownScript_0xa0a78 farjump UnknownScript_0xa0a78
.HasThunderstone: .HasThunderstone:
landmarktotext ROUTE_38, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_38
farjump UnknownScript_0xa0acd farjump UnknownScript_0xa0acd
DanaPhoneCallerScript: DanaPhoneCallerScript:
trainertotext LASS, DANA1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, LASS, DANA1
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_DANA checkflag ENGINE_DANA
iftrue .Generic iftrue .Generic
@ -52,7 +52,7 @@ DanaThursdayNight:
setflag ENGINE_DANA_THURSDAY_NIGHT setflag ENGINE_DANA_THURSDAY_NIGHT
DanaWantsBattle: DanaWantsBattle:
landmarktotext ROUTE_38, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_38
setflag ENGINE_DANA setflag ENGINE_DANA
farjump PhoneScript_WantsToBattle_Female farjump PhoneScript_WantsToBattle_Female
@ -61,5 +61,5 @@ DanaFoundRare:
DanaHasThunderstone: DanaHasThunderstone:
setflag ENGINE_DANA_HAS_THUNDERSTONE setflag ENGINE_DANA_HAS_THUNDERSTONE
landmarktotext ROUTE_38, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_38
farjump PhoneScript_FoundItem_Female farjump PhoneScript_FoundItem_Female

12
engine/phone/scripts/derek.asm
View File

@ -1,5 +1,5 @@
DerekPhoneCalleeScript: DerekPhoneCalleeScript:
trainertotext POKEFANM, DEREK1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, POKEFANM, DEREK1
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_DEREK_HAS_NUGGET checkflag ENGINE_DEREK_HAS_NUGGET
iftrue .Nugget iftrue .Nugget
@ -7,7 +7,7 @@ DerekPhoneCalleeScript:
ifequal 0, .NoContest ifequal 0, .NoContest
checkflag ENGINE_DAILY_BUG_CONTEST checkflag ENGINE_DAILY_BUG_CONTEST
iftrue .NoContest iftrue .NoContest
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal TUESDAY, .ContestToday ifequal TUESDAY, .ContestToday
ifequal THURSDAY, .ContestToday ifequal THURSDAY, .ContestToday
ifequal SATURDAY, .ContestToday ifequal SATURDAY, .ContestToday
@ -19,17 +19,17 @@ DerekPhoneCalleeScript:
farjump PhoneScript_BugCatchingContest farjump PhoneScript_BugCatchingContest
.Nugget: .Nugget:
landmarktotext ROUTE_39, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_39
farjump UnknownScript_0xa0ad5 farjump UnknownScript_0xa0ad5
DerekPhoneCallerScript: DerekPhoneCallerScript:
trainertotext POKEFANM, DEREK1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, POKEFANM, DEREK1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
farscall PhoneScript_Random2 farscall PhoneScript_Random2
ifequal 0, .NoContest ifequal 0, .NoContest
checkflag ENGINE_DAILY_BUG_CONTEST checkflag ENGINE_DAILY_BUG_CONTEST
iftrue .NoContest iftrue .NoContest
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal TUESDAY, .ContestToday ifequal TUESDAY, .ContestToday
ifequal THURSDAY, .ContestToday ifequal THURSDAY, .ContestToday
ifequal SATURDAY, .ContestToday ifequal SATURDAY, .ContestToday
@ -44,5 +44,5 @@ DerekPhoneCallerScript:
.Nugget: .Nugget:
setflag ENGINE_DEREK_HAS_NUGGET setflag ENGINE_DEREK_HAS_NUGGET
landmarktotext ROUTE_39, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_39
farjump PhoneScript_FoundItem_Male farjump PhoneScript_FoundItem_Male

4
engine/phone/scripts/elm.asm
View File

@ -1,5 +1,5 @@
ElmPhoneCalleeScript: ElmPhoneCalleeScript:
checkcode VAR_SPECIALPHONECALL readvar VAR_SPECIALPHONECALL
ifequal SPECIALCALL_POKERUS, .pokerus ifequal SPECIALCALL_POKERUS, .pokerus
checkevent EVENT_SHOWED_TOGEPI_TO_ELM checkevent EVENT_SHOWED_TOGEPI_TO_ELM
iftrue .discovery iftrue .discovery
@ -62,7 +62,7 @@ ElmPhoneCalleeScript:
end end
ElmPhoneCallerScript: ElmPhoneCallerScript:
checkcode VAR_SPECIALPHONECALL readvar VAR_SPECIALPHONECALL
ifequal SPECIALCALL_ROBBED, .disaster ifequal SPECIALCALL_ROBBED, .disaster
ifequal SPECIALCALL_ASSISTANT, .assistant ifequal SPECIALCALL_ASSISTANT, .assistant
ifequal SPECIALCALL_WEIRDBROADCAST, .rocket ifequal SPECIALCALL_WEIRDBROADCAST, .rocket

10
engine/phone/scripts/erin.asm
View File

@ -1,11 +1,11 @@
ErinPhoneCalleeScript: ErinPhoneCalleeScript:
trainertotext PICNICKER, ERIN1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, ERIN1
checkflag ENGINE_ERIN checkflag ENGINE_ERIN
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_ERIN_SATURDAY_NIGHT checkflag ENGINE_ERIN_SATURDAY_NIGHT
iftrue .NotSaturday iftrue .NotSaturday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SATURDAY, .NotSaturday ifnotequal SATURDAY, .NotSaturday
checktime NITE checktime NITE
iftrue ErinSaturdayNight iftrue ErinSaturdayNight
@ -14,11 +14,11 @@ ErinPhoneCalleeScript:
farjump ErinWorkingHardScript farjump ErinWorkingHardScript
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_46, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_46
farjump ErinComeBattleScript farjump ErinComeBattleScript
ErinPhoneCallerScript: ErinPhoneCallerScript:
trainertotext PICNICKER, ERIN1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, ERIN1
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_ERIN checkflag ENGINE_ERIN
iftrue .GenericCall iftrue .GenericCall
@ -35,6 +35,6 @@ ErinSaturdayNight:
setflag ENGINE_ERIN_SATURDAY_NIGHT setflag ENGINE_ERIN_SATURDAY_NIGHT
ErinWantsBattle: ErinWantsBattle:
landmarktotext ROUTE_46, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_46
setflag ENGINE_ERIN setflag ENGINE_ERIN
farjump PhoneScript_WantsToBattle_Female farjump PhoneScript_WantsToBattle_Female

10
engine/phone/scripts/gaven.asm
View File

@ -1,11 +1,11 @@
GavenPhoneCalleeScript: GavenPhoneCalleeScript:
trainertotext COOLTRAINERM, GAVEN3, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, COOLTRAINERM, GAVEN3
checkflag ENGINE_GAVEN checkflag ENGINE_GAVEN
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_GAVEN_THURSDAY_MORNING checkflag ENGINE_GAVEN_THURSDAY_MORNING
iftrue .NotThursday iftrue .NotThursday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal THURSDAY, .NotThursday ifnotequal THURSDAY, .NotThursday
checktime MORN checktime MORN
iftrue GavenThursdayMorning iftrue GavenThursdayMorning
@ -14,11 +14,11 @@ GavenPhoneCalleeScript:
farjump UnknownScript_0xa0910 farjump UnknownScript_0xa0910
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_26, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_26
farjump UnknownScript_0xa0a37 farjump UnknownScript_0xa0a37
GavenPhoneCallerScript: GavenPhoneCallerScript:
trainertotext COOLTRAINERM, GAVEN3, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, COOLTRAINERM, GAVEN3
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_GAVEN checkflag ENGINE_GAVEN
iftrue .WaitingForBattle iftrue .WaitingForBattle
@ -36,7 +36,7 @@ GavenThursdayMorning:
setflag ENGINE_GAVEN_THURSDAY_MORNING setflag ENGINE_GAVEN_THURSDAY_MORNING
GavenWantsRematch: GavenWantsRematch:
landmarktotext ROUTE_26, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_26
setflag ENGINE_GAVEN setflag ENGINE_GAVEN
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

28
engine/phone/scripts/generic_callee.asm
View File

@ -23,7 +23,7 @@ PhoneScript_AnswerPhone_Male:
iftrue PhoneScript_AnswerPhone_Male_Day iftrue PhoneScript_AnswerPhone_Male_Day
checktime NITE checktime NITE
iftrue PhoneScript_AnswerPhone_Male_Nite iftrue PhoneScript_AnswerPhone_Male_Nite
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -146,7 +146,7 @@ PhoneScript_AnswerPhone_Male:
end end
PhoneScript_AnswerPhone_Male_Day: PhoneScript_AnswerPhone_Male_Day:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -269,7 +269,7 @@ PhoneScript_AnswerPhone_Male_Day:
end end
PhoneScript_AnswerPhone_Male_Nite: PhoneScript_AnswerPhone_Male_Nite:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -396,7 +396,7 @@ PhoneScript_AnswerPhone_Female:
iftrue PhoneScript_AnswerPhone_Female_Day iftrue PhoneScript_AnswerPhone_Female_Day
checktime NITE checktime NITE
iftrue PhoneScript_AnswerPhone_Female_Nite iftrue PhoneScript_AnswerPhone_Female_Nite
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -447,7 +447,7 @@ PhoneScript_AnswerPhone_Female:
end end
PhoneScript_AnswerPhone_Female_Day: PhoneScript_AnswerPhone_Female_Day:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -498,7 +498,7 @@ PhoneScript_AnswerPhone_Female_Day:
end end
PhoneScript_AnswerPhone_Female_Nite: PhoneScript_AnswerPhone_Female_Nite:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -553,7 +553,7 @@ PhoneScript_GreetPhone_Male:
iftrue PhoneScript_GreetPhone_Male_Day iftrue PhoneScript_GreetPhone_Male_Day
checktime NITE checktime NITE
iftrue PhoneScript_GreetPhone_Male_Nite iftrue PhoneScript_GreetPhone_Male_Nite
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -676,7 +676,7 @@ PhoneScript_GreetPhone_Male:
end end
PhoneScript_GreetPhone_Male_Day: PhoneScript_GreetPhone_Male_Day:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -799,7 +799,7 @@ PhoneScript_GreetPhone_Male_Day:
end end
PhoneScript_GreetPhone_Male_Nite: PhoneScript_GreetPhone_Male_Nite:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -926,7 +926,7 @@ PhoneScript_GreetPhone_Female:
iftrue PhoneScript_GreetPhone_Female_Day iftrue PhoneScript_GreetPhone_Female_Day
checktime NITE checktime NITE
iftrue PhoneScript_GreetPhone_Female_Nite iftrue PhoneScript_GreetPhone_Female_Nite
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -977,7 +977,7 @@ PhoneScript_GreetPhone_Female:
end end
PhoneScript_GreetPhone_Female_Day: PhoneScript_GreetPhone_Female_Day:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -1028,7 +1028,7 @@ PhoneScript_GreetPhone_Female_Day:
end end
PhoneScript_GreetPhone_Female_Nite: PhoneScript_GreetPhone_Female_Nite:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -1079,7 +1079,7 @@ PhoneScript_GreetPhone_Female_Nite:
end end
PhoneScript_Generic_Male: PhoneScript_Generic_Male:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
ifequal PHONE_BIRDKEEPER_JOSE, .Jose ifequal PHONE_BIRDKEEPER_JOSE, .Jose
@ -1189,7 +1189,7 @@ PhoneScript_Generic_Male:
end end
PhoneScript_Generic_Female: PhoneScript_Generic_Female:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena

26
engine/phone/scripts/generic_caller.asm
View File

@ -55,7 +55,7 @@ Phone_GotAwayCall_Female:
farjump PhoneScript_HangupText_Female farjump PhoneScript_HangupText_Female
Phone_WhosBragging_Male: Phone_WhosBragging_Male:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
ifequal PHONE_BIRDKEEPER_JOSE, .Jose ifequal PHONE_BIRDKEEPER_JOSE, .Jose
@ -160,7 +160,7 @@ Phone_WhosBragging_Male:
end end
Phone_WhosBragging_Female: Phone_WhosBragging_Female:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -211,7 +211,7 @@ Phone_WhosBragging_Female:
end end
Phone_WhoDefeatedMon_Male: Phone_WhoDefeatedMon_Male:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
ifequal PHONE_BIRDKEEPER_JOSE, .Jose ifequal PHONE_BIRDKEEPER_JOSE, .Jose
@ -316,7 +316,7 @@ Phone_WhoDefeatedMon_Male:
end end
Phone_WhoDefeatedMon_Female: Phone_WhoDefeatedMon_Female:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -367,7 +367,7 @@ Phone_WhoDefeatedMon_Female:
end end
Phone_WhoLostAMon_Male: Phone_WhoLostAMon_Male:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
ifequal PHONE_BIRDKEEPER_JOSE, .Jose ifequal PHONE_BIRDKEEPER_JOSE, .Jose
@ -472,7 +472,7 @@ Phone_WhoLostAMon_Male:
end end
Phone_WhoLostAMon_Female: Phone_WhoLostAMon_Female:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -531,7 +531,7 @@ PhoneScript_WantsToBattle_Female:
farjump PhoneScript_HangupText_Female farjump PhoneScript_HangupText_Female
PhoneScript_RematchText_Male: PhoneScript_RematchText_Male:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -636,7 +636,7 @@ PhoneScript_RematchText_Male:
end end
PhoneScript_RematchText_Female: PhoneScript_RematchText_Female:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
ifequal PHONE_PICNICKER_LIZ, .Liz ifequal PHONE_PICNICKER_LIZ, .Liz
@ -689,7 +689,7 @@ TiffanyItsAwful:
end end
PhoneScript_HangupText_Male: PhoneScript_HangupText_Male:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_SCHOOLBOY_JACK, .Jack ifequal PHONE_SCHOOLBOY_JACK, .Jack
ifequal PHONE_SAILOR_HUEY, .Huey ifequal PHONE_SAILOR_HUEY, .Huey
ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven ifequal PHONE_COOLTRAINERM_GAVEN, .Gaven
@ -792,7 +792,7 @@ PhoneScript_HangupText_Male:
end end
PhoneScript_HangupText_Female: PhoneScript_HangupText_Female:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_COOLTRAINERF_BETH, .Beth ifequal PHONE_COOLTRAINERF_BETH, .Beth
ifequal PHONE_COOLTRAINERF_REENA, .Reena ifequal PHONE_COOLTRAINERF_REENA, .Reena
@ -855,7 +855,7 @@ PhoneScriptRareWildMon:
end end
PhoneScript_BugCatchingContest: PhoneScript_BugCatchingContest:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_BUG_CATCHER_WADE, .Wade ifequal PHONE_BUG_CATCHER_WADE, .Wade
ifequal PHONE_POKEFANM_DEREK, .Derek ifequal PHONE_POKEFANM_DEREK, .Derek
@ -895,7 +895,7 @@ UnknownScript_0xa05de:
jump PhoneScript_HangupText_Male jump PhoneScript_HangupText_Male
PhoneScript_FoundItem_Male: PhoneScript_FoundItem_Male:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_BIRDKEEPER_JOSE, .Jose ifequal PHONE_BIRDKEEPER_JOSE, .Jose
ifequal PHONE_BUG_CATCHER_WADE, .Wade ifequal PHONE_BUG_CATCHER_WADE, .Wade
ifequal PHONE_SCHOOLBOY_ALAN, .Alan ifequal PHONE_SCHOOLBOY_ALAN, .Alan
@ -928,7 +928,7 @@ PhoneScript_FoundItem_Male:
end end
PhoneScript_FoundItem_Female: PhoneScript_FoundItem_Female:
checkcode VAR_CALLERID readvar VAR_CALLERID
ifequal PHONE_POKEFAN_BEVERLY, .Beverly ifequal PHONE_POKEFAN_BEVERLY, .Beverly
ifequal PHONE_PICNICKER_GINA, .Gina ifequal PHONE_PICNICKER_GINA, .Gina
ifequal PHONE_LASS_DANA, .Dana ifequal PHONE_LASS_DANA, .Dana

14
engine/phone/scripts/gina.asm
View File

@ -1,5 +1,5 @@
GinaPhoneCalleeScript: GinaPhoneCalleeScript:
trainertotext PICNICKER, GINA1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, GINA1
checkflag ENGINE_GINA checkflag ENGINE_GINA
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
@ -7,7 +7,7 @@ GinaPhoneCalleeScript:
iftrue .NotSunday iftrue .NotSunday
checkflag ENGINE_GINA_HAS_LEAF_STONE checkflag ENGINE_GINA_HAS_LEAF_STONE
iftrue .HasLeafStone iftrue .HasLeafStone
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SUNDAY, .NotSunday ifnotequal SUNDAY, .NotSunday
checktime DAY checktime DAY
iftrue GinaSundayDay iftrue GinaSundayDay
@ -21,15 +21,15 @@ GinaPhoneCalleeScript:
farjump UnknownScript_0xa05c6 farjump UnknownScript_0xa05c6
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_34, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_34
farjump UnknownScript_0xa0a69 farjump UnknownScript_0xa0a69
.HasLeafStone: .HasLeafStone:
landmarktotext ROUTE_34, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_34
farjump UnknownScript_0xa0abd farjump UnknownScript_0xa0abd
GinaPhoneCallerScript: GinaPhoneCallerScript:
trainertotext PICNICKER, GINA1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, GINA1
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue GinaRockets iftrue GinaRockets
@ -59,7 +59,7 @@ GinaSundayDay:
setflag ENGINE_GINA_SUNDAY_AFTERNOON setflag ENGINE_GINA_SUNDAY_AFTERNOON
GinaWantsBattle: GinaWantsBattle:
landmarktotext ROUTE_34, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_34
setflag ENGINE_GINA setflag ENGINE_GINA
farjump PhoneScript_WantsToBattle_Female farjump PhoneScript_WantsToBattle_Female
@ -68,5 +68,5 @@ GinaRockets:
GinaHasLeafStone: GinaHasLeafStone:
setflag ENGINE_GINA_HAS_LEAF_STONE setflag ENGINE_GINA_HAS_LEAF_STONE
landmarktotext ROUTE_34, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_34
farjump PhoneScript_FoundItem_Female farjump PhoneScript_FoundItem_Female

2
engine/phone/scripts/hangups.asm
View File

@ -150,7 +150,7 @@ UnknownScript_0xa09e6:
jump PhoneScript_HangupText_Male jump PhoneScript_HangupText_Male
KenjiAnswerPhoneScript: KenjiAnswerPhoneScript:
checkcode VAR_KENJI_BREAK readvar VAR_KENJI_BREAK
ifequal 2, .Training ifequal 2, .Training
ifequal 1, .OnBreak ifequal 1, .OnBreak
farwritetext UnknownText_0x66e17 farwritetext UnknownText_0x66e17

10
engine/phone/scripts/huey.asm
View File

@ -1,11 +1,11 @@
HueyPhoneCalleeScript: HueyPhoneCalleeScript:
trainertotext SAILOR, HUEY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SAILOR, HUEY1
checkflag ENGINE_HUEY checkflag ENGINE_HUEY
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_HUEY_WEDNESDAY_NIGHT checkflag ENGINE_HUEY_WEDNESDAY_NIGHT
iftrue .NotWednesday iftrue .NotWednesday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal WEDNESDAY, .NotWednesday ifnotequal WEDNESDAY, .NotWednesday
checktime NITE checktime NITE
iftrue HueyWednesdayNight iftrue HueyWednesdayNight
@ -15,11 +15,11 @@ HueyPhoneCalleeScript:
farjump UnknownScript_0xa0908 farjump UnknownScript_0xa0908
.WantsBattle: .WantsBattle:
landmarktotext LIGHTHOUSE, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, LIGHTHOUSE
farjump HueyWantsBattleScript farjump HueyWantsBattleScript
HueyPhoneCallerScript: HueyPhoneCallerScript:
trainertotext SAILOR, HUEY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SAILOR, HUEY1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_HUEY checkflag ENGINE_HUEY
iftrue .Flavor iftrue .Flavor
@ -36,6 +36,6 @@ HueyWednesdayNight:
setflag ENGINE_HUEY_WEDNESDAY_NIGHT setflag ENGINE_HUEY_WEDNESDAY_NIGHT
HueyWantsBattle: HueyWantsBattle:
landmarktotext LIGHTHOUSE, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, LIGHTHOUSE
setflag ENGINE_HUEY setflag ENGINE_HUEY
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

4
engine/phone/scripts/irwin.asm
View File

@ -1,5 +1,5 @@
IrwinPhoneCalleeScript: IrwinPhoneCalleeScript:
trainertotext JUGGLER, IRWIN1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, JUGGLER, IRWIN1
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue .Rockets iftrue .Rockets
@ -9,7 +9,7 @@ IrwinPhoneCalleeScript:
farjump IrwinRocketRumor farjump IrwinRocketRumor
IrwinPhoneCallerScript: IrwinPhoneCallerScript:
trainertotext JUGGLER, IRWIN1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, JUGGLER, IRWIN1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue .Rockets iftrue .Rockets

10
engine/phone/scripts/jack.asm
View File

@ -1,11 +1,11 @@
JackPhoneCalleeScript: JackPhoneCalleeScript:
trainertotext SCHOOLBOY, JACK1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SCHOOLBOY, JACK1
checkflag ENGINE_JACK checkflag ENGINE_JACK
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_JACK_MONDAY_MORNING checkflag ENGINE_JACK_MONDAY_MORNING
iftrue .NotMonday iftrue .NotMonday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal MONDAY, .NotMonday ifnotequal MONDAY, .NotMonday
checktime MORN checktime MORN
iftrue JackMondayMorning iftrue JackMondayMorning
@ -14,11 +14,11 @@ JackPhoneCalleeScript:
farjump JackPhoneTips farjump JackPhoneTips
.WantsBattle: .WantsBattle:
landmarktotext NATIONAL_PARK, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, NATIONAL_PARK
farjump JackWantsBattleScript farjump JackWantsBattleScript
JackPhoneCallerScript: JackPhoneCallerScript:
trainertotext SCHOOLBOY, JACK1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SCHOOLBOY, JACK1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
farscall PhoneScript_Random2 farscall PhoneScript_Random2
ifequal 0, JackBattleTrivia ifequal 0, JackBattleTrivia
@ -38,7 +38,7 @@ JackMondayMorning:
setflag ENGINE_JACK_MONDAY_MORNING setflag ENGINE_JACK_MONDAY_MORNING
JackWantsToBattle: JackWantsToBattle:
landmarktotext NATIONAL_PARK, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, NATIONAL_PARK
setflag ENGINE_JACK setflag ENGINE_JACK
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

10
engine/phone/scripts/joey.asm
View File

@ -1,11 +1,11 @@
JoeyPhoneCalleeScript: JoeyPhoneCalleeScript:
trainertotext YOUNGSTER, JOEY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, YOUNGSTER, JOEY1
checkflag ENGINE_JOEY checkflag ENGINE_JOEY
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_JOEY_MONDAY_AFTERNOON checkflag ENGINE_JOEY_MONDAY_AFTERNOON
iftrue .NotMonday iftrue .NotMonday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal MONDAY, .NotMonday ifnotequal MONDAY, .NotMonday
checktime DAY checktime DAY
iftrue JoeyMondayAfternoon iftrue JoeyMondayAfternoon
@ -15,11 +15,11 @@ JoeyPhoneCalleeScript:
farjump UnknownScript_0xa0930 farjump UnknownScript_0xa0930
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_30, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_30
farjump UnknownScript_0xa0a4b farjump UnknownScript_0xa0a4b
JoeyPhoneCallerScript: JoeyPhoneCallerScript:
trainertotext YOUNGSTER, JOEY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, YOUNGSTER, JOEY1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_JOEY checkflag ENGINE_JOEY
iftrue .Generic iftrue .Generic
@ -36,6 +36,6 @@ JoeyMondayAfternoon:
setflag ENGINE_JOEY_MONDAY_AFTERNOON setflag ENGINE_JOEY_MONDAY_AFTERNOON
JoeyWantsBattle: JoeyWantsBattle:
landmarktotext ROUTE_30, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_30
setflag ENGINE_JOEY setflag ENGINE_JOEY
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

14
engine/phone/scripts/jose.asm
View File

@ -1,5 +1,5 @@
JosePhoneCalleeScript: JosePhoneCalleeScript:
trainertotext BIRD_KEEPER, JOSE2, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BIRD_KEEPER, JOSE2
checkflag ENGINE_JOSE checkflag ENGINE_JOSE
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
@ -7,7 +7,7 @@ JosePhoneCalleeScript:
iftrue .NotSaturday iftrue .NotSaturday
checkflag ENGINE_JOSE_HAS_STAR_PIECE checkflag ENGINE_JOSE_HAS_STAR_PIECE
iftrue .HasItem iftrue .HasItem
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SATURDAY, .NotSaturday ifnotequal SATURDAY, .NotSaturday
checktime NITE checktime NITE
iftrue JoseSaturdayNight iftrue JoseSaturdayNight
@ -16,15 +16,15 @@ JosePhoneCalleeScript:
farjump UnknownScript_0xa0920 farjump UnknownScript_0xa0920
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_27, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_27
farjump UnknownScript_0xa0a41 farjump UnknownScript_0xa0a41
.HasItem: .HasItem:
landmarktotext ROUTE_27, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_27
farjump UnknownScript_0xa0a41 farjump UnknownScript_0xa0a41
JosePhoneCallerScript: JosePhoneCallerScript:
trainertotext BIRD_KEEPER, JOSE2, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BIRD_KEEPER, JOSE2
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_JOSE checkflag ENGINE_JOSE
iftrue .Generic iftrue .Generic
@ -46,7 +46,7 @@ JoseSaturdayNight:
setflag ENGINE_JOSE_SATURDAY_NIGHT setflag ENGINE_JOSE_SATURDAY_NIGHT
JoseWantsBattle: JoseWantsBattle:
landmarktotext ROUTE_27, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_27
setflag ENGINE_JOSE setflag ENGINE_JOSE
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
@ -55,5 +55,5 @@ JoseFoundRare:
JoseHasStarPiece: JoseHasStarPiece:
setflag ENGINE_JOSE_HAS_STAR_PIECE setflag ENGINE_JOSE_HAS_STAR_PIECE
landmarktotext ROUTE_27, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_27
farjump PhoneScript_FoundItem_Male farjump PhoneScript_FoundItem_Male

4
engine/phone/scripts/kenji.asm
View File

@ -1,9 +1,9 @@
KenjiPhoneCalleeScript: KenjiPhoneCalleeScript:
trainertotext BLACKBELT_T, KENJI3, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BLACKBELT_T, KENJI3
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
farjump KenjiAnswerPhoneScript farjump KenjiAnswerPhoneScript
KenjiPhoneCallerScript: KenjiPhoneCallerScript:
trainertotext BLACKBELT_T, KENJI3, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BLACKBELT_T, KENJI3
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
farjump KenjiCallingPhoneScript farjump KenjiCallingPhoneScript

28
engine/phone/scripts/liz.asm
View File

@ -1,11 +1,11 @@
LizPhoneCalleeScript: LizPhoneCalleeScript:
trainertotext PICNICKER, LIZ1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, LIZ1
checkflag ENGINE_LIZ checkflag ENGINE_LIZ
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_LIZ_THURSDAY_AFTERNOON checkflag ENGINE_LIZ_THURSDAY_AFTERNOON
iftrue .NotThursday iftrue .NotThursday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal THURSDAY, .NotThursday ifnotequal THURSDAY, .NotThursday
checktime DAY checktime DAY
iftrue LizThursdayAfternoon iftrue LizThursdayAfternoon
@ -15,11 +15,11 @@ LizPhoneCalleeScript:
farjump UnknownScript_0xa0948 farjump UnknownScript_0xa0948
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_32, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_32
farjump UnknownScript_0xa0a5a farjump UnknownScript_0xa0a5a
LizPhoneCallerScript: LizPhoneCallerScript:
trainertotext PICNICKER, LIZ1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, LIZ1
farscall PhoneScript_Random4 farscall PhoneScript_Random4
ifequal 0, LizWrongNumber ifequal 0, LizWrongNumber
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
@ -43,7 +43,7 @@ LizThursdayAfternoon:
setflag ENGINE_LIZ_THURSDAY_AFTERNOON setflag ENGINE_LIZ_THURSDAY_AFTERNOON
LizWantsBattle: LizWantsBattle:
landmarktotext ROUTE_32, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_32
setflag ENGINE_LIZ setflag ENGINE_LIZ
farjump PhoneScript_WantsToBattle_Female farjump PhoneScript_WantsToBattle_Female
@ -63,39 +63,39 @@ LizGossip:
ifequal 8, .PokefanM ifequal 8, .PokefanM
.CoolTrainerM: .CoolTrainerM:
trainerclassname COOLTRAINERM, NICK gettrainerclassname STRING_BUFFER_4, COOLTRAINERM
jump LizGossipScript jump LizGossipScript
.Beauty: .Beauty:
trainerclassname BEAUTY, VICTORIA gettrainerclassname STRING_BUFFER_4, BEAUTY
jump LizGossipScript jump LizGossipScript
.Grunt: .Grunt:
trainerclassname GRUNTM, GRUNTM_1 gettrainerclassname STRING_BUFFER_4, GRUNTM
jump LizGossipScript jump LizGossipScript
.Teacher: .Teacher:
trainerclassname TEACHER, COLETTE gettrainerclassname STRING_BUFFER_4, TEACHER
jump LizGossipScript jump LizGossipScript
.SwimmerF: .SwimmerF:
trainerclassname SWIMMERF, ELAINE gettrainerclassname STRING_BUFFER_4, SWIMMERF
jump LizGossipScript jump LizGossipScript
.KimonoGirl: .KimonoGirl:
trainerclassname KIMONO_GIRL, NAOKO1 gettrainerclassname STRING_BUFFER_4, KIMONO_GIRL
jump LizGossipScript jump LizGossipScript
.Skier: .Skier:
trainerclassname SKIER, ROXANNE gettrainerclassname STRING_BUFFER_4, SKIER
jump LizGossipScript jump LizGossipScript
.Medium: .Medium:
trainerclassname MEDIUM, MARTHA gettrainerclassname STRING_BUFFER_4, MEDIUM
jump LizGossipScript jump LizGossipScript
.PokefanM: .PokefanM:
trainerclassname POKEFANM, WILLIAM gettrainerclassname STRING_BUFFER_4, POKEFANM
jump LizGossipScript jump LizGossipScript
LizGossipScript: LizGossipScript:

16
engine/phone/scripts/mom.asm
View File

@ -14,8 +14,8 @@ MomPhoneCalleeScript:
iftrue MomPhoneHangUpScript iftrue MomPhoneHangUpScript
farwritetext MomPhoneGreetingText farwritetext MomPhoneGreetingText
buttonsound buttonsound
mapnametotext MEM_BUFFER_0 getcurlandmarkname STRING_BUFFER_3
checkcode VAR_ROOFPALETTE readvar VAR_ROOFPALETTE
ifequal 1, MomPhonePalette1 ifequal 1, MomPhonePalette1
ifequal 2, MomPhonePalette2 ifequal 2, MomPhonePalette2
jump MomPhoneOther jump MomPhoneOther
@ -26,7 +26,7 @@ MomPhoneLandmark:
jump MomSavingMoney jump MomSavingMoney
MomPhonePalette1: MomPhonePalette1:
checkcode VAR_MAPGROUP readvar VAR_MAPGROUP
ifequal GROUP_NEW_BARK_TOWN, .newbark ifequal GROUP_NEW_BARK_TOWN, .newbark
ifequal GROUP_CHERRYGROVE_CITY, .cherrygrove ifequal GROUP_CHERRYGROVE_CITY, .cherrygrove
ifequal GROUP_VIOLET_CITY, .violet ifequal GROUP_VIOLET_CITY, .violet
@ -47,13 +47,13 @@ MomPhonePalette1:
jump MomSavingMoney jump MomSavingMoney
.violet .violet
landmarktotext SPROUT_TOWER, MEM_BUFFER_1 getlandmarkname STRING_BUFFER_4, SPROUT_TOWER
jump MomPhoneLandmark jump MomPhoneLandmark
.azalea .azalea
landmarktotext SLOWPOKE_WELL, MEM_BUFFER_1 getlandmarkname STRING_BUFFER_4, SLOWPOKE_WELL
jump MomPhoneLandmark jump MomPhoneLandmark
.goldenrod .goldenrod
landmarktotext RADIO_TOWER, MEM_BUFFER_1 getlandmarkname STRING_BUFFER_4, RADIO_TOWER
jump MomPhoneLandmark jump MomPhoneLandmark
MomPhonePalette2: MomPhonePalette2:
@ -79,7 +79,7 @@ MomSavingMoney:
jump .NoMoney jump .NoMoney
.SavingHasMoney: .SavingHasMoney:
readmoney MOMS_MONEY, MEM_BUFFER_0 getmoney STRING_BUFFER_3, MOMS_MONEY
farwritetext MomCheckBalanceText farwritetext MomCheckBalanceText
yesorno yesorno
iftrue MomPhoneSaveMoneyScript iftrue MomPhoneSaveMoneyScript
@ -98,7 +98,7 @@ MomSavingMoney:
jump MomPhoneWontSaveMoneyScript jump MomPhoneWontSaveMoneyScript
.HasMoney: .HasMoney:
readmoney MOMS_MONEY, MEM_BUFFER_0 getmoney STRING_BUFFER_3, MOMS_MONEY
farwritetext MomYouveSavedText farwritetext MomYouveSavedText
yesorno yesorno
iftrue MomPhoneSaveMoneyScript iftrue MomPhoneSaveMoneyScript

10
engine/phone/scripts/parry.asm
View File

@ -1,11 +1,11 @@
ParryPhoneCalleeScript: ParryPhoneCalleeScript:
trainertotext HIKER, PARRY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, HIKER, PARRY1
checkflag ENGINE_PARRY checkflag ENGINE_PARRY
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_PARRY_FRIDAY_AFTERNOON checkflag ENGINE_PARRY_FRIDAY_AFTERNOON
iftrue .WantsRematch iftrue .WantsRematch
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal FRIDAY, .WantsRematch ifnotequal FRIDAY, .WantsRematch
checktime DAY checktime DAY
iftrue ParryFridayDay iftrue ParryFridayDay
@ -14,11 +14,11 @@ ParryPhoneCalleeScript:
farjump ParryBattleWithMe farjump ParryBattleWithMe
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_45, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_45
farjump ParryHaventYouGottenTo farjump ParryHaventYouGottenTo
ParryPhoneCallerScript: ParryPhoneCallerScript:
trainertotext HIKER, PARRY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, HIKER, PARRY1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_PARRY checkflag ENGINE_PARRY
iftrue .GenericCall iftrue .GenericCall
@ -35,6 +35,6 @@ ParryFridayDay:
setflag ENGINE_PARRY_FRIDAY_AFTERNOON setflag ENGINE_PARRY_FRIDAY_AFTERNOON
ParryWantsBattle: ParryWantsBattle:
landmarktotext ROUTE_45, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_45
setflag ENGINE_PARRY setflag ENGINE_PARRY
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

18
engine/phone/scripts/ralph.asm
View File

@ -1,11 +1,11 @@
RalphPhoneCalleeScript: RalphPhoneCalleeScript:
trainertotext FISHER, RALPH1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, FISHER, RALPH1
checkflag ENGINE_RALPH checkflag ENGINE_RALPH
iftrue .Rematch iftrue .Rematch
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_RALPH_WEDNESDAY_MORNING checkflag ENGINE_RALPH_WEDNESDAY_MORNING
iftrue .CheckSwarm iftrue .CheckSwarm
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal WEDNESDAY, .CheckSwarm ifnotequal WEDNESDAY, .CheckSwarm
checktime MORN checktime MORN
iftrue Ralph_WednesdayMorning iftrue Ralph_WednesdayMorning
@ -15,15 +15,15 @@ RalphPhoneCalleeScript:
farjump UnknownScript_0xa0940 farjump UnknownScript_0xa0940
.Rematch: .Rematch:
landmarktotext ROUTE_32, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_32
farjump UnknownScript_0xa0a55 farjump UnknownScript_0xa0a55
.ReportSwarm: .ReportSwarm:
landmarktotext ROUTE_32, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_32
farjump UnknownScript_0xa0af5 farjump UnknownScript_0xa0af5
RalphPhoneCallerScript: RalphPhoneCallerScript:
trainertotext FISHER, RALPH1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, FISHER, RALPH1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_FLYPOINT_GOLDENROD checkflag ENGINE_FLYPOINT_GOLDENROD
iffalse .CheckSwarm iffalse .CheckSwarm
@ -41,7 +41,7 @@ RalphPhoneCallerScript:
Ralph_WednesdayMorning: Ralph_WednesdayMorning:
setflag ENGINE_RALPH_WEDNESDAY_MORNING setflag ENGINE_RALPH_WEDNESDAY_MORNING
Ralph_FightMe: Ralph_FightMe:
landmarktotext ROUTE_32, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_32
setflag ENGINE_RALPH setflag ENGINE_RALPH
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
@ -49,9 +49,9 @@ Ralph_SetUpSwarm:
checkflag ENGINE_FISH_SWARM checkflag ENGINE_FISH_SWARM
iftrue .Generic iftrue .Generic
setflag ENGINE_FISH_SWARM setflag ENGINE_FISH_SWARM
pokenamemem QWILFISH, MEM_BUFFER_1 getmonname STRING_BUFFER_4, QWILFISH
landmarktotext ROUTE_32, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_32
writebyte FISHSWARM_QWILFISH setval FISHSWARM_QWILFISH
special ActivateFishingSwarm special ActivateFishingSwarm
farjump UnknownScript_0xa05d6 farjump UnknownScript_0xa05d6

10
engine/phone/scripts/reena.asm
View File

@ -1,11 +1,11 @@
ReenaPhoneCalleeScript: ReenaPhoneCalleeScript:
trainertotext COOLTRAINERF, REENA1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, COOLTRAINERF, REENA1
checkflag ENGINE_REENA checkflag ENGINE_REENA
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
checkflag ENGINE_REENA_SUNDAY_MORNING checkflag ENGINE_REENA_SUNDAY_MORNING
iftrue .NotSunday iftrue .NotSunday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SUNDAY, .NotSunday ifnotequal SUNDAY, .NotSunday
checktime MORN checktime MORN
iftrue ReenaSundayMorning iftrue ReenaSundayMorning
@ -14,11 +14,11 @@ ReenaPhoneCalleeScript:
farjump UnknownScript_0xa0928 farjump UnknownScript_0xa0928
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_27, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_27
farjump UnknownScript_0xa0a46 farjump UnknownScript_0xa0a46
ReenaPhoneCallerScript: ReenaPhoneCallerScript:
trainertotext COOLTRAINERF, REENA1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, COOLTRAINERF, REENA1
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
checkflag ENGINE_REENA checkflag ENGINE_REENA
iftrue .Generic iftrue .Generic
@ -34,6 +34,6 @@ ReenaSundayMorning:
setflag ENGINE_REENA_SUNDAY_MORNING setflag ENGINE_REENA_SUNDAY_MORNING
ReenaWantsBattle: ReenaWantsBattle:
landmarktotext ROUTE_27, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_27
setflag ENGINE_REENA setflag ENGINE_REENA
farjump PhoneScript_WantsToBattle_Female farjump PhoneScript_WantsToBattle_Female

26
engine/phone/scripts/tiffany.asm
View File

@ -1,5 +1,5 @@
TiffanyPhoneCalleeScript: TiffanyPhoneCalleeScript:
trainertotext PICNICKER, TIFFANY3, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, TIFFANY3
checkflag ENGINE_TIFFANY checkflag ENGINE_TIFFANY
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Female farscall PhoneScript_AnswerPhone_Female
@ -7,7 +7,7 @@ TiffanyPhoneCalleeScript:
iftrue .NotTuesday iftrue .NotTuesday
checkflag ENGINE_TIFFANY_HAS_PINK_BOW checkflag ENGINE_TIFFANY_HAS_PINK_BOW
iftrue .HasItem iftrue .HasItem
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal TUESDAY, .NotTuesday ifnotequal TUESDAY, .NotTuesday
checktime DAY checktime DAY
iftrue TiffanyTuesdayAfternoon iftrue TiffanyTuesdayAfternoon
@ -16,15 +16,15 @@ TiffanyPhoneCalleeScript:
farjump UnknownScript_0xa09a0 farjump UnknownScript_0xa09a0
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_43, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_43
farjump UnknownScript_0xa0a8c farjump UnknownScript_0xa0a8c
.HasItem: .HasItem:
landmarktotext ROUTE_43, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_43
farjump UnknownScript_0xa0ae5 farjump UnknownScript_0xa0ae5
TiffanyPhoneCallerScript: TiffanyPhoneCallerScript:
trainertotext PICNICKER, TIFFANY3, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, PICNICKER, TIFFANY3
farscall PhoneScript_Random4 farscall PhoneScript_Random4
ifequal 0, TiffanysFamilyMembers ifequal 0, TiffanysFamilyMembers
farscall PhoneScript_GreetPhone_Female farscall PhoneScript_GreetPhone_Female
@ -52,7 +52,7 @@ TiffanyTuesdayAfternoon:
setflag ENGINE_TIFFANY_TUESDAY_AFTERNOON setflag ENGINE_TIFFANY_TUESDAY_AFTERNOON
TiffanyWantsBattle: TiffanyWantsBattle:
landmarktotext ROUTE_43, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_43
setflag ENGINE_TIFFANY setflag ENGINE_TIFFANY
farjump PhoneScript_WantsToBattle_Female farjump PhoneScript_WantsToBattle_Female
@ -66,27 +66,27 @@ TiffanysFamilyMembers:
ifequal 5, .Brother ifequal 5, .Brother
.Grandma: .Grandma:
stringtotext GrandmaString, MEM_BUFFER_1 getstring STRING_BUFFER_4, GrandmaString
jump .PoorClefairy jump .PoorClefairy
.Grandpa: .Grandpa:
stringtotext GrandpaString, MEM_BUFFER_1 getstring STRING_BUFFER_4, GrandpaString
jump .PoorClefairy jump .PoorClefairy
.Mom: .Mom:
stringtotext MomString, MEM_BUFFER_1 getstring STRING_BUFFER_4, MomString
jump .PoorClefairy jump .PoorClefairy
.Dad: .Dad:
stringtotext DadString, MEM_BUFFER_1 getstring STRING_BUFFER_4, DadString
jump .PoorClefairy jump .PoorClefairy
.Sister: .Sister:
stringtotext SisterString, MEM_BUFFER_1 getstring STRING_BUFFER_4, SisterString
jump .PoorClefairy jump .PoorClefairy
.Brother: .Brother:
stringtotext BrotherString, MEM_BUFFER_1 getstring STRING_BUFFER_4, BrotherString
jump .PoorClefairy jump .PoorClefairy
.PoorClefairy: .PoorClefairy:
@ -94,5 +94,5 @@ TiffanysFamilyMembers:
TiffanyHasPinkBow: TiffanyHasPinkBow:
setflag ENGINE_TIFFANY_HAS_PINK_BOW setflag ENGINE_TIFFANY_HAS_PINK_BOW
landmarktotext ROUTE_43, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_43
farjump PhoneScript_FoundItem_Female farjump PhoneScript_FoundItem_Female

10
engine/phone/scripts/todd.asm
View File

@ -1,11 +1,11 @@
ToddPhoneCalleeScript: ToddPhoneCalleeScript:
trainertotext CAMPER, TODD1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, CAMPER, TODD1
checkflag ENGINE_TODD checkflag ENGINE_TODD
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_TODD_SATURDAY_MORNING checkflag ENGINE_TODD_SATURDAY_MORNING
iftrue .NotSaturday iftrue .NotSaturday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SATURDAY, .NotSaturday ifnotequal SATURDAY, .NotSaturday
checktime MORN checktime MORN
iftrue ToddSaturdayMorning iftrue ToddSaturdayMorning
@ -16,14 +16,14 @@ ToddPhoneCalleeScript:
farjump UnknownScript_0xa0958 farjump UnknownScript_0xa0958
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_34, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_34
farjump UnknownScript_0xa0a64 farjump UnknownScript_0xa0a64
.SaleOn: .SaleOn:
farjump UnknownScript_0xa0b04 farjump UnknownScript_0xa0b04
ToddPhoneCallerScript: ToddPhoneCallerScript:
trainertotext CAMPER, TODD1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, CAMPER, TODD1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_TODD checkflag ENGINE_TODD
iftrue .TryForSale iftrue .TryForSale
@ -47,7 +47,7 @@ ToddSaturdayMorning:
setflag ENGINE_TODD_SATURDAY_MORNING setflag ENGINE_TODD_SATURDAY_MORNING
ToddWantsBattle: ToddWantsBattle:
landmarktotext ROUTE_34, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_34
setflag ENGINE_TODD setflag ENGINE_TODD
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

14
engine/phone/scripts/tully.asm
View File

@ -1,5 +1,5 @@
TullyPhoneCalleeScript: TullyPhoneCalleeScript:
trainertotext FISHER, TULLY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, FISHER, TULLY1
checkflag ENGINE_TULLY checkflag ENGINE_TULLY
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
@ -7,7 +7,7 @@ TullyPhoneCalleeScript:
iftrue .NotSunday iftrue .NotSunday
checkflag ENGINE_TULLY_HAS_WATER_STONE checkflag ENGINE_TULLY_HAS_WATER_STONE
iftrue .WaterStone iftrue .WaterStone
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SUNDAY, .NotSunday ifnotequal SUNDAY, .NotSunday
checktime NITE checktime NITE
iftrue TullySundayNight iftrue TullySundayNight
@ -16,15 +16,15 @@ TullyPhoneCalleeScript:
farjump UnknownScript_0xa0990 farjump UnknownScript_0xa0990
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_42, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_42
farjump UnknownScript_0xa0a82 farjump UnknownScript_0xa0a82
.WaterStone: .WaterStone:
landmarktotext ROUTE_42, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_42
farjump UnknownScript_0xa0add farjump UnknownScript_0xa0add
TullyPhoneCallerScript: TullyPhoneCallerScript:
trainertotext FISHER, TULLY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, FISHER, TULLY1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_TULLY checkflag ENGINE_TULLY
iftrue .Generic iftrue .Generic
@ -50,11 +50,11 @@ TullySundayNight:
setflag ENGINE_TULLY_SUNDAY_NIGHT setflag ENGINE_TULLY_SUNDAY_NIGHT
TullyWantsBattle: TullyWantsBattle:
landmarktotext ROUTE_42, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_42
setflag ENGINE_TULLY setflag ENGINE_TULLY
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
TullyFoundWaterStone: TullyFoundWaterStone:
setflag ENGINE_TULLY_HAS_WATER_STONE setflag ENGINE_TULLY_HAS_WATER_STONE
landmarktotext ROUTE_42, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_42
farjump PhoneScript_FoundItem_Male farjump PhoneScript_FoundItem_Male

10
engine/phone/scripts/vance.asm
View File

@ -1,11 +1,11 @@
VancePhoneCalleeScript: VancePhoneCalleeScript:
trainertotext BIRD_KEEPER, VANCE1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BIRD_KEEPER, VANCE1
checkflag ENGINE_VANCE checkflag ENGINE_VANCE
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
checkflag ENGINE_VANCE_WEDNESDAY_NIGHT checkflag ENGINE_VANCE_WEDNESDAY_NIGHT
iftrue .NotWednesday iftrue .NotWednesday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal WEDNESDAY, .NotWednesday ifnotequal WEDNESDAY, .NotWednesday
checktime NITE checktime NITE
iftrue VanceWednesdayNight iftrue VanceWednesdayNight
@ -14,11 +14,11 @@ VancePhoneCalleeScript:
farjump VanceLookingForward farjump VanceLookingForward
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_44, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_44
farjump VanceHurryHurry farjump VanceHurryHurry
VancePhoneCallerScript: VancePhoneCallerScript:
trainertotext BIRD_KEEPER, VANCE1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BIRD_KEEPER, VANCE1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_VANCE checkflag ENGINE_VANCE
iftrue .WantsBattle iftrue .WantsBattle
@ -35,6 +35,6 @@ VanceWednesdayNight:
setflag ENGINE_VANCE_WEDNESDAY_NIGHT setflag ENGINE_VANCE_WEDNESDAY_NIGHT
VanceWantsRematch: VanceWantsRematch:
landmarktotext ROUTE_44, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_44
setflag ENGINE_VANCE setflag ENGINE_VANCE
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male

18
engine/phone/scripts/wade.asm
View File

@ -1,5 +1,5 @@
WadePhoneCalleeScript: WadePhoneCalleeScript:
trainertotext BUG_CATCHER, WADE1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BUG_CATCHER, WADE1
checkflag ENGINE_WADE checkflag ENGINE_WADE
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
@ -7,7 +7,7 @@ WadePhoneCalleeScript:
iftrue .NotTuesday iftrue .NotTuesday
checkflag ENGINE_WADE_HAS_ITEM checkflag ENGINE_WADE_HAS_ITEM
iftrue .HasItem iftrue .HasItem
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal TUESDAY, .NotTuesday ifnotequal TUESDAY, .NotTuesday
checktime NITE checktime NITE
iftrue WadeTuesdayNight iftrue WadeTuesdayNight
@ -17,7 +17,7 @@ WadePhoneCalleeScript:
ifequal 0, .NoContest ifequal 0, .NoContest
checkflag ENGINE_DAILY_BUG_CONTEST checkflag ENGINE_DAILY_BUG_CONTEST
iftrue .NoContest iftrue .NoContest
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal TUESDAY, .ContestToday ifequal TUESDAY, .ContestToday
ifequal THURSDAY, .ContestToday ifequal THURSDAY, .ContestToday
ifequal SATURDAY, .ContestToday ifequal SATURDAY, .ContestToday
@ -29,21 +29,21 @@ WadePhoneCalleeScript:
farjump PhoneScript_BugCatchingContest farjump PhoneScript_BugCatchingContest
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_31, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_31
farjump UnknownScript_0xa0a50 farjump UnknownScript_0xa0a50
.HasItem: .HasItem:
landmarktotext ROUTE_31, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_31
farjump UnknownScript_0xa0ab5 farjump UnknownScript_0xa0ab5
WadePhoneCallerScript: WadePhoneCallerScript:
trainertotext BUG_CATCHER, WADE1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, BUG_CATCHER, WADE1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
farscall PhoneScript_Random2 farscall PhoneScript_Random2
ifequal 0, .NoContest ifequal 0, .NoContest
checkflag ENGINE_DAILY_BUG_CONTEST checkflag ENGINE_DAILY_BUG_CONTEST
iftrue .NoContest iftrue .NoContest
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal TUESDAY, .ContestToday ifequal TUESDAY, .ContestToday
ifequal THURSDAY, .ContestToday ifequal THURSDAY, .ContestToday
ifequal SATURDAY, .ContestToday ifequal SATURDAY, .ContestToday
@ -74,7 +74,7 @@ WadeTuesdayNight:
setflag ENGINE_WADE_TUESDAY_NIGHT setflag ENGINE_WADE_TUESDAY_NIGHT
WadeWantsBattle2: WadeWantsBattle2:
landmarktotext ROUTE_31, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_31
setflag ENGINE_WADE setflag ENGINE_WADE
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
@ -83,7 +83,7 @@ WadeFoundRare:
WadeHasItem2: WadeHasItem2:
setflag ENGINE_WADE_HAS_ITEM setflag ENGINE_WADE_HAS_ITEM
landmarktotext ROUTE_31, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_31
clearevent EVENT_WADE_HAS_BERRY clearevent EVENT_WADE_HAS_BERRY
clearevent EVENT_WADE_HAS_PSNCUREBERRY clearevent EVENT_WADE_HAS_PSNCUREBERRY
clearevent EVENT_WADE_HAS_PRZCUREBERRY clearevent EVENT_WADE_HAS_PRZCUREBERRY

14
engine/phone/scripts/wilton.asm
View File

@ -1,5 +1,5 @@
WiltonPhoneCalleeScript: WiltonPhoneCalleeScript:
trainertotext FISHER, WILTON1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, FISHER, WILTON1
checkflag ENGINE_WILTON checkflag ENGINE_WILTON
iftrue .WantsBattle iftrue .WantsBattle
farscall PhoneScript_AnswerPhone_Male farscall PhoneScript_AnswerPhone_Male
@ -7,7 +7,7 @@ WiltonPhoneCalleeScript:
iftrue .NotThursday iftrue .NotThursday
checkflag ENGINE_WILTON_HAS_ITEM checkflag ENGINE_WILTON_HAS_ITEM
iftrue .HasItem iftrue .HasItem
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal THURSDAY, .NotThursday ifnotequal THURSDAY, .NotThursday
checktime MORN checktime MORN
iftrue WiltonThursdayMorning iftrue WiltonThursdayMorning
@ -16,15 +16,15 @@ WiltonPhoneCalleeScript:
farjump WiltonHaventFoundAnything farjump WiltonHaventFoundAnything
.WantsBattle: .WantsBattle:
landmarktotext ROUTE_44, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_44
farjump WiltonNotBiting farjump WiltonNotBiting
.HasItem: .HasItem:
landmarktotext ROUTE_44, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_44
farjump WiltonWantThis farjump WiltonWantThis
WiltonPhoneCallerScript: WiltonPhoneCallerScript:
trainertotext FISHER, WILTON1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, FISHER, WILTON1
farscall PhoneScript_GreetPhone_Male farscall PhoneScript_GreetPhone_Male
checkflag ENGINE_WILTON checkflag ENGINE_WILTON
iftrue .GenericCall iftrue .GenericCall
@ -44,13 +44,13 @@ WiltonThursdayMorning:
setflag ENGINE_WILTON_THURSDAY_MORNING setflag ENGINE_WILTON_THURSDAY_MORNING
WiltonWantsBattle: WiltonWantsBattle:
landmarktotext ROUTE_44, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_44
setflag ENGINE_WILTON setflag ENGINE_WILTON
farjump PhoneScript_WantsToBattle_Male farjump PhoneScript_WantsToBattle_Male
WiltonHasItem: WiltonHasItem:
setflag ENGINE_WILTON_HAS_ITEM setflag ENGINE_WILTON_HAS_ITEM
landmarktotext ROUTE_44, MEM_BUFFER_2 getlandmarkname STRING_BUFFER_5, ROUTE_44
clearevent EVENT_WILTON_HAS_ULTRA_BALL clearevent EVENT_WILTON_HAS_ULTRA_BALL
clearevent EVENT_WILTON_HAS_GREAT_BALL clearevent EVENT_WILTON_HAS_GREAT_BALL
clearevent EVENT_WILTON_HAS_POKE_BALL clearevent EVENT_WILTON_HAS_POKE_BALL

64
macros/legacy.asm
View File

@ -26,13 +26,62 @@ domaptrigger EQUS "setmapscene"
checktriggers EQUS "checkscene" checktriggers EQUS "checkscene"
dotrigger EQUS "setscene" dotrigger EQUS "setscene"
faceperson EQUS "faceobject" faceperson EQUS "faceobject"
moveperson EQUS "moveobject" moveperson EQUS "moveobject"
writepersonxy EQUS "writeobjectxy" writepersonxy EQUS "writeobjectxy"
spriteface EQUS "turnobject" spriteface EQUS "turnobject"
objectface EQUS "turnobject" objectface EQUS "turnobject"
applymovement2 EQUS "applymovementlasttalked"
RAM2MEM EQUS "vartomem" writebyte EQUS "setval"
addvar EQUS "addval"
copybytetovar EQUS "readmem"
copyvartobyte EQUS "writemem"
checkcode EQUS "readvar"
writevarcode EQUS "writevar"
writecode EQUS "loadvar"
MEM_BUFFER_0 EQUS "STRING_BUFFER_3"
MEM_BUFFER_1 EQUS "STRING_BUFFER_4"
MEM_BUFFER_2 EQUS "STRING_BUFFER_5"
vartomem EQUS "getnum"
mapnametotext EQUS "getcurlandmarkname"
readcoins EQUS "getcoins"
pokenamemem: MACRO
getmonname \2, \1
ENDM
itemtotext: MACRO
getitemname \2, \1
ENDM
landmarktotext: MACRO
getlandmarkname \2, \1
ENDM
trainertotext: MACRO
gettrainername \3, \1, \2
ENDM
trainerclassname: MACRO
gettrainerclassname \2, \1
ENDM
name: MACRO
getname \3, \1, \2
ENDM
stringtotext: MACRO
getstring \2, \1
ENDM
readmoney: MACRO
getmoney \2, \1
ENDM
RAM2MEM EQUS "getnum"
loadfont EQUS "opentext" loadfont EQUS "opentext"
loadmenudata EQUS "loadmenu" loadmenudata EQUS "loadmenu"
loadmenuheader EQUS "loadmenu" loadmenuheader EQUS "loadmenu"
@ -40,7 +89,7 @@ writebackup EQUS "closewindow"
interpretmenu EQUS "_2dmenu" interpretmenu EQUS "_2dmenu"
interpretmenu2 EQUS "verticalmenu" interpretmenu2 EQUS "verticalmenu"
battlecheck EQUS "randomwildmon" battlecheck EQUS "randomwildmon"
loadtrainerdata EQUS "loadmemtrainer" loadtrainerdata EQUS "loadtemptrainer"
loadpokedata EQUS "loadwildmon" loadpokedata EQUS "loadwildmon"
returnafterbattle EQUS "reloadmapafterbattle" returnafterbattle EQUS "reloadmapafterbattle"
trainerstatus EQUS "trainerflagaction" trainerstatus EQUS "trainerflagaction"
@ -54,6 +103,7 @@ displaylocation EQUS "landmarktotext"
givepokeitem EQUS "givepokemail" givepokeitem EQUS "givepokemail"
checkpokeitem EQUS "checkpokemail" checkpokeitem EQUS "checkpokemail"
passtoengine EQUS "autoinput" passtoengine EQUS "autoinput"
verbosegiveitem2 EQUS "verbosegiveitemvar"
; macros/scripts/maps.asm ; macros/scripts/maps.asm

216
macros/scripts/events.asm
View File

@ -131,15 +131,15 @@ setscene: MACRO
db \1 ; scene_id db \1 ; scene_id
ENDM ENDM
enum writebyte_command ; $15 enum setval_command ; $15
writebyte: MACRO setval: MACRO
db writebyte_command db setval_command
db \1 ; value db \1 ; value
ENDM ENDM
enum addvar_command ; $16 enum addval_command ; $16
addvar: MACRO addval: MACRO
db addvar_command db addval_command
db \1 ; value db \1 ; value
ENDM ENDM
@ -154,42 +154,47 @@ checkver: MACRO
db checkver_command db checkver_command
ENDM ENDM
enum copybytetovar_command ; $19 enum readmem_command ; $19
copybytetovar: MACRO readmem: MACRO
db copybytetovar_command db readmem_command
dw \1 ; address dw \1 ; address
ENDM ENDM
enum copyvartobyte_command ; $1a enum writemem_command ; $1a
copyvartobyte: MACRO writemem: MACRO
db copyvartobyte_command db writemem_command
dw \1 ; address dw \1 ; address
ENDM ENDM
enum loadvar_command ; $1b enum loadmem_command ; $1b
loadmem: MACRO
db loadmem_command
dw \1 ; address
db \2 ; value
ENDM
enum readvar_command ; $1c
readvar: MACRO
db readvar_command
db \1 ; variable_id
ENDM
enum writevar_command ; $1d
writevar: MACRO
db writevar_command
db \1 ; variable_id
ENDM
enum loadvar_command ; $1e
loadvar: MACRO loadvar: MACRO
if STRIN("\1", "VAR_") != 1
; LEGACY: Support for the old name of "loadmem"
loadmem \1, \2
else
db loadvar_command db loadvar_command
dw \1 ; address
db \2 ; value
ENDM
enum checkcode_command ; $1c
checkcode: MACRO
db checkcode_command
db \1 ; variable_id
ENDM
enum writevarcode_command ; $1d
writevarcode: MACRO
db writevarcode_command
db \1 ; variable_id
ENDM
enum writecode_command ; $1e
writecode: MACRO
db writecode_command
db \1 ; variable_id db \1 ; variable_id
db \2 ; value db \2 ; value
endc
ENDM ENDM
enum giveitem_command ; $1f enum giveitem_command ; $1f
@ -400,58 +405,58 @@ warp: MACRO
db \3 ; y db \3 ; y
ENDM ENDM
enum readmoney_command ; $3d enum getmoney_command ; $3d
readmoney: MACRO getmoney: MACRO
db readmoney_command db getmoney_command
db \1 ; account db \2 ; account
db \2 ; memory db \1 ; string_buffer
ENDM ENDM
enum readcoins_command ; $3e enum getcoins_command ; $3e
readcoins: MACRO getcoins: MACRO
db readcoins_command db getcoins_command
db \1 ; memory db \1 ; string_buffer
ENDM ENDM
enum vartomem_command ; $3f enum getnum_command ; $3f
vartomem: MACRO getnum: MACRO
db vartomem_command db getnum_command
db \1 ; memory db \1 ; string_buffer
ENDM ENDM
enum pokenamemem_command ; $40 enum getmonname_command ; $40
pokenamemem: MACRO getmonname: MACRO
db pokenamemem_command db getmonname_command
db \1 ; pokemon db \2 ; pokemon
db \2 ; memory db \1 ; string_buffer
ENDM ENDM
enum itemtotext_command ; $41 enum getitemname_command ; $41
itemtotext: MACRO getitemname: MACRO
db itemtotext_command db getitemname_command
db \1 ; item db \2 ; item
db \2 ; memory db \1 ; string_buffer
ENDM ENDM
enum mapnametotext_command ; $42 enum getcurlandmarkname_command ; $42
mapnametotext: MACRO getcurlandmarkname: MACRO
db mapnametotext_command db getcurlandmarkname_command
db \1 ; memory db \1 ; string_buffer
ENDM ENDM
enum trainertotext_command ; $43 enum gettrainername_command ; $43
trainertotext: MACRO gettrainername: MACRO
db trainertotext_command db gettrainername_command
db \1 ; trainer_id
db \2 ; trainer_group db \2 ; trainer_group
db \3 ; memory db \3 ; trainer_id
db \1 ; string_buffer
ENDM ENDM
enum stringtotext_command ; $44 enum getstring_command ; $44
stringtotext: MACRO getstring: MACRO
db stringtotext_command db getstring_command
dw \1 ; text_pointer dw \2 ; text_pointer
db \2 ; memory db \1 ; string_buffer
ENDM ENDM
enum itemnotify_command ; $45 enum itemnotify_command ; $45
@ -586,9 +591,9 @@ randomwildmon: MACRO
db randomwildmon_command db randomwildmon_command
ENDM ENDM
enum loadmemtrainer_command ; $5c enum loadtemptrainer_command ; $5c
loadmemtrainer: MACRO loadtemptrainer: MACRO
db loadmemtrainer_command db loadtemptrainer_command
ENDM ENDM
enum loadwildmon_command ; $5d enum loadwildmon_command ; $5d
@ -624,7 +629,7 @@ ENDM
enum trainertext_command ; $62 enum trainertext_command ; $62
trainertext: MACRO trainertext: MACRO
db trainertext_command db trainertext_command
db \1 ; which_text db \1 ; text_id
ENDM ENDM
enum trainerflagaction_command ; $63 enum trainerflagaction_command ; $63
@ -668,9 +673,9 @@ applymovement: MACRO
dw \2 ; data dw \2 ; data
ENDM ENDM
enum applymovement2_command ; $6a enum applymovementlasttalked_command ; $6a
applymovement2: MACRO applymovementlasttalked: MACRO
db applymovement2_command db applymovementlasttalked_command
dw \1 ; data dw \1 ; data
ENDM ENDM
@ -765,11 +770,10 @@ earthquake: MACRO
db \1 ; param db \1 ; param
ENDM ENDM
enum changemap_command ; $79 enum changemapblocks_command ; $79
changemap: MACRO changemapblocks: MACRO
db changemap_command db changemapblocks_command
db \1 ; map_bank dba \1 ; map_data_pointer
dw \2 ; map_data_pointer
ENDM ENDM
enum changeblock_command ; $7a enum changeblock_command ; $7a
@ -989,9 +993,9 @@ else
endc endc
ENDM ENDM
enum verbosegiveitem2_command ; $9f enum verbosegiveitemvar_command ; $9f
verbosegiveitem2: MACRO verbosegiveitemvar: MACRO
db verbosegiveitem2_command db verbosegiveitemvar_command
db \1 ; item db \1 ; item
db \2 ; var db \2 ; var
ENDM ENDM
@ -1025,31 +1029,31 @@ ENDM
enum battletowertext_command ; $a4 enum battletowertext_command ; $a4
battletowertext: MACRO battletowertext: MACRO
db battletowertext_command db battletowertext_command
db \1 ; bttext_id
ENDM
enum getlandmarkname_command ; $a5
getlandmarkname: MACRO
db getlandmarkname_command
db \2 ; landmark_id
db \1 ; string_buffer
ENDM
enum gettrainerclassname_command ; $a6
gettrainerclassname: MACRO
db gettrainerclassname_command
db \2 ; trainer_group
db \1 ; string_buffer
ENDM
enum getname_command ; $a7
getname: MACRO
db getname_command
db \2 ; type
db \3 ; id
db \1 ; memory db \1 ; memory
ENDM ENDM
enum landmarktotext_command ; $a5
landmarktotext: MACRO
db landmarktotext_command
db \1 ; id
db \2 ; memory
ENDM
enum trainerclassname_command ; $a6
trainerclassname: MACRO
db trainerclassname_command
db \1 ; id
db \2 ; memory
ENDM
enum name_command ; $a7
name: MACRO
db name_command
db \1 ; type
db \2 ; id
db \3 ; memory
ENDM
enum wait_command ; $a8 enum wait_command ; $a8
wait: MACRO wait: MACRO
db wait_command db wait_command

4
maps/AzaleaGym.asm
View File

@ -30,7 +30,7 @@ AzaleaGymBugsyScript:
playsound SFX_GET_BADGE playsound SFX_GET_BADGE
waitsfx waitsfx
setflag ENGINE_HIVEBADGE setflag ENGINE_HIVEBADGE
checkcode VAR_BADGES readvar VAR_BADGES
scall AzaleaGymActivateRockets scall AzaleaGymActivateRockets
.FightDone: .FightDone:
checkevent EVENT_GOT_TM49_FURY_CUTTER checkevent EVENT_GOT_TM49_FURY_CUTTER
@ -144,7 +144,7 @@ AzaleaGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext BUGSY, BUGSY1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, BUGSY, BUGSY1
jumpstd gymstatue2 jumpstd gymstatue2
BugsyText_INeverLose: BugsyText_INeverLose:

48
maps/BattleTower1F.asm
View File

@ -13,10 +13,10 @@ BattleTower1F_MapScripts:
db 0 ; callbacks db 0 ; callbacks
.Scene0: .Scene0:
writebyte BATTLETOWERACTION_CHECKSAVEFILEISYOURS setval BATTLETOWERACTION_CHECKSAVEFILEISYOURS
special BattleTowerAction special BattleTowerAction
iffalse .SkipEverything iffalse .SkipEverything
writebyte BATTLETOWERACTION_GET_CHALLENGE_STATE ; copybytetovar sBattleTowerChallengeState setval BATTLETOWERACTION_GET_CHALLENGE_STATE ; readmem sBattleTowerChallengeState
special BattleTowerAction special BattleTowerAction
ifequal $0, .SkipEverything ifequal $0, .SkipEverything
ifequal $2, .priorityjump1 ifequal $2, .priorityjump1
@ -31,9 +31,9 @@ BattleTower1F_MapScripts:
.priorityjump1 .priorityjump1
priorityjump BattleTower_LeftWithoutSaving priorityjump BattleTower_LeftWithoutSaving
writebyte BATTLETOWERACTION_CHALLENGECANCELED setval BATTLETOWERACTION_CHALLENGECANCELED
special BattleTowerAction special BattleTowerAction
writebyte BATTLETOWERACTION_06 setval BATTLETOWERACTION_06
special BattleTowerAction special BattleTowerAction
.SkipEverything: .SkipEverything:
setscene SCENE_FINISHED setscene SCENE_FINISHED
@ -52,27 +52,27 @@ BattleTower1FRulesSign:
end end
BattleTower1FReceptionistScript: BattleTower1FReceptionistScript:
writebyte BATTLETOWERACTION_GET_CHALLENGE_STATE ; copybytetovar sBattleTowerChallengeState setval BATTLETOWERACTION_GET_CHALLENGE_STATE ; readmem sBattleTowerChallengeState
special BattleTowerAction special BattleTowerAction
ifequal $3, Script_BeatenAllTrainers2 ; maps/BattleTowerBattleRoom.asm ifequal $3, Script_BeatenAllTrainers2 ; maps/BattleTowerBattleRoom.asm
opentext opentext
writetext Text_BattleTowerWelcomesYou writetext Text_BattleTowerWelcomesYou
buttonsound buttonsound
writebyte BATTLETOWERACTION_CHECK_EXPLANATION_READ ; if new save file: bit 1, [sBattleTowerSaveFileFlags] setval BATTLETOWERACTION_CHECK_EXPLANATION_READ ; if new save file: bit 1, [sBattleTowerSaveFileFlags]
special BattleTowerAction special BattleTowerAction
ifnotequal $0, Script_Menu_ChallengeExplanationCancel ifnotequal $0, Script_Menu_ChallengeExplanationCancel
jump Script_BattleTowerIntroductionYesNo jump Script_BattleTowerIntroductionYesNo
Script_Menu_ChallengeExplanationCancel: Script_Menu_ChallengeExplanationCancel:
writetext Text_WantToGoIntoABattleRoom writetext Text_WantToGoIntoABattleRoom
writebyte TRUE setval TRUE
special Menu_ChallengeExplanationCancel special Menu_ChallengeExplanationCancel
ifequal 1, Script_ChooseChallenge ifequal 1, Script_ChooseChallenge
ifequal 2, Script_BattleTowerExplanation ifequal 2, Script_BattleTowerExplanation
jump Script_BattleTowerHopeToServeYouAgain jump Script_BattleTowerHopeToServeYouAgain
Script_ChooseChallenge: Script_ChooseChallenge:
writebyte BATTLETOWERACTION_RESETDATA ; ResetBattleTowerTrainerSRAM setval BATTLETOWERACTION_RESETDATA ; ResetBattleTowerTrainerSRAM
special BattleTowerAction special BattleTowerAction
special CheckForBattleTowerRules special CheckForBattleTowerRules
ifnotequal FALSE, Script_WaitButton ifnotequal FALSE, Script_WaitButton
@ -83,23 +83,23 @@ Script_ChooseChallenge:
special TryQuickSave special TryQuickSave
iffalse Script_Menu_ChallengeExplanationCancel iffalse Script_Menu_ChallengeExplanationCancel
setscene SCENE_FINISHED setscene SCENE_FINISHED
writebyte BATTLETOWERACTION_SET_EXPLANATION_READ ; set 1, [sBattleTowerSaveFileFlags] setval BATTLETOWERACTION_SET_EXPLANATION_READ ; set 1, [sBattleTowerSaveFileFlags]
special BattleTowerAction special BattleTowerAction
special BattleTowerRoomMenu special BattleTowerRoomMenu
ifequal $a, Script_Menu_ChallengeExplanationCancel ifequal $a, Script_Menu_ChallengeExplanationCancel
ifnotequal $0, Script_MobileError ifnotequal $0, Script_MobileError
writebyte BATTLETOWERACTION_11 setval BATTLETOWERACTION_11
special BattleTowerAction special BattleTowerAction
writetext Text_RightThisWayToYourBattleRoom writetext Text_RightThisWayToYourBattleRoom
waitbutton waitbutton
closetext closetext
writebyte BATTLETOWERACTION_CHOOSEREWARD setval BATTLETOWERACTION_CHOOSEREWARD
special BattleTowerAction special BattleTowerAction
jump Script_WalkToBattleTowerElevator jump Script_WalkToBattleTowerElevator
Script_ResumeBattleTowerChallenge: Script_ResumeBattleTowerChallenge:
closetext closetext
writebyte BATTLETOWERACTION_LOADLEVELGROUP ; load choice of level group setval BATTLETOWERACTION_LOADLEVELGROUP ; load choice of level group
special BattleTowerAction special BattleTowerAction
Script_WalkToBattleTowerElevator: Script_WalkToBattleTowerElevator:
musicfadeout MUSIC_NONE, 8 musicfadeout MUSIC_NONE, 8
@ -108,7 +108,7 @@ Script_WalkToBattleTowerElevator:
setmapscene BATTLE_TOWER_HALLWAY, SCENE_DEFAULT setmapscene BATTLE_TOWER_HALLWAY, SCENE_DEFAULT
follow BATTLETOWER1F_RECEPTIONIST, PLAYER follow BATTLETOWER1F_RECEPTIONIST, PLAYER
applymovement BATTLETOWER1F_RECEPTIONIST, MovementData_BattleTower1FWalkToElevator applymovement BATTLETOWER1F_RECEPTIONIST, MovementData_BattleTower1FWalkToElevator
writebyte BATTLETOWERACTION_0A setval BATTLETOWERACTION_0A
special BattleTowerAction special BattleTowerAction
warpsound warpsound
disappear BATTLETOWER1F_RECEPTIONIST disappear BATTLETOWER1F_RECEPTIONIST
@ -118,15 +118,15 @@ Script_WalkToBattleTowerElevator:
end end
Script_GivePlayerHisPrize: Script_GivePlayerHisPrize:
writebyte BATTLETOWERACTION_1C setval BATTLETOWERACTION_1C
special BattleTowerAction special BattleTowerAction
writebyte BATTLETOWERACTION_GIVEREWARD setval BATTLETOWERACTION_GIVEREWARD
special BattleTowerAction special BattleTowerAction
ifequal POTION, Script_YourPackIsStuffedFull ifequal POTION, Script_YourPackIsStuffedFull
itemtotext USE_SCRIPT_VAR, MEM_BUFFER_1 getitemname STRING_BUFFER_4, USE_SCRIPT_VAR
giveitem ITEM_FROM_MEM, 5 giveitem ITEM_FROM_MEM, 5
writetext Text_PlayerGotFive writetext Text_PlayerGotFive
writebyte BATTLETOWERACTION_1D setval BATTLETOWERACTION_1D
special BattleTowerAction special BattleTowerAction
closetext closetext
end end
@ -144,7 +144,7 @@ Script_BattleTowerIntroductionYesNo:
Script_BattleTowerExplanation: Script_BattleTowerExplanation:
writetext Text_BattleTowerIntroduction_2 writetext Text_BattleTowerIntroduction_2
Script_BattleTowerSkipExplanation: Script_BattleTowerSkipExplanation:
writebyte BATTLETOWERACTION_SET_EXPLANATION_READ setval BATTLETOWERACTION_SET_EXPLANATION_READ
special BattleTowerAction special BattleTowerAction
jump Script_Menu_ChallengeExplanationCancel jump Script_Menu_ChallengeExplanationCancel
@ -170,7 +170,7 @@ UnreferencedScript_0x9e4be:
iffalse Script_Menu_ChallengeExplanationCancel iffalse Script_Menu_ChallengeExplanationCancel
special TryQuickSave special TryQuickSave
iffalse Script_Menu_ChallengeExplanationCancel iffalse Script_Menu_ChallengeExplanationCancel
writebyte BATTLETOWERACTION_SET_EXPLANATION_READ setval BATTLETOWERACTION_SET_EXPLANATION_READ
special BattleTowerAction special BattleTowerAction
special Function1700ba special Function1700ba
ifequal $a, Script_Menu_ChallengeExplanationCancel ifequal $a, Script_Menu_ChallengeExplanationCancel
@ -184,15 +184,15 @@ UnreferencedScript_0x9e4be:
end end
UnreferencedScript_0x9e4ea: UnreferencedScript_0x9e4ea:
writebyte BATTLETOWERACTION_LEVEL_CHECK setval BATTLETOWERACTION_LEVEL_CHECK
special BattleTowerAction special BattleTowerAction
ifnotequal $0, Script_AMonLevelExceeds ifnotequal $0, Script_AMonLevelExceeds
writebyte BATTLETOWERACTION_UBERS_CHECK setval BATTLETOWERACTION_UBERS_CHECK
special BattleTowerAction special BattleTowerAction
ifnotequal $0, Script_MayNotEnterABattleRoomUnderL70 ifnotequal $0, Script_MayNotEnterABattleRoomUnderL70
special CheckForBattleTowerRules special CheckForBattleTowerRules
ifnotequal FALSE, Script_WaitButton ifnotequal FALSE, Script_WaitButton
writebyte BATTLETOWERACTION_05 setval BATTLETOWERACTION_05
special BattleTowerAction special BattleTowerAction
ifequal $0, .zero ifequal $0, .zero
writetext Text_CantBeRegistered_PreviousRecordDeleted writetext Text_CantBeRegistered_PreviousRecordDeleted
@ -210,9 +210,9 @@ continue:
special TryQuickSave special TryQuickSave
iffalse Script_Menu_ChallengeExplanationCancel iffalse Script_Menu_ChallengeExplanationCancel
setscene SCENE_FINISHED setscene SCENE_FINISHED
writebyte BATTLETOWERACTION_06 setval BATTLETOWERACTION_06
special BattleTowerAction special BattleTowerAction
writebyte BATTLETOWERACTION_12 setval BATTLETOWERACTION_12
special BattleTowerAction special BattleTowerAction
writetext Text_RightThisWayToYourBattleRoom writetext Text_RightThisWayToYourBattleRoom
waitbutton waitbutton

22
maps/BattleTowerBattleRoom.asm
View File

@ -20,7 +20,7 @@ Script_BattleRoom:
applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn applymovement PLAYER, MovementData_BattleTowerBattleRoomPlayerWalksIn
; beat all 7 opponents in a row ; beat all 7 opponents in a row
Script_BattleRoomLoop: Script_BattleRoomLoop:
writebyte BATTLETOWERBATTLEROOM_YOUNGSTER setval BATTLETOWERBATTLEROOM_YOUNGSTER
special LoadOpponentTrainerAndPokemonWithOTSprite special LoadOpponentTrainerAndPokemonWithOTSprite
appear BATTLETOWERBATTLEROOM_YOUNGSTER appear BATTLETOWERBATTLEROOM_YOUNGSTER
warpsound warpsound
@ -34,7 +34,7 @@ Script_BattleRoomLoop:
special FadeOutPalettes special FadeOutPalettes
reloadmap reloadmap
ifnotequal $0, Script_FailedBattleTowerChallenge ifnotequal $0, Script_FailedBattleTowerChallenge
copybytetovar wNrOfBeatenBattleTowerTrainers readmem wNrOfBeatenBattleTowerTrainers
ifequal BATTLETOWER_STREAK_LENGTH, Script_BeatenAllTrainers ifequal BATTLETOWER_STREAK_LENGTH, Script_BeatenAllTrainers
applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksOut applymovement BATTLETOWERBATTLEROOM_YOUNGSTER, MovementData_BattleTowerBattleRoomOpponentWalksOut
warpsound warpsound
@ -65,11 +65,11 @@ Script_DontBattleNextOpponent:
writetext Text_SaveAndEndTheSession writetext Text_SaveAndEndTheSession
yesorno yesorno
iffalse Script_DontSaveAndEndTheSession iffalse Script_DontSaveAndEndTheSession
writebyte BATTLETOWERACTION_SAVELEVELGROUP ; save level group setval BATTLETOWERACTION_SAVELEVELGROUP ; save level group
special BattleTowerAction special BattleTowerAction
writebyte BATTLETOWERACTION_SAVEOPTIONS ; choose reward setval BATTLETOWERACTION_SAVEOPTIONS ; choose reward
special BattleTowerAction special BattleTowerAction
writebyte BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave setval BATTLETOWERACTION_SAVE_AND_QUIT ; quicksave
special BattleTowerAction special BattleTowerAction
playsound SFX_SAVE playsound SFX_SAVE
waitsfx waitsfx
@ -79,9 +79,9 @@ Script_DontSaveAndEndTheSession:
writetext Text_CancelYourBattleRoomChallenge writetext Text_CancelYourBattleRoomChallenge
yesorno yesorno
iffalse Script_ContinueAndBattleNextOpponent iffalse Script_ContinueAndBattleNextOpponent
writebyte BATTLETOWERACTION_CHALLENGECANCELED setval BATTLETOWERACTION_CHALLENGECANCELED
special BattleTowerAction special BattleTowerAction
writebyte BATTLETOWERACTION_06 setval BATTLETOWERACTION_06
special BattleTowerAction special BattleTowerAction
closetext closetext
special FadeOutPalettes special FadeOutPalettes
@ -93,7 +93,7 @@ Script_FailedBattleTowerChallenge:
pause 60 pause 60
special BattleTowerFade special BattleTowerFade
warpfacing UP, BATTLE_TOWER_1F, 7, 7 warpfacing UP, BATTLE_TOWER_1F, 7, 7
writebyte BATTLETOWERACTION_CHALLENGECANCELED setval BATTLETOWERACTION_CHALLENGECANCELED
special BattleTowerAction special BattleTowerAction
opentext opentext
writetext Text_ThanksForVisiting writetext Text_ThanksForVisiting
@ -111,7 +111,7 @@ Script_BeatenAllTrainers2:
jump Script_GivePlayerHisPrize jump Script_GivePlayerHisPrize
UnreferencedScript_0x9f4eb: UnreferencedScript_0x9f4eb:
writebyte BATTLETOWERACTION_CHALLENGECANCELED setval BATTLETOWERACTION_CHALLENGECANCELED
special BattleTowerAction special BattleTowerAction
opentext opentext
writetext Text_TooMuchTimeElapsedNoRegister writetext Text_TooMuchTimeElapsedNoRegister
@ -120,9 +120,9 @@ UnreferencedScript_0x9f4eb:
end end
UnreferencedScript_0x9f4f7: UnreferencedScript_0x9f4f7:
writebyte BATTLETOWERACTION_CHALLENGECANCELED setval BATTLETOWERACTION_CHALLENGECANCELED
special BattleTowerAction special BattleTowerAction
writebyte BATTLETOWERACTION_06 setval BATTLETOWERACTION_06
special BattleTowerAction special BattleTowerAction
opentext opentext
writetext Text_ThanksForVisiting writetext Text_ThanksForVisiting

2
maps/BattleTowerElevator.asm
View File

@ -18,7 +18,7 @@ BattleTowerElevator_MapScripts:
follow BATTLETOWERELEVATOR_RECEPTIONIST, PLAYER follow BATTLETOWERELEVATOR_RECEPTIONIST, PLAYER
applymovement BATTLETOWERELEVATOR_RECEPTIONIST, MovementData_BattleTowerElevatorReceptionistWalksIn applymovement BATTLETOWERELEVATOR_RECEPTIONIST, MovementData_BattleTowerElevatorReceptionistWalksIn
applymovement PLAYER, MovementData_BattleTowerElevatorPlayerWalksIn applymovement PLAYER, MovementData_BattleTowerElevatorPlayerWalksIn
writebyte BATTLETOWERACTION_0A setval BATTLETOWERACTION_0A
special BattleTowerAction special BattleTowerAction
playsound SFX_ELEVATOR playsound SFX_ELEVATOR
earthquake 60 earthquake 60

2
maps/BillsFamilysHouse.asm
View File

@ -19,7 +19,7 @@ BillScript:
writetext BillImCountingOnYouText writetext BillImCountingOnYouText
buttonsound buttonsound
waitsfx waitsfx
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, .NoRoom ifequal PARTY_LENGTH, .NoRoom
writetext ReceivedEeveeText writetext ReceivedEeveeText
playsound SFX_CAUGHT_MON playsound SFX_CAUGHT_MON

4
maps/BlackthornCity.asm
View File

@ -21,7 +21,7 @@ BlackthornCity_MapScripts:
return return
.Santos: .Santos:
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal SATURDAY, .SantosAppears ifequal SATURDAY, .SantosAppears
disappear BLACKTHORNCITY_SANTOS disappear BLACKTHORNCITY_SANTOS
return return
@ -90,7 +90,7 @@ SantosScript:
opentext opentext
checkevent EVENT_GOT_SPELL_TAG_FROM_SANTOS checkevent EVENT_GOT_SPELL_TAG_FROM_SANTOS
iftrue .Saturday iftrue .Saturday
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SATURDAY, .NotSaturday ifnotequal SATURDAY, .NotSaturday
checkevent EVENT_MET_SANTOS_OF_SATURDAY checkevent EVENT_MET_SANTOS_OF_SATURDAY
iftrue .MetSantos iftrue .MetSantos

4
maps/BlackthornGym1F.asm
View File

@ -68,7 +68,7 @@ BlackthornGymClairScript:
buttonsound buttonsound
giveitem TM_DRAGONBREATH giveitem TM_DRAGONBREATH
iffalse .BagFull iffalse .BagFull
itemtotext TM_DRAGONBREATH, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_DRAGONBREATH
writetext BlackthornGymText_ReceivedTM24 writetext BlackthornGymText_ReceivedTM24
playsound SFX_ITEM playsound SFX_ITEM
waitsfx waitsfx
@ -144,7 +144,7 @@ BlackthornGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext CLAIR, CLAIR1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, CLAIR, CLAIR1
jumpstd gymstatue2 jumpstd gymstatue2
ClairIntroText: ClairIntroText:

2
maps/BluesHouse.asm
View File

@ -9,7 +9,7 @@ BluesHouse_MapScripts:
DaisyScript: DaisyScript:
faceplayer faceplayer
opentext opentext
checkcode VAR_HOUR readvar VAR_HOUR
ifequal 15, .ThreePM ifequal 15, .ThreePM
writetext DaisyHelloText writetext DaisyHelloText
waitbutton waitbutton

2
maps/BurnedTowerB1F.asm
View File

@ -103,7 +103,7 @@ BurnedTowerB1FEusine:
writetext BurnedTowerB1FEusineText writetext BurnedTowerB1FEusineText
waitbutton waitbutton
closetext closetext
checkcode VAR_FACING readvar VAR_FACING
ifequal UP, .Movement2 ifequal UP, .Movement2
applymovement BURNEDTOWERB1F_EUSINE, BurnedTowerB1FEusineMovement1 applymovement BURNEDTOWERB1F_EUSINE, BurnedTowerB1FEusineMovement1
jump .Finish jump .Finish

4
maps/CeladonCafe.asm
View File

@ -94,7 +94,7 @@ CeladonCafeTrashcan:
giveitem LEFTOVERS giveitem LEFTOVERS
iffalse .PackFull iffalse .PackFull
opentext opentext
itemtotext LEFTOVERS, MEM_BUFFER_0 getitemname STRING_BUFFER_3, LEFTOVERS
writetext FoundLeftoversText writetext FoundLeftoversText
playsound SFX_ITEM playsound SFX_ITEM
waitsfx waitsfx
@ -105,7 +105,7 @@ CeladonCafeTrashcan:
.PackFull: .PackFull:
opentext opentext
itemtotext LEFTOVERS, MEM_BUFFER_0 getitemname STRING_BUFFER_3, LEFTOVERS
writetext FoundLeftoversText writetext FoundLeftoversText
buttonsound buttonsound
writetext NoRoomForLeftoversText writetext NoRoomForLeftoversText

6
maps/CeladonDeptStore6F.asm
View File

@ -42,7 +42,7 @@ CeladonDeptStore6FVendingMachine:
giveitem FRESH_WATER giveitem FRESH_WATER
iffalse .NotEnoughSpace iffalse .NotEnoughSpace
takemoney YOUR_MONEY, CELADONDEPTSTORE6F_FRESH_WATER_PRICE takemoney YOUR_MONEY, CELADONDEPTSTORE6F_FRESH_WATER_PRICE
itemtotext FRESH_WATER, MEM_BUFFER_0 getitemname STRING_BUFFER_3, FRESH_WATER
jump .VendItem jump .VendItem
.SodaPop: .SodaPop:
@ -51,7 +51,7 @@ CeladonDeptStore6FVendingMachine:
giveitem SODA_POP giveitem SODA_POP
iffalse .NotEnoughSpace iffalse .NotEnoughSpace
takemoney YOUR_MONEY, CELADONDEPTSTORE6F_SODA_POP_PRICE takemoney YOUR_MONEY, CELADONDEPTSTORE6F_SODA_POP_PRICE
itemtotext SODA_POP, MEM_BUFFER_0 getitemname STRING_BUFFER_3, SODA_POP
jump .VendItem jump .VendItem
.Lemonade: .Lemonade:
@ -60,7 +60,7 @@ CeladonDeptStore6FVendingMachine:
giveitem LEMONADE giveitem LEMONADE
iffalse .NotEnoughSpace iffalse .NotEnoughSpace
takemoney YOUR_MONEY, CELADONDEPTSTORE6F_LEMONADE_PRICE takemoney YOUR_MONEY, CELADONDEPTSTORE6F_LEMONADE_PRICE
itemtotext LEMONADE, MEM_BUFFER_0 getitemname STRING_BUFFER_3, LEMONADE
jump .VendItem jump .VendItem
.VendItem: .VendItem:

6
maps/CeladonGameCorner.asm
View File

@ -58,7 +58,7 @@ CeladonGameCornerFisherScript:
iffalse .NoCoinCase iffalse .NoCoinCase
checkcoins MAX_COINS - 1 checkcoins MAX_COINS - 1
ifequal HAVE_MORE, .FullCoinCase ifequal HAVE_MORE, .FullCoinCase
stringtotext .coinname, MEM_BUFFER_1 getstring STRING_BUFFER_4, .coinname
scall .GiveCoins scall .GiveCoins
givecoins 18 givecoins 18
setevent EVENT_GOT_COINS_FROM_GAMBLER_AT_CELADON setevent EVENT_GOT_COINS_FROM_GAMBLER_AT_CELADON
@ -112,14 +112,14 @@ CeladonGameCornerLuckySlotMachineScript:
random 6 random 6
ifequal 0, CeladonGameCornerSlotMachineScript ifequal 0, CeladonGameCornerSlotMachineScript
refreshscreen refreshscreen
writebyte FALSE setval FALSE
special SlotMachine special SlotMachine
closetext closetext
end end
CeladonGameCornerSlotMachineScript: CeladonGameCornerSlotMachineScript:
refreshscreen refreshscreen
writebyte TRUE setval TRUE
special SlotMachine special SlotMachine
closetext closetext
end end

24
maps/CeladonGameCornerPrizeRoom.asm
View File

@ -41,7 +41,7 @@ CeladonPrizeRoom_tmcounterloop:
.DoubleTeam: .DoubleTeam:
checkcoins CELADONGAMECORNERPRIZEROOM_TM32_COINS checkcoins CELADONGAMECORNERPRIZEROOM_TM32_COINS
ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins
itemtotext TM_DOUBLE_TEAM, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_DOUBLE_TEAM
scall CeladonPrizeRoom_askbuy scall CeladonPrizeRoom_askbuy
iffalse CeladonPrizeRoom_CancelPurchaseScript iffalse CeladonPrizeRoom_CancelPurchaseScript
giveitem TM_DOUBLE_TEAM giveitem TM_DOUBLE_TEAM
@ -52,7 +52,7 @@ CeladonPrizeRoom_tmcounterloop:
.Psychic: .Psychic:
checkcoins CELADONGAMECORNERPRIZEROOM_TM29_COINS checkcoins CELADONGAMECORNERPRIZEROOM_TM29_COINS
ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins
itemtotext TM_PSYCHIC_M, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_PSYCHIC_M
scall CeladonPrizeRoom_askbuy scall CeladonPrizeRoom_askbuy
iffalse CeladonPrizeRoom_CancelPurchaseScript iffalse CeladonPrizeRoom_CancelPurchaseScript
giveitem TM_PSYCHIC_M giveitem TM_PSYCHIC_M
@ -63,7 +63,7 @@ CeladonPrizeRoom_tmcounterloop:
.HyperBeam: .HyperBeam:
checkcoins CELADONGAMECORNERPRIZEROOM_TM15_COINS checkcoins CELADONGAMECORNERPRIZEROOM_TM15_COINS
ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins
itemtotext TM_HYPER_BEAM, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_HYPER_BEAM
scall CeladonPrizeRoom_askbuy scall CeladonPrizeRoom_askbuy
iffalse CeladonPrizeRoom_CancelPurchaseScript iffalse CeladonPrizeRoom_CancelPurchaseScript
giveitem TM_HYPER_BEAM giveitem TM_HYPER_BEAM
@ -142,16 +142,16 @@ CeladonGameCornerPrizeRoomPokemonVendor:
.Pikachu: .Pikachu:
checkcoins CELADONGAMECORNERPRIZEROOM_PIKACHU_COINS checkcoins CELADONGAMECORNERPRIZEROOM_PIKACHU_COINS
ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, CeladonPrizeRoom_notenoughroom ifequal PARTY_LENGTH, CeladonPrizeRoom_notenoughroom
pokenamemem PIKACHU, MEM_BUFFER_0 getmonname STRING_BUFFER_3, PIKACHU
scall CeladonPrizeRoom_askbuy scall CeladonPrizeRoom_askbuy
iffalse CeladonPrizeRoom_CancelPurchaseScript iffalse CeladonPrizeRoom_CancelPurchaseScript
waitsfx waitsfx
playsound SFX_TRANSACTION playsound SFX_TRANSACTION
writetext CeladonPrizeRoom_HereYouGoText writetext CeladonPrizeRoom_HereYouGoText
waitbutton waitbutton
writebyte PIKACHU setval PIKACHU
special GameCornerPrizeMonCheckDex special GameCornerPrizeMonCheckDex
givepoke PIKACHU, 25 givepoke PIKACHU, 25
takecoins CELADONGAMECORNERPRIZEROOM_PIKACHU_COINS takecoins CELADONGAMECORNERPRIZEROOM_PIKACHU_COINS
@ -160,16 +160,16 @@ CeladonGameCornerPrizeRoomPokemonVendor:
.Porygon: .Porygon:
checkcoins CELADONGAMECORNERPRIZEROOM_PORYGON_COINS checkcoins CELADONGAMECORNERPRIZEROOM_PORYGON_COINS
ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, CeladonPrizeRoom_notenoughroom ifequal PARTY_LENGTH, CeladonPrizeRoom_notenoughroom
pokenamemem PORYGON, MEM_BUFFER_0 getmonname STRING_BUFFER_3, PORYGON
scall CeladonPrizeRoom_askbuy scall CeladonPrizeRoom_askbuy
iffalse CeladonPrizeRoom_CancelPurchaseScript iffalse CeladonPrizeRoom_CancelPurchaseScript
waitsfx waitsfx
playsound SFX_TRANSACTION playsound SFX_TRANSACTION
writetext CeladonPrizeRoom_HereYouGoText writetext CeladonPrizeRoom_HereYouGoText
waitbutton waitbutton
writebyte PORYGON setval PORYGON
special GameCornerPrizeMonCheckDex special GameCornerPrizeMonCheckDex
givepoke PORYGON, 15 givepoke PORYGON, 15
takecoins CELADONGAMECORNERPRIZEROOM_PORYGON_COINS takecoins CELADONGAMECORNERPRIZEROOM_PORYGON_COINS
@ -178,16 +178,16 @@ CeladonGameCornerPrizeRoomPokemonVendor:
.Larvitar: .Larvitar:
checkcoins CELADONGAMECORNERPRIZEROOM_LARVITAR_COINS checkcoins CELADONGAMECORNERPRIZEROOM_LARVITAR_COINS
ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins ifequal HAVE_LESS, CeladonPrizeRoom_notenoughcoins
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, CeladonPrizeRoom_notenoughroom ifequal PARTY_LENGTH, CeladonPrizeRoom_notenoughroom
pokenamemem LARVITAR, MEM_BUFFER_0 getmonname STRING_BUFFER_3, LARVITAR
scall CeladonPrizeRoom_askbuy scall CeladonPrizeRoom_askbuy
iffalse CeladonPrizeRoom_CancelPurchaseScript iffalse CeladonPrizeRoom_CancelPurchaseScript
waitsfx waitsfx
playsound SFX_TRANSACTION playsound SFX_TRANSACTION
writetext CeladonPrizeRoom_HereYouGoText writetext CeladonPrizeRoom_HereYouGoText
waitbutton waitbutton
writebyte LARVITAR setval LARVITAR
special GameCornerPrizeMonCheckDex special GameCornerPrizeMonCheckDex
givepoke LARVITAR, 40 givepoke LARVITAR, 40
takecoins CELADONGAMECORNERPRIZEROOM_LARVITAR_COINS takecoins CELADONGAMECORNERPRIZEROOM_LARVITAR_COINS

2
maps/CeladonGym.asm
View File

@ -107,7 +107,7 @@ CeladonGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext ERIKA, ERIKA1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, ERIKA, ERIKA1
jumpstd gymstatue2 jumpstd gymstatue2
ErikaBeforeBattleText: ErikaBeforeBattleText:

2
maps/CeladonMansion3F.asm
View File

@ -13,7 +13,7 @@ GameFreakGameDesignerScript:
faceplayer faceplayer
opentext opentext
writetext GameFreakGameDesignerText writetext GameFreakGameDesignerText
checkcode VAR_DEXCAUGHT readvar VAR_DEXCAUGHT
ifgreater NUM_POKEMON - 2 - 1, .CompletedPokedex ; ignore Mew and Celebi ifgreater NUM_POKEMON - 2 - 1, .CompletedPokedex ; ignore Mew and Celebi
waitbutton waitbutton
closetext closetext

4
maps/CeladonPokecenter1F.asm
View File

@ -27,7 +27,7 @@ CeladonEusine:
opentext opentext
writetext CeladonEusineText1 writetext CeladonEusineText1
buttonsound buttonsound
writebyte SUICUNE setval SUICUNE
special MonCheck special MonCheck
iffalse .NoSuicune iffalse .NoSuicune
special BeastsCheck special BeastsCheck
@ -42,7 +42,7 @@ CeladonEusine:
writetext EusineLeavesCeladonText writetext EusineLeavesCeladonText
waitbutton waitbutton
closetext closetext
checkcode VAR_FACING readvar VAR_FACING
ifequal UP, .Location1 ifequal UP, .Location1
applymovement CELADONPOKECENTER1F_EUSINE, .Movement1 applymovement CELADONPOKECENTER1F_EUSINE, .Movement1
jump .Continue jump .Continue

2
maps/CeruleanGym.asm
View File

@ -158,7 +158,7 @@ CeruleanGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext MISTY, MISTY1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, MISTY, MISTY1
jumpstd gymstatue2 jumpstd gymstatue2
CeruleanGymGruntRunsDownMovement: CeruleanGymGruntRunsDownMovement:

8
maps/CherrygroveCity.asm
View File

@ -67,7 +67,7 @@ CherrygroveCityGuideGent:
opentext opentext
writetext GuideGentGiftText writetext GuideGentGiftText
buttonsound buttonsound
stringtotext .mapcardname, MEM_BUFFER_1 getstring STRING_BUFFER_4, .mapcardname
scall .JumpstdReceiveItem scall .JumpstdReceiveItem
setflag ENGINE_MAP_CARD setflag ENGINE_MAP_CARD
writetext GotMapCardText writetext GotMapCardText
@ -120,7 +120,7 @@ CherrygroveSilverSceneNorth:
winlosstext SilverCherrygroveWinText, SilverCherrygroveLossText winlosstext SilverCherrygroveWinText, SilverCherrygroveLossText
setlasttalked CHERRYGROVECITY_SILVER setlasttalked CHERRYGROVECITY_SILVER
loadtrainer RIVAL1, RIVAL1_1_TOTODILE loadtrainer RIVAL1, RIVAL1_1_TOTODILE
writecode VAR_BATTLETYPE, BATTLETYPE_CANLOSE loadvar VAR_BATTLETYPE, BATTLETYPE_CANLOSE
startbattle startbattle
dontrestartmapmusic dontrestartmapmusic
reloadmap reloadmap
@ -131,7 +131,7 @@ CherrygroveSilverSceneNorth:
winlosstext SilverCherrygroveWinText, SilverCherrygroveLossText winlosstext SilverCherrygroveWinText, SilverCherrygroveLossText
setlasttalked CHERRYGROVECITY_SILVER setlasttalked CHERRYGROVECITY_SILVER
loadtrainer RIVAL1, RIVAL1_1_CHIKORITA loadtrainer RIVAL1, RIVAL1_1_CHIKORITA
writecode VAR_BATTLETYPE, BATTLETYPE_CANLOSE loadvar VAR_BATTLETYPE, BATTLETYPE_CANLOSE
startbattle startbattle
dontrestartmapmusic dontrestartmapmusic
reloadmap reloadmap
@ -142,7 +142,7 @@ CherrygroveSilverSceneNorth:
winlosstext SilverCherrygroveWinText, SilverCherrygroveLossText winlosstext SilverCherrygroveWinText, SilverCherrygroveLossText
setlasttalked CHERRYGROVECITY_SILVER setlasttalked CHERRYGROVECITY_SILVER
loadtrainer RIVAL1, RIVAL1_1_CYNDAQUIL loadtrainer RIVAL1, RIVAL1_1_CYNDAQUIL
writecode VAR_BATTLETYPE, BATTLETYPE_CANLOSE loadvar VAR_BATTLETYPE, BATTLETYPE_CANLOSE
startbattle startbattle
dontrestartmapmusic dontrestartmapmusic
reloadmap reloadmap

4
maps/CianwoodGym.asm
View File

@ -47,7 +47,7 @@ CianwoodGymChuckScript:
playsound SFX_GET_BADGE playsound SFX_GET_BADGE
waitsfx waitsfx
setflag ENGINE_STORMBADGE setflag ENGINE_STORMBADGE
checkcode VAR_BADGES readvar VAR_BADGES
scall CianwoodGymActivateRockets scall CianwoodGymActivateRockets
.FightDone: .FightDone:
checkevent EVENT_GOT_TM01_DYNAMICPUNCH checkevent EVENT_GOT_TM01_DYNAMICPUNCH
@ -136,7 +136,7 @@ CianwoodGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext CHUCK, CHUCK1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, CHUCK, CHUCK1
jumpstd gymstatue2 jumpstd gymstatue2
CianwoodGymMovement_ChuckChucksBoulder: CianwoodGymMovement_ChuckChucksBoulder:

2
maps/DayCare.asm
View File

@ -28,7 +28,7 @@ DayCareManScript_Inside:
writetext DayCareManText_GiveOddEgg writetext DayCareManText_GiveOddEgg
buttonsound buttonsound
closetext closetext
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, .PartyFull ifequal PARTY_LENGTH, .PartyFull
special GiveOddEgg special GiveOddEgg
opentext opentext

2
maps/DragonShrine.asm
View File

@ -208,7 +208,7 @@ DragonShrineElder1Script:
.GiveDratini: .GiveDratini:
writetext DragonShrineTakeThisDratiniText writetext DragonShrineTakeThisDratiniText
waitbutton waitbutton
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, .PartyFull ifequal PARTY_LENGTH, .PartyFull
writetext DragonShrinePlayerReceivedDratiniText writetext DragonShrinePlayerReceivedDratiniText
playsound SFX_CAUGHT_MON playsound SFX_CAUGHT_MON

8
maps/DragonsDenB1F.asm
View File

@ -30,7 +30,7 @@ DragonsDenB1F_MapScripts:
return return
.CheckDay: .CheckDay:
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal TUESDAY, .AppearSilver ifequal TUESDAY, .AppearSilver
ifequal THURSDAY, .AppearSilver ifequal THURSDAY, .AppearSilver
disappear DRAGONSDENB1F_SILVER disappear DRAGONSDENB1F_SILVER
@ -55,7 +55,7 @@ DragonsDenB1F_ClairScene:
buttonsound buttonsound
giveitem TM_DRAGONBREATH giveitem TM_DRAGONBREATH
iffalse .BagFull iffalse .BagFull
itemtotext TM_DRAGONBREATH, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_DRAGONBREATH
writetext NotifyReceiveDragonbreath writetext NotifyReceiveDragonbreath
playsound SFX_ITEM playsound SFX_ITEM
waitsfx waitsfx
@ -132,7 +132,7 @@ DragonsDenB1FDragonFangScript:
iffalse .BagFull iffalse .BagFull
disappear DRAGONSDENB1F_POKE_BALL1 disappear DRAGONSDENB1F_POKE_BALL1
opentext opentext
itemtotext DRAGON_FANG, MEM_BUFFER_0 getitemname STRING_BUFFER_3, DRAGON_FANG
writetext Text_FoundDragonFang writetext Text_FoundDragonFang
playsound SFX_ITEM playsound SFX_ITEM
waitsfx waitsfx
@ -142,7 +142,7 @@ DragonsDenB1FDragonFangScript:
.BagFull: .BagFull:
opentext opentext
itemtotext DRAGON_FANG, MEM_BUFFER_0 getitemname STRING_BUFFER_3, DRAGON_FANG
writetext Text_FoundDragonFang writetext Text_FoundDragonFang
buttonsound buttonsound
writetext Text_NoRoomForDragonFang writetext Text_NoRoomForDragonFang

4
maps/EcruteakGym.asm
View File

@ -39,7 +39,7 @@ EcruteakGymMortyScript:
playsound SFX_GET_BADGE playsound SFX_GET_BADGE
waitsfx waitsfx
setflag ENGINE_FOGBADGE setflag ENGINE_FOGBADGE
checkcode VAR_BADGES readvar VAR_BADGES
scall EcruteakGymActivateRockets scall EcruteakGymActivateRockets
setmapscene ECRUTEAK_TIN_TOWER_ENTRANCE, SCENE_FINISHED setmapscene ECRUTEAK_TIN_TOWER_ENTRANCE, SCENE_FINISHED
setevent EVENT_RANG_CLEAR_BELL_1 setevent EVENT_RANG_CLEAR_BELL_1
@ -160,7 +160,7 @@ EcruteakGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext MORTY, MORTY1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, MORTY, MORTY1
jumpstd gymstatue2 jumpstd gymstatue2
EcruteakGymPlayerStepUpMovement: EcruteakGymPlayerStepUpMovement:

24
maps/ElmsLab.asm
View File

@ -105,10 +105,10 @@ ElmCheckEverstone:
iftrue ElmGiveEverstoneScript iftrue ElmGiveEverstoneScript
checkevent EVENT_TOLD_ELM_ABOUT_TOGEPI_OVER_THE_PHONE checkevent EVENT_TOLD_ELM_ABOUT_TOGEPI_OVER_THE_PHONE
iffalse ElmCheckTogepiEgg iffalse ElmCheckTogepiEgg
writebyte TOGEPI setval TOGEPI
special FindPartyMonThatSpeciesYourTrainerID special FindPartyMonThatSpeciesYourTrainerID
iftrue ShowElmTogepiScript iftrue ShowElmTogepiScript
writebyte TOGETIC setval TOGETIC
special FindPartyMonThatSpeciesYourTrainerID special FindPartyMonThatSpeciesYourTrainerID
iftrue ShowElmTogepiScript iftrue ShowElmTogepiScript
writetext ElmThoughtEggHatchedText writetext ElmThoughtEggHatchedText
@ -117,10 +117,10 @@ ElmCheckEverstone:
end end
ElmEggHatchedScript: ElmEggHatchedScript:
writebyte TOGEPI setval TOGEPI
special FindPartyMonThatSpeciesYourTrainerID special FindPartyMonThatSpeciesYourTrainerID
iftrue ShowElmTogepiScript iftrue ShowElmTogepiScript
writebyte TOGETIC setval TOGETIC
special FindPartyMonThatSpeciesYourTrainerID special FindPartyMonThatSpeciesYourTrainerID
iftrue ShowElmTogepiScript iftrue ShowElmTogepiScript
jump ElmCheckGotEggAgain jump ElmCheckGotEggAgain
@ -173,14 +173,14 @@ CyndaquilPokeBallScript:
writetext ChoseStarterText writetext ChoseStarterText
buttonsound buttonsound
waitsfx waitsfx
pokenamemem CYNDAQUIL, MEM_BUFFER_0 getmonname STRING_BUFFER_3, CYNDAQUIL
writetext ReceivedStarterText writetext ReceivedStarterText
playsound SFX_CAUGHT_MON playsound SFX_CAUGHT_MON
waitsfx waitsfx
buttonsound buttonsound
givepoke CYNDAQUIL, 5, BERRY givepoke CYNDAQUIL, 5, BERRY
closetext closetext
checkcode VAR_FACING readvar VAR_FACING
ifequal RIGHT, ElmDirectionsScript ifequal RIGHT, ElmDirectionsScript
applymovement PLAYER, AfterCyndaquilMovement applymovement PLAYER, AfterCyndaquilMovement
jump ElmDirectionsScript jump ElmDirectionsScript
@ -203,7 +203,7 @@ TotodilePokeBallScript:
writetext ChoseStarterText writetext ChoseStarterText
buttonsound buttonsound
waitsfx waitsfx
pokenamemem TOTODILE, MEM_BUFFER_0 getmonname STRING_BUFFER_3, TOTODILE
writetext ReceivedStarterText writetext ReceivedStarterText
playsound SFX_CAUGHT_MON playsound SFX_CAUGHT_MON
waitsfx waitsfx
@ -231,7 +231,7 @@ ChikoritaPokeBallScript:
writetext ChoseStarterText writetext ChoseStarterText
buttonsound buttonsound
waitsfx waitsfx
pokenamemem CHIKORITA, MEM_BUFFER_0 getmonname STRING_BUFFER_3, CHIKORITA
writetext ReceivedStarterText writetext ReceivedStarterText
playsound SFX_CAUGHT_MON playsound SFX_CAUGHT_MON
waitsfx waitsfx
@ -309,7 +309,7 @@ ElmsLabHealingMachine_HealParty:
special StubbedTrainerRankings_Healings special StubbedTrainerRankings_Healings
special HealParty special HealParty
playmusic MUSIC_NONE playmusic MUSIC_NONE
writebyte HEALMACHINE_ELMS_LAB setval HEALMACHINE_ELMS_LAB
special HealMachineAnim special HealMachineAnim
pause 30 pause 30
special RestartMapMusic special RestartMapMusic
@ -419,7 +419,7 @@ ElmGiveTicketScript:
ElmJumpBackScript1: ElmJumpBackScript1:
closetext closetext
checkcode VAR_FACING readvar VAR_FACING
ifequal DOWN, ElmJumpDownScript ifequal DOWN, ElmJumpDownScript
ifequal UP, ElmJumpUpScript ifequal UP, ElmJumpUpScript
ifequal LEFT, ElmJumpLeftScript ifequal LEFT, ElmJumpLeftScript
@ -428,7 +428,7 @@ ElmJumpBackScript1:
ElmJumpBackScript2: ElmJumpBackScript2:
closetext closetext
checkcode VAR_FACING readvar VAR_FACING
ifequal DOWN, ElmJumpUpScript ifequal DOWN, ElmJumpUpScript
ifequal UP, ElmJumpDownScript ifequal UP, ElmJumpDownScript
ifequal LEFT, ElmJumpRightScript ifequal LEFT, ElmJumpRightScript
@ -498,7 +498,7 @@ AideScript_GiveYouBalls:
opentext opentext
writetext AideText_GiveYouBalls writetext AideText_GiveYouBalls
buttonsound buttonsound
itemtotext POKE_BALL, MEM_BUFFER_1 getitemname STRING_BUFFER_4, POKE_BALL
scall AideScript_ReceiveTheBalls scall AideScript_ReceiveTheBalls
giveitem POKE_BALL, 5 giveitem POKE_BALL, 5
writetext AideText_ExplainBalls writetext AideText_ExplainBalls

2
maps/FastShip1F.asm
View File

@ -87,7 +87,7 @@ FastShip1FSailor1Script:
end end
.LetThePlayerOut: .LetThePlayerOut:
checkcode VAR_FACING readvar VAR_FACING
ifequal RIGHT, .YouAreFacingRight ifequal RIGHT, .YouAreFacingRight
applymovement FASTSHIP1F_SAILOR1, MovementData_0x7520e applymovement FASTSHIP1F_SAILOR1, MovementData_0x7520e
applymovement PLAYER, MovementData_0x75235 applymovement PLAYER, MovementData_0x75235

2
maps/FastShipCabins_NNW_NNE_NE.asm
View File

@ -97,7 +97,7 @@ FastShipLazySailorScript:
closetext closetext
setevent EVENT_FAST_SHIP_LAZY_SAILOR setevent EVENT_FAST_SHIP_LAZY_SAILOR
setmapscene FAST_SHIP_B1F, SCENE_FINISHED setmapscene FAST_SHIP_B1F, SCENE_FINISHED
checkcode VAR_FACING readvar VAR_FACING
ifequal RIGHT, .Movement2 ifequal RIGHT, .Movement2
applymovement FASTSHIPCABINS_NNW_NNE_NE_SAILOR, FastShipLazySailorLeavesMovement1 applymovement FASTSHIPCABINS_NNW_NNE_NE_SAILOR, FastShipLazySailorLeavesMovement1
playsound SFX_EXIT_BUILDING playsound SFX_EXIT_BUILDING

2
maps/FuchsiaGym.asm
View File

@ -214,7 +214,7 @@ FuchsiaGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext JANINE, JANINE1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, JANINE, JANINE1
jumpstd gymstatue2 jumpstd gymstatue2
Movement_NinjaSpin: Movement_NinjaSpin:

10
maps/GoldenrodCity.asm
View File

@ -36,7 +36,7 @@ GoldenrodCity_MapScripts:
iffalse .MoveTutorDone iffalse .MoveTutorDone
checkitem COIN_CASE checkitem COIN_CASE
iffalse .MoveTutorDisappear iffalse .MoveTutorDisappear
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal WEDNESDAY, .MoveTutorAppear ifequal WEDNESDAY, .MoveTutorAppear
ifequal SATURDAY, .MoveTutorAppear ifequal SATURDAY, .MoveTutorAppear
.MoveTutorDisappear: .MoveTutorDisappear:
@ -72,21 +72,21 @@ MoveTutorScript:
jump .Incompatible jump .Incompatible
.Flamethrower: .Flamethrower:
writebyte MOVETUTOR_FLAMETHROWER setval MOVETUTOR_FLAMETHROWER
writetext UnknownText_0x1991cf writetext UnknownText_0x1991cf
special MoveTutor special MoveTutor
ifequal FALSE, .TeachMove ifequal FALSE, .TeachMove
jump .Incompatible jump .Incompatible
.Thunderbolt: .Thunderbolt:
writebyte MOVETUTOR_THUNDERBOLT setval MOVETUTOR_THUNDERBOLT
writetext UnknownText_0x1991cf writetext UnknownText_0x1991cf
special MoveTutor special MoveTutor
ifequal FALSE, .TeachMove ifequal FALSE, .TeachMove
jump .Incompatible jump .Incompatible
.IceBeam: .IceBeam:
writebyte MOVETUTOR_ICE_BEAM setval MOVETUTOR_ICE_BEAM
writetext UnknownText_0x1991cf writetext UnknownText_0x1991cf
special MoveTutor special MoveTutor
ifequal FALSE, .TeachMove ifequal FALSE, .TeachMove
@ -128,7 +128,7 @@ MoveTutorScript:
writetext UnknownText_0x19918b writetext UnknownText_0x19918b
waitbutton waitbutton
closetext closetext
checkcode VAR_FACING readvar VAR_FACING
ifequal LEFT, .WalkAroundPlayer ifequal LEFT, .WalkAroundPlayer
applymovement GOLDENRODCITY_MOVETUTOR, MovementData_0x198a5f applymovement GOLDENRODCITY_MOVETUTOR, MovementData_0x198a5f
jump .GoInside jump .GoInside

4
maps/GoldenrodDeptStore5F.asm
View File

@ -13,7 +13,7 @@ GoldenrodDeptStore5F_MapScripts:
callback MAPCALLBACK_OBJECTS, .CheckIfSunday callback MAPCALLBACK_OBJECTS, .CheckIfSunday
.CheckIfSunday: .CheckIfSunday:
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal SUNDAY, .yes ifequal SUNDAY, .yes
disappear GOLDENRODDEPTSTORE5F_RECEPTIONIST disappear GOLDENRODDEPTSTORE5F_RECEPTIONIST
return return
@ -59,7 +59,7 @@ GoldenrodDeptStore5FClerkScript:
GoldenrodDeptStore5FReceptionistScript: GoldenrodDeptStore5FReceptionistScript:
faceplayer faceplayer
opentext opentext
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal SUNDAY, .EventIsOver ifnotequal SUNDAY, .EventIsOver
checkflag ENGINE_GOLDENROD_DEPT_STORE_TM27_RETURN checkflag ENGINE_GOLDENROD_DEPT_STORE_TM27_RETURN
iftrue .EventIsOver iftrue .EventIsOver

6
maps/GoldenrodDeptStore6F.asm
View File

@ -31,7 +31,7 @@ GoldenrodVendingMachine:
giveitem FRESH_WATER giveitem FRESH_WATER
iffalse .NotEnoughSpace iffalse .NotEnoughSpace
takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_FRESH_WATER_PRICE takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_FRESH_WATER_PRICE
itemtotext FRESH_WATER, MEM_BUFFER_0 getitemname STRING_BUFFER_3, FRESH_WATER
jump .VendItem jump .VendItem
.SodaPop: .SodaPop:
@ -40,7 +40,7 @@ GoldenrodVendingMachine:
giveitem SODA_POP giveitem SODA_POP
iffalse .NotEnoughSpace iffalse .NotEnoughSpace
takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_SODA_POP_PRICE takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_SODA_POP_PRICE
itemtotext SODA_POP, MEM_BUFFER_0 getitemname STRING_BUFFER_3, SODA_POP
jump .VendItem jump .VendItem
.Lemonade: .Lemonade:
@ -49,7 +49,7 @@ GoldenrodVendingMachine:
giveitem LEMONADE giveitem LEMONADE
iffalse .NotEnoughSpace iffalse .NotEnoughSpace
takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_LEMONADE_PRICE takemoney YOUR_MONEY, GOLDENRODDEPTSTORE6F_LEMONADE_PRICE
itemtotext LEMONADE, MEM_BUFFER_0 getitemname STRING_BUFFER_3, LEMONADE
jump .VendItem jump .VendItem
.VendItem: .VendItem:

30
maps/GoldenrodGameCorner.asm
View File

@ -30,7 +30,7 @@ GoldenrodGameCorner_MapScripts:
iffalse .finish iffalse .finish
checkitem COIN_CASE checkitem COIN_CASE
iffalse .move_tutor_inside iffalse .move_tutor_inside
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal WEDNESDAY, .move_tutor_outside ifequal WEDNESDAY, .move_tutor_outside
ifequal SATURDAY, .move_tutor_outside ifequal SATURDAY, .move_tutor_outside
.move_tutor_inside .move_tutor_inside
@ -77,7 +77,7 @@ GoldenrodGameCornerTMVendor_LoopScript:
.Thunder: .Thunder:
checkcoins GOLDENRODGAMECORNER_TM25_COINS checkcoins GOLDENRODGAMECORNER_TM25_COINS
ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript
itemtotext TM_THUNDER, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_THUNDER
scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript
iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript
giveitem TM_THUNDER giveitem TM_THUNDER
@ -88,7 +88,7 @@ GoldenrodGameCornerTMVendor_LoopScript:
.Blizzard: .Blizzard:
checkcoins GOLDENRODGAMECORNER_TM14_COINS checkcoins GOLDENRODGAMECORNER_TM14_COINS
ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript
itemtotext TM_BLIZZARD, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_BLIZZARD
scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript
iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript
giveitem TM_BLIZZARD giveitem TM_BLIZZARD
@ -99,7 +99,7 @@ GoldenrodGameCornerTMVendor_LoopScript:
.FireBlast: .FireBlast:
checkcoins GOLDENRODGAMECORNER_TM38_COINS checkcoins GOLDENRODGAMECORNER_TM38_COINS
ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript
itemtotext TM_FIRE_BLAST, MEM_BUFFER_0 getitemname STRING_BUFFER_3, TM_FIRE_BLAST
scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript
iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript
giveitem TM_FIRE_BLAST giveitem TM_FIRE_BLAST
@ -178,16 +178,16 @@ GoldenrodGameCornerPrizeMonVendorScript:
.Abra: .Abra:
checkcoins GOLDENRODGAMECORNER_ABRA_COINS checkcoins GOLDENRODGAMECORNER_ABRA_COINS
ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, GoldenrodGameCornerPrizeMonVendor_NoRoomForPrizeScript ifequal PARTY_LENGTH, GoldenrodGameCornerPrizeMonVendor_NoRoomForPrizeScript
pokenamemem ABRA, MEM_BUFFER_0 getmonname STRING_BUFFER_3, ABRA
scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript
iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript
waitsfx waitsfx
playsound SFX_TRANSACTION playsound SFX_TRANSACTION
writetext GoldenrodGameCornerPrizeVendorHereYouGoText writetext GoldenrodGameCornerPrizeVendorHereYouGoText
waitbutton waitbutton
writebyte ABRA setval ABRA
special GameCornerPrizeMonCheckDex special GameCornerPrizeMonCheckDex
givepoke ABRA, 5 givepoke ABRA, 5
takecoins GOLDENRODGAMECORNER_ABRA_COINS takecoins GOLDENRODGAMECORNER_ABRA_COINS
@ -196,16 +196,16 @@ GoldenrodGameCornerPrizeMonVendorScript:
.Cubone: .Cubone:
checkcoins GOLDENRODGAMECORNER_CUBONE_COINS checkcoins GOLDENRODGAMECORNER_CUBONE_COINS
ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, GoldenrodGameCornerPrizeMonVendor_NoRoomForPrizeScript ifequal PARTY_LENGTH, GoldenrodGameCornerPrizeMonVendor_NoRoomForPrizeScript
pokenamemem CUBONE, MEM_BUFFER_0 getmonname STRING_BUFFER_3, CUBONE
scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript
iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript
waitsfx waitsfx
playsound SFX_TRANSACTION playsound SFX_TRANSACTION
writetext GoldenrodGameCornerPrizeVendorHereYouGoText writetext GoldenrodGameCornerPrizeVendorHereYouGoText
waitbutton waitbutton
writebyte CUBONE setval CUBONE
special GameCornerPrizeMonCheckDex special GameCornerPrizeMonCheckDex
givepoke CUBONE, 15 givepoke CUBONE, 15
takecoins GOLDENRODGAMECORNER_CUBONE_COINS takecoins GOLDENRODGAMECORNER_CUBONE_COINS
@ -214,16 +214,16 @@ GoldenrodGameCornerPrizeMonVendorScript:
.Wobbuffet: .Wobbuffet:
checkcoins GOLDENRODGAMECORNER_WOBBUFFET_COINS checkcoins GOLDENRODGAMECORNER_WOBBUFFET_COINS
ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript ifequal HAVE_LESS, GoldenrodGameCornerPrizeVendor_NotEnoughCoinsScript
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, GoldenrodGameCornerPrizeMonVendor_NoRoomForPrizeScript ifequal PARTY_LENGTH, GoldenrodGameCornerPrizeMonVendor_NoRoomForPrizeScript
pokenamemem WOBBUFFET, MEM_BUFFER_0 getmonname STRING_BUFFER_3, WOBBUFFET
scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript scall GoldenrodGameCornerPrizeVendor_ConfirmPurchaseScript
iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript iffalse GoldenrodGameCornerPrizeVendor_CancelPurchaseScript
waitsfx waitsfx
playsound SFX_TRANSACTION playsound SFX_TRANSACTION
writetext GoldenrodGameCornerPrizeVendorHereYouGoText writetext GoldenrodGameCornerPrizeVendorHereYouGoText
waitbutton waitbutton
writebyte WOBBUFFET setval WOBBUFFET
special GameCornerPrizeMonCheckDex special GameCornerPrizeMonCheckDex
givepoke WOBBUFFET, 15 givepoke WOBBUFFET, 15
takecoins GOLDENRODGAMECORNER_WOBBUFFET_COINS takecoins GOLDENRODGAMECORNER_WOBBUFFET_COINS
@ -301,14 +301,14 @@ GoldenrodGameCornerSlotsMachineScript:
random 6 random 6
ifequal 0, GoldenrodGameCornerLuckySlotsMachineScript ifequal 0, GoldenrodGameCornerLuckySlotsMachineScript
refreshscreen refreshscreen
writebyte FALSE setval FALSE
special SlotMachine special SlotMachine
closetext closetext
end end
GoldenrodGameCornerLuckySlotsMachineScript: GoldenrodGameCornerLuckySlotsMachineScript:
refreshscreen refreshscreen
writebyte TRUE setval TRUE
special SlotMachine special SlotMachine
closetext closetext
end end

4
maps/GoldenrodGym.asm
View File

@ -59,7 +59,7 @@ GoldenrodGymWhitneyScript:
playsound SFX_GET_BADGE playsound SFX_GET_BADGE
waitsfx waitsfx
setflag ENGINE_PLAINBADGE setflag ENGINE_PLAINBADGE
checkcode VAR_BADGES readvar VAR_BADGES
scall GoldenrodGymActivateRockets scall GoldenrodGymActivateRockets
.GotPlainBadge: .GotPlainBadge:
writetext WhitneyPlainBadgeText writetext WhitneyPlainBadgeText
@ -169,7 +169,7 @@ GoldenrodGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext WHITNEY, WHITNEY1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, WHITNEY, WHITNEY1
jumpstd gymstatue2 jumpstd gymstatue2
BridgetWalksUpMovement: BridgetWalksUpMovement:

2
maps/GoldenrodMagnetTrainStation.asm
View File

@ -32,7 +32,7 @@ GoldenrodMagnetTrainStationOfficerScript:
closetext closetext
applymovement GOLDENRODMAGNETTRAINSTATION_OFFICER, MovementData_0x55146 applymovement GOLDENRODMAGNETTRAINSTATION_OFFICER, MovementData_0x55146
applymovement PLAYER, MovementData_0x5514f applymovement PLAYER, MovementData_0x5514f
writebyte FALSE setval FALSE
special MagnetTrain special MagnetTrain
warpcheck warpcheck
newloadmap MAPSETUP_TRAIN newloadmap MAPSETUP_TRAIN

4
maps/GoldenrodPokecenter1F.asm
View File

@ -14,7 +14,7 @@ GoldenrodPokecenter1FNurseScript:
jumpstd pokecenternurse jumpstd pokecenternurse
GoldenrodPokecenter1F_GSBallSceneLeft: GoldenrodPokecenter1F_GSBallSceneLeft:
writebyte BATTLETOWERACTION_CHECKMOBILEEVENT setval BATTLETOWERACTION_CHECKMOBILEEVENT
special BattleTowerAction special BattleTowerAction
ifequal MOBILE_EVENT_OBJECT_GS_BALL, .gsball ifequal MOBILE_EVENT_OBJECT_GS_BALL, .gsball
end end
@ -46,7 +46,7 @@ GoldenrodPokecenter1F_GSBallSceneLeft:
end end
GoldenrodPokecenter1F_GSBallSceneRight: GoldenrodPokecenter1F_GSBallSceneRight:
writebyte BATTLETOWERACTION_CHECKMOBILEEVENT setval BATTLETOWERACTION_CHECKMOBILEEVENT
special BattleTowerAction special BattleTowerAction
ifequal MOBILE_EVENT_OBJECT_GS_BALL, .gsball ifequal MOBILE_EVENT_OBJECT_GS_BALL, .gsball
end end

14
maps/GoldenrodUnderground.asm
View File

@ -36,8 +36,8 @@ GoldenrodUnderground_MapScripts:
clearevent EVENT_SWITCH_12 clearevent EVENT_SWITCH_12
clearevent EVENT_SWITCH_13 clearevent EVENT_SWITCH_13
clearevent EVENT_SWITCH_14 clearevent EVENT_SWITCH_14
writebyte 0 setval 0
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
return return
.CheckBasementKey: .CheckBasementKey:
@ -50,7 +50,7 @@ GoldenrodUnderground_MapScripts:
return return
.CheckDayOfWeek: .CheckDayOfWeek:
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal MONDAY, .Monday ifequal MONDAY, .Monday
ifequal TUESDAY, .Tuesday ifequal TUESDAY, .Tuesday
ifequal WEDNESDAY, .Wednesday ifequal WEDNESDAY, .Wednesday
@ -157,7 +157,7 @@ TrainerPokemaniacDonald:
BitterMerchantScript: BitterMerchantScript:
opentext opentext
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal SUNDAY, .Open ifequal SUNDAY, .Open
ifequal SATURDAY, .Open ifequal SATURDAY, .Open
jump GoldenrodUndergroundScript_ShopClosed jump GoldenrodUndergroundScript_ShopClosed
@ -171,7 +171,7 @@ BargainMerchantScript:
opentext opentext
checkflag ENGINE_GOLDENROD_UNDERGROUND_MERCHANT_CLOSED checkflag ENGINE_GOLDENROD_UNDERGROUND_MERCHANT_CLOSED
iftrue GoldenrodUndergroundScript_ShopClosed iftrue GoldenrodUndergroundScript_ShopClosed
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal MONDAY, .CheckMorn ifequal MONDAY, .CheckMorn
jump GoldenrodUndergroundScript_ShopClosed jump GoldenrodUndergroundScript_ShopClosed
@ -184,7 +184,7 @@ BargainMerchantScript:
OlderHaircutBrotherScript: OlderHaircutBrotherScript:
opentext opentext
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal TUESDAY, .DoHaircut ifequal TUESDAY, .DoHaircut
ifequal THURSDAY, .DoHaircut ifequal THURSDAY, .DoHaircut
ifequal SATURDAY, .DoHaircut ifequal SATURDAY, .DoHaircut
@ -267,7 +267,7 @@ OlderHaircutBrotherScript:
YoungerHaircutBrotherScript: YoungerHaircutBrotherScript:
opentext opentext
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal SUNDAY, .DoHaircut ifequal SUNDAY, .DoHaircut
ifequal WEDNESDAY, .DoHaircut ifequal WEDNESDAY, .DoHaircut
ifequal FRIDAY, .DoHaircut ifequal FRIDAY, .DoHaircut

50
maps/GoldenrodUndergroundSwitchRoomEntrances.asm
View File

@ -279,9 +279,9 @@ Switch1Script:
writetext SwitchRoomText_OffTurnOn writetext SwitchRoomText_OffTurnOn
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
copybytetovar wUndergroundSwitchPositions readmem wUndergroundSwitchPositions
addvar 1 addval 1
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
setevent EVENT_SWITCH_1 setevent EVENT_SWITCH_1
jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors
@ -289,9 +289,9 @@ Switch1Script:
writetext SwitchRoomText_OnTurnOff writetext SwitchRoomText_OnTurnOff
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
copybytetovar wUndergroundSwitchPositions readmem wUndergroundSwitchPositions
addvar -1 addval -1
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
clearevent EVENT_SWITCH_1 clearevent EVENT_SWITCH_1
jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors
@ -304,9 +304,9 @@ Switch2Script:
writetext SwitchRoomText_OffTurnOn writetext SwitchRoomText_OffTurnOn
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
copybytetovar wUndergroundSwitchPositions readmem wUndergroundSwitchPositions
addvar 2 addval 2
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
setevent EVENT_SWITCH_2 setevent EVENT_SWITCH_2
jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors
@ -314,9 +314,9 @@ Switch2Script:
writetext SwitchRoomText_OnTurnOff writetext SwitchRoomText_OnTurnOff
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
copybytetovar wUndergroundSwitchPositions readmem wUndergroundSwitchPositions
addvar -2 addval -2
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
clearevent EVENT_SWITCH_2 clearevent EVENT_SWITCH_2
jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors
@ -329,9 +329,9 @@ Switch3Script:
writetext SwitchRoomText_OffTurnOn writetext SwitchRoomText_OffTurnOn
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
copybytetovar wUndergroundSwitchPositions readmem wUndergroundSwitchPositions
addvar 3 addval 3
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
setevent EVENT_SWITCH_3 setevent EVENT_SWITCH_3
jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors
@ -339,9 +339,9 @@ Switch3Script:
writetext SwitchRoomText_OnTurnOff writetext SwitchRoomText_OnTurnOff
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
copybytetovar wUndergroundSwitchPositions readmem wUndergroundSwitchPositions
addvar -3 addval -3
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
clearevent EVENT_SWITCH_3 clearevent EVENT_SWITCH_3
jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors jump GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors
@ -354,8 +354,8 @@ EmergencySwitchScript:
writetext SwitchRoomText_OffTurnOn writetext SwitchRoomText_OffTurnOn
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
writebyte 7 setval 7
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
setevent EVENT_EMERGENCY_SWITCH setevent EVENT_EMERGENCY_SWITCH
setevent EVENT_SWITCH_1 setevent EVENT_SWITCH_1
setevent EVENT_SWITCH_2 setevent EVENT_SWITCH_2
@ -366,8 +366,8 @@ EmergencySwitchScript:
writetext SwitchRoomText_OnTurnOff writetext SwitchRoomText_OnTurnOff
yesorno yesorno
iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle iffalse GoldenrodUndergroundSwitchRoomEntrances_DontToggle
writebyte 0 setval 0
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
clearevent EVENT_EMERGENCY_SWITCH clearevent EVENT_EMERGENCY_SWITCH
clearevent EVENT_SWITCH_1 clearevent EVENT_SWITCH_1
clearevent EVENT_SWITCH_2 clearevent EVENT_SWITCH_2
@ -379,7 +379,7 @@ GoldenrodUndergroundSwitchRoomEntrances_DontToggle:
end end
GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors: GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors:
copybytetovar wUndergroundSwitchPositions readmem wUndergroundSwitchPositions
ifequal 0, .Position0 ifequal 0, .Position0
ifequal 1, .Position1 ifequal 1, .Position1
ifequal 2, .Position2 ifequal 2, .Position2
@ -498,8 +498,8 @@ GoldenrodUndergroundSwitchRoomEntrances_UpdateDoors:
scall .Set14 scall .Set14
reloadmappart reloadmappart
closetext closetext
writebyte 6 setval 6
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
end end
.Set4: .Set4:

4
maps/GoldenrodUndergroundWarehouse.asm
View File

@ -29,8 +29,8 @@ GoldenrodUndergroundWarehouse_MapScripts:
clearevent EVENT_SWITCH_12 clearevent EVENT_SWITCH_12
clearevent EVENT_SWITCH_13 clearevent EVENT_SWITCH_13
clearevent EVENT_SWITCH_14 clearevent EVENT_SWITCH_14
writebyte 0 setval 0
copyvartobyte wUndergroundSwitchPositions writemem wUndergroundSwitchPositions
return return
TrainerGruntM24: TrainerGruntM24:

2
maps/HallOfFame.asm
View File

@ -28,7 +28,7 @@ HallOfFame_MapScripts:
applymovement PLAYER, HallOfFame_SlowlyApproachMachine applymovement PLAYER, HallOfFame_SlowlyApproachMachine
setscene SCENE_FINISHED setscene SCENE_FINISHED
pause 15 pause 15
writebyte HEALMACHINE_HALL_OF_FAME setval HEALMACHINE_HALL_OF_FAME
special HealMachineAnim special HealMachineAnim
setevent EVENT_BEAT_ELITE_FOUR setevent EVENT_BEAT_ELITE_FOUR
setevent EVENT_TELEPORT_GUY setevent EVENT_TELEPORT_GUY

50
maps/IlexForest.asm
View File

@ -20,7 +20,7 @@ IlexForest_MapScripts:
.FarfetchdCallback: .FarfetchdCallback:
checkevent EVENT_GOT_HM01_CUT checkevent EVENT_GOT_HM01_CUT
iftrue .Static iftrue .Static
copybytetovar wFarfetchdPosition readmem wFarfetchdPosition
ifequal 1, .PositionOne ifequal 1, .PositionOne
ifequal 2, .PositionTwo ifequal 2, .PositionTwo
ifequal 3, .PositionThree ifequal 3, .PositionThree
@ -101,7 +101,7 @@ IlexForestCharcoalApprenticeScript:
end end
IlexForestFarfetchdScript: IlexForestFarfetchdScript:
copybytetovar wFarfetchdPosition readmem wFarfetchdPosition
ifequal 1, .Position1 ifequal 1, .Position1
ifequal 2, .Position2 ifequal 2, .Position2
ifequal 3, .Position3 ifequal 3, .Position3
@ -126,7 +126,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 15, 25 moveobject ILEXFOREST_FARFETCHD, 15, 25
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 2 loadmem wFarfetchdPosition, 2
end end
.Position2: .Position2:
@ -136,7 +136,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 20, 24 moveobject ILEXFOREST_FARFETCHD, 20, 24
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 3 loadmem wFarfetchdPosition, 3
end end
.Position2_Down: .Position2_Down:
@ -144,7 +144,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 15, 29 moveobject ILEXFOREST_FARFETCHD, 15, 29
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 8 loadmem wFarfetchdPosition, 8
end end
.Position3: .Position3:
@ -154,7 +154,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 29, 22 moveobject ILEXFOREST_FARFETCHD, 29, 22
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 4 loadmem wFarfetchdPosition, 4
end end
.Position3_Left: .Position3_Left:
@ -162,7 +162,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 15, 25 moveobject ILEXFOREST_FARFETCHD, 15, 25
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 2 loadmem wFarfetchdPosition, 2
end end
.Position4: .Position4:
@ -172,7 +172,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 28, 31 moveobject ILEXFOREST_FARFETCHD, 28, 31
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 5 loadmem wFarfetchdPosition, 5
end end
.Position4_Up: .Position4_Up:
@ -180,7 +180,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 20, 24 moveobject ILEXFOREST_FARFETCHD, 20, 24
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 3 loadmem wFarfetchdPosition, 3
end end
.Position5: .Position5:
@ -192,7 +192,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 24, 35 moveobject ILEXFOREST_FARFETCHD, 24, 35
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 6 loadmem wFarfetchdPosition, 6
end end
.Position5_Left: .Position5_Left:
@ -200,7 +200,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 22, 31 moveobject ILEXFOREST_FARFETCHD, 22, 31
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 7 loadmem wFarfetchdPosition, 7
end end
.Position5_Up: .Position5_Up:
@ -208,7 +208,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 29, 22 moveobject ILEXFOREST_FARFETCHD, 29, 22
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 4 loadmem wFarfetchdPosition, 4
end end
.Position5_Right: .Position5_Right:
@ -216,7 +216,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 29, 22 moveobject ILEXFOREST_FARFETCHD, 29, 22
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 4 loadmem wFarfetchdPosition, 4
end end
.Position6: .Position6:
@ -226,7 +226,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 22, 31 moveobject ILEXFOREST_FARFETCHD, 22, 31
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 7 loadmem wFarfetchdPosition, 7
end end
.Position6_Right: .Position6_Right:
@ -234,7 +234,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 28, 31 moveobject ILEXFOREST_FARFETCHD, 28, 31
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 5 loadmem wFarfetchdPosition, 5
end end
.Position7: .Position7:
@ -245,7 +245,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 15, 29 moveobject ILEXFOREST_FARFETCHD, 15, 29
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 8 loadmem wFarfetchdPosition, 8
end end
.Position7_Left: .Position7_Left:
@ -253,7 +253,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 24, 35 moveobject ILEXFOREST_FARFETCHD, 24, 35
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 6 loadmem wFarfetchdPosition, 6
end end
.Position7_Down: .Position7_Down:
@ -261,7 +261,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 28, 31 moveobject ILEXFOREST_FARFETCHD, 28, 31
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 5 loadmem wFarfetchdPosition, 5
end end
.Position8: .Position8:
@ -273,7 +273,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 10, 35 moveobject ILEXFOREST_FARFETCHD, 10, 35
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 9 loadmem wFarfetchdPosition, 9
end end
.Position8_Right: .Position8_Right:
@ -281,7 +281,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 22, 31 moveobject ILEXFOREST_FARFETCHD, 22, 31
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 7 loadmem wFarfetchdPosition, 7
end end
.Position8_Up: .Position8_Up:
@ -290,7 +290,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 15, 25 moveobject ILEXFOREST_FARFETCHD, 15, 25
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 2 loadmem wFarfetchdPosition, 2
end end
.Position9: .Position9:
@ -301,7 +301,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 6, 28 moveobject ILEXFOREST_FARFETCHD, 6, 28
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 10 loadmem wFarfetchdPosition, 10
appear ILEXFOREST_BLACK_BELT appear ILEXFOREST_BLACK_BELT
setevent EVENT_CHARCOAL_KILN_BOSS setevent EVENT_CHARCOAL_KILN_BOSS
setevent EVENT_HERDED_FARFETCHD setevent EVENT_HERDED_FARFETCHD
@ -312,7 +312,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 15, 29 moveobject ILEXFOREST_FARFETCHD, 15, 29
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 8 loadmem wFarfetchdPosition, 8
end end
.Position9_Down: .Position9_Down:
@ -320,7 +320,7 @@ IlexForestFarfetchdScript:
moveobject ILEXFOREST_FARFETCHD, 15, 29 moveobject ILEXFOREST_FARFETCHD, 15, 29
disappear ILEXFOREST_FARFETCHD disappear ILEXFOREST_FARFETCHD
appear ILEXFOREST_FARFETCHD appear ILEXFOREST_FARFETCHD
loadvar wFarfetchdPosition, 8 loadmem wFarfetchdPosition, 8
end end
.Position10: .Position10:
@ -339,7 +339,7 @@ IlexForestFarfetchdScript:
cry FARFETCH_D cry FARFETCH_D
waitbutton waitbutton
closetext closetext
checkcode VAR_FACING readvar VAR_FACING
end end
IlexForestCharcoalMasterScript: IlexForestCharcoalMasterScript:

4
maps/IndigoPlateauPokecenter1F.asm
View File

@ -46,7 +46,7 @@ PlateauRivalBattle1:
iffalse PlateauRivalScriptDone iffalse PlateauRivalScriptDone
checkflag ENGINE_INDIGO_PLATEAU_RIVAL_FIGHT checkflag ENGINE_INDIGO_PLATEAU_RIVAL_FIGHT
iftrue PlateauRivalScriptDone iftrue PlateauRivalScriptDone
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal SUNDAY, PlateauRivalScriptDone ifequal SUNDAY, PlateauRivalScriptDone
ifequal TUESDAY, PlateauRivalScriptDone ifequal TUESDAY, PlateauRivalScriptDone
ifequal THURSDAY, PlateauRivalScriptDone ifequal THURSDAY, PlateauRivalScriptDone
@ -68,7 +68,7 @@ PlateauRivalBattle2:
iffalse PlateauRivalScriptDone iffalse PlateauRivalScriptDone
checkflag ENGINE_INDIGO_PLATEAU_RIVAL_FIGHT checkflag ENGINE_INDIGO_PLATEAU_RIVAL_FIGHT
iftrue PlateauRivalScriptDone iftrue PlateauRivalScriptDone
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal SUNDAY, PlateauRivalScriptDone ifequal SUNDAY, PlateauRivalScriptDone
ifequal TUESDAY, PlateauRivalScriptDone ifequal TUESDAY, PlateauRivalScriptDone
ifequal THURSDAY, PlateauRivalScriptDone ifequal THURSDAY, PlateauRivalScriptDone

18
maps/KurtsHouse.asm
View File

@ -44,7 +44,7 @@ Kurt1:
closetext closetext
special FadeOutMusic special FadeOutMusic
setevent EVENT_AZALEA_TOWN_SLOWPOKETAIL_ROCKET setevent EVENT_AZALEA_TOWN_SLOWPOKETAIL_ROCKET
checkcode VAR_FACING readvar VAR_FACING
ifequal UP, .RunAround ifequal UP, .RunAround
turnobject PLAYER, DOWN turnobject PLAYER, DOWN
playsound SFX_FLY playsound SFX_FLY
@ -194,7 +194,7 @@ Kurt1:
iftrue KurtMakingBallsScript iftrue KurtMakingBallsScript
writetext UnknownText_0x18e7fb writetext UnknownText_0x18e7fb
buttonsound buttonsound
verbosegiveitem2 LEVEL_BALL, VAR_KURT_APRICORNS verbosegiveitemvar LEVEL_BALL, VAR_KURT_APRICORNS
iffalse .NoRoomForBall iffalse .NoRoomForBall
clearevent EVENT_GAVE_KURT_RED_APRICORN clearevent EVENT_GAVE_KURT_RED_APRICORN
jump ._ThatTurnedOutGreat jump ._ThatTurnedOutGreat
@ -204,7 +204,7 @@ Kurt1:
iftrue KurtMakingBallsScript iftrue KurtMakingBallsScript
writetext UnknownText_0x18e7fb writetext UnknownText_0x18e7fb
buttonsound buttonsound
verbosegiveitem2 LURE_BALL, VAR_KURT_APRICORNS verbosegiveitemvar LURE_BALL, VAR_KURT_APRICORNS
iffalse .NoRoomForBall iffalse .NoRoomForBall
clearevent EVENT_GAVE_KURT_BLU_APRICORN clearevent EVENT_GAVE_KURT_BLU_APRICORN
jump ._ThatTurnedOutGreat jump ._ThatTurnedOutGreat
@ -214,7 +214,7 @@ Kurt1:
iftrue KurtMakingBallsScript iftrue KurtMakingBallsScript
writetext UnknownText_0x18e7fb writetext UnknownText_0x18e7fb
buttonsound buttonsound
verbosegiveitem2 MOON_BALL, VAR_KURT_APRICORNS verbosegiveitemvar MOON_BALL, VAR_KURT_APRICORNS
iffalse .NoRoomForBall iffalse .NoRoomForBall
clearevent EVENT_GAVE_KURT_YLW_APRICORN clearevent EVENT_GAVE_KURT_YLW_APRICORN
jump ._ThatTurnedOutGreat jump ._ThatTurnedOutGreat
@ -224,7 +224,7 @@ Kurt1:
iftrue KurtMakingBallsScript iftrue KurtMakingBallsScript
writetext UnknownText_0x18e7fb writetext UnknownText_0x18e7fb
buttonsound buttonsound
verbosegiveitem2 FRIEND_BALL, VAR_KURT_APRICORNS verbosegiveitemvar FRIEND_BALL, VAR_KURT_APRICORNS
iffalse .NoRoomForBall iffalse .NoRoomForBall
clearevent EVENT_GAVE_KURT_GRN_APRICORN clearevent EVENT_GAVE_KURT_GRN_APRICORN
jump ._ThatTurnedOutGreat jump ._ThatTurnedOutGreat
@ -234,7 +234,7 @@ Kurt1:
iftrue KurtMakingBallsScript iftrue KurtMakingBallsScript
writetext UnknownText_0x18e7fb writetext UnknownText_0x18e7fb
buttonsound buttonsound
verbosegiveitem2 FAST_BALL, VAR_KURT_APRICORNS verbosegiveitemvar FAST_BALL, VAR_KURT_APRICORNS
iffalse .NoRoomForBall iffalse .NoRoomForBall
clearevent EVENT_GAVE_KURT_WHT_APRICORN clearevent EVENT_GAVE_KURT_WHT_APRICORN
jump ._ThatTurnedOutGreat jump ._ThatTurnedOutGreat
@ -244,7 +244,7 @@ Kurt1:
iftrue KurtMakingBallsScript iftrue KurtMakingBallsScript
writetext UnknownText_0x18e7fb writetext UnknownText_0x18e7fb
buttonsound buttonsound
verbosegiveitem2 HEAVY_BALL, VAR_KURT_APRICORNS verbosegiveitemvar HEAVY_BALL, VAR_KURT_APRICORNS
iffalse .NoRoomForBall iffalse .NoRoomForBall
clearevent EVENT_GAVE_KURT_BLK_APRICORN clearevent EVENT_GAVE_KURT_BLK_APRICORN
jump ._ThatTurnedOutGreat jump ._ThatTurnedOutGreat
@ -254,7 +254,7 @@ Kurt1:
iftrue KurtMakingBallsScript iftrue KurtMakingBallsScript
writetext UnknownText_0x18e7fb writetext UnknownText_0x18e7fb
buttonsound buttonsound
verbosegiveitem2 LOVE_BALL, VAR_KURT_APRICORNS verbosegiveitemvar LOVE_BALL, VAR_KURT_APRICORNS
iffalse .NoRoomForBall iffalse .NoRoomForBall
clearevent EVENT_GAVE_KURT_PNK_APRICORN clearevent EVENT_GAVE_KURT_PNK_APRICORN
jump ._ThatTurnedOutGreat jump ._ThatTurnedOutGreat
@ -292,7 +292,7 @@ Kurt1:
special FadeOutMusic special FadeOutMusic
pause 20 pause 20
showemote EMOTE_SHOCK, KURTSHOUSE_KURT1, 30 showemote EMOTE_SHOCK, KURTSHOUSE_KURT1, 30
checkcode VAR_FACING readvar VAR_FACING
ifequal UP, .GSBallRunAround ifequal UP, .GSBallRunAround
turnobject PLAYER, DOWN turnobject PLAYER, DOWN
playsound SFX_FLY playsound SFX_FLY

6
maps/LakeOfRage.asm
View File

@ -32,7 +32,7 @@ LakeOfRage_MapScripts:
return return
.Wesley: .Wesley:
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifequal WEDNESDAY, .WesleyAppears ifequal WEDNESDAY, .WesleyAppears
disappear LAKEOFRAGE_WESLEY disappear LAKEOFRAGE_WESLEY
return return
@ -85,7 +85,7 @@ RedGyarados:
cry GYARADOS cry GYARADOS
closetext closetext
loadwildmon GYARADOS, 30 loadwildmon GYARADOS, 30
writecode VAR_BATTLETYPE, BATTLETYPE_SHINY loadvar VAR_BATTLETYPE, BATTLETYPE_SHINY
startbattle startbattle
ifequal LOSE, .NotBeaten ifequal LOSE, .NotBeaten
disappear LAKEOFRAGE_GYARADOS disappear LAKEOFRAGE_GYARADOS
@ -192,7 +192,7 @@ WesleyScript:
opentext opentext
checkevent EVENT_GOT_BLACKBELT_FROM_WESLEY checkevent EVENT_GOT_BLACKBELT_FROM_WESLEY
iftrue WesleyWednesdayScript iftrue WesleyWednesdayScript
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal WEDNESDAY, WesleyNotWednesdayScript ifnotequal WEDNESDAY, WesleyNotWednesdayScript
checkevent EVENT_MET_WESLEY_OF_WEDNESDAY checkevent EVENT_MET_WESLEY_OF_WEDNESDAY
iftrue .MetWesley iftrue .MetWesley

2
maps/LakeOfRageMagikarpHouse.asm
View File

@ -37,7 +37,7 @@ MagikarpLengthRaterScript:
end end
.AskedForMagikarp: .AskedForMagikarp:
writebyte MAGIKARP setval MAGIKARP
special FindPartyMonThatSpecies special FindPartyMonThatSpecies
iffalse .ClearedRocketHideout iffalse .ClearedRocketHideout
writetext MagikarpLengthRaterText_YouHaveAMagikarp writetext MagikarpLengthRaterText_YouHaveAMagikarp

2
maps/LavRadioTower1F.asm
View File

@ -34,7 +34,7 @@ LavRadioTower1FGentlemanScript:
.ReturnedMachinePart: .ReturnedMachinePart:
writetext LavRadioTower1FGentlemanText_ReturnedMachinePart writetext LavRadioTower1FGentlemanText_ReturnedMachinePart
buttonsound buttonsound
stringtotext .expncardname, MEM_BUFFER_1 getstring STRING_BUFFER_4, .expncardname
scall .receiveitem scall .receiveitem
setflag ENGINE_EXPN_CARD setflag ENGINE_EXPN_CARD
.GotExpnCard: .GotExpnCard:

4
maps/MahoganyGym.asm
View File

@ -30,7 +30,7 @@ MahoganyGymPryceScript:
playsound SFX_GET_BADGE playsound SFX_GET_BADGE
waitsfx waitsfx
setflag ENGINE_GLACIERBADGE setflag ENGINE_GLACIERBADGE
checkcode VAR_BADGES readvar VAR_BADGES
scall MahoganyGymActivateRockets scall MahoganyGymActivateRockets
.FightDone: .FightDone:
checkevent EVENT_GOT_TM16_ICY_WIND checkevent EVENT_GOT_TM16_ICY_WIND
@ -144,7 +144,7 @@ MahoganyGymStatue:
iftrue .Beaten iftrue .Beaten
jumpstd gymstatue1 jumpstd gymstatue1
.Beaten: .Beaten:
trainertotext PRYCE, PRYCE1, MEM_BUFFER_1 gettrainername STRING_BUFFER_4, PRYCE, PRYCE1
jumpstd gymstatue2 jumpstd gymstatue2
PryceText_Intro: PryceText_Intro:

2
maps/MountMoonSquare.asm
View File

@ -25,7 +25,7 @@ MountMoonSquare_MapScripts:
ClefairyDance: ClefairyDance:
checkflag ENGINE_MT_MOON_SQUARE_CLEFAIRY checkflag ENGINE_MT_MOON_SQUARE_CLEFAIRY
iftrue .NoDancing iftrue .NoDancing
checkcode VAR_WEEKDAY readvar VAR_WEEKDAY
ifnotequal MONDAY, .NoDancing ifnotequal MONDAY, .NoDancing
checktime NITE checktime NITE
iffalse .NoDancing iffalse .NoDancing

2
maps/MountMortarB1F.asm
View File

@ -32,7 +32,7 @@ MountMortarB1FKiyoScript:
writetext UnknownText_0x7e2c0 writetext UnknownText_0x7e2c0
buttonsound buttonsound
waitsfx waitsfx
checkcode VAR_PARTYCOUNT readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, .NoRoom ifequal PARTY_LENGTH, .NoRoom
writetext UnknownText_0x7e355 writetext UnknownText_0x7e355
playsound SFX_CAUGHT_MON playsound SFX_CAUGHT_MON

18
maps/NationalPark.asm
View File

@ -73,7 +73,7 @@ TrainerSchoolboyJack1:
trainer SCHOOLBOY, JACK1, EVENT_BEAT_SCHOOLBOY_JACK, SchoolboyJack1SeenText, SchoolboyJack1BeatenText, 0, .Script trainer SCHOOLBOY, JACK1, EVENT_BEAT_SCHOOLBOY_JACK, SchoolboyJack1SeenText, SchoolboyJack1BeatenText, 0, .Script
.Script: .Script:
writecode VAR_CALLERID, PHONE_SCHOOLBOY_JACK loadvar VAR_CALLERID, PHONE_SCHOOLBOY_JACK
endifjustbattled endifjustbattled
opentext opentext
checkflag ENGINE_JACK checkflag ENGINE_JACK
@ -94,14 +94,14 @@ TrainerSchoolboyJack1:
askforphonenumber PHONE_SCHOOLBOY_JACK askforphonenumber PHONE_SCHOOLBOY_JACK
ifequal PHONE_CONTACTS_FULL, .PhoneFull ifequal PHONE_CONTACTS_FULL, .PhoneFull
ifequal PHONE_CONTACT_REFUSED, .NumberDeclined ifequal PHONE_CONTACT_REFUSED, .NumberDeclined
trainertotext SCHOOLBOY, JACK1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, SCHOOLBOY, JACK1
scall .RegisteredNumber scall .RegisteredNumber
jump .NumberAccepted jump .NumberAccepted
.Rematch: .Rematch:
scall .RematchStd scall .RematchStd
winlosstext SchoolboyJack1BeatenText, 0 winlosstext SchoolboyJack1BeatenText, 0
copybytetovar wJackFightCount readmem wJackFightCount
ifequal 4, .Fight4 ifequal 4, .Fight4
ifequal 3, .Fight3 ifequal 3, .Fight3
ifequal 2, .Fight2 ifequal 2, .Fight2
@ -123,7 +123,7 @@ TrainerSchoolboyJack1:
loadtrainer SCHOOLBOY, JACK1 loadtrainer SCHOOLBOY, JACK1
startbattle startbattle
reloadmapafterbattle reloadmapafterbattle
loadvar wJackFightCount, 1 loadmem wJackFightCount, 1
clearflag ENGINE_JACK clearflag ENGINE_JACK
end end
@ -131,7 +131,7 @@ TrainerSchoolboyJack1:
loadtrainer SCHOOLBOY, JACK2 loadtrainer SCHOOLBOY, JACK2
startbattle startbattle
reloadmapafterbattle reloadmapafterbattle
loadvar wJackFightCount, 2 loadmem wJackFightCount, 2
clearflag ENGINE_JACK clearflag ENGINE_JACK
end end
@ -139,7 +139,7 @@ TrainerSchoolboyJack1:
loadtrainer SCHOOLBOY, JACK3 loadtrainer SCHOOLBOY, JACK3
startbattle startbattle
reloadmapafterbattle reloadmapafterbattle
loadvar wJackFightCount, 3 loadmem wJackFightCount, 3
clearflag ENGINE_JACK clearflag ENGINE_JACK
end end
@ -147,7 +147,7 @@ TrainerSchoolboyJack1:
loadtrainer SCHOOLBOY, JACK4 loadtrainer SCHOOLBOY, JACK4
startbattle startbattle
reloadmapafterbattle reloadmapafterbattle
loadvar wJackFightCount, 4 loadmem wJackFightCount, 4
clearflag ENGINE_JACK clearflag ENGINE_JACK
end end
@ -201,7 +201,7 @@ TrainerPokefanfBeverly1:
trainer POKEFANF, BEVERLY1, EVENT_BEAT_POKEFANF_BEVERLY, PokefanfBeverly1SeenText, PokefanfBeverly1BeatenText, 0, .Script trainer POKEFANF, BEVERLY1, EVENT_BEAT_POKEFANF_BEVERLY, PokefanfBeverly1SeenText, PokefanfBeverly1BeatenText, 0, .Script
.Script: .Script:
writecode VAR_CALLERID, PHONE_POKEFAN_BEVERLY loadvar VAR_CALLERID, PHONE_POKEFAN_BEVERLY
endifjustbattled endifjustbattled
opentext opentext
checkflag ENGINE_BEVERLY_HAS_NUGGET checkflag ENGINE_BEVERLY_HAS_NUGGET
@ -224,7 +224,7 @@ TrainerPokefanfBeverly1:
askforphonenumber PHONE_POKEFAN_BEVERLY askforphonenumber PHONE_POKEFAN_BEVERLY
ifequal PHONE_CONTACTS_FULL, .PhoneFull ifequal PHONE_CONTACTS_FULL, .PhoneFull
ifequal PHONE_CONTACT_REFUSED, .NumberDeclined ifequal PHONE_CONTACT_REFUSED, .NumberDeclined
trainertotext POKEFANF, BEVERLY1, MEM_BUFFER_0 gettrainername STRING_BUFFER_3, POKEFANF, BEVERLY1
scall .RegisteredNumber scall .RegisteredNumber
jump .NumberAccepted jump .NumberAccepted

Some files were not shown because too many files have changed in this diff Show More