class Sprite_DarkLamp < Sprite
  attr_accessor :x0 
  attr_accessor :y0 
  attr_reader :r
  attr_accessor :color1
  attr_accessor :color2

  attr_accessor :timer_pt 
  attr_reader   :ptimer  
  attr_reader   :lamp_type  
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化 #lamp_type = 1でtimerあり,0でtimerはなし
  #--------------------------------------------------------------------------
  def initialize(viewport,character,lamp_type)
    super(viewport)
    @character = character
    @x0 = 0
    @y0 = 0
    @ptimer = 0
    @lamp_type　= lamp_type
    @timer_pt   = 20
    @reduce_degree = $data_lamp_reduce_degree
    @min_r = $data_lamp_min_r
#~     @max_r = get_radius($data_lamp_Cache_num )
    @around_lamp_sprites = []

#~     @character.lamp_timer = @timer_pt * ((@r - @min_r) / @reduce_degree )
    @circle_ratio = 1.0
    update    
    create_bitmap
    update_position
    create_around_bitmaps
    update_around_bitmap
    
  end 
  #--------------------------------------------------------------------------
  # ● スプライトの作成
  #--------------------------------------------------------------------------
  def create_bitmap
#~     bitmap = Bitmap.new(Graphics.width * 2  , Graphics.height * 2 ) 
#~     make_dark_lamp_bmp(bitmap, @x0 , @y0 , @r , @color1)
    self.bitmap = Cache.load_Cache_lamp_bitmap(0)
    self.zoom_x = @circle_ratio
    self.zoom_y = @circle_ratio   
    update_circleorigin
    self.z = 1
  end  

  
  #--------------------------------------------------------------------------
  # ● バフスプライトの作成
  #--------------------------------------------------------------------------
  def create_around_bitmap(index)
    color = Color.new(0,0,0) 
#~     return unless self.bitmap
#~     bmp = Cache.load_Cache_lamp_bitmap(0)
    @around_lamp_sprite =  Sprite_DarkLampAround.new(@viewport1,@character,self.bitmap.width,self.bitmap.height,color,index)
  end   
  
  def create_around_bitmaps
    @around_lamp_sprites = [0,1,2,3].collect do |i|    
      create_around_bitmap(i )
    end
  end

  #--------------------------------------------------------------------------
  # ● 解放
  #--------------------------------------------------------------------------
  def dispose
#~     bitmap.dispose if bitmap
    dispose_around_bitmap
    super
  end  
  def dispose_around_bitmap

    @around_lamp_sprites.each {|sprite| sprite.dispose }
  end 
  
  def update_around_bitmap
    @around_lamp_sprites.each do |sprite|
      sprite.update 
      sprite.visible = self.visible
    end
  end  
  
  def update_around_bitmap_psprite_info
    
    @around_lamp_sprites.each do |sprite| 
      sprite.update_psprite_info(self.bitmap.width,self.bitmap.height,@circle_ratio) 

    end  
  end  
  def update_around_bitmap_updatebmp
    @around_lamp_sprites.each do |sprite| 
      sprite.update_bmp

    end  
  end    
  def change_lamp_type(lamp_type)
    @lamp_type = lamp_type

 
  end 
  #--------------------------------------------------------------------------
  # ● 位置の更新
  #--------------------------------------------------------------------------
  def update_position
    update_circleorigin

    self.ox = @x0 - (@character.screen_x / @circle_ratio)
    self.oy = @y0 - ((@character.screen_y - 12 )/ @circle_ratio )

#~     self.z = @character.screen_z
  end  
  #--------------------------------------------------------------------------
  # ● 転送元ビットマップの更新
  #--------------------------------------------------------------------------
  def update_bitmap
    create_bitmap
  end   
  #--------------------------------------------------------------------------
  # ● 転送元ビットマップの更新
  #--------------------------------------------------------------------------
  def update_radius

    if increase_timer? || (@character.lamp_timer > 0 && check_timer) || (@ptimer > 0 && @character.lamp_timer == 0)
#~       change_radius

      update_circleratio  
      update_bitmap
      
#~       update_circleorigin 
#~       update_around_bitmap_psprite_info
#~       update_around_bitmap
#~       update_around_bitmap_updatebmp
    end 
    update_position
    
    
  end     
  
  def update_circleorigin
    return unless self.bitmap
    @x0 = self.bitmap.width / 2
    @y0 = self.bitmap.height / 2    
  end  

  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
    super
#~     update_bitmap
  
    update_radius
    update_around    
    update_timer  
#~     update_position

#~     update_visibility
  end
  
  def update_around
    update_around_bitmap_psprite_info
    update_around_bitmap
    update_around_bitmap_updatebmp      
  end  
  
  def update_circleratio
    @circle_ratio = get_radius_ratio(rtimer)
  end  
  #--------------------------------------------------------------------------
  # ● 転送元ビットマップの更新
  #--------------------------------------------------------------------------
  def update_timer
    @ptimer = @character.lamp_timer
    return unless @lamp_type
    @character.lamp_timer -= 1 if @character.lamp_timer > 0
    
  end     
  def check_timer
    @character.lamp_timer % @timer_pt == 0
    
  end   
  
  def rtimer
   [@character.lamp_timer / @timer_pt , $data_lamp_max_num].min
  end  
  
  def get_radius_ratio(index)
    1.0 + @reduce_degree * index * 1.0 / @min_r 

  end
  #タイマーが増加したか
  def increase_timer?
    return false unless @ptimer
    
    @ptimer < @character.lamp_timer
  end  
    
end