人物阴影脚本出现BUG，求救

CCD0645

阴影脚本

RUBY 代码复制

#使用方法：不透明的物体在光源旁边会产生一个阴影。
 
#所以，在光源的事件里面（例如火），请在第一页加上一个注释“s”（请不要带引号）
 
#然后将此脚本命名为“人物阴影”插入到main上方即可。
 
 
#==============================================================================
 
# ■ 阴影精灵 (渐变精灵 )
 
# 以 Genzai Kawakami的阴影脚本为基础, 
#  Rataime为其重写和更新， 
#  Boushy 为其添加附属功能
 
#  精灵使者汉化
 
#==============================================================================
 
 
CATERPILLAR_COMPATIBLE = true
 
 
class Game_Party
 
attr_reader :characters
 
end
 
 
class Sprite_Shadow < RPG::Sprite
 
 
attr_accessor :character
 
 
def initialize(viewport, character = nil,source = nil,anglemin=0,anglemax=0,distancemax=0)
 
   super(viewport)
 
   @anglemin=anglemin.to_f
 
   @anglemax=anglemax.to_f
 
   @distancemax=distancemax.to_f
 
   @character = character
 
   @source = source
 
   update
 
end
 
 
def update
 
   super
 
 
   if (@tile_id != @character.tile_id or
 
      @character_name != @character.character_name or
 
      @character_hue != @character.character_hue)# and ( @character.screen_x >= 0 and  @character.screen_x <=640 and  @character.screen_y>=0 and  @character.screen_y <= 480)
 
     @tile_id = @character.tile_id
 
     @character_name = @character.character_name
 
     @character_hue = @character.character_hue
     if   @character_name.include?("AC") and  not   @character_name.include?("=4")
            if @character.direction == 4
      self.mirror = false
    else
       self.mirror = true
     end
     else
            if @character.direction == 4
      self.mirror = true
    else
       self.mirror = false
     end
     end 
     if @tile_id >= 384
 
       self.bitmap = RPG::Cache.tile($game_map.tileset_name,
 
         @tile_id, @character.character_hue)
 
       self.src_rect.set(0, 0, 32, 32)
 
       self.ox = 16
 
       self.oy = 32
 
     else
 
       self.bitmap = RPG::Cache.character(@character.character_name,
 
         @character.character_hue)
 
       @cw = bitmap.width / 4
 
       @cw = bitmap.width / 4 
    if not   @character_name.include?("=4")
       @ch = bitmap.height / 4 
     else
       @ch = bitmap.height / 4
       end
 
 
       self.ox = @cw / 2
 
       self.oy = @ch
 
     end
 
   end
 
   self.visible = (not @character.transparent)
 
    if @tile_id == 0
      # 设置传送目标的矩形
    if not   @character_name.include?("=4")
      if @character.pattern >= 4
      sx = (@character.pattern - 4) * @cw
        else
      sx = @character.pattern * @cw
    end
      if @character.pattern >= 4
        sy = (4 - 2) / 2 * @ch  
       else
      sy = (2 - 2) / 2 * @ch 
      end
      self.src_rect.set(sx, sy, @cw, @ch)
    else
            sx = @character.pattern * @cw
      sy = (@character.direction - 2) / 2 * @ch
      self.src_rect.set(sx, sy, @cw, @ch)
      end
    end
 
   self.x = @character.screen_x
 
   self.y = @character.screen_y-5
 
   self.z = @character.screen_z(@ch)-1
 
   self.opacity = @character.opacity
 
   self.blend_type = @character.blend_type
 
   self.bush_depth = @character.bush_depth
 
   #if @character.animation_id != 0
 
     #animation = $data_animations[@character.animation_id]
 
    # animation(animation, true)
 
    # @character.animation_id = 0
 
   #end
 
   @deltax=@source.x-self.x
 
   @deltay= @source.y-self.y
 
   self.angle = 57.3*Math.atan2(@deltax, @deltay )
 
   @angle_trigo=self.angle+90
 
   if @angle_trigo<0
 
     @angle_trigo=360+@angle_trigo
 
   end
 
   self.color = Color.new(0, 0, 0)
 
   @distance = ((@deltax ** 2) + (@deltay ** 2))
 
   if$game_map.shadows==-1
 
     self.opacity = 0 
   else
 
     self.opacity = 1200000/(@distance+6000)    
   end
 
   if @character.screen_x >= 640 or @character.screen_x <= 0 or @character.screen_y >= 480 or @character.screen_y <= 0
   self.opacity = 0 
     end   
 
   @distance = @distance ** 0.5
 
   if @distancemax !=0 and @distance>=@distancemax
 
     self.opacity=0
 
   end
 
   if @anglemin !=0 or @anglemax !=0
 
      if (@angle_trigo<@anglemin or @angle_trigo>@anglemax) and @anglemin<@anglemax
 
        self.opacity=0
 
      end
 
      if (@angle_trigo<@anglemin and @angle_trigo>@anglemax) and @anglemin>@anglemax
 
        self.opacity=0
 
      end     
 
   end
 
end
 
end
 
 
#===================================================
 
# ■ 重定义 Sprite_Character
 
#===================================================
 
 
class Sprite_Character < RPG::Sprite
 
alias shadow_initialize initialize
 
 
def initialize(viewport, character = nil)
 
   @character = character
  # @character = nil
   super(viewport)
 
   @ombrelist=[]
 
   if (character.is_a?(Game_Event) and character.list!=nil and character.list[0].code == 108 and character.list[0].parameters == ["s"])
 
     if (character.list[1]!=nil and character.list[1].code == 108)
 
       @anglemin=character.list[1].parameters[0]
 
     end
 
     if (character.list[2]!=nil and character.list[2].code == 108)
 
       @anglemax=character.list[2].parameters[0]
 
     end
 
     if (character.list[3]!=nil and character.list[3].code == 108)
 
       @distancemax=character.list[3].parameters[0]
 
     end  
 
    for i in $game_map.events.keys.sort
 
     if ($game_map.events[i].is_a?(Game_Event) and not ($game_map.events[i].list[0].code == 108 && ($game_map.events[i].list[0].parameters == ["NotShadow"]) or $game_map.events[i].list[0].parameters == ["s"]) ) #$game_map.events[i].list!=nil and $game_map.events[i].list[0].code == 108 and $game_map.events[i].list[0].parameters == ["o"])
 
       @ombrelist[i+1] = Sprite_Shadow.new(viewport, $game_map.events[i],self,@anglemin,@anglemax,@distancemax)
 
     end
 
    end
 
    @ombrelist[1] = Sprite_Shadow.new(viewport, $game_player,self,@anglemin,@anglemax,@distancemax)
 
#===================================================
 
# ● 原装人物跟随兼容脚本
 
#===================================================
 
if CATERPILLAR_COMPATIBLE and $game_party.characters!=nil
 
 
for member in $game_party.characters
 
   @ombrelist.push(Sprite_Shadow.new(viewport, member,self,@anglemin,@anglemax,@distancemax))
 
end
 
 
end
 
#===================================================
 
# ● 兼容脚本结束
 
#===================================================
 
   end
 
   shadow_initialize(viewport, @character)
 
end
 
 
alias shadow_update update
 
 
def update
   shadow_update
   if @ombrelist!=[]
 
     for i in [email]1..@ombrelist.size[/email]
  # if @character.x >= 7 # character.x = @x -1
       if @ombrelist[i]!=nil
 
         @ombrelist[i].update
 
       end
  # end
     end
 
   end
 
end  
 
 
end
 
 
#===================================================
 
# ■ 新定义类Scene_Save
 
#===================================================
 
class Scene_Save < Scene_File
 
 
alias shadows_write_save_data write_save_data
 
 
def write_save_data(file)
 
   $game_map.shadows = nil
 
   shadows_write_save_data(file)
 
end
 
end
 
 
#===================================================
 
# ■ 新定义类 Game_Map
 
#===================================================
 
class Game_Map
 
attr_accessor :shadows
 
end

#使用方法：不透明的物体在光源旁边会产生一个阴影。


 


#所以，在光源的事件里面（例如火），请在第一页加上一个注释“s”（请不要带引号）


 


#然后将此脚本命名为“人物阴影”插入到main上方即可。


 


 


#==============================================================================


 


# ■ 阴影精灵 (渐变精灵 )


 


# 以 Genzai Kawakami的阴影脚本为基础, 


#  Rataime为其重写和更新， 


#  Boushy 为其添加附属功能


 


#  精灵使者汉化


 


#==============================================================================


 


 


CATERPILLAR_COMPATIBLE = true


 


 


class Game_Party


 


attr_reader :characters


 


end


 


 


class Sprite_Shadow < RPG::Sprite


 


 


attr_accessor :character


 


 


def initialize(viewport, character = nil,source = nil,anglemin=0,anglemax=0,distancemax=0)


 


   super(viewport)


 


   @anglemin=anglemin.to_f


 


   @anglemax=anglemax.to_f


 


   @distancemax=distancemax.to_f


 


   @character = character


 


   @source = source


 


   update


 


end


 


 


def update


 


   super


 


 


   if (@tile_id != @character.tile_id or


 


      @character_name != @character.character_name or


 


      @character_hue != @character.character_hue)# and ( @character.screen_x >= 0 and  @character.screen_x <=640 and  @character.screen_y>=0 and  @character.screen_y <= 480)


 


     @tile_id = @character.tile_id


 


     @character_name = @character.character_name


 


     @character_hue = @character.character_hue


     if   @character_name.include?("AC") and  not   @character_name.include?("=4")


            if @character.direction == 4


      self.mirror = false


    else


       self.mirror = true


     end


     else


            if @character.direction == 4


      self.mirror = true


    else


       self.mirror = false


     end


     end 


     if @tile_id >= 384


 


       self.bitmap = RPG::Cache.tile($game_map.tileset_name,


 


         @tile_id, @character.character_hue)


 


       self.src_rect.set(0, 0, 32, 32)


 


       self.ox = 16


 


       self.oy = 32


 


     else


 


       self.bitmap = RPG::Cache.character(@character.character_name,


 


         @character.character_hue)


 


       @cw = bitmap.width / 4


 


       @cw = bitmap.width / 4 


    if not   @character_name.include?("=4")


       @ch = bitmap.height / 4 


     else


       @ch = bitmap.height / 4


       end


 


 


       self.ox = @cw / 2


 


       self.oy = @ch


 


     end


 


   end


 


   self.visible = (not @character.transparent)


 


    if @tile_id == 0


      # 设置传送目标的矩形


    if not   @character_name.include?("=4")


      if @character.pattern >= 4


      sx = (@character.pattern - 4) * @cw


        else


      sx = @character.pattern * @cw


    end


      if @character.pattern >= 4


        sy = (4 - 2) / 2 * @ch  


       else


      sy = (2 - 2) / 2 * @ch 


      end


      self.src_rect.set(sx, sy, @cw, @ch)


    else


            sx = @character.pattern * @cw


      sy = (@character.direction - 2) / 2 * @ch


      self.src_rect.set(sx, sy, @cw, @ch)


      end


    end


 


   self.x = @character.screen_x


 


   self.y = @character.screen_y-5


 


   self.z = @character.screen_z(@ch)-1


 


   self.opacity = @character.opacity


 


   self.blend_type = @character.blend_type


 


   self.bush_depth = @character.bush_depth


 


   #if @character.animation_id != 0


 


     #animation = $data_animations[@character.animation_id]


 


    # animation(animation, true)


 


    # @character.animation_id = 0


 


   #end


 


   @deltax=@source.x-self.x


 


   @deltay= @source.y-self.y


 


   self.angle = 57.3*Math.atan2(@deltax, @deltay )


 


   @angle_trigo=self.angle+90


 


   if @angle_trigo<0


 


     @angle_trigo=360+@angle_trigo


 


   end


 


   self.color = Color.new(0, 0, 0)


 


   @distance = ((@deltax ** 2) + (@deltay ** 2))


 


   if$game_map.shadows==-1


 


     self.opacity = 0 


   else


 


     self.opacity = 1200000/(@distance+6000)    


   end


 


   if @character.screen_x >= 640 or @character.screen_x <= 0 or @character.screen_y >= 480 or @character.screen_y <= 0


   self.opacity = 0 


     end   


 


   @distance = @distance ** 0.5


 


   if @distancemax !=0 and @distance>=@distancemax


 


     self.opacity=0


 


   end


 


   if @anglemin !=0 or @anglemax !=0


 


      if (@angle_trigo<@anglemin or @angle_trigo>@anglemax) and @anglemin<@anglemax


 


        self.opacity=0


 


      end


 


      if (@angle_trigo<@anglemin and @angle_trigo>@anglemax) and @anglemin>@anglemax


 


        self.opacity=0


 


      end     


 


   end


 


end


 


end


 


 


#===================================================


 


# ■ 重定义 Sprite_Character


 


#===================================================


 


 


class Sprite_Character < RPG::Sprite


 


alias shadow_initialize initialize


 


 


def initialize(viewport, character = nil)


 


   @character = character


  # @character = nil


   super(viewport)


 


   @ombrelist=[]


 


   if (character.is_a?(Game_Event) and character.list!=nil and character.list[0].code == 108 and character.list[0].parameters == ["s"])


 


     if (character.list[1]!=nil and character.list[1].code == 108)


 


       @anglemin=character.list[1].parameters[0]


 


     end


 


     if (character.list[2]!=nil and character.list[2].code == 108)


 


       @anglemax=character.list[2].parameters[0]


 


     end


 


     if (character.list[3]!=nil and character.list[3].code == 108)


 


       @distancemax=character.list[3].parameters[0]


 


     end  


 


    for i in $game_map.events.keys.sort


 


     if ($game_map.events[i].is_a?(Game_Event) and not ($game_map.events[i].list[0].code == 108 && ($game_map.events[i].list[0].parameters == ["NotShadow"]) or $game_map.events[i].list[0].parameters == ["s"]) ) #$game_map.events[i].list!=nil and $game_map.events[i].list[0].code == 108 and $game_map.events[i].list[0].parameters == ["o"])


 


       @ombrelist[i+1] = Sprite_Shadow.new(viewport, $game_map.events[i],self,@anglemin,@anglemax,@distancemax)


 


     end


 


    end


 


    @ombrelist[1] = Sprite_Shadow.new(viewport, $game_player,self,@anglemin,@anglemax,@distancemax)


 


#===================================================


 


# ● 原装人物跟随兼容脚本


 


#===================================================


 


if CATERPILLAR_COMPATIBLE and $game_party.characters!=nil


 


 


for member in $game_party.characters


 


   @ombrelist.push(Sprite_Shadow.new(viewport, member,self,@anglemin,@anglemax,@distancemax))


 


end


 


 


end


 


#===================================================


 


# ● 兼容脚本结束


 


#===================================================


 


   end


 


   shadow_initialize(viewport, @character)


 


end


 


 


alias shadow_update update


 


 


def update


   shadow_update


   if @ombrelist!=[]


 


     for i in [email]1..@ombrelist.size[/email]


  # if @character.x >= 7 # character.x = @x -1


       if @ombrelist[i]!=nil


 


         @ombrelist[i].update


 


       end


  # end


     end


 


   end


 


end  


 


 


end


 


 


#===================================================


 


# ■ 新定义类Scene_Save


 


#===================================================


 


class Scene_Save < Scene_File


 


 


alias shadows_write_save_data write_save_data


 


 


def write_save_data(file)


 


   $game_map.shadows = nil


 


   shadows_write_save_data(file)


 


end


 


end


 


 


#===================================================


 


# ■ 新定义类 Game_Map


 


#===================================================


 


class Game_Map


 


attr_accessor :shadows


 


end

出现问题的情况：
当一张地图有一个已经暂时消失的事件的时候，往该地图添加一个光源，就会出现以下错误

CCD0645

经测试，当地图有一个暂时消失的事件，且有作为光源的事件时，连呼出菜单都会出现同样的BUG。

hyrious

治标：
267行改为：

1. if ($game_map.events[i].is_a?(Game_Event) and $game_map.events[i].list and not ($game_map.events[i].list[0].code == 108 && ($game_map.events[i].list[0].parameters == ["NotShadow"]) or $game_map.events[i].list[0].parameters == ["s"]) ) #$game_map.events[i].list!=nil and $game_map.events[i].list[0].code == 108 and $game_map.events[i].list[0].parameters == ["o"])

复制代码

懒得治本（逃