#===============================================================================
# € Simple Map Clock by KleinStudio
#===============================================================================
# Positions
#===============================================================================
# Clock
CLOCKX=0
CLOCKY=740

# Menu button
MENUX=30
MENUY=680

# Debug
DEBUGX=360
DEBUGY=680
#===============================================================================

FADEIN=0
FADEOUT=1

class Scene_Map

  alias _sceneMiniUpdate miniupdate

  def miniupdate
    _sceneMiniUpdate
    updateClockmini if @clockrendered
  end

  def createSpritesets
    @spritesets={}
    clockRender if $Trainer
    for map in $MapFactory.maps
     @spritesets[map.map_id]=Spriteset_Map.new(map)
    end
    $MapFactory.setSceneStarted(self)
    updateSpritesets
  end

  def disposeSpritesets
   return if !@spritesets
    clockDispose if @clockrendered
    for i in @spritesets.keys
      if @spritesets[i]
        @spritesets[i].dispose
        @spritesets[i]=nil
      end
    end
    @spritesets.clear
    @spritesets={}
  end


  def main
    createSpritesets
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      clockUpdate if @clockrendered
     if $scene != self
        break
      end
    end
    Graphics.freeze
    disposeSpritesets
    if $game_temp.to_title
      Graphics.transition
      Graphics.freeze
    end
  end


  def clockRender
    @sprites= {}
    @fade=false

    @sprites["bg"]=Sprite.new(@viewport)
    @sprites["bg"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/Clock/clockbg")
    @sprites["bg"].y=400

    @sprites["clock"]=Sprite.new(@viewport)
    @sprites["clock"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/Clock/clockback")
    @sprites["clock"].x=CLOCKX
    @sprites["clock"].y=CLOCKY
    @sprites["clock"].opacity=240

    @sprites["menu"]=Sprite.new(@viewport)
    @sprites["menu"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/Clock/clockmenu")
    @sprites["menu"].x=MENUX
    @sprites["menu"].y=MENUY
    @sprites["menu"].opacity=240
    @sprites["menu"].visible=!($game_system.menu_disabled)

#============================ICONOS================================================
    for i in 0...$Trainer.party.length
      if i > 0
        @coordenada_x+=80
      else
        @coordenada_x=0
      end
      @sprites["pkm#{i}"]=PokemonIconSprite.new($Trainer.party[i],@viewport)
      @sprites["pkm#{i}"].x=30+@coordenada_x
      @sprites["pkm#{i}"].y=420
    end
#============================ICONOS================================================
    if $DEBUG
    @sprites["debug"]=Sprite.new(@viewport)
    @sprites["debug"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/Clock/clockdebug")
    @sprites["debug"].x=DEBUGX
    @sprites["debug"].y=DEBUGY
    @sprites["debug"].opacity=240
    end

    @oldhour=Time.now.hour
    @oldmin=Time.now.min

    @hour=sprintf("%02d",Time.now.hour)
    @hour0=@hour[0,1].to_i
    @hour1=@hour[1,2].to_i
    @min=sprintf("%02d",Time.now.min)
    @min0=@min[0,1].to_i
    @min1=@min[1,2].to_i

    clockbitmap=BitmapCache.load_bitmap("Graphics/Pictures/Clock/clocknum")
    @clockw=clockbitmap.width
    @clockh=clockbitmap.height/10

    @sprites["hour0"]=IconSprite.new(CLOCKX+7,CLOCKY+10,@viewport)
    @sprites["hour0"].bitmap=clockbitmap.clone
    @sprites["hour0"].src_rect.set(0,@clockh*@hour0,@clockw,@clockh)
    @sprites["hour1"]=IconSprite.new(CLOCKX+21,CLOCKY+10,@viewport)
    @sprites["hour1"].bitmap=clockbitmap.clone
    @sprites["hour1"].src_rect.set(0,@clockh*@hour1,@clockw,@clockh)

    @sprites["min0"]=IconSprite.new(CLOCKX+46,CLOCKY+10,@viewport)
    @sprites["min0"].bitmap=clockbitmap.clone
    @sprites["min0"].src_rect.set(0,@clockh*@min0,@clockw,@clockh)
    @sprites["min1"]=IconSprite.new(CLOCKX+62,CLOCKY+10,@viewport)
    @sprites["min1"].bitmap=clockbitmap.clone
    @sprites["min1"].src_rect.set(0,@clockh*@min1,@clockw,@clockh)

    @sprites["black"]=Sprite.new(@viewport)
    @sprites["black"].bitmap=BitmapCache.load_bitmap("Graphics/Pictures/blackscreen")
    @sprites["black"].y=400
    @sprites["black"].visible=false
    @sprites["black"].opacity=150


    $CLOCKBLACK=@sprites["black"]
    @clockrendered=true
  end

  def clockToneScreen(value)
    @clocktonescreen=value
  end

  def clockDispose
    pbDisposeSpriteHash(@sprites)
  end

  def clockUpdate
    if !$game_system.map_interpreter.running? or !$game_temp.message_window_showing
      enableClock
    end

     updateHour
     if $mouse.leftClick?(@sprites["menu"]) && !clockDisabled?
      unless pbMapInterpreterRunning? or $game_system.menu_disabled or $game_player.moving?
        clockButtonAnim(@sprites["menu"])
        $game_temp.menu_calling = true
        $game_temp.menu_beep = true
      end
    end

    if $DEBUG && !clockDisabled?
     if $mouse.leftClick?(@sprites["debug"])
        clockButtonAnim(@sprites["debug"])
        pbFadeOutIn(99999) {
           pbDebugMenu
        }
     end
   end

  end

  def updateClockmini
    updateHour
    updateIcons
  end

  def updateIcons
    for i in 0...$Trainer.party.length
      if i > 0
        @coordenada_x+=80
      else
        @coordenada_x=0
      end
      @sprites["pkm#{i}"]=PokemonIconSprite.new($Trainer.party[i],@viewport)
      @sprites["pkm#{i}"].x=30+@coordenada_x
      @sprites["pkm#{i}"].y=420
    end
  end

  def updateHour
      if $game_system.map_interpreter.running? or $game_temp.message_window_showing
      disableClock
      end

      if Time.now.hour!=@oldhour
       @hour=sprintf("%02d",Time.now.hour)
       @hour0=@hour[0,1].to_i
       @hour1=@hour[1,2].to_i
       @sprites["hour0"].src_rect.set(0,@clockh*@hour0,@clockw,@clockh)
       @sprites["hour1"].src_rect.set(0,@clockh*@hour1,@clockw,@clockh)
     end
    if Time.now.min!=@oldmin
       @min=sprintf("%02d",Time.now.min)
       @min0=@min[0,1].to_i
       @min1=@min[1,2].to_i
       @sprites["min0"].src_rect.set(0,@clockh*@min0,@clockw,@clockh)
       @sprites["min1"].src_rect.set(0,@clockh*@min1,@clockw,@clockh)
     end
  end

end

def pbDoorTone1(tone=Tone.new(-255,-255,-255,0),duration=6)
  $game_screen.start_tone_change(tone,duration * 2)
  for picture in $game_screen.pictures
    picture.start_tone_change(tone,duration * 2) if picture
  end
  #$scene.clockToneScreen(FADEIN)
end

def pbDoorTone2(tone=Tone.new(0,0,0,0),duration=6)
  $game_screen.start_tone_change(tone,duration * 2)
  for picture in $game_screen.pictures
    picture.start_tone_change(tone,duration * 2) if picture
  end
  #$scene.clockToneScreen(FADEOUT)
end