刷新事件肯定是要放到脚本里的没错，用事件会太麻烦。
不过LZ小周教的还是挺好的，感觉学到不少。
有空的话继续更新不要放弃啊。

窗口的生成与刷新个人认为应该在Scene_Map中完成，而不是通过事件

好东西啊，果断顶，对于我们新手来说真是学习的好帖子，支持楼主

如果刷新放在事件里面过了地图这个窗口不是泄露了么，win7下停止工作什么的。
另外每帧refresh你在差点的机器上就能发现很明显的卡顿，正确做法是记录需要描绘的数值，发生变动才描绘。
当然你这里的refresh相当于把update和refresh写到一起了，
refresh的作用如字面一样是刷新，重新描绘，update是用于检查更新。
以下给出一个范例。

地图血条.rar (187.65 KB, 下载次数: 59)

2014-4-14 08:19 上传

点击文件名下载附件

1. # 加入刷新部分，可以自己换位置
   
2. class Scene_Map
   
3.   alias _fux_main main
   
4.   def main
   
5.     @state_window = Window_MapState.new
   
6.     _fux_main
   
7.     @state_window.dispose
   
8.   end
   
9.   alias _fux_update update
   
10.   def update
    
11.     @state_window.update
    
12.     _fux_update
    
13.   end
    
14. end
    
15. #渐变描绘
    
16. class Bitmap
    
17.   def gradient_fill_rect(x,y,w,h,color_pack)
    
18.     color1,color2 = *color_pack
    
19.     tempcolor = [ color2.red-color1.red,
    
20.                   color2.green-color1.green,
    
21.                   color2.blue-color1.blue,
    
22.                   color2.alpha-color1.alpha ]
    
23.     h.times do |i|
    
24.       this_color = Color.new(color1.red+tempcolor[0]*i/(h-1),
    
25.                              color1.green+tempcolor[1]*i/(h-1),
    
26.                              color1.blue+tempcolor[2]*i/(h-1),
    
27.                              color1.alpha+tempcolor[3]*i/(h-1))
    
28.       self.fill_rect(x,y+i,w,1,this_color)
    
29.     end
    
30.   end
    
31. end
    
32. 
    
33. # 正片
    
34. class Window_MapState < Window_Base
    
35.   # 初始化
    
36.   def initialize
    
37.     super(0,0,224,72)
    
38.     self.contents = Bitmap.new(self.width-32,self.height-32)
    
39.     self.contents.font.size = 14
    
40.     self.opacity = 180
    
41.     @remmer_symbol = [:hp,:maxhp,:sp,:maxsp]
    
42.     @remmer_value =  [-1]*@remmer_symbol.size
    
43.     @color_list = [ [[Color.new(0xff,0x33,0x33),Color.new(0x66,0,0)],
    
44.                       Color.new(0,0,0),Color.new(255,255,255)],
    
45.                     [[Color.new(0x33,0x99,0xff),Color.new(0x00,0x00,0x33)],
    
46.                       Color.new(0,0,0),Color.new(255,255,255)] ]
    
47.     update
    
48.   end
    
49.   def refresh(hp,maxhp,sp,maxsp)
    
50.     self.contents.clear
    
51.     x,y,w,h = 0,1,40,14
    
52.     self.contents.draw_text(x,y,w,h,"HP:")
    
53.     w,h = 142,14
    
54.     self.contents.fill_rect(x+39,y-1,w+2,h+2,@color_list[0][2])
    
55.     self.contents.fill_rect(x+40,y,w,h,@color_list[0][1])
    
56.     rw = (w-2)*hp/maxhp
    
57.     self.contents.gradient_fill_rect(x+41,y+1,rw,h-2,@color_list[0][0])
    
58.     y,w,h = 25,40,14
    
59.     self.contents.draw_text(x,y,w,h,"SP:")
    
60.     w,h = 142,14
    
61.     self.contents.fill_rect(x+39,y-1,w+2,h+2,@color_list[1][2])
    
62.     self.contents.fill_rect(x+40,y,w,h,@color_list[1][1])
    
63.     rw = maxsp > 0 ? (w-2)*sp/maxsp : 0
    
64.     self.contents.gradient_fill_rect(x+41,y+1,rw,h-2,@color_list[1][0])
    
65.   end
    
66.   def update
    
67.     pointer = $game_party.actors[0]
    
68.     return unless pointer
    
69.     need_refresh = false
    
70.     @remmer_symbol.each_with_index do |s,i|
    
71.       now_value = pointer.method(s).call
    
72.       if now_value != @remmer_value[i]
    
73.         @remmer_value[i] = now_value
    
74.         need_refresh = true
    
75.       end
    
76.     end
    
77.     refresh(*@remmer_value) if need_refresh
    
78.   end
    
79.   def dispose
    
80.     @color_list = nil
    
81.     @remmer_symbol = nil
    
82.     @remmer_value = nil
    
83.     super
    
84.   end
    
85. end

复制代码

提供几个建议：

1.没有必要将hp设置为attr_accessor，因为在这里你不希望外界用圆点运算符"."对实例变量进行操作，而且整个过程中也没有用到$w.hp这样的语句，应该删去。
2.没有必要将宽度w设置为实例变量，在这里设置一个局部临时变量w就可以了。
3.建议刷新的内容全部放到update中去，refresh只是单纯的描绘作用，因为面向对象编程讲究看标识符知其含义，因此在地图用update不变，重写MapStatus的update方法，这是写脚本的一个好习惯。

另外提醒一下3L的朋友，Hp和Sp有所不同，最大Sp允许取0值，因此计算宽度的时候，如果遇到无Sp的角色会发生除0错误，在这里改一下以增强代码安全性。

现在我们写的血条脚本，只能通过地图上的事件来显示。而且血条会把菜单什么的都遮住，很不爽。

我将告诉大家怎么来把血条的生成，刷新都写在脚本里。

首先介绍alias的用法。

alias的用处是把脚本降低冲突率，完全“插件”化。

比如说，小周定义了一个类：

class XiaoZhou
  def damage
      $hp -= 100
  end
end

而P叔（@protosssonny ）也定义了一个类，是

class XiaoZhou
  def damage
    p "你受伤了！"
  end
end

但是两个定义冲突了，P叔把小周的定义的方法damage重定义了一遍，于是小周就不会-hp了。

聪明的P叔想了一个办法，他用alias避免了冲突：

class XiaoZhou
  alias xz_damage damage
  def damage
    p "你受伤了！"
    xz_damage
  end
end

当使用alias后，xz_damage 相当于完全复制了damage，然后P叔重新定义damage，之后在调用xz_damage，这样就避免了冲突。

把窗口的生成、释放、刷新写在Scene_Map里，如果不用alias，就要重新复制一遍main、update这两个方法，麻烦不说，还有很大的冲突率。

于是我们要用alias。

1. class Scene_Map
   
2.   alias old_main main
   
3.   def main
   
4.     @map_status = Window_MapStatus.new
   
5.     old_main
   
6.     @map_status.dispose
   
7.   end
   
8.   alias old_update update
   
9.   def update
   
10.     old_update
    
11.     @map_status.refresh
    
12.   end  
    
13. end  

复制代码

此时就可以删掉那个事件了！

交作业啦！

还有脚本：
先@w

RUBY 代码复制

class Window_MapStatus < Window_Base
  def initialize
    super(0,0,200,120)
    self.contents = Bitmap.new(width - 32, height - 32)
    @hp = 0
    @sp = 0
    refresh
  end
  def refresh
    if @hp != $game_party.actors[0].hp or @sp != $game_party.actors[0].sp
      @hp = $game_party.actors[0].hp
      @sp = $game_party.actors[0].sp
      self.contents.clear
      self.contents.draw_text(0,0,60,32,"HP")
      self.contents.draw_text(0,52,60,32,"SP")
      self.contents.fill_rect(60,0,100,32,Color.new(255,255,255))
      self.contents.fill_rect(60,52,100,32,Color.new(255,255,255))
      [url=home.php?mod=space&uid=133944]@w[/url] = 96 * @hp / $game_party.actors[0].maxhp  
      for i in 0..@w-5
        self.contents.fill_rect(64+i,4,1,24,Color.new(255,i*2,0))
      end
      @w = 96 * @sp / $game_party.actors[0].maxsp  
      for i in 0..@w-5
        self.contents.fill_rect(64+i,56,1,24,Color.new(0,i*2,255))
      end
    end  
  end
  def update
    super
    refresh
  end
end

class Window_MapStatus < Window_Base


  def initialize


    super(0,0,200,120)


    self.contents = Bitmap.new(width - 32, height - 32)


    @hp = 0


    @sp = 0


    refresh


  end


  def refresh


    if @hp != $game_party.actors[0].hp or @sp != $game_party.actors[0].sp


      @hp = $game_party.actors[0].hp


      @sp = $game_party.actors[0].sp


      self.contents.clear


      self.contents.draw_text(0,0,60,32,"HP")


      self.contents.draw_text(0,52,60,32,"SP")


      self.contents.fill_rect(60,0,100,32,Color.new(255,255,255))


      self.contents.fill_rect(60,52,100,32,Color.new(255,255,255))


      [url=home.php?mod=space&uid=133944]@w[/url] = 96 * @hp / $game_party.actors[0].maxhp  


      for i in 0..@w-5


        self.contents.fill_rect(64+i,4,1,24,Color.new(255,i*2,0))


      end


      @w = 96 * @sp / $game_party.actors[0].maxsp  


      for i in 0..@w-5


        self.contents.fill_rect(64+i,56,1,24,Color.new(0,i*2,255))


      end


    end  


  end


  def update


    super


    refresh


  end


end