pokeheartgold/files/battledata/script/subscript/subscript_0099_HazardsCheck.s
Adrienn Tindall 2083be2810 Rename scripts 1
I stopped at yawn bc I'm sleepy
2024-03-07 04:57:08 -05:00

53 lines
2.1 KiB
ArmAsm
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

.include "macros/btlcmd.inc"
.data
_000:
CheckAbility CHECK_OPCODE_HAVE, BATTLER_CATEGORY_SWITCHED_MON, ABILITY_MAGIC_GUARD, _105
CompareVarToValue OPCODE_FLAG_SET, BSCRIPT_VAR_FIELD_CONDITION, FIELD_CONDITION_GRAVITY, _037
CheckItemHoldEffect CHECK_OPCODE_HAVE, BATTLER_CATEGORY_SWITCHED_MON, HOLD_EFFECT_SPEED_DOWN_GROUNDED, _037
CheckAbility CHECK_OPCODE_HAVE, BATTLER_CATEGORY_SWITCHED_MON, ABILITY_LEVITATE, _085
CompareMonDataToValue OPCODE_EQU, BATTLER_CATEGORY_SWITCHED_MON, BMON_DATA_TYPE_1, TYPE_FLYING, _085
CompareMonDataToValue OPCODE_EQU, BATTLER_CATEGORY_SWITCHED_MON, BMON_DATA_TYPE_2, TYPE_FLYING, _085
CompareMonDataToValue OPCODE_FLAG_SET, BATTLER_CATEGORY_SWITCHED_MON, BMON_DATA_MOVE_EFFECT, MOVE_EFFECT_FLAG_MAGNET_RISE, _085
_037:
CheckToxicSpikes BATTLER_CATEGORY_SWITCHED_MON, _065
CompareVarToValue OPCODE_EQU, BSCRIPT_VAR_CALC_TEMP, 0x00000002, _063
CompareVarToValue OPCODE_EQU, BSCRIPT_VAR_CALC_TEMP, 0x00000001, _059
// The poison spikes disappeared from around your teams feet!
PrintMessage msg_0197_01065, TAG_NONE_SIDE, BATTLER_CATEGORY_SWITCHED_MON
Wait
WaitButtonABTime 30
GoTo _065
_059:
Call BATTLE_SUBSCRIPT_POISON
GoTo _065
_063:
Call BATTLE_SUBSCRIPT_BADLY_POISON
_065:
CheckSpikes BATTLER_CATEGORY_SWITCHED_MON, _085
UpdateVarFromVar OPCODE_SET, BSCRIPT_VAR_MSG_BATTLER_TEMP, BSCRIPT_VAR_BATTLER_SWITCH
UpdateVar OPCODE_FLAG_ON, BSCRIPT_VAR_BATTLE_STATUS, BATTLE_STATUS_NO_BLINK
Call BATTLE_SUBSCRIPT_UPDATE_HP
// {0} is hurt by the spikes!
PrintMessage msg_0197_00429, TAG_NICKNAME, BATTLER_CATEGORY_SWITCHED_MON
Wait
WaitButtonABTime 30
_085:
CheckStealthRock BATTLER_CATEGORY_SWITCHED_MON, _105
UpdateVarFromVar OPCODE_SET, BSCRIPT_VAR_MSG_BATTLER_TEMP, BSCRIPT_VAR_BATTLER_SWITCH
UpdateVar OPCODE_FLAG_ON, BSCRIPT_VAR_BATTLE_STATUS, BATTLE_STATUS_NO_BLINK
Call BATTLE_SUBSCRIPT_UPDATE_HP
// Pointed stones dug into {0}!
PrintMessage msg_0197_01079, TAG_NICKNAME, BATTLER_CATEGORY_SWITCHED_MON
Wait
WaitButtonABTime 30
_105:
End