mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
103 lines
3.6 KiB
Lua
103 lines
3.6 KiB
Lua
-- engine/battle/move_effects/curse.asm:36
|
|
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.harness")
|
|
local Battle = require("src.battle.gen2.Battle")
|
|
local Mon = require("src.battle.gen2.Mon")
|
|
local Effects = require("src.battle.gen2.Effects")
|
|
|
|
local TYPES = {
|
|
NORMAL = { id = "NORMAL", index = 0, category = "physical" },
|
|
GHOST = { id = "GHOST", index = 1, category = "physical" },
|
|
}
|
|
|
|
local MOVES = {
|
|
TACKLE = { id = "TACKLE", name = "TACKLE", power = 35, type = "NORMAL",
|
|
accuracy = 100, pp = 35, effect = "EFFECT_NORMAL_HIT" },
|
|
CURSE = { id = "CURSE", name = "CURSE", power = 0, type = "GHOST",
|
|
accuracy = 100, pp = 10, effect = "EFFECT_CURSE" },
|
|
}
|
|
|
|
local POKEMON = {
|
|
growthRates = {
|
|
GROWTH_MEDIUM_FAST = { numerator = 1, denominator = 1, squared = 0,
|
|
linear = 0, constant = 0 },
|
|
},
|
|
SNORLAX = { id = "SNORLAX", index = 143, name = "SNORLAX",
|
|
baseStats = { hp = 160, attack = 110, defense = 65, speed = 30,
|
|
specialAttack = 65, specialDefense = 110 },
|
|
types = { "NORMAL", "NORMAL" }, catchRate = 25, baseExp = 154,
|
|
growthRate = "GROWTH_MEDIUM_FAST", genderRatio = 31,
|
|
levelMoves = {}, evolutions = {} },
|
|
GASTLY = { id = "GASTLY", index = 92, name = "GASTLY",
|
|
baseStats = { hp = 30, attack = 35, defense = 30, speed = 80,
|
|
specialAttack = 100, specialDefense = 35 },
|
|
types = { "GHOST", "GHOST" }, catchRate = 190, baseExp = 95,
|
|
growthRate = "GROWTH_MEDIUM_FAST", genderRatio = 127,
|
|
levelMoves = {}, evolutions = {} },
|
|
}
|
|
|
|
local DATA = { pokemon = POKEMON, moves = MOVES,
|
|
type_chart = { types = TYPES, matchups = {} }, items = {} }
|
|
|
|
local perfect = { attack = 15, defense = 15, speed = 15, special = 15 }
|
|
perfect.hp = Mon.hpDV(perfect)
|
|
|
|
local function highRoll(n) return (n or 1) - 1 end
|
|
|
|
local function newBattle(species)
|
|
local player = Mon.new(DATA, species, 50, { dvs = perfect })
|
|
player.moves = { { id = "CURSE", pp = 10, maxPp = 10 } }
|
|
local wild = Mon.new(DATA, "SNORLAX", 50, { dvs = perfect })
|
|
wild.moves = { { id = "TACKLE", pp = 35, maxPp = 35 } }
|
|
return Battle.new({ data = DATA, party = { player }, wild = wild,
|
|
random = highRoll }), player, wild
|
|
end
|
|
|
|
local function moveEvent(events)
|
|
for _, e in ipairs(events or {}) do
|
|
if e.kind == "move" then return e end
|
|
end
|
|
end
|
|
|
|
do
|
|
local battle, player, wild = newBattle("SNORLAX")
|
|
battle.events = {}
|
|
battle:useMove(player, wild, "CURSE")
|
|
local ev = moveEvent(battle.events)
|
|
T.check(ev ~= nil, "the non-ghost CURSE turn queues a move event")
|
|
T.eq(ev and ev.animParam, 1,
|
|
"non-ghost CURSE carries animParam 1, the stat-streak script arm")
|
|
local stages = battle.stages[battle:sideOf(player)]
|
|
T.eq(stages.attack, 1, "and ATTACK still rises")
|
|
T.eq(stages.defense, 1, "and DEFENSE still rises")
|
|
T.eq(stages.speed, -1, "and SPEED still drops")
|
|
end
|
|
|
|
do
|
|
local battle, player, wild = newBattle("SNORLAX")
|
|
local stages = battle.stages[battle:sideOf(player)]
|
|
stages.attack = Effects.MAX_STAGE
|
|
stages.defense = Effects.MAX_STAGE
|
|
battle.events = {}
|
|
battle:useMove(player, wild, "CURSE")
|
|
local ev = moveEvent(battle.events)
|
|
T.check(ev ~= nil, "the capped turn still queues a move event")
|
|
T.eq(ev and ev.animParam, nil,
|
|
"the cantraise arm leaves animParam nil")
|
|
end
|
|
|
|
do
|
|
local battle, player, wild = newBattle("GASTLY")
|
|
battle.events = {}
|
|
battle:useMove(player, wild, "CURSE")
|
|
local ev = moveEvent(battle.events)
|
|
T.check(ev ~= nil, "the ghost CURSE turn queues a move event")
|
|
T.eq(ev and ev.animParam, nil,
|
|
"ghost CURSE leaves animParam nil, the nail-and-doll script arm")
|
|
T.check(battle:volatile(wild).cursed == true, "and the target is cursed")
|
|
end
|
|
|
|
T.finish("gen2 curse anim param bug 2099")
|