DocRock3r/infinitefusion-e18
1
0
Fork 0
mirror of https://github.com/infinitefusion/infinitefusion-e18.git synced 2025-12-08 05:34:58 +00:00
Code Issues Packages Projects Releases Wiki Activity

Further refactoring in PokeBattle_Pokemon

Browse Source
This commit is contained in:
jonisavo
2020-09-08 11:32:36 +03:00
parent 3e1c482c21
commit 1b3a1f3f3c
1 changed files with 134 additions and 88 deletions
Download Patch File Download Diff File Expand all files Collapse all files

150
Data/Scripts/016_Pokemon/001_PokeBattle_Pokemon.rb
View File

@@ -1,21 +1,36 @@
# This class stores data on each Pokémon. Refer to $Trainer.party for an array
# of each Pokémon in the Trainer's current party.
class PokeBattle_Pokemon
attr_accessor :name # Nickname
attr_reader :species # Species (National Pokedex number)
attr_reader :exp # Current experience points
attr_reader :hp # Current HP
attr_reader :totalhp # Current Total HP
attr_reader :attack # Current Attack stat
attr_reader :defense # Current Defense stat
attr_reader :speed # Current Speed stat
attr_reader :spatk # Current Special Attack stat
attr_reader :spdef # Current Special Defense stat
attr_accessor :status # Status problem (PBStatuses)
attr_accessor :statusCount # Sleep count/Toxic flag
attr_accessor :abilityflag # Forces the first/second/hidden (0/1/2) ability
attr_accessor :genderflag # Forces male (0) or female (1)
attr_accessor :natureflag # Forces a particular nature
# @return [String] nickname
attr_accessor :name
# @return [Integer] national Pokédex number
attr_reader :species
# @return [Integer] current experience points
attr_reader :exp
# @return [Integer] current HP
attr_reader :hp
# @return [Integer] current Total HP
attr_reader :totalhp
# @return [Integer] current Attack stat
attr_reader :attack
# @return [Integer] current Defense stat
attr_reader :defense
# @return [Integer] current Speed stat
attr_reader :speed
# @return [Integer] current Special Attack stat
attr_reader :spatk
# @return [Integer] current Special Defense stat
attr_reader :spdef
# @return [Integer] status problem (from PBStatus)
attr_accessor :status
# @return [Integer] sleep count / toxic flag
attr_accessor :statusCount
# @return [0, 1, 2] forces the first / second / hidden ability
attr_accessor :abilityflag
# @return [0, 1] forces male (0) or female (1)
attr_accessor :genderflag
# @return [Integer] forces a particular nature (nature ID)
attr_accessor :natureflag
attr_accessor :natureOverride # Overrides nature's stat-changing effects
attr_accessor :shinyflag # Forces the shininess (true/false)
attr_accessor :moves # Moves (PBMove)
@@ -59,38 +74,41 @@ class PokeBattle_Pokemon
#=============================================================================
# Ownership, obtained information
#=============================================================================
# Returns the public portion of the original trainer's ID.
# @return [Integer] public portion of the original trainer's ID
def publicID
return @trainerID & 0xFFFF
end
# Returns whether the specified Trainer is NOT this Pokémon's original trainer.
# @param trainer [PokeBattle_Trainer] the trainer to compare to the OT
# @return [Boolean] whether the trainer and OT don't match
def foreign?(trainer)
return @trainerID != trainer.id || @ot != trainer.name
end
alias isForeign? foreign?
# Returns the gender of this Pokémon's original trainer (2=unknown).
# @return [0, 1, 2] gender of this Pokémon original trainer (0 = male, 1 = female, 2 = unknown)
def otgender
return @otgender || 2
end
# Returns this Pokémon's level when this Pokémon was obtained.
# @return [Integer] this Pokémon's level when it was obtained
def obtainLevel
return @obtainLevel || 0
end
# Returns the time when this Pokémon was obtained.
# @return [Time] time when this Pokémon was obtained
def timeReceived
return @timeReceived ? Time.at(@timeReceived) : Time.gm(2000)
end
# Sets the time when this Pokémon was obtained (in seconds since Unix epoch).
# Sets the time when this Pokémon was obtained.
# @param value [Integer, Time, #to_i] time in seconds since Unix epoch
def timeReceived=(value)
@timeReceived = value.to_i
end
# Returns the time when this Pokémon hatched.
# @return [Time] time when this Pokémon hatched
def timeEggHatched
if obtainMode==1
return @timeEggHatched ? Time.at(@timeEggHatched) : Time.gm(2000)
@@ -99,7 +117,8 @@ class PokeBattle_Pokemon
end
end
# Sets the time when this Pokémon hatched (in seconds since Unix epoch).
# Sets the time when this Pokémon hatched.
# @param value [Integer, Time, #to_i] time in seconds since Unix epoch
def timeEggHatched=(value)
@timeEggHatched = value.to_i
end
@@ -107,13 +126,15 @@ class PokeBattle_Pokemon
#=============================================================================
# Level
#=============================================================================
# Returns this Pokémon's level.
# @return [Integer] this Pokémon's level
def level
@level = PBExperience.pbGetLevelFromExperience(@exp,self.growthrate) if !@level
return @level
end
# Sets this Pokémon's level.
# @param value [Integer] new level (between 1 and the maximum level)
def level=(value)
if value<1 || value>PBExperience.maxLevel
raise ArgumentError.new(_INTL("The level number ({1}) is invalid.",value))
@@ -123,29 +144,30 @@ class PokeBattle_Pokemon
end
# Sets this Pokémon's Exp. Points.
# @param value [Integer] new experience points
def exp=(value)
@exp = value
@level = nil
end
# Returns whether this Pokémon is an egg.
# @return [Boolean] whether this Pokémon is an egg
def egg?
return @eggsteps > 0
end
alias isEgg? egg?
# Returns this Pokémon's growth rate.
# @return [Integer] this Pokémon's growth rate (from PBGrowthRates)
def growthrate
return pbGetSpeciesData(@species,formSimple,SpeciesGrowthRate)
end
# Returns this Pokémon's base Experience value.
# @return [Integer] this Pokémon's base Experience value
def baseExp
return pbGetSpeciesData(@species,formSimple,SpeciesBaseExp)
end
# Returns a number between 0 and 1 indicating how much of the current level's
# Exp this Pokémon has.
# @return [Float] number between 0 and 1 indicating how much of the current level's
# Exp this Pokémon has
def expFraction
l = self.level
return 0.0 if l >= PBExperience.maxLevel
@@ -158,7 +180,8 @@ class PokeBattle_Pokemon
#=============================================================================
# Gender
#=============================================================================
# Returns this Pokémon's gender. 0=male, 1=female, 2=genderless
# @return [0, 1, 2] this Pokémon's gender (0 = male, 1 = female, 2 = genderless)
def gender
# Return sole gender option for all male/all female/genderless species
genderRate = pbGetSpeciesData(@species,formSimple,SpeciesGenderRate)
@@ -172,8 +195,8 @@ class PokeBattle_Pokemon
return ((@personalID & 0xFF) < PBGenderRates.genderByte(genderRate)) ? 1 : 0
end
# Returns whether this Pokémon species is restricted to only ever being one
# gender (or genderless).
# @return [Boolean] whether this Pokémon species is restricted to only ever being one
# gender (or genderless)
def singleGendered?
genderRate = pbGetSpeciesData(@species,formSimple,SpeciesGenderRate)
return genderRate == PBGenderRates::AlwaysMale ||
@@ -182,41 +205,45 @@ class PokeBattle_Pokemon
end
alias isSingleGendered? singleGendered?
# Returns whether this Pokémon is male.
# @return [Boolean] whether this Pokémon is male
def male?
return self.gender == 0
end
alias isMale? male?
# Returns whether this Pokémon is female.
# @return [Boolean] whether this Pokémon is female
def female?
return self.gender == 1
end
alias isFemale? female?
# Returns whether this Pokémon is genderless.
# @return [Boolean] whether this Pokémon is genderless
def genderless?
return self.gender == 2
end
alias isGenderless? genderless?
# Sets this Pokémon's gender to a particular gender (if possible).
# @param value [0, 1, 2] new gender (0 = male, 1 = female, 2 = genderless)
def setGender(value)
@genderflag = value if !singleGendered?
end
# Makes this Pokémon male.
def makeMale; setGender(0); end
# Makes this Pokémon female.
def makeFemale; setGender(1); end
#=============================================================================
# Ability
#=============================================================================
# Returns the index of this Pokémon's ability.
# @return [Integer] the index of this Pokémon's ability
def abilityIndex
return @abilityflag || (@personalID & 1)
end
# Returns the ID of this Pokémon's ability.
# @return [Integer] the ID of this Pokémon's ability
def ability
abilIndex = abilityIndex
# Hidden ability
@@ -240,24 +267,30 @@ class PokeBattle_Pokemon
return abilities || 0
end
# Returns whether this Pokémon has a particular ability.
def hasAbility?(value=0)
abil = self.ability
return abil>0 if value==0
return abil==getID(PBAbilities,value)
# Returns whether this Pokémon has a particular ability. If no value
# is given, returns whether this Pokémon has an ability set.
# @param ability [Integer] ability ID to check
# @return [Boolean] whether this Pokémon has a particular ability or
# an ability at all
def hasAbility?(ability = 0)
current_ability = self.ability
return current_ability > 0 if ability == 0
return current_ability == getID(PBAbilities,ability)
end
# Sets this Pokémon's ability to a particular ability (if possible).
# Sets this Pokémon's ability index.
# @param value [Integer] new ability index
def setAbility(value)
@abilityflag = value
end
# @return [Boolean] whether this Pokémon has a hidden ability
def hasHiddenAbility?
abil = abilityIndex
return abil!=nil && abil>=2
end
# Returns the list of abilities this Pokémon can have.
# @return [Array<Array<Integer>>] the list of abilities this Pokémon can have
def getAbilityList
ret = []
abilities = pbGetSpeciesData(@species,formSimple,SpeciesAbilities)
@@ -278,26 +311,33 @@ class PokeBattle_Pokemon
#=============================================================================
# Nature
#=============================================================================
# Returns the ID of this Pokémon's nature.
# @return [Integer] the ID of this Pokémon's nature
def nature
return @natureflag || (@personalID%25)
end
# Returns the calculated nature, taking into account things that change its
# stat-altering effect (i.e. Gen 8 mints). Only used for calculating stats.
# @return [Integer] calculated nature
def calcNature
return @natureOverride if @natureOverride
return self.nature
end
# Returns whether this Pokémon has a particular nature.
def hasNature?(value=-1)
nat = self.nature
return nat>=0 if value<0
return nat==getID(PBNatures,value)
# Returns whether this Pokémon has a particular nature. If no value
# is given, returns whether this Pokémon has a nature set.
# @param nature [Integer] nature ID to check
# @return [Boolean] whether this Pokémon has a particular nature or
# a nature at all
def hasNature?(nature = -1)
current_nature = self.nature
return current_nature >= 0 if nature < 0
return current_nature == getID(PBNatures,nature)
end
# Sets this Pokémon's nature to a particular nature.
# @param value [Integer] nature to change to
def setNature(value)
@natureflag = getID(PBNatures,value)
calcStats
@@ -306,7 +346,8 @@ class PokeBattle_Pokemon
#=============================================================================
# Shininess
#=============================================================================
# Returns whether this Pokémon is shiny (differently colored).
# @return [Boolean] whether this Pokémon is shiny (differently colored)
def shiny?
return @shinyflag if @shinyflag != nil
a = @personalID ^ @trainerID
@@ -330,12 +371,15 @@ class PokeBattle_Pokemon
#=============================================================================
# Pokérus
#=============================================================================
# Returns the Pokérus infection stage for this Pokémon.
# @return [Integer] the Pokérus infection stage for this Pokémon
def pokerusStrain
return @pokerus/16
end
# Returns the Pokérus infection stage for this Pokémon.
# @return [0, 1, 2] Pokérus infection stage
# (0 = not infected, 1 = cured, 2 = infected)
def pokerusStage
return 0 if !@pokerus || @pokerus==0 # Not infected
return 2 if @pokerus>0 && (@pokerus%16)==0 # Cured
@@ -343,6 +387,7 @@ class PokeBattle_Pokemon
end
# Gives this Pokémon Pokérus (either the specified strain or a random one).
# @param strain [Integer] Pokérus strain to give
def givePokerus(strain = 0)
return if self.pokerusStage == 2 # Can't re-infect a cured Pokémon
strain = 1 + rand(15) if strain <= 0 || strain >= 16
@@ -369,6 +414,7 @@ class PokeBattle_Pokemon
#=============================================================================
# Types
#=============================================================================
# Returns this Pokémon's first type.
def type1
return pbGetSpeciesData(@species,formSimple,SpeciesType1)