summaryrefslogtreecommitdiff
path: root/engine/scripting.asm
diff options
context:
space:
mode:
authoryenatch <yenatch@gmail.com>2016-01-04 07:41:19 -0500
committeryenatch <yenatch@gmail.com>2016-01-04 07:41:19 -0500
commit0add51451cda9d4221af137f83e2429d3577310c (patch)
treefd05f8f0ad49d88b032dc9e10af85a42dfa0e402 /engine/scripting.asm
parentda87d2a929b1d58175efe063833c124d8ba702c9 (diff)
parent2a263629a40e201b1702e2f4e65f1c61360cc2b2 (diff)
Merge pull request #330 from PikalaxALT/scriptmacrorenaming
Scriptmacrorenaming
Diffstat (limited to 'engine/scripting.asm')
-rw-r--r--engine/scripting.asm517
1 files changed, 256 insertions, 261 deletions
diff --git a/engine/scripting.asm b/engine/scripting.asm
index c80343a4c..1111b0872 100644
--- a/engine/scripting.asm
+++ b/engine/scripting.asm
@@ -70,178 +70,178 @@ RunScriptCommand: ; 96ca9
ScriptCommandTable: ; 96cb1
- dw Script_scall
- dw Script_farscall
- dw Script_ptcall
- dw Script_jump
- dw Script_farjump
- dw Script_ptjump
- dw Script_if_equal
- dw Script_if_not_equal
- dw Script_iffalse
- dw Script_iftrue
- dw Script_if_greater_than
- dw Script_if_less_than
- dw Script_jumpstd
- dw Script_callstd
- dw Script_callasm
- dw Script_special
- dw Script_ptcallasm
- dw Script_checkmaptriggers
- dw Script_domaptrigger
- dw Script_checktriggers
- dw Script_dotrigger
- dw Script_writebyte
- dw Script_addvar
- dw Script_random
- dw Script_checkver
- dw Script_copybytetovar
- dw Script_copyvartobyte
- dw Script_loadvar
- dw Script_checkcode
- dw Script_writevarcode
- dw Script_writecode
- dw Script_giveitem
- dw Script_takeitem
- dw Script_checkitem
- dw Script_givemoney
- dw Script_takemoney
- dw Script_checkmoney
- dw Script_givecoins
- dw Script_takecoins
- dw Script_checkcoins
- dw Script_addcellnum
- dw Script_delcellnum
- dw Script_checkcellnum
- dw Script_checktime
- dw Script_checkpoke
- dw Script_givepoke
- dw Script_giveegg
- dw Script_givepokeitem
- dw Script_checkpokeitem
- dw Script_checkevent
- dw Script_clearevent
- dw Script_setevent
- dw Script_checkflag
- dw Script_clearflag
- dw Script_setflag
- dw Script_wildon
- dw Script_wildoff
- dw Script_xycompare
- dw Script_warpmod
- dw Script_blackoutmod
- dw Script_warp
- dw Script_readmoney
- dw Script_readcoins
- dw Script_RAM2MEM
- dw Script_pokenamemem
- dw Script_itemtotext
- dw Script_mapnametotext
- dw Script_trainertotext
- dw Script_stringtotext
- dw Script_itemnotify
- dw Script_pocketisfull
- dw Script_loadfont
- dw Script_refreshscreen
- dw Script_loadmovesprites
- dw Script_loadbytec2cf
- dw Script_farwritetext
- dw Script_writetext
- dw Script_repeattext
- dw Script_yesorno
- dw Script_loadmenudata
- dw Script_writebackup
- dw Script_jumptextfaceplayer
+ dw Script_scall ; 00
+ dw Script_farscall ; 01
+ dw Script_ptcall ; 02
+ dw Script_jump ; 03
+ dw Script_farjump ; 04
+ dw Script_ptjump ; 05
+ dw Script_if_equal ; 06
+ dw Script_if_not_equal ; 07
+ dw Script_iffalse ; 08
+ dw Script_iftrue ; 09
+ dw Script_if_greater_than ; 0a
+ dw Script_if_less_than ; 0b
+ dw Script_jumpstd ; 0c
+ dw Script_callstd ; 0d
+ dw Script_callasm ; 0e
+ dw Script_special ; 0f
+ dw Script_ptcallasm ; 10
+ dw Script_checkmaptriggers ; 11
+ dw Script_domaptrigger ; 12
+ dw Script_checktriggers ; 13
+ dw Script_dotrigger ; 14
+ dw Script_writebyte ; 15
+ dw Script_addvar ; 16
+ dw Script_random ; 17
+ dw Script_checkver ; 18
+ dw Script_copybytetovar ; 19
+ dw Script_copyvartobyte ; 1a
+ dw Script_loadvar ; 1b
+ dw Script_checkcode ; 1c
+ dw Script_writevarcode ; 1d
+ dw Script_writecode ; 1e
+ dw Script_giveitem ; 1f
+ dw Script_takeitem ; 20
+ dw Script_checkitem ; 21
+ dw Script_givemoney ; 22
+ dw Script_takemoney ; 23
+ dw Script_checkmoney ; 24
+ dw Script_givecoins ; 25
+ dw Script_takecoins ; 26
+ dw Script_checkcoins ; 27
+ dw Script_addcellnum ; 28
+ dw Script_delcellnum ; 29
+ dw Script_checkcellnum ; 2a
+ dw Script_checktime ; 2b
+ dw Script_checkpoke ; 2c
+ dw Script_givepoke ; 2d
+ dw Script_giveegg ; 2e
+ dw Script_givepokeitem ; 2f
+ dw Script_checkpokeitem ; 30
+ dw Script_checkevent ; 31
+ dw Script_clearevent ; 32
+ dw Script_setevent ; 33
+ dw Script_checkflag ; 34
+ dw Script_clearflag ; 35
+ dw Script_setflag ; 36
+ dw Script_wildon ; 37
+ dw Script_wildoff ; 38
+ dw Script_xycompare ; 39
+ dw Script_warpmod ; 3a
+ dw Script_blackoutmod ; 3b
+ dw Script_warp ; 3c
+ dw Script_readmoney ; 3d
+ dw Script_readcoins ; 3e
+ dw Script_RAM2MEM ; 3f
+ dw Script_pokenamemem ; 40
+ dw Script_itemtotext ; 41
+ dw Script_mapnametotext ; 42
+ dw Script_trainertotext ; 43
+ dw Script_stringtotext ; 44
+ dw Script_itemnotify ; 45
+ dw Script_pocketisfull ; 46
+ dw Script_textbox ; 47
+ dw Script_refreshscreen ; 48
+ dw Script_closetext ; 49
+ dw Script_loadbytec2cf ; 4a
+ dw Script_farwritetext ; 4b
+ dw Script_writetext ; 4c
+ dw Script_repeattext ; 4d
+ dw Script_yesorno ; 4e
+ dw Script_loadmenudata ; 4f
+ dw Script_closewindow ; 50
+ dw Script_jumptextfaceplayer ; 51
IF _CRYSTAL
- dw Script_farjumptext
+ dw Script_farjumptext ; 52
ENDC
- dw Script_jumptext
- dw Script_closetext
- dw Script_keeptextopen
- dw Script_pokepic
- dw Script_pokepicyesorno
- dw Script_interpretmenu
- dw Script_interpretmenu2
- dw Script_loadpikachudata
- dw Script_battlecheck
- dw Script_loadtrainerdata
- dw Script_loadpokedata
- dw Script_loadtrainer
- dw Script_startbattle
- dw Script_returnafterbattle
- dw Script_catchtutorial
- dw Script_trainertext
- dw Script_trainerstatus
- dw Script_winlosstext
- dw Script_scripttalkafter
- dw Script_talkaftercancel
- dw Script_talkaftercheck
- dw Script_setlasttalked
- dw Script_applymovement
- dw Script_applymovement2
- dw Script_faceplayer
- dw Script_faceperson
- dw Script_variablesprite
- dw Script_disappear
- dw Script_appear
- dw Script_follow
- dw Script_stopfollow
- dw Script_moveperson
- dw Script_writepersonxy
- dw Script_loademote
- dw Script_showemote
- dw Script_spriteface
- dw Script_follownotexact
- dw Script_earthquake
- dw Script_changemap
- dw Script_changeblock
- dw Script_reloadmap
- dw Script_reloadmappart
- dw Script_writecmdqueue
- dw Script_delcmdqueue
- dw Script_playmusic
- dw Script_playrammusic
- dw Script_musicfadeout
- dw Script_playmapmusic
- dw Script_reloadmapmusic
- dw Script_cry
- dw Script_playsound
- dw Script_waitbutton
- dw Script_warpsound
- dw Script_specialsound
- dw Script_passtoengine
- dw Script_newloadmap
- dw Script_pause
- dw Script_deactivatefacing
- dw Script_priorityjump
- dw Script_warpcheck
- dw Script_ptpriorityjump
- dw Script_return
- dw Script_end
- dw Script_reloadandreturn
- dw Script_resetfuncs
- dw Script_pokemart
- dw Script_elevator
- dw Script_trade
- dw Script_askforphonenumber
- dw Script_phonecall
- dw Script_hangup
- dw Script_describedecoration
- dw Script_fruittree
- dw Script_specialphonecall
- dw Script_checkphonecall
- dw Script_verbosegiveitem
- dw Script_verbosegiveitem2
- dw Script_loadwilddata
- dw Script_halloffame
- dw Script_credits
- dw Script_warpfacing
- dw Script_battletowertext
- dw Script_displaylocation
- dw Script_trainerclassname
- dw Script_name
- dw Script_wait
- dw Script_check_save
+ dw Script_jumptext ; 53
+ dw Script_waitbutton ; 54
+ dw Script_buttonsound ; 55
+ dw Script_pokepic ; 56
+ dw Script_closepokepic ; 57
+ dw Script__2dmenu ; 58
+ dw Script_verticalmenu ; 59
+ dw Script_loadpikachudata ; 5a
+ dw Script_randomwildmon ; 5b
+ dw Script_loadmemtrainer ; 5c
+ dw Script_loadwildmon ; 5d
+ dw Script_loadtrainer ; 5e
+ dw Script_startbattle ; 5f
+ dw Script_reloadmapafterbattle ; 60
+ dw Script_catchtutorial ; 61
+ dw Script_trainertext ; 62
+ dw Script_trainerflagaction ; 63
+ dw Script_winlosstext ; 64
+ dw Script_scripttalkafter ; 65
+ dw Script_end_if_just_battled ; 66
+ dw Script_check_just_battled ; 67
+ dw Script_setlasttalked ; 68
+ dw Script_applymovement ; 69
+ dw Script_applymovement2 ; 6a
+ dw Script_faceplayer ; 6b
+ dw Script_faceperson ; 6c
+ dw Script_variablesprite ; 6d
+ dw Script_disappear ; 6e
+ dw Script_appear ; 6f
+ dw Script_follow ; 70
+ dw Script_stopfollow ; 71
+ dw Script_moveperson ; 72
+ dw Script_writepersonxy ; 73
+ dw Script_loademote ; 74
+ dw Script_showemote ; 75
+ dw Script_spriteface ; 76
+ dw Script_follownotexact ; 77
+ dw Script_earthquake ; 78
+ dw Script_changemap ; 79
+ dw Script_changeblock ; 7a
+ dw Script_reloadmap ; 7b
+ dw Script_reloadmappart ; 7c
+ dw Script_writecmdqueue ; 7d
+ dw Script_delcmdqueue ; 7e
+ dw Script_playmusic ; 7f
+ dw Script_encountermusic ; 80
+ dw Script_musicfadeout ; 81
+ dw Script_playmapmusic ; 82
+ dw Script_dontrestartmapmusic ; 83
+ dw Script_cry ; 84
+ dw Script_playsound ; 85
+ dw Script_waitsfx ; 86
+ dw Script_warpsound ; 87
+ dw Script_specialsound ; 88
+ dw Script_passtoengine ; 89
+ dw Script_newloadmap ; 8a
+ dw Script_pause ; 8b
+ dw Script_deactivatefacing ; 8c
+ dw Script_priorityjump ; 8d
+ dw Script_warpcheck ; 8e
+ dw Script_ptpriorityjump ; 8f
+ dw Script_return ; 90
+ dw Script_end ; 91
+ dw Script_reloadandreturn ; 92
+ dw Script_end_all ; 93
+ dw Script_pokemart ; 94
+ dw Script_elevator ; 95
+ dw Script_trade ; 96
+ dw Script_askforphonenumber ; 97
+ dw Script_phonecall ; 98
+ dw Script_hangup ; 99
+ dw Script_describedecoration ; 9a
+ dw Script_fruittree ; 9b
+ dw Script_specialphonecall ; 9c
+ dw Script_checkphonecall ; 9d
+ dw Script_verbosegiveitem ; 9e
+ dw Script_verbosegiveitem2 ; 9f
+ dw Script_swarm ; a0
+ dw Script_halloffame ; a1
+ dw Script_credits ; a2
+ dw Script_warpfacing ; a3
+ dw Script_battletowertext ; a4
+ dw Script_landmarktotext ; a5
+ dw Script_trainerclassname ; a6
+ dw Script_name ; a7
+ dw Script_wait ; a8
+ dw Script_check_save ; a9
; 96e05
StartScript: ; 96e05
@@ -316,11 +316,11 @@ Script_jumptextfaceplayer: ; 96e45
; text_pointer (RawTextPointerLabelParam)
ld a, [ScriptBank]
- ld [wd44e], a
+ ld [wScriptTextBank], a
call GetScriptByte
- ld [wd44f], a
+ ld [wScriptTextAddr], a
call GetScriptByte
- ld [wd450], a
+ ld [wScriptTextAddr + 1], a
ld b, BANK(JumpTextFacePlayerScript)
ld hl, JumpTextFacePlayerScript
jp ScriptJump
@@ -332,11 +332,11 @@ Script_jumptext: ; 96e5f
; text_pointer (RawTextPointerLabelParam)
ld a, [ScriptBank]
- ld [wd44e], a
+ ld [wScriptTextBank], a
call GetScriptByte
- ld [wd44f], a
+ ld [wScriptTextAddr], a
call GetScriptByte
- ld [wd450], a
+ ld [wScriptTextAddr + 1], a
ld b, BANK(JumpTextScript)
ld hl, JumpTextScript
jp ScriptJump
@@ -345,10 +345,10 @@ Script_jumptext: ; 96e5f
JumpTextFacePlayerScript: ; 96e79
faceplayer
JumpTextScript: ; 96e7a
- loadfont
+ opentext
repeattext -1, -1
+ waitbutton
closetext
- loadmovesprites
end
; 96e81
@@ -361,11 +361,11 @@ Script_farjumptext: ; 96e81
; text_pointer (PointerLabelBeforeBank)
call GetScriptByte
- ld [wd44e], a
+ ld [wScriptTextBank], a
call GetScriptByte
- ld [wd44f], a
+ ld [wScriptTextAddr], a
call GetScriptByte
- ld [wd450], a
+ ld [wScriptTextAddr + 1], a
ld b, BANK(JumpTextScript)
ld hl, JumpTextScript
jp ScriptJump
@@ -419,7 +419,7 @@ Script_repeattext: ; 96ebb
ld a, l
cp -1
jr nz, .done
- ld hl, wd44e
+ ld hl, wScriptTextBank
ld a, [hli]
ld b, a
ld a, [hli]
@@ -427,17 +427,18 @@ Script_repeattext: ; 96ebb
ld l, a
call MapTextbox
ret
+
.done
ret
; 96ed9
-Script_closetext: ; 96ed9
+Script_waitbutton: ; 96ed9
; script command 0x54
- jp CloseText
+ jp WaitButton
; 96edc
-Script_keeptextopen: ; 96edc
+Script_buttonsound: ; 96edc
; script command 0x55
ld a, [hOAMUpdate]
@@ -445,7 +446,7 @@ Script_keeptextopen: ; 96edc
ld a, $1
ld [hOAMUpdate], a
call WaitBGMap
- call KeepTextOpen
+ call ButtonSound
pop af
ld [hOAMUpdate], a
ret
@@ -455,9 +456,9 @@ Script_yesorno: ; 96eed
; script command 0x4e
call YesNoBox
- ld a, 0
+ ld a, FALSE
jr c, .no
- ld a, 1
+ ld a, TRUE
.no
ld [ScriptVar], a
ret
@@ -479,10 +480,10 @@ Script_loadmenudata: ; 96efa
ret
; 96f0f
-Script_writebackup: ; 96f0f
+Script_closewindow: ; 96f0f
; script command 0x50
- call WriteBackup
+ call CloseWindow
call UpdateSprites
ret
; 96f16
@@ -502,20 +503,20 @@ Script_pokepic: ; 96f16
ret
; 96f29
-Script_pokepicyesorno: ; 96f29
+Script_closepokepic: ; 96f29
; script command 0x57
- callba PokepicYesOrNo
+ callba ClosePokepic
ret
; 96f30
-Script_interpretmenu2: ; 96f30
+Script_verticalmenu: ; 96f30
; script command 0x59
ld a, [ScriptBank]
- ld hl, InterpretMenu2
+ ld hl, VerticalMenu
rst FarCall
- ld a, [MenuSelection2]
+ ld a, [wMenuCursorY]
jr nc, .ok
xor a
.ok
@@ -523,11 +524,11 @@ Script_interpretmenu2: ; 96f30
ret
; 96f41
-Script_interpretmenu: ; 96f41
+Script__2dmenu: ; 96f41
; script command 0x58
ld a, [ScriptBank]
- ld hl, InterpretMenu
+ ld hl, _2DMenu
rst FarCall
ld a, [wMenuCursorBuffer]
jr nc, .ok
@@ -575,14 +576,14 @@ GiveItemScript: ; 96f77
callasm ret_96f76
writetext ReceivedItemText
iffalse .Full
- waitbutton
+ waitsfx
specialsound
- closetext
+ waitbutton
itemnotify
end
.Full
- keeptextopen
+ buttonsound
pocketisfull
end
; 96f89
@@ -611,7 +612,7 @@ Script_verbosegiveitem2: ; 96f8e
ld [wItemQuantityChangeBuffer], a
ld hl, NumItems
call ReceiveItem
- ld a, 1
+ ld a, TRUE
jr c, .ok2
xor a
.ok2
@@ -748,7 +749,7 @@ Script_elevator: ; 9707c
ld b, a
callba Elevator
ret c
- ld a, $1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 97099
@@ -835,7 +836,7 @@ Script_fruittree: ; 970ee
jp ScriptJump
; 970fc
-Script_loadwilddata: ; 970fc
+Script_swarm: ; 970fc
; script command 0xa0
; parameters:
; flag (SingleByteParam)
@@ -848,7 +849,7 @@ Script_loadwilddata: ; 970fc
ld d, a
call GetScriptByte
ld e, a
- callba LoadWildData
+ callba StoreSwarmMapIndices
ret
; 9710f
@@ -861,9 +862,8 @@ Script_trainertext: ; 9710f
ld c, a
ld b, 0
ld hl, WalkingX
-rept 2
add hl, bc
-endr
+ add hl, bc
ld a, [hli]
ld h, [hl]
ld l, a
@@ -876,7 +876,7 @@ endr
Script_scripttalkafter: ; 97125
; script command 0x65
- ld hl, wd04b
+ ld hl, wScriptAfterPointer
ld a, [hli]
ld h, [hl]
ld l, a
@@ -885,7 +885,7 @@ Script_scripttalkafter: ; 97125
jp ScriptJump
; 97132
-Script_trainerstatus: ; 97132
+Script_trainerflagaction: ; 97132
; script command 0x63
; parameters:
; action (SingleByteParam)
@@ -902,7 +902,7 @@ Script_trainerstatus: ; 97132
ld a, c
and a
ret z
- ld a, 1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 9714c
@@ -926,7 +926,7 @@ Script_winlosstext: ; 9714c
ret
; 97163
-Script_talkaftercancel: ; 97163
+Script_end_if_just_battled: ; 97163
; script command 0x66
ld a, [wRunningTrainerBattleScript]
@@ -935,10 +935,10 @@ Script_talkaftercancel: ; 97163
jp Script_end
; 9716b
-Script_talkaftercheck: ; 9716b
+Script_check_just_battled: ; 9716b
; script command 0x67
- ld a, 1
+ ld a, TRUE
ld [ScriptVar], a
ld a, [wRunningTrainerBattleScript]
and a
@@ -948,7 +948,7 @@ Script_talkaftercheck: ; 9716b
ret
; 9717a
-Script_playrammusic: ; 9717a
+Script_encountermusic: ; 9717a
; script command 0x80
ld a, [OtherTrainerClass]
@@ -1011,7 +1011,7 @@ Script_playsound: ; 971b7
ret
; 971c3
-Script_waitbutton: ; 971c3
+Script_waitsfx: ; 971c3
; script command 0x86
call WaitSFX
@@ -1126,9 +1126,8 @@ Script_faceplayer: ; 9722e
ld e, a
callba GetRelativeFacing
ld a, d
-rept 2
add a
-endr
+ add a
ld e, a
ld a, [hLastTalked]
ld d, a
@@ -1161,9 +1160,8 @@ Script_faceperson: ; 97248
pop bc
ret c
ld a, d
-rept 2
add a
-endr
+ add a
ld e, a
ld d, c
call ApplyPersonFacing
@@ -1184,9 +1182,8 @@ Script_spriteface: ; 97274
.ok
ld d, a
call GetScriptByte
-rept 2
add a
-endr
+ add a
ld e, a
call ApplyPersonFacing
ret
@@ -1481,7 +1478,7 @@ Script_loadpikachudata: ; 973f0
ret
; 973fb
-Script_battlecheck: ; 973fb
+Script_randomwildmon: ; 973fb
; script command 0x5b
xor a
@@ -1489,19 +1486,19 @@ Script_battlecheck: ; 973fb
ret
; 97400
-Script_loadtrainerdata: ; 97400
+Script_loadmemtrainer: ; 97400
; script command 0x5c
ld a, (1 << 7) | 1
ld [wBattleScriptFlags], a
- ld a, [WalkingDirection]
+ ld a, [wTempTrainerClass]
ld [OtherTrainerClass], a
- ld a, [FacingDirection]
+ ld a, [wTempTrainerID]
ld [OtherTrainerID], a
ret
; 97412
-Script_loadpokedata: ; 97412
+Script_loadwildmon: ; 97412
; script command 0x5d
; parameters:
; pokemon (PokemonParam)
@@ -1554,7 +1551,7 @@ Script_catchtutorial: ; 97447
jp Script_reloadmap
; 97459
-Script_returnafterbattle: ; 97459
+Script_reloadmapafterbattle: ; 97459
; script command 0x60
ld hl, wBattleScriptFlags
@@ -1654,7 +1651,7 @@ ScriptCall: ; 974cb
ld e, [hl]
inc [hl]
ld d, $0
- ld hl, wScriptStackBA1
+ ld hl, wScriptStack
rept 3
add hl, de
endr
@@ -1862,11 +1859,11 @@ Script_priorityjump: ; 975aa
; pointer (ScriptPointerLabelParam)
ld a, [ScriptBank]
- ld [wd44e], a
+ ld [wPriorityScriptBank], a
call GetScriptByte
- ld [wd44f], a
+ ld [wPriorityScriptAddr], a
call GetScriptByte
- ld [wd450], a
+ ld [wPriorityScriptAddr + 1], a
ld hl, ScriptFlags
set 3, [hl]
ret
@@ -2185,7 +2182,7 @@ ConvertLandmarkToText: ; 976f4
jp ConvertMemToText
; 97701
-Script_displaylocation: ; 97701
+Script_landmarktotext: ; 97701
; script command 0xa5
; parameters:
; id (SingleByteParam)
@@ -2362,7 +2359,7 @@ Script_giveitem: ; 977ca
ld hl, NumItems
call ReceiveItem
jr nc, .full
- ld a, $1
+ ld a, TRUE
ld [ScriptVar], a
ret
.full
@@ -2384,11 +2381,11 @@ Script_takeitem: ; 977f0
call GetScriptByte
ld [wItemQuantityChangeBuffer], a
ld a, -1
- ld [ItemCountBuffer], a
+ ld [CurItemQuantity], a
ld hl, NumItems
call TossItem
ret nc
- ld a, $1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 97812
@@ -2405,7 +2402,7 @@ Script_checkitem: ; 97812
ld hl, NumItems
call CheckItem
ret nc
- ld a, 1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 97829
@@ -2534,7 +2531,7 @@ Script_checktime: ; 978ae
call GetScriptByte
and c
ret z
- ld a, $1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 978c3
@@ -2551,7 +2548,7 @@ Script_checkpoke: ; 978c3
ld de, 1
call IsInArray
ret nc
- ld a, 1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 978da
@@ -2567,7 +2564,7 @@ Script_addcellnum: ; 978da
ld c, a
callba AddPhoneNumber
ret nc
- ld a, $1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 978ef
@@ -2583,7 +2580,7 @@ Script_delcellnum: ; 978ef
ld c, a
callba DelCellNum
ret nc
- ld a, $1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 97904
@@ -2600,7 +2597,7 @@ Script_checkcellnum: ; 97904
ld c, a
callba CheckCellNum
ret nc
- ld a, $1
+ ld a, TRUE
ld [ScriptVar], a
ret
; 97919
@@ -2624,7 +2621,7 @@ Script_checkphonecall: ; 97926
ld a, [wSpecialPhoneCallID]
and a
jr z, .ok
- ld a, 1
+ ld a, TRUE
.ok
ld [ScriptVar], a
ret
@@ -2728,7 +2725,7 @@ Script_checkevent: ; 979a4
ld a, c
and a
jr z, .false
- ld a, 1
+ ld a, TRUE
.false
ld [ScriptVar], a
ret
@@ -2743,7 +2740,7 @@ Script_setflag: ; 979bb
ld e, a
call GetScriptByte
ld d, a
- ld b, 1 ; set
+ ld b, SET_FLAG
call _EngineFlagAction
ret
; 979c9
@@ -2757,7 +2754,7 @@ Script_clearflag: ; 979c9
ld e, a
call GetScriptByte
ld d, a
- ld b, 0 ; clear
+ ld b, RESET_FLAG
call _EngineFlagAction
ret
; 979d7
@@ -2776,7 +2773,7 @@ Script_checkflag: ; 979d7
ld a, c
and a
jr z, .false
- ld a, 1
+ ld a, TRUE
.false
ld [ScriptVar], a
ret
@@ -2904,11 +2901,11 @@ Script_blackoutmod: ; 97a78
ret
; 97a85
-Script_reloadmapmusic: ; 97a85
+Script_dontrestartmapmusic: ; 97a85
; script command 0x83
ld a, 1
- ld [wc2c1], a
+ ld [wDontPlayMapMusicOnReload], a
ret
; 97a8b
@@ -3025,10 +3022,10 @@ Script_reloadandreturn: ; 97b16
jp Script_end
; 97b1c
-Script_loadfont: ; 97b1c
+Script_textbox: ; 97b1c
; script command 0x47
- call LoadFont
+ call OpenText
ret
; 97b20
@@ -3037,7 +3034,7 @@ Script_refreshscreen: ; 97b20
; parameters:
; dummy (SingleByteParam)
- call ResetWindow
+ call RefreshScreen
call GetScriptByte
ret
; 97b27
@@ -3053,15 +3050,15 @@ Script_loadbytec2cf: ; 97b27
; 97b2e
-LoadMoveSpritesScript: ; 97b2e
- loadmovesprites
+CloseTextScript: ; 97b2e
+ closetext
; 97b2f
-Script_loadmovesprites: ; 97b2f
+Script_closetext: ; 97b2f
; script command 0x49
call Function2e20
- call LoadMoveSprites
+ call CloseText
ret
; 97b36
@@ -3165,7 +3162,7 @@ ExitScriptSubroutine: ; 97b9a
dec [hl]
ld e, [hl]
ld d, $0
- ld hl, wScriptStackBA1
+ ld hl, wScriptStack
rept 3
add hl,de
endr
@@ -3186,7 +3183,7 @@ endr
ret
; 97bc0
-Script_resetfuncs: ; 97bc0
+Script_end_all: ; 97bc0
; script command 0x93
xor a
@@ -3210,17 +3207,15 @@ Script_halloffame: ; 97bd5
callba HallOfFame
ld hl, GameTimerPause
set 0, [hl]
- jr DisplayCredits
+ jr ReturnFromCredits
; 97bf3
Script_credits: ; 97bf3
; script command 0xa2
callba RedCredits
- ; fallthrough
-
-DisplayCredits:
- call Script_resetfuncs
+ReturnFromCredits:
+ call Script_end_all
ld a, $3
call LoadMapStatus
call StopScript