mirror of
https://github.com/infinitefusion/infinitefusion-e18.git
synced 2025-12-07 13:15:01 +00:00
868 lines
32 KiB
Ruby
868 lines
32 KiB
Ruby
module PokemonDebugMixin
|
|
def pbPokemonDebugCommands(settingUpBattle=false)
|
|
commands = CommandMenuList.new
|
|
commands.add("main","hpstatusmenu",_INTL("HP/Status..."))
|
|
commands.add("hpstatusmenu","sethp",_INTL("Set HP"))
|
|
commands.add("hpstatusmenu","setstatus",_INTL("Set status"))
|
|
commands.add("hpstatusmenu","fullheal",_INTL("Fully heal"))
|
|
commands.add("hpstatusmenu","makefainted",_INTL("Make fainted"))
|
|
commands.add("hpstatusmenu","setpokerus",_INTL("Set Pokérus"))
|
|
|
|
commands.add("main","levelstats",_INTL("Level/stats..."))
|
|
commands.add("levelstats","setlevel",_INTL("Set level"))
|
|
commands.add("levelstats","setexp",_INTL("Set Exp"))
|
|
commands.add("levelstats","hiddenvalues",_INTL("EV/IV/pID..."))
|
|
commands.add("levelstats","sethappiness",_INTL("Set happiness"))
|
|
commands.add("levelstats","conteststats",_INTL("Contest stats..."))
|
|
commands.add("conteststats","setbeauty",_INTL("Set Beauty"))
|
|
commands.add("conteststats","setcool",_INTL("Set Cool"))
|
|
commands.add("conteststats","setcute",_INTL("Set Cute"))
|
|
commands.add("conteststats","setsmart",_INTL("Set Smart"))
|
|
commands.add("conteststats","settough",_INTL("Set Tough"))
|
|
commands.add("conteststats","setsheen",_INTL("Set Sheen"))
|
|
|
|
commands.add("main","moves",_INTL("Moves..."))
|
|
commands.add("moves","teachmove",_INTL("Teach move"))
|
|
commands.add("moves","forgetmove",_INTL("Forget move"))
|
|
commands.add("moves","resetmoves",_INTL("Reset moves"))
|
|
commands.add("moves","setmovepp",_INTL("Set move PP"))
|
|
commands.add("moves","setinitialmoves",_INTL("Reset initial moves"))
|
|
|
|
commands.add("main","setability",_INTL("Set ability"))
|
|
commands.add("main","setnature",_INTL("Set nature"))
|
|
commands.add("main","setgender",_INTL("Set gender"))
|
|
commands.add("main","speciesform",_INTL("Species/form..."))
|
|
|
|
commands.add("main","cosmetic",_INTL("Cosmetic info..."))
|
|
commands.add("cosmetic","setshininess",_INTL("Set shininess"))
|
|
commands.add("cosmetic","setpokeball",_INTL("Set Poké Ball"))
|
|
commands.add("cosmetic","setribbons",_INTL("Set ribbons"))
|
|
commands.add("cosmetic","setnickname",_INTL("Set nickname"))
|
|
commands.add("cosmetic","ownership",_INTL("Ownership..."))
|
|
|
|
commands.add("main","setegg",_INTL("Set egg"))
|
|
commands.add("main","shadowpkmn",_INTL("Shadow Pkmn..."))
|
|
if !settingUpBattle
|
|
commands.add("main","mysterygift",_INTL("Mystery Gift"))
|
|
commands.add("main","duplicate",_INTL("Duplicate"))
|
|
commands.add("main","delete",_INTL("Delete"))
|
|
end
|
|
return commands
|
|
end
|
|
|
|
def pbPokemonDebugActions(command,pkmn,pkmnid,heldpoke=nil,settingUpBattle=false)
|
|
case command
|
|
#===========================================================================
|
|
when "sethp"
|
|
if pkmn.egg?
|
|
pbDisplay(_INTL("{1} is an egg.",pkmn.name))
|
|
else
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,pkmn.totalhp)
|
|
params.setDefaultValue(pkmn.hp)
|
|
newhp = pbMessageChooseNumber(
|
|
_INTL("Set {1}'s HP (max. {2}).",pkmn.name,pkmn.totalhp),params) { pbUpdate }
|
|
if newhp!=pkmn.hp
|
|
pkmn.hp = newhp
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "setstatus"
|
|
if pkmn.egg?
|
|
pbDisplay(_INTL("{1} is an egg.",pkmn.name))
|
|
elsif pkmn.hp<=0
|
|
pbDisplay(_INTL("{1} is fainted, can't change status.",pkmn.name))
|
|
else
|
|
cmd = 0
|
|
loop do
|
|
cmd = pbShowCommands(_INTL("Set {1}'s status.",pkmn.name),[
|
|
_INTL("[Cure]"),
|
|
_INTL("Sleep"),
|
|
_INTL("Poison"),
|
|
_INTL("Burn"),
|
|
_INTL("Paralysis"),
|
|
_INTL("Frozen")
|
|
],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Cure
|
|
pkmn.healStatus
|
|
pbDisplay(_INTL("{1}'s status was cured.",pkmn.name))
|
|
pbRefreshSingle(pkmnid)
|
|
else # Give status problem
|
|
count = 0
|
|
cancel = false
|
|
if cmd==PBStatuses::SLEEP
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,9)
|
|
params.setDefaultValue(3)
|
|
count = pbMessageChooseNumber(
|
|
_INTL("Set the Pokémon's sleep count."),params) { pbUpdate }
|
|
cancel = true if count<=0
|
|
end
|
|
if !cancel
|
|
pkmn.status = cmd
|
|
pkmn.statusCount = count
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "fullheal"
|
|
if pkmn.egg?
|
|
pbDisplay(_INTL("{1} is an egg.",pkmn.name))
|
|
else
|
|
pkmn.heal
|
|
pbDisplay(_INTL("{1} was fully healed.",pkmn.name))
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "makefainted"
|
|
if pkmn.egg?
|
|
pbDisplay(_INTL("{1} is an egg.",pkmn.name))
|
|
else
|
|
pkmn.hp = 0
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "setpokerus"
|
|
cmd = 0
|
|
loop do
|
|
pokerus = (pkmn.pokerus) ? pkmn.pokerus : 0
|
|
msg = [_INTL("{1} doesn't have Pokérus.",pkmn.name),
|
|
_INTL("Has strain {1}, infectious for {2} more days.",pokerus/16,pokerus%16),
|
|
_INTL("Has strain {1}, not infectious.",pokerus/16)][pkmn.pokerusStage]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Give random strain"),
|
|
_INTL("Make not infectious"),
|
|
_INTL("Clear Pokérus")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Give random strain
|
|
pkmn.givePokerus
|
|
pbRefreshSingle(pkmnid)
|
|
when 1 # Make not infectious
|
|
if pokerus>0
|
|
strain = pokerus/16
|
|
p = strain << 4
|
|
pkmn.pokerus = p
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
when 2 # Clear Pokérus
|
|
pkmn.pokerus = 0
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "setlevel"
|
|
if pkmn.egg?
|
|
pbDisplay(_INTL("{1} is an egg.",pkmn.name))
|
|
else
|
|
mLevel = PBExperience.maxLevel
|
|
params = ChooseNumberParams.new
|
|
params.setRange(1,mLevel)
|
|
params.setDefaultValue(pkmn.level)
|
|
level = pbMessageChooseNumber(
|
|
_INTL("Set the Pokémon's level (max. {1}).",mLevel),params) { pbUpdate }
|
|
if level!=pkmn.level
|
|
pkmn.level = level
|
|
pkmn.calcStats
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "setexp"
|
|
if pkmn.egg?
|
|
pbDisplay(_INTL("{1} is an egg.",pkmn.name))
|
|
else
|
|
minxp = PBExperience.pbGetStartExperience(pkmn.level,pkmn.growthrate)
|
|
maxxp = PBExperience.pbGetStartExperience(pkmn.level+1,pkmn.growthrate)
|
|
if minxp==maxxp
|
|
pbDisplay(_INTL("{1} is at the maximum level.",pkmn.name))
|
|
else
|
|
params = ChooseNumberParams.new
|
|
params.setRange(minxp,maxxp-1)
|
|
params.setDefaultValue(pkmn.exp)
|
|
newexp = pbMessageChooseNumber(
|
|
_INTL("Set the Pokémon's Exp (range {1}-{2}).",minxp,maxxp-1),params) { pbUpdate }
|
|
if newexp!=pkmn.exp
|
|
pkmn.exp = newexp
|
|
pkmn.calcStats
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "hiddenvalues"
|
|
numstats = 6
|
|
cmd = 0
|
|
loop do
|
|
persid = sprintf("0x%08X",pkmn.personalID)
|
|
cmd = pbShowCommands(_INTL("Personal ID is {1}.",persid),[
|
|
_INTL("Set EVs"),
|
|
_INTL("Set IVs"),
|
|
_INTL("Randomise pID")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Set EVs
|
|
cmd2 = 0
|
|
loop do
|
|
totalev = 0
|
|
evcommands = []
|
|
for i in 0...numstats
|
|
evcommands.push(PBStats.getName(i)+" (#{pkmn.ev[i]})")
|
|
totalev += pkmn.ev[i]
|
|
end
|
|
evcommands.push(_INTL("Randomise all"))
|
|
evcommands.push(_INTL("Max randomise all"))
|
|
cmd2 = pbShowCommands(_INTL("Change which EV?\nTotal: {1}/{2} ({3}%)",
|
|
totalev,PokeBattle_Pokemon::EV_LIMIT,
|
|
100*totalev/PokeBattle_Pokemon::EV_LIMIT),evcommands,cmd2)
|
|
break if cmd2<0
|
|
if cmd2<numstats
|
|
params = ChooseNumberParams.new
|
|
upperLimit = 0
|
|
for i in 0...numstats
|
|
upperLimit += pkmn.ev[i] if i!=cmd2
|
|
end
|
|
upperLimit = PokeBattle_Pokemon::EV_LIMIT-upperLimit
|
|
upperLimit = [upperLimit,PokeBattle_Pokemon::EV_STAT_LIMIT].min
|
|
thisValue = [pkmn.ev[cmd2],upperLimit].min
|
|
params.setRange(0,upperLimit)
|
|
params.setDefaultValue(thisValue)
|
|
params.setCancelValue(thisValue)
|
|
f = pbMessageChooseNumber(_INTL("Set the EV for {1} (max. {2}).",
|
|
PBStats.getName(cmd2),upperLimit),params) { pbUpdate }
|
|
if f!=pkmn.ev[cmd2]
|
|
pkmn.ev[cmd2] = f
|
|
pkmn.calcStats
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
elsif cmd2<evcommands.length # Randomise
|
|
evTotalTarget = PokeBattle_Pokemon::EV_LIMIT
|
|
if cmd2==evcommands.length-2
|
|
evTotalTarget = rand(PokeBattle_Pokemon::EV_LIMIT)
|
|
end
|
|
for i in 0...numstats
|
|
pkmn.ev[i] = 0
|
|
end
|
|
while evTotalTarget>0
|
|
r = rand(numstats)
|
|
next if pkmn.ev[r]>=PokeBattle_Pokemon::EV_STAT_LIMIT
|
|
addVal = 1+rand(PokeBattle_Pokemon::EV_STAT_LIMIT/4)
|
|
addVal = evTotalTarget if addVal>evTotalTarget
|
|
addVal = [addVal,PokeBattle_Pokemon::EV_STAT_LIMIT-pkmn.ev[r]].min
|
|
next if addVal==0
|
|
pkmn.ev[r] += addVal
|
|
evTotalTarget -= addVal
|
|
end
|
|
pkmn.calcStats
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
when 1 # Set IVs
|
|
cmd2 = 0
|
|
loop do
|
|
hiddenpower = pbHiddenPower(pkmn)
|
|
totaliv = 0
|
|
ivcommands = []
|
|
for i in 0...numstats
|
|
ivcommands.push(PBStats.getName(i)+" (#{pkmn.iv[i]})")
|
|
totaliv += pkmn.iv[i]
|
|
end
|
|
msg = _INTL("Change which IV?\nHidden Power:\n{1}, power {2}\nTotal: {3}/{4} ({5}%)",
|
|
PBTypes.getName(hiddenpower[0]),hiddenpower[1],totaliv,numstats*31,
|
|
100*totaliv/(numstats*31))
|
|
ivcommands.push(_INTL("Randomise all"))
|
|
cmd2 = pbShowCommands(msg,ivcommands,cmd2)
|
|
break if cmd2<0
|
|
if cmd2<numstats
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,31)
|
|
params.setDefaultValue(pkmn.iv[cmd2])
|
|
params.setCancelValue(pkmn.iv[cmd2])
|
|
f = pbMessageChooseNumber(_INTL("Set the IV for {1} (max. 31).",
|
|
PBStats.getName(cmd2)),params) { pbUpdate }
|
|
if f!=pkmn.iv[cmd2]
|
|
pkmn.iv[cmd2] = f
|
|
pkmn.calcStats
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
elsif cmd2==ivcommands.length-1 # Randomise
|
|
for i in 0...numstats
|
|
pkmn.iv[i] = rand(PokeBattle_Pokemon::IV_STAT_LIMIT+1)
|
|
end
|
|
pkmn.calcStats
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
when 2 # Randomise pID
|
|
pkmn.personalID = rand(256)
|
|
pkmn.personalID |= rand(256)<<8
|
|
pkmn.personalID |= rand(256)<<16
|
|
pkmn.personalID |= rand(256)<<24
|
|
pkmn.calcStats
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "sethappiness"
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,255)
|
|
params.setDefaultValue(pkmn.happiness)
|
|
h = pbMessageChooseNumber(
|
|
_INTL("Set the Pokémon's happiness (max. 255)."),params) { pbUpdate }
|
|
if h!=pkmn.happiness
|
|
pkmn.happiness = h
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "setbeauty", "setcool", "setcute", "setsmart", "settough", "setsheen"
|
|
case command
|
|
when "setbeauty"; statname = _INTL("Beauty"); defval = pkmn.beauty
|
|
when "setcool"; statname = _INTL("Cool"); defval = pkmn.cool
|
|
when "setcute"; statname = _INTL("Cute"); defval = pkmn.cute
|
|
when "setsmart"; statname = _INTL("Smart"); defval = pkmn.smart
|
|
when "settough"; statname = _INTL("Tough"); defval = pkmn.tough
|
|
when "setsheen"; statname = _INTL("Sheen"); defval = pkmn.sheen
|
|
end
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,255)
|
|
params.setDefaultValue(defval)
|
|
newval = pbMessageChooseNumber(
|
|
_INTL("Set the Pokémon's {1} (max. 255).",statname),params) { pbUpdate }
|
|
if newval!=defval
|
|
case command
|
|
when "setbeauty"; pkmn.beauty = newval
|
|
when "setcool"; pkmn.cool = newval
|
|
when "setcute"; pkmn.cute = newval
|
|
when "setsmart"; pkmn.smart = newval
|
|
when "settough"; pkmn.tough = newval
|
|
when "setsheen"; pkmn.sheen = newval
|
|
end
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "teachmove"
|
|
move = pbChooseMoveList
|
|
if move!=0
|
|
pbLearnMove(pkmn,move)
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "forgetmove"
|
|
moveindex = pbChooseMove(pkmn,_INTL("Choose move to forget."))
|
|
if moveindex>=0
|
|
movename = PBMoves.getName(pkmn.moves[moveindex].id)
|
|
pkmn.pbDeleteMoveAtIndex(moveindex)
|
|
pbDisplay(_INTL("{1} forgot {2}.",pkmn.name,movename))
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "resetmoves"
|
|
pkmn.resetMoves
|
|
pbDisplay(_INTL("{1}'s moves were reset.",pkmn.name))
|
|
pbRefreshSingle(pkmnid)
|
|
#===========================================================================
|
|
when "setmovepp"
|
|
cmd = 0
|
|
loop do
|
|
commands = []
|
|
for i in pkmn.moves
|
|
break if i.id==0
|
|
if i.totalpp<=0
|
|
commands.push(_INTL("{1} (PP: ---)",PBMoves.getName(i.id)))
|
|
else
|
|
commands.push(_INTL("{1} (PP: {2}/{3})",PBMoves.getName(i.id),i.pp,i.totalpp))
|
|
end
|
|
end
|
|
commands.push(_INTL("Restore all PP"))
|
|
cmd = pbShowCommands(_INTL("Alter PP of which move?"),commands,cmd)
|
|
break if cmd<0
|
|
if cmd>=0 && cmd<commands.length-1 # Move
|
|
move = pkmn.moves[cmd]
|
|
movename = PBMoves.getName(move.id)
|
|
if move.totalpp<=0
|
|
pbDisplay(_INTL("{1} has infinite PP.",movename))
|
|
else
|
|
cmd2 = 0
|
|
loop do
|
|
msg = _INTL("{1}: PP {2}/{3} (PP Up {4}/3)",movename,move.pp,move.totalpp,move.ppup)
|
|
cmd2 = pbShowCommands(msg,[
|
|
_INTL("Set PP"),
|
|
_INTL("Full PP"),
|
|
_INTL("Set PP Up")],cmd2)
|
|
break if cmd2<0
|
|
case cmd2
|
|
when 0 # Change PP
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,move.totalpp)
|
|
params.setDefaultValue(move.pp)
|
|
h = pbMessageChooseNumber(
|
|
_INTL("Set PP of {1} (max. {2}).",movename,move.totalpp),params) { pbUpdate }
|
|
move.pp = h
|
|
when 1 # Full PP
|
|
move.pp = move.totalpp
|
|
when 2 # Change PP Up
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,3)
|
|
params.setDefaultValue(move.ppup)
|
|
h = pbMessageChooseNumber(
|
|
_INTL("Set PP Up of {1} (max. 3).",movename),params) { pbUpdate }
|
|
move.ppup = h
|
|
move.pp = move.totalpp if move.pp>move.totalpp
|
|
end
|
|
end
|
|
end
|
|
elsif cmd==commands.length-1 # Restore all PP
|
|
pkmn.healPP
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "setinitialmoves"
|
|
pkmn.pbRecordFirstMoves
|
|
pbDisplay(_INTL("{1}'s moves were set as its first-known moves.",pkmn.name))
|
|
pbRefreshSingle(pkmnid)
|
|
#===========================================================================
|
|
when "setability"
|
|
cmd = 0
|
|
loop do
|
|
abils = pkmn.getAbilityList
|
|
oldabil = PBAbilities.getName(pkmn.ability)
|
|
commands = []
|
|
for i in abils
|
|
commands.push(((i[1]<2) ? "" : "(H) ")+PBAbilities.getName(i[0]))
|
|
end
|
|
commands.push(_INTL("Remove override"))
|
|
msg = [_INTL("Ability {1} is natural.",oldabil),
|
|
_INTL("Ability {1} is being forced.",oldabil)][pkmn.abilityflag!=nil ? 1 : 0]
|
|
cmd = pbShowCommands(msg,commands,cmd)
|
|
break if cmd<0
|
|
if cmd>=0 && cmd<abils.length # Set ability override
|
|
pkmn.setAbility(abils[cmd][1])
|
|
elsif cmd==abils.length # Remove override
|
|
pkmn.abilityflag = nil
|
|
end
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "setnature"
|
|
commands = []
|
|
(PBNatures.getCount).times do |i|
|
|
statUp = PBNatures.getStatRaised(i)
|
|
statDown = PBNatures.getStatLowered(i)
|
|
if statUp!=statDown
|
|
text = _INTL("{1} (+{2}, -{3})",PBNatures.getName(i),
|
|
PBStats.getNameBrief(statUp),PBStats.getNameBrief(statDown))
|
|
else
|
|
text = _INTL("{1} (---)",PBNatures.getName(i))
|
|
end
|
|
commands.push(text)
|
|
end
|
|
commands.push(_INTL("[Remove override]"))
|
|
cmd = pkmn.nature
|
|
loop do
|
|
oldnature = PBNatures.getName(pkmn.nature)
|
|
msg = [_INTL("Nature {1} is natural.",oldnature),
|
|
_INTL("Nature {1} is being forced.",oldnature)][pkmn.natureflag ? 1 : 0]
|
|
cmd = pbShowCommands(msg,commands,cmd)
|
|
break if cmd<0
|
|
if cmd>=0 && cmd<PBNatures.getCount # Set nature override
|
|
pkmn.setNature(cmd)
|
|
pkmn.calcStats
|
|
elsif cmd==PBNatures.getCount # Remove override
|
|
pkmn.natureflag = nil
|
|
end
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "setgender"
|
|
if pkmn.singleGendered?
|
|
pbDisplay(_INTL("{1} is single-gendered or genderless.",pkmn.speciesName))
|
|
else
|
|
cmd = 0
|
|
loop do
|
|
oldgender = (pkmn.male?) ? _INTL("male") : _INTL("female")
|
|
msg = [_INTL("Gender {1} is natural.",oldgender),
|
|
_INTL("Gender {1} is being forced.",oldgender)][pkmn.genderflag ? 1 : 0]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Make male"),
|
|
_INTL("Make female"),
|
|
_INTL("Remove override")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Make male
|
|
pkmn.makeMale
|
|
if !pkmn.male?
|
|
pbDisplay(_INTL("{1}'s gender couldn't be changed.",pkmn.name))
|
|
end
|
|
when 1 # Make female
|
|
pkmn.makeFemale
|
|
if !pkmn.female?
|
|
pbDisplay(_INTL("{1}'s gender couldn't be changed.",pkmn.name))
|
|
end
|
|
when 2 # Remove override
|
|
pkmn.genderflag = nil
|
|
end
|
|
pbSeenForm(pkmn) if !settingUpBattle
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "speciesform"
|
|
cmd = 0
|
|
loop do
|
|
msg = [_INTL("Species {1}, form {2}.",pkmn.speciesName,pkmn.form),
|
|
_INTL("Species {1}, form {2} (forced).",pkmn.speciesName,pkmn.form)][(pkmn.forcedForm!=nil) ? 1 : 0]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Set species"),
|
|
_INTL("Set form"),
|
|
_INTL("Remove override")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Set species
|
|
species = pbChooseSpeciesList(pkmn.species)
|
|
if species!=0 && species!=pkmn.species
|
|
pkmn.species = species
|
|
pkmn.calcStats
|
|
pbSeenForm(pkmn) if !settingUpBattle
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
when 1 # Set form
|
|
cmd2 = 0
|
|
formcmds = [[],[]]
|
|
formdata = pbLoadFormToSpecies
|
|
formdata[pkmn.species] = [pkmn.species] if !formdata[pkmn.species]
|
|
for form in 0...formdata[pkmn.species].length
|
|
fSpecies = pbGetFSpeciesFromForm(pkmn.species,form)
|
|
formname = pbGetMessage(MessageTypes::FormNames,fSpecies)
|
|
formname = _INTL("Unnamed form") if !formname || formname==""
|
|
formname = _INTL("{1}: {2}",form,formname)
|
|
formcmds[0].push(form); formcmds[1].push(formname)
|
|
cmd2 = form if pkmn.form==form
|
|
end
|
|
if formcmds[0].length<=1
|
|
pbDisplay(_INTL("Species {1} only has one form.",pkmn.speciesName))
|
|
else
|
|
cmd2 = pbShowCommands(_INTL("Set the Pokémon's form."),formcmds[1],cmd2)
|
|
next if cmd2<0
|
|
f = formcmds[0][cmd2]
|
|
if f!=pkmn.form
|
|
if MultipleForms.hasFunction?(pkmn,"getForm")
|
|
next if !pbConfirm(_INTL("This species decides its own form. Override?"))
|
|
pkmn.forcedForm = f
|
|
end
|
|
pkmn.form = f
|
|
pbSeenForm(pkmn) if !settingUpBattle
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
when 2 # Remove override
|
|
pkmn.forcedForm = nil
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "setshininess"
|
|
cmd = 0
|
|
loop do
|
|
oldshiny = (pkmn.shiny?) ? _INTL("shiny") : _INTL("normal")
|
|
msg = [_INTL("Shininess ({1}) is natural.",oldshiny),
|
|
_INTL("Shininess ({1}) is being forced.",oldshiny)][pkmn.shinyflag!=nil ? 1 : 0]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Make shiny"),
|
|
_INTL("Make normal"),
|
|
_INTL("Remove override")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Make shiny
|
|
pkmn.makeShiny
|
|
when 1 # Make normal
|
|
pkmn.makeNotShiny
|
|
when 2 # Remove override
|
|
pkmn.shinyflag = nil
|
|
end
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
#===========================================================================
|
|
when "setnickname"
|
|
cmd = 0
|
|
loop do
|
|
speciesname = PBSpecies.getName(pkmn.species)
|
|
msg = [_INTL("{1} has the nickname {2}.",speciesname,pkmn.name),
|
|
_INTL("{1} has no nickname.",speciesname)][pkmn.name==speciesname ? 1 : 0]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Rename"),
|
|
_INTL("Erase name")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Rename
|
|
oldname = (pkmn.name && pkmn.name!=speciesname) ? pkmn.name : ""
|
|
newname = pbEnterPokemonName(_INTL("{1}'s nickname?",speciesname),
|
|
0,PokeBattle_Pokemon::MAX_POKEMON_NAME_SIZE,oldname,pkmn)
|
|
if newname && newname!=""
|
|
pkmn.name = newname
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
when 1 # Erase name
|
|
pkmn.name = speciesname
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "setpokeball"
|
|
commands = []; balls = []
|
|
for key in $BallTypes.keys
|
|
item = getID(PBItems,$BallTypes[key])
|
|
balls.push([key.to_i,PBItems.getName(item)]) if item && item>0
|
|
end
|
|
balls.sort! { |a,b| a[1]<=>b[1] }
|
|
cmd = 0
|
|
for i in 0...balls.length
|
|
if balls[i][0]==pkmn.ballused
|
|
cmd = i; break
|
|
end
|
|
end
|
|
for i in balls
|
|
commands.push(i[1])
|
|
end
|
|
loop do
|
|
oldball = PBItems.getName(pbBallTypeToItem(pkmn.ballused))
|
|
cmd = pbShowCommands(_INTL("{1} used.",oldball),commands,cmd)
|
|
break if cmd<0
|
|
pkmn.ballused = balls[cmd][0]
|
|
end
|
|
#===========================================================================
|
|
when "setribbons"
|
|
cmd = 0
|
|
loop do
|
|
commands = []
|
|
for i in 1..PBRibbons.maxValue
|
|
commands.push(_INTL("{1} {2}",
|
|
(pkmn.hasRibbon?(i)) ? "[Y]" : "[ ]",PBRibbons.getName(i)))
|
|
end
|
|
commands.push(_INTL("Give all"))
|
|
commands.push(_INTL("Clear all"))
|
|
cmd = pbShowCommands(_INTL("{1} ribbons.",pkmn.ribbonCount),commands,cmd)
|
|
break if cmd<0
|
|
if cmd>=0 && cmd<PBRibbons.maxValue # Toggle ribbon
|
|
if pkmn.hasRibbon?(cmd+1)
|
|
pkmn.takeRibbon(cmd+1)
|
|
else
|
|
pkmn.giveRibbon(cmd+1)
|
|
end
|
|
elsif cmd==commands.length-2 # Give all
|
|
for i in 1..PBRibbons.maxValue
|
|
pkmn.giveRibbon(i)
|
|
end
|
|
elsif cmd==commands.length-1 # Clear all
|
|
for i in 1..PBRibbons.maxValue
|
|
pkmn.takeRibbon(i)
|
|
end
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "ownership"
|
|
cmd = 0
|
|
loop do
|
|
gender = [_INTL("Male"),_INTL("Female"),_INTL("Unknown")][pkmn.otgender]
|
|
msg = [_INTL("Player's Pokémon\n{1}\n{2}\n{3} ({4})",pkmn.ot,gender,pkmn.publicID,pkmn.trainerID),
|
|
_INTL("Foreign Pokémon\n{1}\n{2}\n{3} ({4})",pkmn.ot,gender,pkmn.publicID,pkmn.trainerID)
|
|
][pkmn.foreign?($Trainer) ? 1 : 0]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Make player's"),
|
|
_INTL("Set OT's name"),
|
|
_INTL("Set OT's gender"),
|
|
_INTL("Random foreign ID"),
|
|
_INTL("Set foreign ID")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Make player's
|
|
pkmn.trainerID = $Trainer.id
|
|
pkmn.ot = $Trainer.name
|
|
pkmn.otgender = $Trainer.gender
|
|
when 1 # Set OT's name
|
|
pkmn.ot = pbEnterPlayerName(_INTL("{1}'s OT's name?",pkmn.name),1,MAX_PLAYER_NAME_SIZE)
|
|
when 2 # Set OT's gender
|
|
cmd2 = pbShowCommands(_INTL("Set OT's gender."),
|
|
[_INTL("Male"),_INTL("Female"),_INTL("Unknown")],pkmn.otgender)
|
|
pkmn.otgender = cmd2 if cmd2>=0
|
|
when 3 # Random foreign ID
|
|
pkmn.trainerID = $Trainer.getForeignID
|
|
when 4 # Set foreign ID
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,65535)
|
|
params.setDefaultValue(pkmn.publicID)
|
|
val = pbMessageChooseNumber(
|
|
_INTL("Set the new ID (max. 65535)."),params) { pbUpdate }
|
|
pkmn.trainerID = val
|
|
pkmn.trainerID |= val << 16
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "setegg"
|
|
cmd = 0
|
|
loop do
|
|
msg = [_INTL("Not an egg"),
|
|
_INTL("Egg with eggsteps: {1}.",pkmn.eggsteps)][pkmn.egg? ? 1 : 0]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Make egg"),
|
|
_INTL("Make Pokémon"),
|
|
_INTL("Set eggsteps to 1")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Make egg
|
|
if !pkmn.egg? && (pbHasEgg?(pkmn.species) ||
|
|
pbConfirm(_INTL("{1} cannot legally be an egg. Make egg anyway?",PBSpecies.getName(pkmn.species))))
|
|
pkmn.level = EGG_LEVEL
|
|
pkmn.calcStats
|
|
pkmn.name = _INTL("Egg")
|
|
pkmn.eggsteps = pbGetSpeciesData(pkmn.species,pkmn.form,SpeciesStepsToHatch)
|
|
pkmn.hatchedMap = 0
|
|
pkmn.obtainMode = 1
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
when 1 # Make Pokémon
|
|
if pkmn.egg?
|
|
pkmn.name = PBSpecies.getName(pkmn.species)
|
|
pkmn.eggsteps = 0
|
|
pkmn.hatchedMap = 0
|
|
pkmn.obtainMode = 0
|
|
pbRefreshSingle(pkmnid)
|
|
end
|
|
when 2 # Set eggsteps to 1
|
|
pkmn.eggsteps = 1 if pkmn.egg?
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "shadowpkmn"
|
|
cmd = 0
|
|
loop do
|
|
msg = [_INTL("Not a Shadow Pokémon."),
|
|
_INTL("Heart gauge is {1} (stage {2}).",pkmn.heartgauge,pkmn.heartStage)
|
|
][pkmn.shadowPokemon? ? 1 : 0]
|
|
cmd = pbShowCommands(msg,[
|
|
_INTL("Make Shadow"),
|
|
_INTL("Set heart gauge")],cmd)
|
|
break if cmd<0
|
|
case cmd
|
|
when 0 # Make Shadow
|
|
if !pkmn.shadowPokemon?
|
|
pkmn.makeShadow
|
|
pbRefreshSingle(pkmnid)
|
|
else
|
|
pbDisplay(_INTL("{1} is already a Shadow Pokémon.",pkmn.name))
|
|
end
|
|
when 1 # Set heart gauge
|
|
if pkmn.shadowPokemon?
|
|
oldheart = pkmn.heartgauge
|
|
params = ChooseNumberParams.new
|
|
params.setRange(0,PokeBattle_Pokemon::HEARTGAUGESIZE)
|
|
params.setDefaultValue(pkmn.heartgauge)
|
|
val = pbMessageChooseNumber(
|
|
_INTL("Set the heart gauge (max. {1}).",PokeBattle_Pokemon::HEARTGAUGESIZE),
|
|
params) { pbUpdate }
|
|
if val!=oldheart
|
|
pkmn.adjustHeart(val-oldheart)
|
|
pbReadyToPurify(pkmn)
|
|
end
|
|
else
|
|
pbDisplay(_INTL("{1} is not a Shadow Pokémon.",pkmn.name))
|
|
end
|
|
end
|
|
end
|
|
#===========================================================================
|
|
when "mysterygift"
|
|
pbCreateMysteryGift(0,pkmn)
|
|
#===========================================================================
|
|
when "duplicate"
|
|
if pbConfirm(_INTL("Are you sure you want to copy this Pokémon?"))
|
|
clonedpkmn = pkmn.clone
|
|
if self.is_a?(PokemonPartyScreen)
|
|
pbStorePokemon(clonedpkmn)
|
|
pbHardRefresh
|
|
pbDisplay(_INTL("The Pokémon was duplicated."))
|
|
elsif self.is_a?(PokemonStorageScreen)
|
|
if @storage.pbMoveCaughtToParty(clonedpkmn)
|
|
if pkmnid[0]!=-1
|
|
pbDisplay(_INTL("The duplicated Pokémon was moved to your party."))
|
|
end
|
|
else
|
|
oldbox = @storage.currentBox
|
|
newbox = @storage.pbStoreCaught(clonedpkmn)
|
|
if newbox<0
|
|
pbDisplay(_INTL("All boxes are full."))
|
|
elsif newbox!=oldbox
|
|
pbDisplay(_INTL("The duplicated Pokémon was moved to box \"{1}.\"",@storage[newbox].name))
|
|
@storage.currentBox = oldbox
|
|
end
|
|
end
|
|
pbHardRefresh
|
|
end
|
|
return false
|
|
end
|
|
#===========================================================================
|
|
when "delete"
|
|
if pbConfirm(_INTL("Are you sure you want to delete this Pokémon?"))
|
|
if self.is_a?(PokemonPartyScreen)
|
|
@party[pkmnid] = nil
|
|
@party.compact!
|
|
pbHardRefresh
|
|
elsif self.is_a?(PokemonStorageScreen)
|
|
@scene.pbRelease(pkmnid,heldpoke)
|
|
(heldpoke) ? @heldpkmn = nil : @storage.pbDelete(pkmnid[0],pkmnid[1])
|
|
@scene.pbRefresh
|
|
end
|
|
return false
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
|
|
def pbPokemonDebug(pkmn,pkmnid,heldpoke=nil,settingUpBattle=false)
|
|
command = 0
|
|
commands = pbPokemonDebugCommands(settingUpBattle)
|
|
loop do
|
|
command = pbShowCommands(_INTL("Do what with {1}?",pkmn.name),commands.list,command)
|
|
if command<0
|
|
parent = commands.getParent
|
|
if parent
|
|
commands.currentList = parent[0]
|
|
command = parent[1]
|
|
else
|
|
break
|
|
end
|
|
else
|
|
cmd = commands.getCommand(command)
|
|
if commands.hasSubMenu?(cmd)
|
|
commands.currentList = cmd
|
|
command = 0
|
|
else
|
|
cont = pbPokemonDebugActions(cmd,pkmn,pkmnid,heldpoke,settingUpBattle)
|
|
break if !cont
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
|
|
class PokemonPartyScreen
|
|
include PokemonDebugMixin
|
|
end
|
|
|
|
|
|
|
|
class PokemonStorageScreen
|
|
include PokemonDebugMixin
|
|
end
|
|
|
|
|
|
|
|
class PokemonDebugPartyScreen
|
|
include PokemonDebugMixin
|
|
end
|