敵血條腳本，求增加血條長度自訂功能！

冷徹心扉

希望能增加開關切換血條長度、或是依敵人編號定義長度的功能

例如1號敵人，血條長度100
         2號敵人，血條長度200...等

或者是1號開關開啟時，此腳本血條長度加倍

若能解決經驗奉上，謝謝！

RUBY 代码复制

#==============================================================================
# ★要啟用這個腳本
#~ if false
if true
#==============================================================================
# ■ Sprite_Battler
#==============================================================================
 
class Sprite_Battler < Sprite_Base
  # Word used in enemy Notes field to hide HP gauge 註解以隱藏HP條
  GAUGE_M = "HIDEHP"
  # 背景色　                      [邊框顏色,                       內部顏色]
#~   GAUGE_BC = [Color.new(100,0,0,255), Color.new(20,0,0,200)]  #155.205.155    
  GAUGE_BC = [Color.new(100,0,0,255), Color.new(0,0,0,255)]  #155.205.155
  # 面層色（漸變效果）　[左端, 右端]
  GAUGE_GC = [Color.new(150,0,0), Color.new(240,50,50)]
  #
 
  GAUGE_W = 68 # 寬度
  GAUGE_H = 4 # 高度 4
  GAUGE_S = 30 # 扣減速度（超過2）40 越小越快
  GAUGE_T = 1400 # 顯示幀數　1秒3000   10秒30000   30秒90000    60秒180000
  GAUGE_O = 16 # 不透明度16
  #
  GAUGE_V = false # 當光標出現可疑損壞。需要STRxx光標。
  #--------------------------------------------------------------------------
  # ● 繪畫血條
  #--------------------------------------------------------------------------
  def create_enhpgauge
    g_width = GAUGE_W  # 長
    g_height = GAUGE_H # 高
    f_color = GAUGE_BC # 背景色
    g_color = GAUGE_GC # 面層色
    # 圖畫繪製
    bitmap = Bitmap.new(g_width, g_height * 2)
    # 上半部分:圖畫定義，背景色
    bitmap.fill_rect(0, 0, g_width, g_height, f_color[0])         # 外框
    bitmap.fill_rect(1, 1, g_width - 2, g_height - 2, f_color[1]) # 內部
    # 上半部分:圖畫定義，面層色
    bitmap.gradient_fill_rect(1, g_height + 1, g_width - 2, g_height - 2,
                              g_color[0], g_color[1])             # 層次
    # 血條建立 # [0] = 背景色 ; [1] = 面層色
    @hp_gauge = [Sprite.new, Sprite.new]
 
    for i in 0..1
      sprite = @hp_gauge[i]   
      sprite.viewport = self.viewport
      sprite.bitmap = bitmap
      sprite.src_rect.set(0, 0, g_width, g_height)
      sprite.src_rect.y = g_height if i == 1
      if $back_attack && N01::BACK_ATTACK && N01::BACK_ATTACK_NON_BACK_MIRROR
        sprite.x = Graphics.width - @battler.screen_x
      else
  #----------------------------------------------------------------------------------------------------------------------------------------------------        
#~           sprite.x = 10  #固定顯示位置
          sprite.x = @battler.screen_x + 5  #顯示在敵人腳邊
      end
 
      sprite.y = @battler.screen_y  - 10 #血條的高低
 
  #----------------------------------------------------------------------------------------------------------------------------------------------------      
      sprite.ox = g_width / 2 - 4
      sprite.oy = g_height / 2 - 1
#~       sprite.z = @battler.screen_z + 1 #血條優先度
    sprite.z = self.z =  battler.position_z + 10#血條優先度
 
#~       sprite.z = +20 if i == 1         
      sprite.opacity = 0
    end
    # 各種
    @enid = @battler.enemy_id
    @hp = @battler.hp
    @gauge_width = GAUGE_W + 1
    @gauge_opacity = 0
  end
  #----------------------------------------------------------------------------------------------------------------------------------------------------
  # ● 血條更新
  #--------------------------------------------------------------------------
  def enhpgauge_update
    # 如果對應ID敵人被傷害的時候需要顯示
    if @enid != @battler.enemy_id
      @enid = @battler.enemy_id
      @gauge_visible = true
#~ ##      @gauge_visible = false if $data_enemies[@enid].note.include?(GAUGE_M)
#~  ##     for i in @hp_gauge do i.visible = @gauge_visible end
      end
    return unless @gauge_visible
    # 計算更新
    if @hp != @battler.hp
      g_width = (@battler.hp / (@battler.maxhp * 1.0))
      @gauge_width = ((GAUGE_W * g_width) + 1).truncate
      @gauge_opacity = GAUGE_T
      @hp = @battler.hp
    end
    # 長
    g_width = @hp_gauge[1].src_rect.width
    speed = GAUGE_S
    rect = @hp_gauge[1].src_rect
    rect.width = (@gauge_width + (g_width * (speed - 1))) / speed
    if rect.width != @gauge_width
      if rect.width > @gauge_width
        rect.width -= 1
      else
        rect.width += 1
      end
    end
    rect.width = 2 if rect.width <= 1 and @hp > 0
 
 
    # 透明度
    if GAUGE_V and @battler.cursor_flash
      @gauge_opacity += GAUGE_O * 2 if @gauge_opacity <= GAUGE_T / 2
    else
      @gauge_opacity -= GAUGE_O if @gauge_opacity > 0
    end
    # 透明度適用
    for i in @hp_gauge do i.opacity = @gauge_opacity end
 
 
#-----------------------------------------------------------------------------------------------------------------
        if @battler.hp > 0#or @gauge_width > 1  #假如敵人存活就顯示血條
                @gauge_visible = true
                @gauge_opacity = 255
                end        
#-----------------------------------------------------------------------------------------------------------------
 
  end
  #--------------------------------------------------------------------------
  # ● 對象初始化
  #--------------------------------------------------------------------------
  alias initialize_str15 initialize
  def initialize(viewport, battler = nil)
    initialize_str15(viewport, battler)
    if @battler.is_a?(Game_Enemy)
      create_enhpgauge
      @gauge_visible = true
#~ ##      @gauge_visible = false if $data_enemies[@enid].note.include?(GAUGE_M)
#~   ##    for i in @hp_gauge do i.visible = @gauge_visible end
    end
  end
  #--------------------------------------------------------------------------
  # ● 解放（dispose）
  #--------------------------------------------------------------------------
  alias dispose_str15 dispose
  def dispose
    dispose_str15
    if @battler.is_a?(Game_Enemy)
      @hp_gauge[0].bitmap.dispose
      @hp_gauge[0].dispose
      @hp_gauge[1].dispose
    end
  end
  #--------------------------------------------------------------------------
  # ● 幀更新
  #--------------------------------------------------------------------------
  alias update_str15 update
  def update
    update_str15
    enhpgauge_update if @battler.is_a?(Game_Enemy)
  end
end
#
end

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


# ★要啟用這個腳本


#~ if false


if true


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


# ■ Sprite_Battler


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


 


class Sprite_Battler < Sprite_Base


  # Word used in enemy Notes field to hide HP gauge 註解以隱藏HP條


  GAUGE_M = "HIDEHP"


  # 背景色　                      [邊框顏色,                       內部顏色]


#~   GAUGE_BC = [Color.new(100,0,0,255), Color.new(20,0,0,200)]  #155.205.155    


  GAUGE_BC = [Color.new(100,0,0,255), Color.new(0,0,0,255)]  #155.205.155


  # 面層色（漸變效果）　[左端, 右端]


  GAUGE_GC = [Color.new(150,0,0), Color.new(240,50,50)]


  #


 


  GAUGE_W = 68 # 寬度


  GAUGE_H = 4 # 高度 4


  GAUGE_S = 30 # 扣減速度（超過2）40 越小越快


  GAUGE_T = 1400 # 顯示幀數　1秒3000   10秒30000   30秒90000    60秒180000


  GAUGE_O = 16 # 不透明度16


  #


  GAUGE_V = false # 當光標出現可疑損壞。需要STRxx光標。


  #--------------------------------------------------------------------------


  # ● 繪畫血條


  #--------------------------------------------------------------------------


  def create_enhpgauge


    g_width = GAUGE_W  # 長


    g_height = GAUGE_H # 高


    f_color = GAUGE_BC # 背景色


    g_color = GAUGE_GC # 面層色


    # 圖畫繪製


    bitmap = Bitmap.new(g_width, g_height * 2)


    # 上半部分:圖畫定義，背景色


    bitmap.fill_rect(0, 0, g_width, g_height, f_color[0])         # 外框


    bitmap.fill_rect(1, 1, g_width - 2, g_height - 2, f_color[1]) # 內部


    # 上半部分:圖畫定義，面層色


    bitmap.gradient_fill_rect(1, g_height + 1, g_width - 2, g_height - 2,


                              g_color[0], g_color[1])             # 層次


    # 血條建立 # [0] = 背景色 ; [1] = 面層色


    @hp_gauge = [Sprite.new, Sprite.new]


 


    for i in 0..1


      sprite = @hp_gauge[i]   


      sprite.viewport = self.viewport


      sprite.bitmap = bitmap


      sprite.src_rect.set(0, 0, g_width, g_height)


      sprite.src_rect.y = g_height if i == 1


      if $back_attack && N01::BACK_ATTACK && N01::BACK_ATTACK_NON_BACK_MIRROR


        sprite.x = Graphics.width - @battler.screen_x


      else


  #----------------------------------------------------------------------------------------------------------------------------------------------------        


#~           sprite.x = 10  #固定顯示位置


          sprite.x = @battler.screen_x + 5  #顯示在敵人腳邊


      end


 


      sprite.y = @battler.screen_y  - 10 #血條的高低


 


  #----------------------------------------------------------------------------------------------------------------------------------------------------      


      sprite.ox = g_width / 2 - 4


      sprite.oy = g_height / 2 - 1


#~       sprite.z = @battler.screen_z + 1 #血條優先度


    sprite.z = self.z =  battler.position_z + 10#血條優先度


 


#~       sprite.z = +20 if i == 1         


      sprite.opacity = 0


    end


    # 各種


    @enid = @battler.enemy_id


    @hp = @battler.hp


    @gauge_width = GAUGE_W + 1


    @gauge_opacity = 0


  end


  #----------------------------------------------------------------------------------------------------------------------------------------------------


  # ● 血條更新


  #--------------------------------------------------------------------------


  def enhpgauge_update


    # 如果對應ID敵人被傷害的時候需要顯示


    if @enid != @battler.enemy_id


      @enid = @battler.enemy_id


      @gauge_visible = true


#~ ##      @gauge_visible = false if $data_enemies[@enid].note.include?(GAUGE_M)


#~  ##     for i in @hp_gauge do i.visible = @gauge_visible end


      end


    return unless @gauge_visible


    # 計算更新


    if @hp != @battler.hp


      g_width = (@battler.hp / (@battler.maxhp * 1.0))


      @gauge_width = ((GAUGE_W * g_width) + 1).truncate


      @gauge_opacity = GAUGE_T


      @hp = @battler.hp


    end


    # 長


    g_width = @hp_gauge[1].src_rect.width


    speed = GAUGE_S


    rect = @hp_gauge[1].src_rect


    rect.width = (@gauge_width + (g_width * (speed - 1))) / speed


    if rect.width != @gauge_width


      if rect.width > @gauge_width


        rect.width -= 1


      else


        rect.width += 1


      end


    end


    rect.width = 2 if rect.width <= 1 and @hp > 0


 


 


    # 透明度


    if GAUGE_V and @battler.cursor_flash


      @gauge_opacity += GAUGE_O * 2 if @gauge_opacity <= GAUGE_T / 2


    else


      @gauge_opacity -= GAUGE_O if @gauge_opacity > 0


    end


    # 透明度適用


    for i in @hp_gauge do i.opacity = @gauge_opacity end


 


 


#-----------------------------------------------------------------------------------------------------------------


        if @battler.hp > 0#or @gauge_width > 1  #假如敵人存活就顯示血條


                @gauge_visible = true


                @gauge_opacity = 255


                end        


#-----------------------------------------------------------------------------------------------------------------


 


  end


  #--------------------------------------------------------------------------


  # ● 對象初始化


  #--------------------------------------------------------------------------


  alias initialize_str15 initialize


  def initialize(viewport, battler = nil)


    initialize_str15(viewport, battler)


    if @battler.is_a?(Game_Enemy)


      create_enhpgauge


      @gauge_visible = true


#~ ##      @gauge_visible = false if $data_enemies[@enid].note.include?(GAUGE_M)


#~   ##    for i in @hp_gauge do i.visible = @gauge_visible end


    end


  end


  #--------------------------------------------------------------------------


  # ● 解放（dispose）


  #--------------------------------------------------------------------------


  alias dispose_str15 dispose


  def dispose


    dispose_str15


    if @battler.is_a?(Game_Enemy)


      @hp_gauge[0].bitmap.dispose


      @hp_gauge[0].dispose


      @hp_gauge[1].dispose


    end


  end


  #--------------------------------------------------------------------------


  # ● 幀更新


  #--------------------------------------------------------------------------


  alias update_str15 update


  def update


    update_str15


    enhpgauge_update if @battler.is_a?(Game_Enemy)


  end


end


#


end

克莉丝

代码未测试,因为这个脚本因该是你哪里截取出来的没法测试
说明:指定某号变量为非0时某号敌人血条长度与该变量相同
       例如1号变量值为150,那么1号敌人的血条长度为150.
             1号变量值为0,那么1号敌人的血条长度为默认的68.
变量编号可以再说明

1. #==============================================================================
   
2. # ★要啟用這個腳本
   
3. #~ if false
   
4. if true
   
5. #==============================================================================
   
6. # ■ Sprite_Battler
   
7. #==============================================================================
   
8. 
   
9. class Sprite_Battler < Sprite_Base
   
10.   # Word used in enemy Notes field to hide HP gauge 註解以隱藏HP條
    
11.   GAUGE_M = "HIDEHP"
    
12.   # 背景色　                      [邊框顏色,                       內部顏色]
    
13. #~   GAUGE_BC = [Color.new(100,0,0,255), Color.new(20,0,0,200)]  #155.205.155   
    
14.   GAUGE_BC = [Color.new(100,0,0,255), Color.new(0,0,0,255)]  #155.205.155
    
15.   # 面層色（漸變效果）　[左端, 右端]
    
16.   GAUGE_GC = [Color.new(150,0,0), Color.new(240,50,50)]
    
17.   #
    
18. 
    
19.   GAUGE_W = 68 # 默认寬度
    
20.   GAUGE_H = 4 # 高度 4
    
21.   GAUGE_S = 30 # 扣減速度（超過2）40 越小越快
    
22.   GAUGE_T = 1400 # 顯示幀數　1秒3000   10秒30000   30秒90000    60秒180000
    
23.   GAUGE_O = 16 # 不透明度16
    
24.   #
    
25.   GAUGE_V = false # 當光標出現可疑損壞。需要STRxx光標。
    
26.   #--------------------------------------------------------------------------
    
27.   # ● 繪畫血條
    
28.   #--------------------------------------------------------------------------
    
29.   def create_enhpgauge
    
30.     g_width = $game_variables[@battler.index] == 0 ? GAUGE_W : $game_variables[@battler.index]  # 長
    
31.     g_height = GAUGE_H # 高
    
32.     f_color = GAUGE_BC # 背景色
    
33.     g_color = GAUGE_GC # 面層色
    
34.     # 圖畫繪製
    
35.     bitmap = Bitmap.new(g_width, g_height * 2)
    
36.     # 上半部分:圖畫定義，背景色
    
37.     bitmap.fill_rect(0, 0, g_width, g_height, f_color[0])         # 外框
    
38.     bitmap.fill_rect(1, 1, g_width - 2, g_height - 2, f_color[1]) # 內部
    
39.     # 上半部分:圖畫定義，面層色
    
40.     bitmap.gradient_fill_rect(1, g_height + 1, g_width - 2, g_height - 2,
    
41.                               g_color[0], g_color[1])             # 層次
    
42.     # 血條建立 # [0] = 背景色 ; [1] = 面層色
    
43.     @hp_gauge = [Sprite.new, Sprite.new]
    
44. 
    
45.     for i in 0..1
    
46.       sprite = @hp_gauge[i]   
    
47.       sprite.viewport = self.viewport
    
48.       sprite.bitmap = bitmap
    
49.       sprite.src_rect.set(0, 0, g_width, g_height)
    
50.       sprite.src_rect.y = g_height if i == 1
    
51.       if $back_attack && N01::BACK_ATTACK && N01::BACK_ATTACK_NON_BACK_MIRROR
    
52.         sprite.x = Graphics.width - @battler.screen_x
    
53.       else
    
54.   #----------------------------------------------------------------------------------------------------------------------------------------------------        
    
55. #~           sprite.x = 10  #固定顯示位置
    
56.           sprite.x = @battler.screen_x + 5  #顯示在敵人腳邊
    
57.       end
    
58. 
    
59.       sprite.y = @battler.screen_y  - 10 #血條的高低
    
60. 
    
61.   #----------------------------------------------------------------------------------------------------------------------------------------------------      
    
62.       sprite.ox = g_width / 2 - 4
    
63.       sprite.oy = g_height / 2 - 1
    
64. #~       sprite.z = @battler.screen_z + 1 #血條優先度
    
65.       sprite.z = self.z =  battler.position_z + 10#血條優先度
    
66. 
    
67. #~       sprite.z = +20 if i == 1         
    
68.       sprite.opacity = 0
    
69.     end
    
70.     # 各種
    
71.     @enid = @battler.enemy_id
    
72.     @hp = @battler.hp
    
73.     @gauge_width = $game_variables[@battler.index] == 0?  GAUGE_W : $game_variables[@battler.index] + 1
    
74.     @gauge_opacity = 0
    
75.   end
    
76.   #----------------------------------------------------------------------------------------------------------------------------------------------------
    
77.   # ● 血條更新
    
78.   #--------------------------------------------------------------------------
    
79.   def enhpgauge_update
    
80.     # 如果對應ID敵人被傷害的時候需要顯示
    
81.     if @enid != @battler.enemy_id
    
82.       @enid = @battler.enemy_id
    
83.       @gauge_visible = true
    
84. #~ ##      @gauge_visible = false if $data_enemies[@enid].note.include?(GAUGE_M)
    
85. #~  ##     for i in @hp_gauge do i.visible = @gauge_visible end
    
86.       end
    
87.     return unless @gauge_visible
    
88.     # 計算更新
    
89.     if @hp != @battler.hp
    
90.       g_width = (@battler.hp / (@battler.maxhp * 1.0))
    
91.       @gauge_width = (($game_variables[@battler.index] == 0? 68 : $game_variables[@battler.index] * g_width) + 1).truncate
    
92.       @gauge_opacity = GAUGE_T
    
93.       @hp = @battler.hp
    
94.     end
    
95.     # 長
    
96.     g_width = @hp_gauge[1].src_rect.width
    
97.     speed = GAUGE_S
    
98.     rect = @hp_gauge[1].src_rect
    
99.     rect.width = (@gauge_width + (g_width * (speed - 1))) / speed
    
100.     if rect.width != @gauge_width
     
101.       if rect.width > @gauge_width
     
102.         rect.width -= 1
     
103.       else
     
104.         rect.width += 1
     
105.       end
     
106.     end
     
107.     rect.width = 2 if rect.width <= 1 and @hp > 0
     
108. 
     
109. 
     
110.     # 透明度
     
111.     if GAUGE_V and @battler.cursor_flash
     
112.       @gauge_opacity += GAUGE_O * 2 if @gauge_opacity <= GAUGE_T / 2
     
113.     else
     
114.       @gauge_opacity -= GAUGE_O if @gauge_opacity > 0
     
115.     end
     
116.     # 透明度適用
     
117.     for i in @hp_gauge do i.opacity = @gauge_opacity end
     
118. 
     
119. 
     
120. #-----------------------------------------------------------------------------------------------------------------
     
121.         if @battler.hp > 0#or @gauge_width > 1  #假如敵人存活就顯示血條
     
122.                 @gauge_visible = true
     
123.                 @gauge_opacity = 255
     
124.                 end        
     
125. #-----------------------------------------------------------------------------------------------------------------
     
126. 
     
127.   end
     
128.   #--------------------------------------------------------------------------
     
129.   # ● 對象初始化
     
130.   #--------------------------------------------------------------------------
     
131.   alias initialize_str15 initialize
     
132.   def initialize(viewport, battler = nil)
     
133.     initialize_str15(viewport, battler)
     
134.     if @battler.is_a?(Game_Enemy)
     
135.       create_enhpgauge
     
136.       @gauge_visible = true
     
137. #~ ##      @gauge_visible = false if $data_enemies[@enid].note.include?(GAUGE_M)
     
138. #~   ##    for i in @hp_gauge do i.visible = @gauge_visible end
     
139.     end
     
140.   end
     
141.   #--------------------------------------------------------------------------
     
142.   # ● 解放（dispose）
     
143.   #--------------------------------------------------------------------------
     
144.   alias dispose_str15 dispose
     
145.   def dispose
     
146.     dispose_str15
     
147.     if @battler.is_a?(Game_Enemy)
     
148.       @hp_gauge[0].bitmap.dispose
     
149.       @hp_gauge[0].dispose
     
150.       @hp_gauge[1].dispose
     
151.     end
     
152.   end
     
153.   #--------------------------------------------------------------------------
     
154.   # ● 幀更新
     
155.   #--------------------------------------------------------------------------
     
156.   alias update_str15 update
     
157.   def update
     
158.     update_str15
     
159.     enhpgauge_update if @battler.is_a?(Game_Enemy)
     
160.   end
     
161. end
     
162. #
     
163. end
     

复制代码