v19 Fixed Sweet Scent v1.0

def pbSweetScent
  #if $game_screen.weather_type != :None
  #  pbMessage(_INTL("The sweet scent faded for some reason..."))
  #  return
  #end
 
  #play the se for sweet scent
  pbSEPlay("Anim/Sweet Scent")
 
  viewport = Viewport.new(0,0,Graphics.width,Graphics.height)
  viewport.z = 999999
  count = 0
  viewport.color.red   = 255
  viewport.color.green = 105
  viewport.color.blue  = 180
  #was alphaDiff = 12 * 20 / Graphics.frame_rate
  #changed from 12 to 4 to slow down the animation
  alphaDiff = 4 * 20 / Graphics.frame_rate
  loop do
    if count==0 && viewport.color.alpha<128
      viewport.color.alpha += alphaDiff
    elsif count>Graphics.frame_rate/4
      viewport.color.alpha -= alphaDiff
      break if viewport.color.alpha<=0
    else
      count += 1
    end
    Graphics.update
    Input.update
    pbUpdateSceneMap

   
   
   
  end
  viewport.dispose
  enctype = $PokemonEncounters.encounter_type
  if !enctype || !$PokemonEncounters.encounter_possible_here? ||
     !pbEncounter(enctype)
    pbMessage(_INTL("There appears to be nothing here..."))
  end
end