mirror of
https://github.com/Ninjdai1/pokeemerald.git
synced 2024-09-28 16:54:29 +02:00
261 lines
8.2 KiB
ArmAsm
261 lines
8.2 KiB
ArmAsm
#include "config/battle.h"
|
|
#include "constants/battle.h"
|
|
#include "constants/battle_script_commands.h"
|
|
#include "constants/battle_anim.h"
|
|
#include "constants/battle_string_ids.h"
|
|
#include "constants/moves.h"
|
|
#include "constants/songs.h"
|
|
#include "constants/game_stat.h"
|
|
.include "asm/macros.inc"
|
|
.include "asm/macros/battle_script.inc"
|
|
.include "constants/constants.inc"
|
|
|
|
.section script_data, "aw", %progbits
|
|
|
|
.align 2
|
|
gBattlescriptsForUsingItem::
|
|
.4byte BattleScript_ItemRestoreHP @ EFFECT_ITEM_RESTORE_HP
|
|
.4byte BattleScript_ItemCureStatus @ EFFECT_ITEM_CURE_STATUS
|
|
.4byte BattleScript_ItemHealAndCureStatus @ EFFECT_ITEM_HEAL_AND_CURE_STATUS
|
|
.4byte BattleScript_ItemIncreaseStat @ EFFECT_ITEM_INCREASE_STAT
|
|
.4byte BattleScript_ItemSetMist @ EFFECT_ITEM_SET_MIST
|
|
.4byte BattleScript_ItemSetFocusEnergy @ EFFECT_ITEM_SET_FOCUS_ENERGY
|
|
.4byte BattleScript_RunByUsingItem @ EFFECT_ITEM_ESCAPE
|
|
.4byte BattleScript_BallThrow @ EFFECT_ITEM_THROW_BALL
|
|
.4byte BattleScript_ItemRestoreHP @ EFFECT_ITEM_REVIVE
|
|
.4byte BattleScript_ItemRestorePP @ EFFECT_ITEM_RESTORE_PP
|
|
.4byte BattleScript_ItemIncreaseAllStats @ EFFECT_ITEM_INCREASE_ALL_STATS
|
|
|
|
.align 2
|
|
gBattlescriptsForSafariActions::
|
|
.4byte BattleScript_ActionWatchesCarefully
|
|
.4byte BattleScript_ActionGetNear
|
|
.4byte BattleScript_ActionThrowPokeblock
|
|
.4byte BattleScript_ActionWallyThrow
|
|
|
|
BattleScript_ItemEnd:
|
|
end
|
|
|
|
BattleScript_UseItemMessage:
|
|
printstring STRINGID_EMPTYSTRING3
|
|
pause B_WAIT_TIME_MED
|
|
playse SE_USE_ITEM
|
|
getbattlerside BS_ATTACKER
|
|
copybyte cMULTISTRING_CHOOSER, gBattleCommunication
|
|
printfromtable gTrainerUsedItemStringIds
|
|
waitmessage B_WAIT_TIME_LONG
|
|
return
|
|
|
|
BattleScript_ItemRestoreHP::
|
|
call BattleScript_UseItemMessage
|
|
itemrestorehp
|
|
jumpifbyte CMP_EQUAL, gBattleCommunication, TRUE, BattleScript_ItemRestoreHP_SendOutRevivedBattler
|
|
bichalfword gMoveResultFlags, MOVE_RESULT_NO_EFFECT
|
|
orword gHitMarker, HITMARKER_IGNORE_SUBSTITUTE
|
|
healthbarupdate BS_ATTACKER
|
|
datahpupdate BS_ATTACKER
|
|
printstring STRINGID_ITEMRESTOREDSPECIESHEALTH
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end
|
|
|
|
BattleScript_ItemRestoreHP_SendOutRevivedBattler:
|
|
switchinanim BS_SCRIPTING, FALSE
|
|
waitstate
|
|
switchineffects BS_SCRIPTING
|
|
end
|
|
|
|
BattleScript_ItemCureStatus::
|
|
call BattleScript_UseItemMessage
|
|
itemcurestatus
|
|
updatestatusicon BS_ATTACKER
|
|
printstring STRINGID_ITEMCUREDSPECIESSTATUS
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end
|
|
|
|
BattleScript_ItemHealAndCureStatus::
|
|
call BattleScript_UseItemMessage
|
|
itemrestorehp
|
|
itemcurestatus
|
|
printstring STRINGID_ITEMRESTOREDSPECIESHEALTH
|
|
waitmessage B_WAIT_TIME_LONG
|
|
bichalfword gMoveResultFlags, MOVE_RESULT_NO_EFFECT
|
|
orword gHitMarker, HITMARKER_IGNORE_SUBSTITUTE
|
|
healthbarupdate BS_ATTACKER
|
|
datahpupdate BS_ATTACKER
|
|
updatestatusicon BS_ATTACKER
|
|
printstring STRINGID_ITEMRESTOREDSPECIESHEALTH
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end
|
|
|
|
BattleScript_ItemIncreaseStat::
|
|
call BattleScript_UseItemMessage
|
|
itemincreasestat
|
|
statbuffchange MOVE_EFFECT_AFFECTS_USER | STAT_CHANGE_NOT_PROTECT_AFFECTED | STAT_CHANGE_ALLOW_PTR, BattleScript_ItemEnd
|
|
setgraphicalstatchangevalues
|
|
playanimation BS_ATTACKER, B_ANIM_STATS_CHANGE, sB_ANIM_ARG1
|
|
printfromtable gStatUpStringIds
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end
|
|
|
|
BattleScript_ItemSetMist::
|
|
call BattleScript_UseItemMessage
|
|
setmist
|
|
playmoveanimation BS_ATTACKER, MOVE_MIST
|
|
waitanimation
|
|
printfromtable gMistUsedStringIds
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end
|
|
|
|
BattleScript_ItemSetFocusEnergy::
|
|
call BattleScript_UseItemMessage
|
|
jumpifstatus2 BS_ATTACKER, STATUS2_FOCUS_ENERGY, BattleScript_ButItFailed
|
|
setfocusenergy
|
|
playmoveanimation BS_ATTACKER, MOVE_FOCUS_ENERGY
|
|
waitanimation
|
|
copybyte sBATTLER, gBattlerAttacker
|
|
printstring STRINGID_PKMNUSEDXTOGETPUMPED
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end
|
|
|
|
BattleScript_ItemRestorePP::
|
|
call BattleScript_UseItemMessage
|
|
itemrestorepp
|
|
printstring STRINGID_ITEMRESTOREDSPECIESPP
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end
|
|
|
|
BattleScript_ItemIncreaseAllStats::
|
|
call BattleScript_UseItemMessage
|
|
call BattleScript_AllStatsUp
|
|
end
|
|
|
|
BattleScript_BallThrow::
|
|
jumpifword CMP_COMMON_BITS, gBattleTypeFlags, BATTLE_TYPE_WALLY_TUTORIAL, BattleScript_BallThrowByWally
|
|
printstring STRINGID_PLAYERUSEDITEM
|
|
handleballthrow
|
|
|
|
BattleScript_BallThrowByWally::
|
|
printstring STRINGID_WALLYUSEDITEM
|
|
handleballthrow
|
|
|
|
BattleScript_SafariBallThrow::
|
|
printstring STRINGID_PLAYERUSEDITEM
|
|
updatestatusicon BS_ATTACKER
|
|
handleballthrow
|
|
|
|
BattleScript_SuccessBallThrow::
|
|
setbyte sMON_CAUGHT, TRUE
|
|
incrementgamestat GAME_STAT_POKEMON_CAPTURES
|
|
BattleScript_PrintCaughtMonInfo::
|
|
printstring STRINGID_GOTCHAPKMNCAUGHTPLAYER
|
|
jumpifbyte CMP_NOT_EQUAL, sEXP_CATCH, TRUE, BattleScript_TryPrintCaughtMonInfo
|
|
setbyte sGIVEEXP_STATE, 0
|
|
getexp BS_TARGET
|
|
sethword gBattle_BG2_X, 0
|
|
BattleScript_TryPrintCaughtMonInfo:
|
|
trysetcaughtmondexflags BattleScript_TryNicknameCaughtMon
|
|
printstring STRINGID_PKMNDATAADDEDTODEX
|
|
waitstate
|
|
setbyte gBattleCommunication, 0
|
|
displaydexinfo
|
|
BattleScript_TryNicknameCaughtMon::
|
|
printstring STRINGID_GIVENICKNAMECAPTURED
|
|
waitstate
|
|
setbyte gBattleCommunication, 0
|
|
trygivecaughtmonnick BattleScript_GiveCaughtMonEnd
|
|
givecaughtmon
|
|
printfromtable gCaughtMonStringIds
|
|
waitmessage B_WAIT_TIME_LONG
|
|
goto BattleScript_SuccessBallThrowEnd
|
|
BattleScript_GiveCaughtMonEnd::
|
|
givecaughtmon
|
|
BattleScript_SuccessBallThrowEnd::
|
|
setbyte gBattleOutcome, B_OUTCOME_CAUGHT
|
|
finishturn
|
|
|
|
BattleScript_WallyBallThrow::
|
|
printstring STRINGID_GOTCHAPKMNCAUGHTWALLY
|
|
setbyte gBattleOutcome, B_OUTCOME_CAUGHT
|
|
finishturn
|
|
|
|
BattleScript_ShakeBallThrow::
|
|
printfromtable gBallEscapeStringIds
|
|
waitmessage B_WAIT_TIME_LONG
|
|
jumpifword CMP_NO_COMMON_BITS, gBattleTypeFlags, BATTLE_TYPE_SAFARI, BattleScript_ShakeBallThrowEnd
|
|
jumpifbyte CMP_NOT_EQUAL, gNumSafariBalls, 0, BattleScript_ShakeBallThrowEnd
|
|
printstring STRINGID_OUTOFSAFARIBALLS
|
|
waitmessage B_WAIT_TIME_LONG
|
|
setbyte gBattleOutcome, B_OUTCOME_NO_SAFARI_BALLS
|
|
BattleScript_ShakeBallThrowEnd::
|
|
finishaction
|
|
|
|
BattleScript_TrainerBallBlock::
|
|
waitmessage B_WAIT_TIME_LONG
|
|
printstring STRINGID_TRAINERBLOCKEDBALL
|
|
waitmessage B_WAIT_TIME_LONG
|
|
printstring STRINGID_DONTBEATHIEF
|
|
waitmessage B_WAIT_TIME_LONG
|
|
finishaction
|
|
|
|
BattleScript_RunByUsingItem::
|
|
playse SE_FLEE
|
|
setbyte gBattleOutcome, B_OUTCOME_RAN
|
|
finishturn
|
|
|
|
BattleScript_ActionWatchesCarefully:
|
|
printstring STRINGID_PKMNWATCHINGCAREFULLY
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end2
|
|
|
|
BattleScript_ActionGetNear:
|
|
printfromtable gSafariGetNearStringIds
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end2
|
|
|
|
BattleScript_ActionThrowPokeblock:
|
|
printstring STRINGID_THREWPOKEBLOCKATPKMN
|
|
waitmessage B_WAIT_TIME_LONG
|
|
playanimation BS_ATTACKER, B_ANIM_POKEBLOCK_THROW, NULL
|
|
printfromtable gSafariPokeblockResultStringIds
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end2
|
|
|
|
BattleScript_ActionWallyThrow:
|
|
printstring STRINGID_RETURNMON
|
|
waitmessage B_WAIT_TIME_LONG
|
|
returnatktoball
|
|
waitstate
|
|
trainerslidein BS_TARGET
|
|
waitstate
|
|
printstring STRINGID_YOUTHROWABALLNOWRIGHT
|
|
waitmessage B_WAIT_TIME_LONG
|
|
end2
|
|
|
|
BattleScript_TrainerASlideMsgRet::
|
|
handletrainerslidemsg BS_SCRIPTING, 0
|
|
trainerslidein B_POSITION_OPPONENT_LEFT
|
|
handletrainerslidemsg BS_SCRIPTING, 1
|
|
waitstate
|
|
trainerslideout B_POSITION_OPPONENT_LEFT
|
|
waitstate
|
|
handletrainerslidemsg BS_SCRIPTING, 2
|
|
return
|
|
|
|
BattleScript_TrainerASlideMsgEnd2::
|
|
call BattleScript_TrainerASlideMsgRet
|
|
end2
|
|
|
|
BattleScript_TrainerBSlideMsgRet::
|
|
handletrainerslidemsg BS_SCRIPTING, 0
|
|
trainerslidein B_POSITION_OPPONENT_RIGHT
|
|
handletrainerslidemsg BS_SCRIPTING, 1
|
|
waitstate
|
|
trainerslideout B_POSITION_OPPONENT_RIGHT
|
|
waitstate
|
|
handletrainerslidemsg BS_SCRIPTING, 2
|
|
return
|
|
|
|
BattleScript_TrainerBSlideMsgEnd2::
|
|
call BattleScript_TrainerBSlideMsgRet
|
|
end2
|