POKEMON AMIE/REFRESH [ESSENTIALS V18]

BiggusWeeabus · Nov 15, 2020

A scripting related question that i don't know if you may be able to answer.

It is possible to make a ability activate under a certain level of affection, Like Battle-Bond only working with Max Affection for example?
And will the A.I be able to use the Ability too?

YashPokeFan123 · Feb 8, 2021

Spoiler:

भाग्य ज्योति said:

POKEMON AMIE / REFRESH

This script replicates the Amie/Refresh Feature from Gen6/7 Games

Features:

Interact with your Pokemon and play with them.
Access the menu as you wish, either from PokeGear, or while OW Pokemon interaction or both.
Based on Pizza Sun script, but fixed the glitch which disallowed custom field message while interacting with OW Pokemon.
Evolve Eevee based on affection, like in actual games.

NOTE:

This script requires "Easy Mouse System" by Luka S.J! Please have that installed before installing this script!
Unlike the version of the game Amie/Refresh, this script does not feed Pokemon PokePuffs or Pokebeans but instead eatable items in your game, like Rare Candies and berries!
Too many food items in the bag may cause lag.

Screenshots:

Spoiler:

Script:
Paste it above Main and below Compiler. Also download the Graphics from Attachments.

Spoiler:

Code:

################################################################################
#                         Pokemon Amie/Refresh
#                           by BhagyaJyoti
#                        Adapted from PizzaSun
#                 Further Adapted from rigbycwts's script
################################################################################
=begin
use either if the following two scripts to set Pokemon Amie a specific Pokemon 
beforehand:
=============================================
setAmieIndex(party index)
setAmiePokemon(pokemon)
=============================================
to begin Pokemon Amie/Refresh Scene use:
=========================================================
PokemonAmieRefresh
==========================================================
=end
#=========================================================#
# Plugin Manager Support
PluginManager.register({
  :name    => "Pokemon Amie/Refresh",
  :version => "1.5",
  :link    => "https://www.pokecommunity.com/showthread.php?t=439558",
  :credits => ["Bhagya Jyoti","Pizza Sun"]
})
#=========================================================#
#P.S.
#The Sprite Mask script is required to run Pokemon Amie/Refresh and included
#Below. IF you already have it installed, you may remove it if you'd like.
#===============================================================================
# ** Sprite Mask
#        by Luka S.J.
#-------------------------------------------------------------------------------
# Allows you to use a bitmap, sprite or image path to a bitmap to use as a mask
# for a sprite's original bitmap.
#===============================================================================
# handled as an extension of the Sprite class
class Sprite
  # function used to to mask the Sprite's current bitmap with another
  def mask(mask = nil,xpush = 0,ypush = 0)
    # exits out of the function if the sprite currently has no bitmap to mask
    return false if !self.bitmap
    # backs up the Sprites current bitmap
    bitmap = self.bitmap.clone
    # check for mask types
    if mask.is_a?(Bitmap) # accepts Bitmap.new
      mbmp = mask
    elsif mask.is_a?(Sprite) # accepts other Sprite.new
      mbmp = mask.bitmap
    elsif mask.is_a?(String) # accepts Strings
      mbmp = BitmapCache.load_bitmap(mask)
    else # exits if non-matching type
      return false
    end
    # creates a new bitmap
    self.bitmap = Bitmap.new(mbmp.width, mbmp.height)
    # creates the main mask
    mask = mbmp.clone
    # calculates the dimension metrics for pixel transfer
    ox = (bitmap.width - mbmp.width) / 2
    oy = (bitmap.height - mbmp.height) / 2
    width = mbmp.width + ox
    height = mbmp.height + oy
    # draws pixels to mask bitmap
    for y in oy...height
      for x in ox...width
        # gets pixel of mask for analysis
        pixel = mask.get_pixel(x - ox, y - oy)
        # gets pixel of current bitmap for analysis
        color = bitmap.get_pixel(x - xpush, y - ypush)
        # sets the new alpha to use the value of the mask alpha
        alpha = pixel.alpha
        alpha = color.alpha if color.alpha < pixel.alpha
        # draws new pixels onto the Sprite's bitmap
        self.bitmap.set_pixel(x - ox, y - oy, Color.new(color.red, color.green,color.blue, alpha))
      end
    end
    # returns finalized bitmap to be used elsewhere
    return self.bitmap
  end
end

################################################################################
# Pokemon-Amie/Pokemon Refresh Script
################################################################################

AMIEPOKEMON = 100 # Variable number to store the main Amie/Refresh Pokemon
AMIEINDEX = 101 # Variable number to store the main Amie/Refresh Pokemon Party Index

#All Things Pokemon can eat (Mostly Berries)
EATABLE_ITEMS = [
  :LAVACOOKIE,
  :OLDGATEAU,
  :CASTELIACONE,
  :RAGECANDYBAR,
  :SWEETHEART,
  :RARECANDY,
  :CHERIBERRY,
  :CHESTOBERRY,
  :PECHABERRY,
  :RAWSTBERRY,
  :ASPEARBERRY,
  :LEPPABERRY,
  :ORANBERRY,
  :PERSIMBERRY,
  :LUMBERRY,
  :SITRUSBERRY,
  :FIGYBERRY,
  :WIKIBERRY,
  :MAGOBERRY,
  :AGUAVBERRY,
  :IAPAPABERRY,
  :RAZZBERRY,
  :BLUKBERRY,
  :NANABBERRY,
  :WEPEARBERRY,
  :PINAPBERRY,
  :POMEGBERRY,
  :KELPSYBERRY,
  :QUALOTBERRY,
  :HONDEWBERRY,
  :GREPABERRY,
  :TAMATOBERRY,
  :CORNNBERRY,
  :MAGOSTBERRY,
  :RABUTABERRY,
  :NOMELBERRY,
  :SPELONBERRY,
  :PAMTREBERRY,
  :WATMELBERRY,
  :DURINBERRY,
  :BELUEBERRY,
  :OCCABERRY,
  :PASSHOBERRY,
  :WACANBERRY,
  :RINDOBERRY,
  :YACHEBERRY,
  :CHOPLEBERRY,
  :KEBIABERRY,
  :SHUCABERRY,
  :COBABERRY,
  :PAYAPABERRY,
  :TANGABERRY,
  :CHARTIBERRY,
  :KASIBBERRY,
  :HABANBERRY,
  :COLBURBERRY,
  :BABIRIBERRY,
  :CHILANBERRY,
  :LIECHIBERRY,
  :GANLONBERRY,
  :SALACBERRY,
  :PETAYABERRY,
  :APICOTBERRY,
  :LANSATBERRY,
  :STARFBERRY,
  :ENIGMABERRY,
  :MICLEBERRY,
  :CUSTAPBERRY,
  :JABOCABERRY,
  :ROWAPBERRY
]
#Adds effect Compatibility for Items
alias amie_pbHPItem pbHPItem
def pbHPItem(pokemon,restorehp,scene)
  if pokemon.hp<=0 || pokemon.hp==pokemon.totalhp || pokemon.egg?
    scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
    return false
  end
  hpgain=pbItemRestoreHP(pokemon,restorehp)
  scene.pbRefresh if scene!=nil
  scene.pbDisplay(_INTL("{1}'s HP was restored by {2} points.",pokemon.name,hpgain)) if scene!=nil
  return true
end
#
ItemHandlers::UseOnPokemon.add(:AWAKENING,proc{|item,pokemon,scene|
   if pokemon.hp<=0 || pokemon.status!=PBStatuses::SLEEP
     scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
     next false
   else
     pokemon.healStatus
     scene.pbRefresh if scene!=nil
     scene.pbDisplay(_INTL("{1} woke up.",pokemon.name)) if scene!=nil
     pbMessage(_INTL("{1} woke up.",pokemon.name)) if scene==nil
     next true
   end
})

ItemHandlers::UseOnPokemon.copy(:AWAKENING,:CHESTOBERRY,:BLUEFLUTE,:POKEFLUTE)

ItemHandlers::UseOnPokemon.add(:ANTIDOTE,proc{|item,pokemon,scene|
   if pokemon.hp<=0 || pokemon.status!=PBStatuses::POISON
     scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
     next false
   else
     pokemon.healStatus
     scene.pbRefresh if scene!=nil
     scene.pbDisplay(_INTL("{1} was cured of its poisoning.",pokemon.name)) if scene!=nil
     pbMessage(_INTL("{1} was cured of its poisoning.",pokemon.name)) if scene==nil
     next true
   end
})

ItemHandlers::UseOnPokemon.copy(:ANTIDOTE,:PECHABERRY)

ItemHandlers::UseOnPokemon.add(:BURNHEAL,proc{|item,pokemon,scene|
   if pokemon.hp<=0 || pokemon.status!=PBStatuses::BURN
     scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
     next false
   else
     pokemon.healStatus
     scene.pbRefresh if scene!=nil
     scene.pbDisplay(_INTL("{1}'s burn was healed.",pokemon.name)) if scene!=nil
     pbMessage(_INTL("{1}'s burn was healed.",pokemon.name)) if scene==nil
     next true
   end
})

ItemHandlers::UseOnPokemon.copy(:BURNHEAL,:RAWSTBERRY)

ItemHandlers::UseOnPokemon.add(:PARLYZHEAL,proc{|item,pokemon,scene|
   if pokemon.hp<=0 || pokemon.status!=PBStatuses::PARALYSIS
     scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
     next false
   else
     pokemon.healStatus
     scene.pbRefresh if scene!=nil
     scene.pbDisplay(_INTL("{1} was cured of paralysis.",pokemon.name)) if scene!=nil
     pbMessage(_INTL("{1} was cured of paralysis.",pokemon.name)) if scene==nil
     next true
   end
})

ItemHandlers::UseOnPokemon.copy(:PARLYZHEAL,:PARALYZEHEAL,:CHERIBERRY)

ItemHandlers::UseOnPokemon.add(:ICEHEAL,proc{|item,pokemon,scene|
   if pokemon.hp<=0 || pokemon.status!=PBStatuses::FROZEN
     scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
     next false
   else
     pokemon.healStatus
     scene.pbRefresh if scene!=nil
     scene.pbDisplay(_INTL("{1} was thawed out.",pokemon.name)) if scene!=nil
     pbMessage(_INTL("{1} was thawed out.",pokemon.name)) if scene==nil
     next true
   end
})

ItemHandlers::UseOnPokemon.copy(:ICEHEAL,:ASPEARBERRY)


ItemHandlers::UseOnPokemon.add(:FULLHEAL,proc{|item,pokemon,scene|
   if pokemon.hp<=0 || pokemon.status==0
     scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
     next false
   else
     pokemon.healStatus
     scene.pbRefresh if scene!=nil
     scene.pbDisplay(_INTL("{1} became healthy.",pokemon.name)) if scene!=nil
     pbMessage(_INTL("{1} became healthy.",pokemon.name)) if scene==nil
     next true
   end
})

ItemHandlers::UseOnPokemon.copy(:FULLHEAL,
   :LAVACOOKIE,:OLDGATEAU,:CASTELIACONE,:LUMIOSEGALETTE,:SHALOURSABLE,:LUMBERRY)

ItemHandlers::UseOnPokemon.add(:RARECANDY,proc{|item,pokemon,scene|
   if pokemon.level>=PBExperience.maxLevel || (pokemon.isShadow? rescue false)
     scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
     next false
   else
     pbChangeLevel(pokemon,pokemon.level+1,scene)
     scene.pbHardRefresh if scene!=nil
     next true
   end
})
alias amie_pbRaiseHappinessAndLowerEV pbRaiseHappinessAndLowerEV
def pbRaiseHappinessAndLowerEV(pokemon,scene,ev,messages)
  h=(pokemon.happiness<255)
  e=(pokemon.ev[ev]>0)
  if !h && !e
    scene.pbDisplay(_INTL("It won't have any effect.")) if scene!=nil
    return false
  end
  if h
    pokemon.changeHappiness("evberry")
  end
  if e
    pokemon.ev[ev]-=10
    pokemon.ev[ev]=0 if pokemon.ev[ev]<0
    pokemon.calcStats
  end
  scene.pbRefresh if scene!=nil
  scene.pbDisplay(messages[2-(h ? 0 : 1)-(e ? 0 : 2)]) if scene!=nil
  return true
end

alias amie_pbChangeLevel pbChangeLevel
def pbChangeLevel(pokemon,newlevel,scene)
  newlevel=1 if newlevel<1
  newlevel=PBExperience.maxLevel if newlevel>PBExperience.maxLevel
  if pokemon.level>newlevel
    attackdiff=pokemon.attack
    defensediff=pokemon.defense
    speeddiff=pokemon.speed
    spatkdiff=pokemon.spatk
    spdefdiff=pokemon.spdef
    totalhpdiff=pokemon.totalhp
    pokemon.level=newlevel
    pokemon.calcStats
    if !defined?(scene.Amie?)
      scene.pbRefresh
    end
    pbMessage(_INTL("{1} was downgraded to Level {2}!",pokemon.name,pokemon.level))
    attackdiff=pokemon.attack-attackdiff
    defensediff=pokemon.defense-defensediff
    speeddiff=pokemon.speed-speeddiff
    spatkdiff=pokemon.spatk-spatkdiff
    spdefdiff=pokemon.spdef-spdefdiff
    totalhpdiff=pokemon.totalhp-totalhpdiff
    pbTopRightWindow(_INTL("Max. HP<r>{1}\r\nAttack<r>{2}\r\nDefense<r>{3}\r\nSp. Atk<r>{4}\r\nSp. Def<r>{5}\r\nSpeed<r>{6}",
       totalhpdiff,attackdiff,defensediff,spatkdiff,spdefdiff,speeddiff))
    pbTopRightWindow(_INTL("Max. HP<r>{1}\r\nAttack<r>{2}\r\nDefense<r>{3}\r\nSp. Atk<r>{4}\r\nSp. Def<r>{5}\r\nSpeed<r>{6}",
       pokemon.totalhp,pokemon.attack,pokemon.defense,pokemon.spatk,pokemon.spdef,pokemon.speed))
  elsif pokemon.level==newlevel
    pbMessage(_INTL("{1}'s level remained unchanged.",pokemon.name))
  else
    attackdiff=pokemon.attack
    defensediff=pokemon.defense
    speeddiff=pokemon.speed
    spatkdiff=pokemon.spatk
    spdefdiff=pokemon.spdef
    totalhpdiff=pokemon.totalhp
    oldlevel=pokemon.level
    pokemon.level=newlevel
    pokemon.changeHappiness("levelup")
    pokemon.calcStats
    scene.pbRefresh if scene!=nil
    pbMessage(_INTL("{1} was elevated to Level {2}!",pokemon.name,pokemon.level))
    attackdiff=pokemon.attack-attackdiff
    defensediff=pokemon.defense-defensediff
    speeddiff=pokemon.speed-speeddiff
    spatkdiff=pokemon.spatk-spatkdiff
    spdefdiff=pokemon.spdef-spdefdiff
    totalhpdiff=pokemon.totalhp-totalhpdiff
    pbTopRightWindow(_INTL("Max. HP<r>+{1}\r\nAttack<r>+{2}\r\nDefense<r>+{3}\r\nSp. Atk<r>+{4}\r\nSp. Def<r>+{5}\r\nSpeed<r>+{6}",
       totalhpdiff,attackdiff,defensediff,spatkdiff,spdefdiff,speeddiff))
    pbTopRightWindow(_INTL("Max. HP<r>{1}\r\nAttack<r>{2}\r\nDefense<r>{3}\r\nSp. Atk<r>{4}\r\nSp. Def<r>{5}\r\nSpeed<r>{6}",
       pokemon.totalhp,pokemon.attack,pokemon.defense,pokemon.spatk,pokemon.spdef,pokemon.speed))
    movelist=pokemon.getMoveList
    for i in movelist
      if i[0]==pokemon.level          # Learned a new move
        pbLearnMove(pokemon,i[1],true)
      end
    end
    newspecies=pbCheckEvolution(pokemon)
    if newspecies>0
      pbFadeOutInWithMusic(99999){
         evo=PokemonEvolutionScene.new
         evo.pbStartScreen(pokemon,newspecies)
         evo.pbEvolution
         evo.pbEndScreen
      }
    end
  end
end

##

class PokeBattle_Pokemon
  attr_accessor(:amie_affection)
  attr_accessor(:amie_fullness)
  attr_accessor(:amie_enjoyment) # Pokemon-Amie stats
  MAXAMIEPOINTS = 255 # Max points that a single Amie/Refresh stat can have
  @amie_affection=0 if (@amie_affection==nil)
  @amie_fullness=0 if (@amie_fullness==nil)
  @amie_enjoyment=0 if (@amie_enjoyment==nil)
  # Getters - return each stat values in points
  def amie_affection
    @amie_affection=0 if (@amie_affection==nil)
    return @amie_affection
  end
  
  def amie_fullness
    @amie_fullness=0 if (@amie_fullness==nil)
    return @amie_fullness
  end
  
  def amie_enjoyment
    @amie_enjoyment=0 if (@amie_enjoyment==nil)
    return @amie_enjoyment
  end
  
  # Setters - sets each stat values in points
  def amie_affection=(value)
    # Failsafes.
    if value > MAXAMIEPOINTS
      @amie_affection = MAXAMIEPOINTS
    elsif value < 0
      @amie_affection = 0
    else
      @amie_affection = value
    end
  end
  
  def amie_fullness=(value)
    # Failsafes.
    if value > MAXAMIEPOINTS
      @amie_fullness = MAXAMIEPOINTS
    elsif value < 0
      @amie_fullness = 0
    else
      @amie_fullness = value
    end
  end
  
  def amie_enjoyment=(value)
    # Failsafes.
    if value > MAXAMIEPOINTS
      @amie_enjoyment = MAXAMIEPOINTS
    elsif value < 0
      @amie_enjoyment = 0
    else
      @amie_enjoyment = value
    end
  end
  
  # Converts the points for every Amie stat into an abstracted level.
  def getAmieStatLevel(points)
    case points
    when 0
      return 0
    when 1...50
      return 1
    when 50...100
      return 2
    when 100...150
      return 3
    when 150...MAXAMIEPOINTS
      return 4
    when MAXAMIEPOINTS
      return 5
    end
  end
  
  # Returns the Affection level. Needed for other scripts, e.g. evolution methods
  def getAffectionLevel
    return getAmieStatLevel(amie_affection)
  end
  
  def getFullnessLevel
    return getAmieStatLevel(amie_fullness)
  end
  
  def getEnjoymentLevel
    return getAmieStatLevel(amie_enjoyment)
  end
    
  def feedAmie(food)
    return if (amie_fullness>=MAXAMIEPOINTS)
    return if getFullnessLevel==5
    if EATABLE_ITEMS.include?(food)
      if pbCanUseOnPokemon?(getID(PBItems,food))
        ret=ItemHandlers.triggerUseOnPokemon(food,pbGet(AMIEPOKEMON),nil)
        #if ret && $ItemData[item][ITEMUSE]==1 # Usable on Pokémon, consumed
        #  $PokemonBag.pbDeleteItem(item)
        #end
      end
      if pbIsBerry?(getID(PBItems,food))
        if !@berryPlantData
          pbRgssOpen("Data/berry_plants.dat","rb"){|f|
             @berryPlantData=Marshal.load(f)
          }
        end
        if @berryPlantData && @berryPlantData[getID(PBItems,food)]!=nil
          ber = @berryPlantData[getID(PBItems,food)]
        else
          ber = [3,15,2,5]
        end
        affGain = ber[0] + rand(4)
        fullGain = 90
        enjoyGain = 0
      else
        affGain = rand(4)+3
        fullGain = 90
        enjoyGain = 0
      end
      $PokemonBag.pbDeleteItem(getID(PBItems,food))
      @amie_affection = amie_affection+affGain
      @amie_affection = [0, [amie_affection, MAXAMIEPOINTS].min].max
      @amie_fullness = amie_fullness+fullGain
      @amie_fullness = [0, [amie_fullness, MAXAMIEPOINTS].min].max
      @amie_enjoyment = amie_enjoyment+enjoyGain
      @amie_enjoyment = [0, [amie_enjoyment, MAXAMIEPOINTS].min].max
    end
  end
  
  # Changes the happiness of this Pokémon depending on what happened to change it.
  def changeAmieStats(method)
    affGain=0
    fullGain=0
    enjoyGain=0
    case method
    when "walking" # Walk approx. 50 steps
      fullGain=-1
      enjoyGain=-1
    when "sendInBattle" # Send Pokemon in to a battle
      fullGain=-25
      enjoyGain=-25
    when "feedPlainBean" # Feed Pokémon a whole Plain Bean
      affGain=3
      fullGain=rand(2)+100
    when "feedPatternBean" # Feed Pokémon a whole Pattern Bean
      affGain=5
      fullGain=rand(2)+100
    when "feedRainbowBean" # Feed Pokémon a whole Rainbow Bean
      affGain=125
      fullGain=rand(2)+100
    when "feedMalasada" # Feed Pokemon a malasada (SunMoon) or a Shirogi bread (ColMerc)
      fullGain=255
      affGain=5
    when "feedMalasadaDisliked"
      fullGain=255
      affGain=3
    when "feedMalasadaLiked"
      fullGain=255
      affGain=10
    when "pet" # Pet Pokemon. No spots implemented due to engine limitations.
      affGain=rand(4)+2
      enjoyGain=rand(20)+20
    else
      pbMessage(_INTL("Unknown stat-changing method."))
    end
    @amie_affection = amie_affection+affGain
    @amie_affection = [0, [amie_affection, MAXAMIEPOINTS].min].max
    @amie_fullness = amie_fullness+fullGain
    @amie_fullness = [0, [amie_fullness, MAXAMIEPOINTS].min].max
    @amie_enjoyment = amie_enjoyment+enjoyGain
    @amie_enjoyment = [0, [amie_enjoyment, MAXAMIEPOINTS].min].max
  end
  
  # Sets the Pokemon's Affection to 0.
  # Usually used when traded.
  def resetAffection
    @amie_affection = 0
  end
end

#Gets Mouse X and Y positions
class Game_Mouse
  def x
    return @x
  end
  def y
    return @y
  end
end
#Gets First NonEgg Pokemon
def pbFirstNonEggPokemon(variableNumber)
  for i in 0...$Trainer.party.length
    p = $Trainer.party[i]
    if p && !p.egg?
      pbSet(variableNumber,i)
      return $Trainer.party[i]
    end
  end
  pbSet(variableNumber,-1)
  return nil
end


def setAmieIndex(pokemonindex)
  if (pokemonindex<=$Trainer.party.length-1) &&(pokemonindex>=0)
    pbSet(AMIEINDEX,pokemonindex)
    pbSet(AMIEPOKEMON,$Trainer.party[pbGet(AMIEINDEX)])
    return
  end
  defaultAmie
end

def pbClickSprite(sprite)
  i=1
  5.times do
    sprite.zoom_x-=0.1**i
    sprite.zoom_y-=0.1**i
    i+=1
    Graphics.update
  end
  pbPlayCancelSE()
  i=1
  5.times do
    sprite.zoom_x+=0.1**i
    sprite.zoom_y+=0.1**i
    i+=1
    Graphics.update
  end
end


def setAmiePokemon(pkmn)
  pbSet(AMIEPOKEMON,pkmn)
  for i in 0...$Trainer.party.length
    if pbGet(AMIEPOKEMON) == $Trainer.party[i]
      pbSet(AMIEINDEX,i)
      return
    end
  end
  defaultAmie
end

def defaultAmie
  pbFirstNonEggPokemon(AMIEINDEX)
  pbSet(AMIEPOKEMON,$Trainer.party[pbGet(AMIEINDEX)])
end

#Lowers Fullness and Enjoyment by 1 every 50 steps
HUNGERCOUNTER=0
Events.onStepTaken+=proc {
  HUNGERCOUNTER += 1
  if HUNGERCOUNTER>=50
    for pkmn in $Trainer.party
      pkmn.changeAmieStats("walking")
    end
    HUNGERCOUNTER = 0
  end
}

class PokeBattle_Battler
  attr_accessor :amie_affection
  attr_accessor :amie_fullness
  attr_accessor :amie_enjoyment
  
# Getters - return each stat values in points
  def amie_affection
    return (@pokemon) ? @pokemon.amie_affection : 0
  end
  
  def amie_fullness
    return (@pokemon) ? @pokemon.amie_fullness : 0
  end
  
  def amie_enjoyment
    return (@pokemon) ? @pokemon.amie_enjoyment : 0
  end
  
  def getAffectionLevel
    return (@pokemon) ? @pokemon.getAmieStatLevel(@pokemon.amie_affection) : 0
  end
end

#===============================================================================
#  This class performs menu screen processing.
#-------------------------------------------------------------------------------
#  Adapted by rigbycwts for use with Pokemon-Amie for Essentials, Edited by Pizza Sun
#===============================================================================

class PokeAmie_Essentials_Scene
#-----------------------------------------------------------------------------
# * Frame Update
#-----------------------------------------------------------------------------
  def update
    # Update windows
    pbUpdateSpriteHash(@sprites)
    if @custom
      updateCustom
    else
      update_command
    end
    if (switch==1)
      pbFadeOutIn(99999) {
        pbSwitchScreen
      }
    end
    if (switch!=0)
      if @sprites["text"]!=nil
        if !@sprites["text"].disposed?
          base   = Color.new(248,248,248)
          shadow = Color.new(104,104,104)
          pkname = $Trainer.party[@partyIndex].name
          textpos1 = [
            [_INTL("Affection"),32,70,0,base,shadow],
            [_INTL("Fullness"),32,102,0,base,shadow],
            [_INTL("Enjoyment"),32,134,0,base,shadow],
            [_INTL("Select the Pokémon you'd like to play with!"),74,348,0,base,shadow],
            [pkname,70,20,0,base,shadow],
          ]
          @sprites["text"].dispose
          @sprites["text"] = BitmapSprite.new(Graphics.width,Graphics.height,@viewport)
          pbSetSystemFont(@sprites["text"].bitmap)
          pbDrawTextPositions(@sprites["text"].bitmap,textpos1)
        end
      end
    end
    if @feedshow==1
      if @sprites["feedshow"]!=nil
        if @sprites["feedshow"].disposed?
          @sprites["feedshow"] = IconSprite.new(0,0)
          @sprites["feedshow"].viewport = @viewport
          @sprites["feedshow"].setBitmap("Graphics/Pictures/Pokemon Amie/feedshow")
          @sprites["feedshow"].oy = @sprites["feedshow"].bitmap.height/2
          @sprites["feedshow"].x = @sprites["feed"].x
          @sprites["feedshow"].y = @sprites["feed"].y
          sprite = @sprites["feedshow"]
          w=sprite.bitmap.width
          sprite.zoom_x=0.2
          sprite.zoom_y=0.2
          8.times do
            #if (sprite.x+(sprite.zoom_x+0.1)*w)>=512
            #  break
            #end
            sprite.zoom_x+=0.1
            Graphics.update
          end
          4.times do
            sprite.zoom_y+=0.2
            Graphics.update
          end
        end
      else
        @sprites["feedshow"] = IconSprite.new(0,0)
        @sprites["feedshow"].viewport = @viewport
        @sprites["feedshow"].setBitmap("Graphics/Pictures/Pokemon Amie/feedshow")
        @sprites["feedshow"].oy = @sprites["feedshow"].bitmap.height/2
        @sprites["feedshow"].x = @sprites["feed"].x
        @sprites["feedshow"].y = @sprites["feed"].y
        sprite = @sprites["feedshow"]
        w=sprite.bitmap.width
        sprite.zoom_x=0.2
        sprite.zoom_y=0.2
        8.times do
          #if (sprite.x+(sprite.zoom_x+0.1)*w)>=512
          #  break
          #end
          sprite.zoom_x+=0.1
          Graphics.update
        end
        4.times do
          sprite.zoom_y+=0.2
          Graphics.update
        end
      end
      @foodnum=0
      @sprites["itemcount"]=BitmapSprite.new(Graphics.width,Graphics.height,@viewport)
      pbSetSystemFont(@sprites["itemcount"].bitmap)
      @sprites["itemcount"].bitmap.font.size=24
      @sprites["itemcount"].z=1
      for item in EATABLE_ITEMS
        if $PokemonBag.pbQuantity(item)>0
          @items[@foodnum]=item
          @sprites["food#{@foodnum}"] = ItemIconSprite.new(0,0,-1,@viewport)
          @sprites["food#{@foodnum}"].item = getID(PBItems,item)
          @sprites["food#{@foodnum}"].ox = @sprites["food#{@foodnum}"].bitmap.width/2
          @sprites["food#{@foodnum}"].oy = @sprites["food#{@foodnum}"].bitmap.height/2
          @sprites["food#{@foodnum}"].x = @sprites["food#{@foodnum}"].ox+@sprites["feed"].ox+@sprites["feed"].x+@sprites["food#{@foodnum}"].bitmap.width*@foodnum
          @sprites["food#{@foodnum}"].y = @sprites["feed"].y
          num=$PokemonBag.pbQuantity(item)
          pbDrawOutlineText(@sprites["itemcount"].bitmap,@sprites["food#{@foodnum}"].x,@sprites["food#{@foodnum}"].y,24,24,num.to_s,Color.new(248,248,248),Color.new(30,30,30),0)
          srcx = @sprites["feed"].x-@sprites["food#{@foodnum}"].x
          srcx=0 if srcx<0
          @sprites["food#{@foodnum}"].src_rect.set(srcx,0,@sprites["food#{@foodnum}"].bitmap.width,@sprites["food#{@foodnum}"].bitmap.width)
          @foodnum+=1
        end
      end
      @feedshow=3
    elsif @feedshow==2
      for item in 0...(@foodnum)
        @sprites["food#{item}"].dispose
        @sprites["itemcount"].dispose
      end
      sprite = @sprites["feedshow"]
      4.times do
        sprite.zoom_y-=0.2
        Graphics.update
      end
      8.times do
        if ((sprite.zoom_x-0.1))<=0
          break
        end
        sprite.zoom_x-=0.1
        Graphics.update
      end
      sprite.dispose
      @feedshow=0
    end
    return
  end
  def switch
    return @switch
  end
  def pbSwitchScreen
    base   = Color.new(248,248,248)
    shadow = Color.new(104,104,104)
    pkname = $Trainer.party[@partyIndex].name
    textpos1 = [
      [_INTL("Affection"),32,70,0,base,shadow],
      [_INTL("Fullness"),32,102,0,base,shadow],
      [_INTL("Enjoyment"),32,134,0,base,shadow],
      [_INTL("Select the Pokémon you'd like to play with!"),74,348,0,base,shadow],
      [pkname,70,20,0,base,shadow],
    ]
    @sprites["text"] = BitmapSprite.new(Graphics.width,Graphics.height,@viewport)
    pbSetSystemFont(@sprites["text"].bitmap)
    pbDrawTextPositions(@sprites["text"].bitmap,textpos1)
    for i in 0...($Trainer.party.length)
      pokemonIconFile = pbPokemonIconFile($Trainer.party[i])
      @sprites["pokeicon#{i}"]=PokemonIconSprite.new($Trainer.party[i],@viewport)
      @sprites["pokeicon#{i}"].ox=@sprites["pokeicon#{i}"].bitmap.width/4
      @sprites["pokeicon#{i}"].oy=@sprites["pokeicon#{i}"].bitmap.height/2
      @sprites["pokeicon#{i}"].x=68+76*i
      @sprites["pokeicon#{i}"].y=228
      @sprites["pokeicon#{i}"].z=1
    end
    index = pbGet(AMIEINDEX)+1
    @sprites["bgmap"].setBitmap("Graphics/Pictures/Pokemon Amie/bgswitch"+index.to_s)
    @sprites["pokemon"].dispose
    @sprites["switch"].dispose
    @sprites["feed"].dispose
    if @sprites["feedshow"]!=nil
      if !@sprites["feedshow"].disposed?
        @sprites["feedshow"].dispose
        @feedshow=0
      end
    end
    if @foodnum>0
      if @sprites["itemcount"]!=nil
        if !@sprites["itemcount"].disposed?
          @sprites["itemcount"].dispose
        end
      end
      for x in 0...@foodnum
        if @sprites["food#{x}"]!=nil
          if !@sprites["food#{x}"].disposed?
            @sprites["food#{x}"].dispose
          end
        end
      end
    end
    @sprites["active"] = IconSprite.new(0,0)
    @sprites["active"].viewport = @viewport
    @sprites["active"].setBitmap("Graphics/Pictures/Pokemon Amie/active")
    @sprites["active"].ox = @sprites["active"].bitmap.width/2
    @sprites["active"].oy = @sprites["active"].bitmap.height/2
    @sprites["active"].x = 68+76*(pbGet(AMIEINDEX))+24
    @sprites["active"].y = 228+24
    @sprites["active"].z=2
    #Draw Affection
    for a in 1...6
      @sprites["affect#{a}"] = IconSprite.new(0,0)
      if a<=(pbGet(AMIEPOKEMON).getAffectionLevel)
        @sprites["affect#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/affect")
      else
        @sprites["affect#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/affect_empty")
      end
      space=15
      @sprites["affect#{a}"].viewport = @viewport
      @sprites["affect#{a}"].ox=@sprites["affect#{a}"].bitmap.width/2
      @sprites["affect#{a}"].oy=@sprites["affect#{a}"].bitmap.height/2
      @sprites["affect#{a}"].x=178+@sprites["affect#{a}"].bitmap.width*a+space
      @sprites["affect#{a}"].y=87
      #Draw Fullness
      @sprites["full#{a}"] = IconSprite.new(0,0)
      if a<=(pbGet(AMIEPOKEMON).getFullnessLevel)
        @sprites["full#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/full")
      else
        @sprites["full#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/full_empty")
      end
      space=15
      @sprites["full#{a}"].viewport = @viewport
      @sprites["full#{a}"].ox=@sprites["full#{a}"].bitmap.width/2
      @sprites["full#{a}"].oy=@sprites["full#{a}"].bitmap.height/2
      @sprites["full#{a}"].x=178+@sprites["full#{a}"].bitmap.width*a+space
      @sprites["full#{a}"].y=87+32
      #Draw Enjoyment
      @sprites["enjoy#{a}"] = IconSprite.new(0,0)
      if a<=(pbGet(AMIEPOKEMON).getEnjoymentLevel)
        @sprites["enjoy#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/enjoy")
      else
        @sprites["enjoy#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/enjoy_empty")
      end
      space=15
      @sprites["enjoy#{a}"].viewport = @viewport
      @sprites["enjoy#{a}"].ox=@sprites["enjoy#{a}"].bitmap.width/2
      @sprites["enjoy#{a}"].oy=@sprites["enjoy#{a}"].bitmap.height/2
      @sprites["enjoy#{a}"].x=178+@sprites["enjoy#{a}"].bitmap.width*a+space
      @sprites["enjoy#{a}"].y=87+64
    end
    @switch=2
  end
  #-----------------------------------------------------------------------------
  def pbStartScene(pokemon, partyIndex)
    @pokemon = pokemon
    @partyIndex = partyIndex
    @sprites={}
    @counter=0 
    @foodcounter=0
    @shouldbreak = false
    @time1 = 0
    @time2 = 0
    @time3 = 0
    @switch = 0
    @feedshow=0
    @foodnum=0
    @mouse_x=nil
    @food = nil
    @feeding=false
    @items=[]
    @mask=nil
    @full=false
    #-----------------------------------------------------------------------------
    # * Main Processing
    #-----------------------------------------------------------------------------
    def main
      # Make command window
      fadein = true
      # Makes the text window
      @viewport=Viewport.new(0,0,Graphics.width,Graphics.height)
      @viewport.z=99999
      @sprites["bgmap"] = IconSprite.new(0,0)
      @sprites["bgmap"].setBitmap("Graphics/Pictures/Pokemon Amie/"+pbBackdrop)
      @sprites["bgmap"].viewport = @viewport
      @sprites["mouse"] = IconSprite.new(0,0)
      @sprites["mouse"].setBitmap("Graphics/Pictures/Pokemon Amie/hand2")
      @sprites["mouse"].z=5
      @sprites["mouse"].viewport = @viewport
      @sprites["mouse"].ox = @sprites["mouse"].bitmap.width/2 
      @sprites["mouse"].oy = @sprites["mouse"].bitmap.height/2
      @sprites["mouse"].x=$mouse.x if defined?($mouse.x)
      @sprites["mouse"].y=$mouse.y if defined?($mouse.y)
      @sprites["pokemon"]=PokemonSprite.new(@viewport)
      @sprites["pokemon"].setPokemonBitmap(@pokemon)
      @sprites["pokemon"].mirror=false
      @sprites["pokemon"].color=Color.new(0,0,0,0)
      @sprites["pokemon"].ox = @sprites["pokemon"].bitmap.width/2 
      @sprites["pokemon"].oy = @sprites["pokemon"].bitmap.height/2
      #places Pokemon at the center of screen
      @sprites["pokemon"].x=SCREEN_WIDTH/2
      @sprites["pokemon"].y = SCREEN_HEIGHT/2+30
      @sprites["pokemon"].z = 3
      @pokemon.amie_enjoyment=(@pokemon.amie_enjoyment-2)
      @sprites["switch"] = IconSprite.new(0,0)
      @sprites["switch"].setBitmap("Graphics/Pictures/Pokemon Amie/switch")
      @sprites["switch"].viewport = @viewport
      #sets switch icon to bottom right
      @sprites["switch"].ox = @sprites["switch"].bitmap.width
      @sprites["switch"].oy = @sprites["switch"].bitmap.height
      @sprites["switch"].x=SCREEN_WIDTH
      @sprites["switch"].y = SCREEN_HEIGHT
      @sprites["back"] = IconSprite.new(0,0)
      @sprites["back"].setBitmap("Graphics/Pictures/Pokemon Amie/back")
      @sprites["back"].viewport = @viewport
      #sets 'back' icon to bottom left
      @sprites["back"].oy = @sprites["back"].bitmap.height
      @sprites["back"].y = SCREEN_HEIGHT
      @sprites["feed"] = IconSprite.new(0,0)
      @sprites["feed"].setBitmap("Graphics/Pictures/Pokemon Amie/feed")
      @sprites["feed"].viewport = @viewport
      #sets switch icon to bottom right
      @sprites["feed"].ox = @sprites["feed"].bitmap.width/2
      @sprites["feed"].oy = @sprites["feed"].bitmap.height/2
      @sprites["feed"].x=50
      @sprites["feed"].y=50
      @sprites["feed"].z=2
      @custom = false            
    end
    def pbAmieMouse
      if !(@sprites["pokemon"].disposed?)&&(@feeding!=true)
        if $mouse.overPixel?(@sprites["pokemon"]) && ($mouse.leftPress?) #Pressing mouse while over Pokemon?
          #pbGet(AMIEPOKEMON).feedAmie(:ORANBERRY)
          @sprites["mouse"].setBitmap("Graphics/Pictures/Pokemon Amie/hand1")
          pbWait(1)
          if !$mouse.isStatic? #Is the mouse moving?
            @counter=@counter+1
            if ([email protected]_f)>(getPlayTime("Audio/SE/pet.ogg")) #Audio doesn't overlap
              pbSEPlay("pet.ogg",90,100)
              @time2= Time.now
            end
            if @counter>=50 #after counter reaches number, hearts appear
              pbGet(AMIEPOKEMON).changeAmieStats("pet")
              pbPlayCry(@pokemon,90,110)
              for i in 0...4 #creates the hearts
                @sprites["#{i}"] = IconSprite.new(0,0)
                @sprites["#{i}"].setBitmap("Graphics/Pictures/Pokemon Amie/heart")
                @sprites["#{i}"].viewport = @viewport
                @sprites["#{i}"].z=4
                @sprites["#{i}"].x=SCREEN_WIDTH/2+rand(70)-40
                @sprites["#{i}"].y=SCREEN_HEIGHT/2-rand(40)+30
              end
              15.times do
                for i in 0...4 #moves hearts
                  @sprites["#{i}"].x+=rand(100)/10-rand(100)/10
                  @sprites["#{i}"].y-=(rand(4)/3+1)*3
                end
                pbUpdateSpriteHash(@sprites)
                Graphics.update
              end
              for i in 0...4
                @sprites["#{i}"].dispose
              end
              Graphics.update
              @counter=0
            end
          end
        else
          @sprites["mouse"].setBitmap("Graphics/Pictures/Pokemon Amie/hand2")
        end
      end
      if !(@sprites["pokemon"].disposed?)&&(@feeding==true)
        if $mouse.overPixel?(@sprites["pokemon"]) && ($mouse.leftPress?)&&(@food!=nil)&&(([email protected]_f)>0.4)
          @foodcounter=@foodcounter+1
          @time1=Time.now
          if @foodcounter==1
            pbSEPlay("eat.ogg",90,100)
            @mask=("Graphics/Pictures/Pokemon Amie/eaten1.png")
            @foodcounter=2
          end
          if @foodcounter==3
            pbSEPlay("eat.ogg",90,100)
            @mask=("Graphics/Pictures/Pokemon Amie/eaten2.png")
            @foodcounter=4
          end
          if @foodcounter==5
            pbSEPlay("eat.ogg",90,100)
            @sprites["mouse"].setBitmap("Graphics/Pictures/Pokemon Amie/eaten3.png")
            pk=$Trainer.party[pbGet(AMIEINDEX)].species
            pbGet(AMIEPOKEMON).feedAmie(@food)
            if pk!=($Trainer.party[pbGet(AMIEINDEX)].species)
              @sprites["pokemon"].setPokemonBitmap($Trainer.party[pbGet(AMIEINDEX)])
            end
            @feeding=false
            @foodcounter=0
            @time1=0
            pbPlayCry(@pokemon,90,110)
            for i in 0...4 #creates the hearts
              @sprites["#{i}"] = IconSprite.new(0,0)
              @sprites["#{i}"].setBitmap("Graphics/Pictures/Pokemon Amie/heart")
              @sprites["#{i}"].viewport = @viewport
              @sprites["#{i}"].z=4
              @sprites["#{i}"].x=SCREEN_WIDTH/2+rand(70)-40
              @sprites["#{i}"].y=SCREEN_HEIGHT/2-rand(40)+30
            end
            15.times do
              for i in 0...4 #moves hearts
                @sprites["#{i}"].x+=rand(100)/10-rand(100)/10
                @sprites["#{i}"].y-=(rand(4)/3+1)*3
              end
              pbUpdateSpriteHash(@sprites)
              Graphics.update
            end
            for i in 0...4
              @sprites["#{i}"].dispose
            end
            @sprites["mouse"].setBitmap("Graphics/Pictures/Pokemon Amie/hand2")
            @sprites["mouse"].ox=@sprites["mouse"].bitmap.width/2
            @sprites["mouse"].oy=@sprites["mouse"].bitmap.height/2
            @mask=nil
            Graphics.update
          end
        end
        @sprites["mouse"].mask(@mask)
      end
      #moves hand picture to mouse position
      @sprites["mouse"].x=$mouse.x if defined?($mouse.x)
      @sprites["mouse"].y=$mouse.y if defined?($mouse.y)
    end
    def pbBackdrop #gets background based off location
      environ=pbGetEnvironment
      # Choose backdrop
      backdrop="Field"
      if environ==PBEnvironment::Cave
        backdrop="Cave"
      elsif environ==PBEnvironment::MovingWater || environ==PBEnvironment::StillWater
        backdrop="Water"
      elsif environ==PBEnvironment::Underwater
        backdrop="Underwater"
      elsif environ==PBEnvironment::Rock
        backdrop="Mountain"
      else
        if !$game_map || !pbGetMetadata($game_map.map_id,MetadataOutdoor)
          backdrop="IndoorA"
        end
      end
      if $game_map
        back=pbGetMetadata($game_map.map_id,MetadataBattleBack)
        if back && back!=""
          backdrop=back
        end
      end
      if $PokemonGlobal && $PokemonGlobal.nextBattleBack
        backdrop=$PokemonGlobal.nextBattleBack
      end
      # Apply graphics
      battlebg=backdrop
      return battlebg
    end
    
    #-----------------------------------------------------------------------------
    # * Frame Update (when command window is active)
    #-----------------------------------------------------------------------------
    def updateCustom
      if Input.trigger?(Input::B)
        @custom = false
        return
      end
    end
  
    def update_command
      
      # If B button was pressed
      if Input.trigger?(Input::B)
        if switch==0
          pbPlayCancelSE()
          @shouldbreak=true #ends scene loop and starts to end scene
        else
          pbPlayCancelSE()
          @switch=0
          pbFadeOutIn(99999) {
            pbDisposeSpriteHash(@sprites)
            @viewport.dispose
            main
          }
        end
      end
      if (@sprites["textbox"]!=nil)
        if !@sprites["textbox"].disposed?
          if $mouse.click?(@sprites["textbox"])
            setAmieIndex(@partyIndex)
            @pokemon=pbGet(AMIEPOKEMON)
            pbClickSprite(@sprites["textbox"])
            @switch=0
            pbFadeOutIn(99999) {
              pbDisposeSpriteHash(@sprites)
              @viewport.dispose
              main
            }
          end
        end
      end
      if !@sprites["switch"].disposed?
        if $mouse.click?(@sprites["switch"]) #clicks on switch sprite
          pbClickSprite(@sprites["switch"])
          @switch=1
        end
      end
      if @sprites["feedshow"]!=nil
        if !@sprites["feedshow"].disposed?
          if ($mouse.leftPress?)&&(!$mouse.overPixel?(@sprites["feed"]))&&($mouse.overPixel?(@sprites["feedshow"]))
            if (@mouse_x!=nil)
              dx=$mouse.x-@mouse_x
              if ((@sprites["food#{@foodnum-1}"].x+@sprites["food#{@foodnum-1}"].bitmap.width+dx)<=512)
                dx=0
              end
              lx=@sprites["food0"].ox+@sprites["feed"].ox+@sprites["feed"].x
              if ((@sprites["food#{0}"].x+dx)>=lx)
                dx=0
              end
              @sprites["itemcount"].bitmap.clear
              for x in 0...@foodnum
                @sprites["food#{x}"].x += dx
                srcx = @sprites["feed"].x-@sprites["food#{x}"].x+40
                srcx=0 if srcx<0
                @sprites["food#{x}"].src_rect.set(srcx,0,@sprites["food#{x}"].bitmap.width,@sprites["food#{x}"].bitmap.width)
                num=$PokemonBag.pbQuantity(@items[x])
                if @sprites["feed"].x<@sprites["food#{x}"].x
                  pbDrawOutlineText(@sprites["itemcount"].bitmap,@sprites["food#{x}"].x,@sprites["food#{x}"].y,24,24,num.to_s,Color.new(248,248,248),Color.new(30,30,30),0)
                end
              end
            end
          end
        end
      end
      @mouse_x=$mouse.x
      if (!$mouse.leftPress?)&&(@feeding==true)
        @foodcounter=0
        @mask=nil
        @feeding=false
      end
      if @sprites["feedshow"]!=nil
        if (!$mouse.leftPress?)or(!$mouse.isStatic?)
          @time1=Time.now
        end
        if ($mouse.isStatic?)&&(([email protected]_f)>0.8)&&(!@sprites["feedshow"].disposed?)
          for x in 0...@foodnum
            if $mouse.leftPress?(@sprites["food#{x}"])
              if (@pokemon.getFullnessLevel==5)
                @full=true
                @time3=Time.now
                pbDrawOutlineText(@sprites["itemcount"].bitmap,SCREEN_WIDTH/2-64,@sprites["feed"].x+30,128,32,@pokemon.name+" is full!",Color.new(248,248,248),Color.new(30,30,30),0)
                break
              end
              @sprites["mouse"].setBitmap(pbItemIconFile(getID(PBItems,@items[x])))
              @sprites["mouse"].ox=@sprites["mouse"].bitmap.width/2
              @sprites["mouse"].oy=@sprites["mouse"].bitmap.height/2
              @food=@items[x]
              @feeding=true
              @feedshow=2
            end
          end
        end
        if @full==true && (([email protected]_f)>0.5)
          @full=false
          if @sprites["feedshow"]!=nil
            if !@sprites["feedshow"].disposed?
              @sprites["itemcount"].bitmap.clear
              for x in 0...@foodnum
                num=$PokemonBag.pbQuantity(@items[x])
                pbDrawOutlineText(@sprites["itemcount"].bitmap,@sprites["food#{x}"].x,@sprites["food#{x}"].y,24,24,num.to_s,Color.new(248,248,248),Color.new(30,30,30),0)
              end
            end
          end
        end
      end
      if !@sprites["feed"].disposed?
        if $mouse.click?(@sprites["feed"])&&!$mouse.long?(Input::Mouse_Left) #clicks on feed sprite
          if @feedshow==3
            pbClickSprite(@sprites["feed"])
            @feedshow=2
          end
          if @feedshow==0
            pbClickSprite(@sprites["feed"])
            @feedshow=1
          end
        end
      end
      if $mouse.click?(@sprites["back"])
        pbClickSprite(@sprites["back"])
        if switch==0
          @shouldbreak=true #ends scene loop and starts to end scene
        else
          @switch=0
          pbFadeOutIn(99999) {
            pbDisposeSpriteHash(@sprites)
            @viewport.dispose
            main
          }
        end
      end
      for i in 0...($Trainer.party.length)
        if (@sprites["pokeicon#{i}"]==nil)
          break
        end
        if @sprites["pokeicon#{i}"].disposed?
          break
        end
        if $mouse.click?(@sprites["pokeicon#{i}"])
          @partyIndex = i
          for a in 1...6
            if a<=$Trainer.party[@partyIndex].getAffectionLevel
              @sprites["affect#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/affect")
            else
              @sprites["affect#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/affect_empty")
            end
            space=15
            @sprites["affect#{a}"].viewport = @viewport
            @sprites["affect#{a}"].ox=@sprites["affect#{a}"].bitmap.width/2
            @sprites["affect#{a}"].oy=@sprites["affect#{a}"].bitmap.height/2
            @sprites["affect#{a}"].x=178+@sprites["affect#{a}"].bitmap.width*a+space
            @sprites["affect#{a}"].y=87
            #Draw Fullness
            if a<=($Trainer.party[@partyIndex].getFullnessLevel)
              @sprites["full#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/full")
            else
              @sprites["full#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/full_empty")
            end
            space=15
            @sprites["full#{a}"].viewport = @viewport
            @sprites["full#{a}"].ox=@sprites["full#{a}"].bitmap.width/2
            @sprites["full#{a}"].oy=@sprites["full#{a}"].bitmap.height/2
            @sprites["full#{a}"].x=178+@sprites["full#{a}"].bitmap.width*a+space
            @sprites["full#{a}"].y=87+32
            #Draw Enjoyment
            if a<=($Trainer.party[@partyIndex].getEnjoymentLevel)
              @sprites["enjoy#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/enjoy")
            else
              @sprites["enjoy#{a}"].setBitmap("Graphics/Pictures/Pokemon Amie/enjoy_empty")
            end
            space=15
            @sprites["enjoy#{a}"].viewport = @viewport
            @sprites["enjoy#{a}"].ox=@sprites["enjoy#{a}"].bitmap.width/2
            @sprites["enjoy#{a}"].oy=@sprites["enjoy#{a}"].bitmap.height/2
            @sprites["enjoy#{a}"].x=178+@sprites["enjoy#{a}"].bitmap.width*a+space
            @sprites["enjoy#{a}"].y=87+64
          end
          if ($Trainer.party[@partyIndex].egg?)
            if @sprites["textbox"]!=nil
              if !@sprites["textbox"].disposed?
                @sprites["textbox"].dispose
                @sprites["overlay"].dispose
              end
            end
          end
          if (pbGet(AMIEINDEX)!=i)&&(!$Trainer.party[@partyIndex].egg?)
            if (@sprites["textbox"]==nil)or(@sprites["textbox"].disposed?)
              @sprites["textbox"] = IconSprite.new(96,281)
              @sprites["textbox"].setBitmap("Graphics/Pictures/Pokemon Amie/textbox")
              @sprites["textbox"].viewport = @viewport
              @sprites["textbox"].x+=@sprites["textbox"].bitmap.width/2
              @sprites["textbox"].y+=@sprites["textbox"].bitmap.height/2
              @sprites["textbox"].ox=@sprites["textbox"].bitmap.width/2
              @sprites["textbox"].oy=@sprites["textbox"].bitmap.height/2
              base   = Color.new(64,64,64)
              shadow = Color.new(176,176,176)
              tx=@sprites["textbox"].x
              ty=@sprites["textbox"].y-3*@sprites["textbox"].oy/4
              textpos = [
                [_INTL("Switch Pokémon!"),tx,ty,2,base,shadow],
              ]
              @sprites["overlay"] = BitmapSprite.new(Graphics.width,Graphics.height,@viewport)
              pbSetSystemFont(@sprites["overlay"].bitmap)
              pbDrawTextPositions(@sprites["overlay"].bitmap,textpos)
            end
          end
          if (pbGet(AMIEINDEX)==i)
            if !(@sprites["textbox"]==nil)
              if !@sprites["textbox"].disposed?
                @sprites["textbox"].dispose
                @sprites["overlay"].dispose
              end
            end
          end

          index = i+1
          @sprites["bgmap"].setBitmap("Graphics/Pictures/Pokemon Amie/bgswitch"+index.to_s)
        end
      end
    end
    def break?
      return @shouldbreak
    end
    main
  end
  
  def pbEndScene
      # Disposes the windows
      pbDisposeSpriteHash(@sprites)
      @viewport.dispose
  end
end
  

class PokeAmie_EssentialsScreen
  def initialize(scene)
    @scene=scene
  end
  
  def pbStartAmie(pokemon, partyIndex)
    @scene.pbStartScene(pokemon, partyIndex)
    $mouse.hide
    # Main loop
    loop do
      # Update game screen
      Graphics.update
      # Update input information
      Input.update
      # Frame update
      @scene.update
      # Mouse Check
      @scene.pbAmieMouse
      # Abort loop 
      if @scene.break?
        break
      end
    end
    pbFadeOutIn(99999) { 
      @scene.pbEndScene
    }
    $mouse.show
  end
end

def pokemonAmieRefresh
  setAmiePokemon(pbGet(AMIEPOKEMON))
  pbFadeOutIn(99999) { 
    scene = PokeAmie_Essentials_Scene.new
    screen = PokeAmie_EssentialsScreen.new(scene)
    screen.pbStartAmie(pbGet(AMIEPOKEMON),pbGet(AMIEINDEX))
  }
end
  
#------------------------------------------------------------------------------#

Accessibility:
1. Anywhere:-
Call the below code in an event-

Code:

pokemonAmieRefresh

2. PokeGear:-

Goto class PokemonPokegearScreen
Add after cmdJukebox = -1
Code:
```
    cmdPokeref = -1
```

Add after commands[cmdJukebox = commands.length] = ["jukebox",_INTL("Jukebox")]

Code:

    commands[cmdPokeref = commands.length] = ["pokemonamie",_INTL("Pokemon Amie")] if $Trainer.party.length>0

Add after

Code:

elsif cmdJukebox>=0 && cmd==cmdJukebox
        pbFadeOutIn {
          scene = PokemonJukebox_Scene.new
          screen = PokemonJukeboxScreen.new(scene)
          screen.pbStartScreen
        }

Code:

        elsif cmdPokeref>=0 && cmd==cmdPokeref
        pbPlayDecisionSE()
       pokemonAmieRefresh

3. Pokemon Follow by Mej71
Will be made when Pokemon Follow get a v18 upgrade.
4. Evolve Eevee into Sylveon based on Affection

Search in Pokemon_Evolution- when PBEvolution::HappinessMoveType
And replace the second line- if pokemon.happiness>=220
With- if pokemon.getAffectionLevel>=3

Credits:

BhagyaJyoti (Made for v18 with many fixes and made more Plug-n-Play)
PizzaSun (Original Script for v17.2)
rigbycwts (Concept for Essentials)

getting this error

---------------------------
Pokemon Essentials
---------------------------
[Pokémon Essentials version 18.1.dev]

Exception: NoMethodError

Message: undefined method `x' for nil:NilClass

Backtrace:

Amie:1151:in `update_command'

Amie:669:in `update'

Amie:1357:in `pbStartAmie'

Amie:1351:in `loop'

Amie:1364:in `pbStartAmie'

Amie:1377:in `pokemonAmieRefresh'

Amie:1374:in `pbFadeOutIn'

Amie:1374:in `pokemonAmieRefresh'

PScreen_PauseMenu:135

PScreen_PauseMenu:134:in `call'

This exception was logged in

C:\Users\USERNAME\Saved Games\Pokemon Essentials\errorlog.txt.

Press Ctrl+C to copy this message to the clipboard.
---------------------------
OK
---------------------------

P-Plum · Feb 19, 2021

I love this script, however it seems I'm unable to actually feed the Pokemon the food/berries. I try and drag it down and nothing happens. I can pet it, though.

भाग्य ज्योति · Feb 27, 2021

YashPokeFan123 said:
Spoiler:

getting this error

---------------------------
Pokemon Essentials
---------------------------
[Pokémon Essentials version 18.1.dev]

Exception: NoMethodError

Message: undefined method `x' for nil:NilClass

Backtrace:

Amie:1151:in `update_command'

Amie:669:in `update'

Amie:1357:in `pbStartAmie'

Amie:1351:in `loop'

Amie:1364:in `pbStartAmie'

Amie:1377:in `pokemonAmieRefresh'

Amie:1374:in `pbFadeOutIn'

Amie:1374:in `pokemonAmieRefresh'

PScreen_PauseMenu:135

PScreen_PauseMenu:134:in `call'

This exception was logged in

C:\Users\USERNAME\Saved Games\Pokemon Essentials\errorlog.txt.

Press Ctrl+C to copy this message to the clipboard.
---------------------------
OK
---------------------------

The script has been made for v18, and not 18.1.dev. Maybe the problem lies here. Might update this script after my exams.

भाग्य ज्योति · Feb 27, 2021

P-Plum said:
I love this script, however it seems I'm unable to actually feed the Pokemon the food/berries. I try and drag it down and nothing happens. I can pet it, though.

Click on the berries for a few seconds until your mouse icon changes to that berry. Now drag the mouse to the pokemon (in the pixels of pokemon, try the mouth) and wait a few more seconds. The pokemon will eat the berry in 2 bites, and after that, your mouse will turn into the default hand.

atuburapaler · Apr 15, 2021

Looks like it's not compatible with EBS DX animated sprites

[PokeCommunity.com] POKEMON AMIE/REFRESH [ESSENTIALS V18]

भाग्य ज्योति · Apr 16, 2021

atuburapaler said:
Looks like it's not compatible with EBS DX animated sprites

It will soon be updated.

REALMUGEN · Jun 30, 2021

Hello everybody.

Very nice Script, I definitely add it to my project.

Am I the only one getting an error when I try to clic the object panel when none are available?

Pokeminer20 · Jul 1, 2021

REALMUGEN said:
Hello everybody.

Very nice Script, I definitely add it to my project.

Am I the only one getting an error when I try to clic the object panel when none are available?

if you're trying to use this script without a pokemon in your party, then it means you have committed brain fart. Which Pokemon are you trying to interact with exactly?

REALMUGEN · Jul 1, 2021

Pokeminer20 said:
if you're trying to use this script without a pokemon in your party, then it means you have committed brain fart. Which Pokemon are you trying to interact with exactly?

Excuse me if I confuse you, was a traslation issue (english is not my native language).

What I'm trying to say is that if you don't have more available items to give to the Pokemon and we clic the bar, the game throws an error.

doctorCatster · Dec 16, 2022

Was wondering, does this work for v20.1?

Gardenette · Dec 19, 2023

I need this for my project which is in v20.1 so I'm going to update it to use it.
Is it alright if I share the love by posting it on RelicCastle as long as I credit everyone in your credits for the v18 version?

BhagyaJyoti (Made for v18 with many fixes and made more Plug-n-Play)
PizzaSun (Original Script for v17.2)
rigbycwts (Concept for Essentials)

BiggusWeeabus · Dec 23, 2023

Gardenette said:
I need this for my project which is in v20.1 so I'm going to update it to use it.
Is it alright if I share the love by posting it on RelicCastle as long as I credit everyone in your credits for the v18 version?

BhagyaJyoti (Made for v18 with many fixes and made more Plug-n-Play)

PizzaSun (Original Script for v17.2)

rigbycwts (Concept for Essentials)

I believe it's generally fine to update a script with credit if the creator of the original script is in radio silence for a lot of time

Gardenette · Dec 23, 2023

BiggusWeeabus said:
I believe it's generally fine to update a script with credit if the creator of the original script is in radio silence for a lot of time

Cool
(broken link removed)
Just waiting on approval then

POKEMON AMIE/REFRESH [ESSENTIALS V18]

More options

BiggusWeeabus

YashPokeFan123

#PokeFan

P-Plum

भाग्य ज्योति

भाग्य ज्योति

atuburapaler

भाग्य ज्योति

REALMUGEN

Pokeminer20

PDM20, Coder of Chaos!

REALMUGEN

doctorCatster

Gardenette

BiggusWeeabus

Gardenette