求教，Theo的地图显示变量脚本怎么变成横向？（已解决）

火锅深处

现有脚本的三种模式是左上、右上、右下。变量是纵向排列。
我想变成在左上角距离顶边100像素左右，变量横向一字排开，具体应该改哪部分呢？

1. # =============================================================================
   
2. # TheoAllen - 简单变量HUD
   
3. # Version : 1.2b
   
4. # Contact : www.rpgmakerid.com (or) http://theolized.blogspot.com
   
5. # (This script documentation is written in informal indonesian language)
   
6. # =============================================================================
   
7. ($imported ||= {})[:Theo_VariableHUD] = true
   
8. # =============================================================================
   
9. # CHANGE LOGS:
   
10. # -----------------------------------------------------------------------------
    
11. # 2014.03.13 - Fixed hidden glitch when access menu then back to map
    
12. # 2014.02.07 - Make sure that variable HUD is always visible
    
13. # 2013.08.09 - Add mutiple variable HUD support
    
14. # 2013.07.23 - Finished script
    
15. # =============================================================================
    
16. =begin
    
17. 
    
18.   介绍 :
    
19.   本脚本可以简单地在地图上显示变量的数值。
    
20.   
    
21.   使用方法 :
    
22.   将本脚本放在插件脚本之下，Main之上
    
23.   
    
24.   使用脚本：
    
25.   show_variable(变量id) >> 显示变量数值
    
26.   show_variable(变量id,图标索引) >> 显示变量数值+一个图标
    
27.   show_variable(变量id,图标索引,位置) >> 显示变量数值+一个图标+设定显示位置
    
28.   
    
29.   多重 HUD 的脚本：
    
30.   show_variable([变量id,变量id,变量id],[图标索引,图标索引,图标索引],位置)
    
31.   
    
32.   hide_variable >> 隐藏所有 HUD
    
33.   
    
34.     使用条款 :
    
35.   署名脚本作者, TheoAllen. 你可以自由编辑此脚本，只要你不声明你是脚本的原作者
    
36.   如果你想用此脚本于商业游戏，请和我共享收益.别忘了给我一份免费的游戏拷贝.  
    
37.   
    
38.   Note :
    
39.   Karena ini simple, jadi jangan harap ada banyak kustomisasi bebas
    
40. 
    
41. =end
    
42. # =============================================================================
    
43. # 设定
    
44. # =============================================================================
    
45.   VarHUD_DefaultPos = 1 # Posisi default HUD
    
46. # -----------------------------------------------------------------------------
    
47. # 1 >> Kiri Atas
    
48. # 2 >> Kanan Atas
    
49. # 3 >> Kiri Bawah
    
50. # 4 >> Kanan Bawah
    
51. # -----------------------------------------------------------------------------
    
52.   VarHUD_FontSize = 24 # Ukuran Font
    
53. # -----------------------------------------------------------------------------
    
54.   VarHUD_MaxVar = 4 # Maksimal variable yg dapat ditampilin
    
55. # =============================================================================
    
56. # 设定结束
    
57. # =============================================================================
    
58. class Game_Temp
    
59.   attr_accessor :refresh_hud
    
60.   
    
61.   alias theo_varhud_init initialize
    
62.   def initialize
    
63.     theo_varhud_init
    
64.     @refresh_hud = false
    
65.   end
    
66.   
    
67. end
    
68. 
    
69. class Game_Variables
    
70.   alias theo_varhud_on_change on_change
    
71.   def on_change
    
72.     theo_varhud_on_change
    
73.     $game_temp.refresh_hud = true
    
74.   end
    
75. end
    
76. 
    
77. class Game_System
    
78.   class VarHUD
    
79.     attr_accessor :position
    
80.     attr_accessor :icon
    
81.     attr_accessor :id
    
82.    
    
83.     def initialize
    
84.       @position = 0
    
85.       @icon = 0
    
86.       @id = 0
    
87.     end
    
88.   end
    
89.   attr_accessor :varhud_visible
    
90.   attr_accessor :varhud_position
    
91.   attr_reader :varhud
    
92.   
    
93.   alias theo_varhud_init initialize
    
94.   def initialize
    
95.     theo_varhud_init
    
96.     @varhud = Array.new(VarHUD_MaxVar) { VarHUD.new }
    
97.   end
    
98.   
    
99.   def clear_varhud
    
100.     @varhud.each do |hud|
     
101.       hud.id = 0
     
102.     end
     
103.   end
     
104.   
     
105. end
     
106. 
     
107. class Game_Interpreter
     
108.   
     
109.   def show_variable(id = nil,icon = 0,position = VarHUD_DefaultPos)
     
110.     $game_system.clear_varhud
     
111.     if id.is_a?(Array)
     
112.       icon = [icon] unless icon.is_a?(Array)
     
113.       id.each_with_index do |i,index|
     
114.         return if index-1 > VarHUD_MaxVar
     
115.         hud = $game_system.varhud[index]
     
116.         hud.id = i
     
117.         hud.icon = icon[index]
     
118.       end
     
119.     elsif id.is_a?(Numeric)
     
120.       hud = $game_system.varhud[0]
     
121.       hud.icon = icon
     
122.       hud.id = id
     
123.     end
     
124.     $game_system.varhud_position = position
     
125.     $game_system.varhud_visible = true
     
126.     $game_temp.refresh_hud = true
     
127.   end
     
128.   
     
129.   def hide_variable
     
130.     $game_system.varhud_visible = false
     
131.   end
     
132.   
     
133. end
     
134. 
     
135. class Window_VarHUD < Window_Base
     
136.   
     
137.   def initialize
     
138.     super(0,0,window_width,window_height)
     
139.     contents.font.size = VarHUD_FontSize
     
140.     update_hud_position
     
141.     update_visibility
     
142.     self.opacity = 0
     
143.     refresh
     
144.   end
     
145.   
     
146.   def window_width;Graphics.width;end;
     
147.   def window_height;fitting_height(VarHUD_MaxVar);end;
     
148.   def line_height;VarHUD_FontSize;end;
     
149.    
     
150.   def update
     
151.     super
     
152.     update_visibility
     
153.     refresh if $game_temp.refresh_hud
     
154.   end
     
155.   
     
156.   def update_visibility
     
157.     self.visible = $game_system.varhud_visible
     
158.   end
     
159.   
     
160.   def refresh
     
161.     contents.clear
     
162.     active_hud.each_with_index do |hud,i|
     
163.       update_hud_contents(hud,i)
     
164.     end
     
165.     update_hud_position
     
166.     $game_temp.refresh_hud = false
     
167.   end
     
168.   
     
169.   def update_hud_position
     
170.     pos = $game_system.varhud_position
     
171.     if pos == 1 || pos == 2
     
172.       self.y = 0
     
173.     elsif
     
174.       self.y = Graphics.height - self.height
     
175.       size = active_hud.size - 1
     
176.       return if size < 0
     
177.       self.y += size * line_height
     
178.     end
     
179.   end
     
180.   
     
181.   def update_hud_contents(hud,i)
     
182.     var_id = hud.id
     
183.     icon = hud.icon.nil? ? 0 : hud.icon
     
184.     return if var_id == 0
     
185.     rect = Rect.new(0,0,contents.width,line_height)
     
186.     rect.y = i * line_height
     
187.     case $game_system.varhud_position
     
188.     when 1,3
     
189.       if icon != 0
     
190.         rect.x += 27
     
191.         draw_icon(icon,0,icon_y_pos + (i * line_height))
     
192.       end
     
193.       draw_text(rect,$game_variables[var_id])
     
194.     else
     
195.       if icon != 0
     
196.         rect.x -= 27
     
197.         draw_icon(icon,contents.width-24,icon_y_pos + (i * line_height))
     
198.       end
     
199.       draw_text(rect,$game_variables[var_id],2)
     
200.     end
     
201.   end
     
202.   
     
203.   def icon_y_pos
     
204.     return 0 if line_height <= 24
     
205.     return line_height/2 - 12
     
206.   end
     
207.   
     
208.   def active_hud
     
209.     $game_system.varhud.select {|hud| hud.id > 0}
     
210.   end
     
211.   
     
212. end
     
213. 
     
214. class Scene_Map < Scene_Base
     
215.   
     
216.   alias theo_varhud_start start
     
217.   def start
     
218.     theo_varhud_start
     
219.     create_var_hud
     
220.   end
     
221.   
     
222.   def create_var_hud
     
223.     @varhud_viewport = Viewport.new
     
224.     @varhud_viewport.z = 9999
     
225.     @var_hud = Window_VarHUD.new
     
226. #~     @var_hud.z -= 100
     
227.     @var_hud.viewport = @vahud_viewport
     
228.   end
     
229.   
     
230.   alias theo_varhud_terminate terminate
     
231.   def terminate
     
232.     theo_varhud_terminate
     
233.     @varhud_viewport.dispose
     
234.   end
     
235.   
     
236. end

复制代码

芯☆淡茹水

呃~， 以前有一个 地图显示变量 的存货，可能比较适合LZ的要求。

RUBY 代码复制

#==============================================================================
# 〓 地图显示变量 〓                              Author:芯☆淡茹水
#==============================================================================
=begin
#==============================================================================
  ◆ 说明 ◆
#==============================================================================
#------------------------------------------------------------------------------
1，变量的命名
   变量命名格式为 => 变量名^图标序号
   未写 图标序号 的变量，不会显示图标。
#------------------------------------------------------------------------------
2，游戏中添加变量显示 => 事件-脚本:show_map_val(id, x, y, w, s, c1, c2)
   id :变量ID
   x  :变量窗口显示的X坐标
   y  :变量窗口显示的Y坐标
   w  :变量窗口宽（可省略，省略后为设置的默认值）
   s  :字体大小（可省略，省略后为设置的默认值）
   c1 :变量名文字色号（可省略，省略后为设置的默认值）
   c2 :变量值文字色号（可省略，省略后为设置的默认值）
   
   ※ 如果对应的变量已经在显示中，此条命令无效 ※ 
   ※ 地图上显示的变量个数无限制，理论上可显示无数个变量 ※ 
#------------------------------------------------------------------------------
3，游戏中删除变量显示 => 事件-脚本:delete_map_val(id)
   id :变量ID
   
   ※ 如果对应的变量未在显示中，此条命令无效 ※ 
#------------------------------------------------------------------------------
4，移动变量窗口 => 事件-脚本:move_val_window(id, direction, duration, speed)
   id        :变量ID
   direction :移动的方向（2:下；4:左；6:右；8：上）
   duration  :移动时持续的帧数
   speed     :移动时每一帧移动的像素值
   
   ※ 如果对应的变量未在显示中或变量窗口正在移动中，此条命令无效 ※ 
#------------------------------------------------------------------------------
=end
#==============================================================================
module XdRs_Show_Val_Set
#==============================================================================
# ◆ 设置 ◆
#==============================================================================
  #--------------------------------------------------------------------------
  # 窗口边宽
  Standard_padding = 8
 
  #--------------------------------------------------------------------------
  # 窗口不透明度
  Opacity = 255
 
  #--------------------------------------------------------------------------
  # 默认窗口宽度
  Default_window_width = 180
 
  #--------------------------------------------------------------------------
  # 默认窗口字体大小
  Default_font_size = 20
 
  #--------------------------------------------------------------------------
  # 默认变量名字体颜色号
  Default_val_name_color = 0
 
  #--------------------------------------------------------------------------
  # 默认变量值字体颜色号
  Default_val_num_color = 0
 
  #--------------------------------------------------------------------------
  # 初始显示的变量。
  # 格式：变量ID => [X坐标, Y坐标, 窗口宽, 字体大小, 变量名色号, 变量值色号]
  # 其中 窗口宽, 字体大小, 变量名色号, 变量值色号 可省略， 省略后为默认值。
  Initial_vals = {
    11 => [0, 0],
    12 => [10, 40],
    13 => [20, 80, 240, 18, 3, 2]
  }
end
#==============================================================================
class XdRs_Val_Data
  #--------------------------------------------------------------------------
  attr_reader :id, :x, :y
  attr_reader :font_size
  attr_reader :window_width
  attr_reader :window_height
  attr_reader :name_color
  attr_reader :num_color
  #--------------------------------------------------------------------------
  def initialize(id, x, y, w=nil, s=nil, c1=nil, c2=nil)
    @id = id
    @x = x || 0
    @y = y || 0
    @font_size = s || XdRs_Show_Val_Set::Default_font_size
    @window_width =  w || XdRs_Show_Val_Set::Default_window_width
    @window_height = XdRs_Show_Val_Set::Standard_padding * 2 + [@font_size, 24].max
    @name_color = c1 || XdRs_Show_Val_Set::Default_val_name_color
    @num_color  = c2 || XdRs_Show_Val_Set::Default_val_num_color
    clear_move_data
  end
  #--------------------------------------------------------------------------
  def clear_move_data
    @speed = 0
    @move_direction = 0
    @move_duration = 0
  end
  #--------------------------------------------------------------------------
  def name
    text = $data_system.variables[@id]
    return text.split(/\^/)[0] || ""
  end
  #--------------------------------------------------------------------------
  def icon_index
    text = $data_system.variables[@id]
    return (text.split(/\^/)[1] || "0").to_i
  end
  #--------------------------------------------------------------------------
  def start_move(direction, duration, speed)
    return if is_moving?
    @move_direction = direction
    @move_duration = duration
    @speed = speed
  end
  #--------------------------------------------------------------------------
  def is_moving?
    return false if ![2,4,6,8].include?(@move_direction)
    return @speed > 0 && @move_duration > 0
  end
  #--------------------------------------------------------------------------
  def update_move
    return if @move_duration == 0
    @move_duration -= 1
    is_moving? && apply_move
    @move_duration == 0 && clear_move_data
  end
  #--------------------------------------------------------------------------
  def apply_move
    @x += @move_direction == 6 ? @speed : (@move_direction == 4 ? -@speed : 0)
    @y += @move_direction == 2 ? @speed : (@move_direction == 8 ? -@speed : 0)
  end
end
#==============================================================================
class Game_System
  #--------------------------------------------------------------------------
  attr_accessor :additive_val, :deleted_val
  #--------------------------------------------------------------------------
  alias xr_show_val_initialize initialize
  def initialize
    xr_show_val_initialize
    setup_initial_vals
  end
  #--------------------------------------------------------------------------
  def setup_initial_vals
    @xr_map_vals = []
    vals = XdRs_Show_Val_Set::Initial_vals
    vals.keys.each do |id|
      data = vals[id]
      show_map_val(id,data[0],data[1],data[2],data[3],data[4],data[5])
    end
    @additive_val = nil
  end
  #--------------------------------------------------------------------------
  def map_vals
    return @xr_map_vals.map{|d| d.id }
  end
  #--------------------------------------------------------------------------
  def get_map_val_data(id)
    return @xr_map_vals.find{|d| d.id == id }
  end
  #--------------------------------------------------------------------------
  def has_map_val(id)
    return @xr_map_vals.any?{|d| d.id == id}
  end
  #--------------------------------------------------------------------------
  def show_map_val(id, x, y, w=nil, s=nil, c1=nil, c2=nil)
    return if has_map_val(id) || id == 0
    @xr_map_vals.push(XdRs_Val_Data.new(id,x,y,w,s,c1,c2))
    @additive_val = id
  end
  #--------------------------------------------------------------------------
  def delete_map_val(id)
    return if !has_map_val(id)
    @xr_map_vals.delete(get_map_val_data(id))
    @deleted_val = id
  end
  #--------------------------------------------------------------------------
  def move_map_val_window(id, drc, drt, speed)
    has_map_val(id) && get_map_val_data(id).start_move(drc, drt, speed)
  end
end
#==============================================================================
class Game_Interpreter
  #--------------------------------------------------------------------------
  def show_map_val(id, x, y, w=nil, s=nil, c1=nil, c2=nil)
    $game_system.show_map_val(id, x, y, w, s, c1, c2)
  end
  #--------------------------------------------------------------------------
  def delete_map_val(id)
    $game_system.delete_map_val(id)
  end
  #--------------------------------------------------------------------------
  def move_val_window(id, direction, duration, speed)
    $game_system.move_map_val_window(id, direction, duration, speed)
  end
end
#==============================================================================
class Window_Map_Val < Window_Base
  #--------------------------------------------------------------------------
  def initialize(data)
    @data = data
    super(@data.x, @data.y, @data.window_width, @data.window_height)
    self.opacity = XdRs_Show_Val_Set::Opacity
    self.z = 9999
    refresh
  end
  #--------------------------------------------------------------------------
  def line_height
    return [@data.font_size, 24].max
  end
  #--------------------------------------------------------------------------
  def standard_padding
    return XdRs_Show_Val_Set::Standard_padding
  end
  #--------------------------------------------------------------------------
  def refresh
    contents.clear
    contents.font.size = @data.font_size
    @last_num = $game_variables[@data.id]
    draw_val_name(draw_val_icon(0))
    draw_val_num
  end
  #--------------------------------------------------------------------------
  def draw_val_icon(x)
    return x if @data.icon_index == 0
    y = (line_height - 24) / 2
    draw_icon(@data.icon_index, x, y)
    return x + 28
  end
  #--------------------------------------------------------------------------
  def draw_val_name(x)
    change_color(text_color(@data.name_color))
    tw = text_size(@data.name).width + 4
    y = (line_height - @data.font_size) / 2
    draw_text(x, y, tw, @data.font_size, @data.name)
  end
  #--------------------------------------------------------------------------
  def draw_val_num
    change_color(text_color(@data.num_color))
    y = (line_height - @data.font_size) / 2
    draw_text(0, y, contents_width, @data.font_size, @last_num.to_s, 2)
  end
  #--------------------------------------------------------------------------
  def is_val_changed?
    return @last_num != $game_variables[@data.id]
  end
  #--------------------------------------------------------------------------
  def update
    super
    @data.update_move
    update_state
    update_location
  end
  #--------------------------------------------------------------------------
  def update_state
    is_val_changed? && refresh
  end
  #--------------------------------------------------------------------------
  def update_location
    self.x = @data.x
    self.y = @data.y
  end
end
#==============================================================================
class Scene_Map
  #--------------------------------------------------------------------------
  def create_xr_val_window(id)
    $game_system.additive_val = nil
    window_name = "@xr_val_window#{id}"
    data = $game_system.get_map_val_data(id)
    window = instance_variable_get(window_name)
    return if !!window && !window.disposed? || !data
    instance_variable_set(window_name, Window_Map_Val.new(data))
  end
  #--------------------------------------------------------------------------
  def dispose_xr_val_window(id)
    $game_system.deleted_val = nil
    window_name = "@xr_val_window#{id}"
    return if !instance_variable_get(window_name)
    instance_variable_get(window_name).dispose
    instance_variable_set(window_name, nil)
  end
  #--------------------------------------------------------------------------
  alias xr_map_val_create_all_windows create_all_windows
  def create_all_windows  
    xr_map_val_create_all_windows
    $game_system.map_vals.each{|id| create_xr_val_window(id) }
  end
  #--------------------------------------------------------------------------
  alias xr_map_val_update update
  def update
    xr_map_val_update
    update_xr_map_val
  end
  #--------------------------------------------------------------------------
  def update_xr_map_val
    $game_system.additive_val && create_xr_val_window($game_system.additive_val)
    $game_system.deleted_val  && dispose_xr_val_window($game_system.deleted_val)
  end
end
#==============================================================================

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


# 〓 地图显示变量 〓                              Author:芯☆淡茹水


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


=begin


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


  ◆ 说明 ◆


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


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


1，变量的命名


   变量命名格式为 => 变量名^图标序号


   未写 图标序号 的变量，不会显示图标。


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


2，游戏中添加变量显示 => 事件-脚本:show_map_val(id, x, y, w, s, c1, c2)


   id :变量ID


   x  :变量窗口显示的X坐标


   y  :变量窗口显示的Y坐标


   w  :变量窗口宽（可省略，省略后为设置的默认值）


   s  :字体大小（可省略，省略后为设置的默认值）


   c1 :变量名文字色号（可省略，省略后为设置的默认值）


   c2 :变量值文字色号（可省略，省略后为设置的默认值）


   


   ※ 如果对应的变量已经在显示中，此条命令无效 ※ 


   ※ 地图上显示的变量个数无限制，理论上可显示无数个变量 ※ 


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


3，游戏中删除变量显示 => 事件-脚本:delete_map_val(id)


   id :变量ID


   


   ※ 如果对应的变量未在显示中，此条命令无效 ※ 


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


4，移动变量窗口 => 事件-脚本:move_val_window(id, direction, duration, speed)


   id        :变量ID


   direction :移动的方向（2:下；4:左；6:右；8：上）


   duration  :移动时持续的帧数


   speed     :移动时每一帧移动的像素值


   


   ※ 如果对应的变量未在显示中或变量窗口正在移动中，此条命令无效 ※ 


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


=end


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


module XdRs_Show_Val_Set


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


# ◆ 设置 ◆


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


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


  # 窗口边宽


  Standard_padding = 8


 


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


  # 窗口不透明度


  Opacity = 255


 


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


  # 默认窗口宽度


  Default_window_width = 180


 


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


  # 默认窗口字体大小


  Default_font_size = 20


 


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


  # 默认变量名字体颜色号


  Default_val_name_color = 0


 


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


  # 默认变量值字体颜色号


  Default_val_num_color = 0


 


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


  # 初始显示的变量。


  # 格式：变量ID => [X坐标, Y坐标, 窗口宽, 字体大小, 变量名色号, 变量值色号]


  # 其中 窗口宽, 字体大小, 变量名色号, 变量值色号 可省略， 省略后为默认值。


  Initial_vals = {


    11 => [0, 0],


    12 => [10, 40],


    13 => [20, 80, 240, 18, 3, 2]


  }


end


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


class XdRs_Val_Data


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


  attr_reader :id, :x, :y


  attr_reader :font_size


  attr_reader :window_width


  attr_reader :window_height


  attr_reader :name_color


  attr_reader :num_color


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


  def initialize(id, x, y, w=nil, s=nil, c1=nil, c2=nil)


    @id = id


    @x = x || 0


    @y = y || 0


    @font_size = s || XdRs_Show_Val_Set::Default_font_size


    @window_width =  w || XdRs_Show_Val_Set::Default_window_width


    @window_height = XdRs_Show_Val_Set::Standard_padding * 2 + [@font_size, 24].max


    @name_color = c1 || XdRs_Show_Val_Set::Default_val_name_color


    @num_color  = c2 || XdRs_Show_Val_Set::Default_val_num_color


    clear_move_data


  end


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


  def clear_move_data


    @speed = 0


    @move_direction = 0


    @move_duration = 0


  end


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


  def name


    text = $data_system.variables[@id]


    return text.split(/\^/)[0] || ""


  end


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


  def icon_index


    text = $data_system.variables[@id]


    return (text.split(/\^/)[1] || "0").to_i


  end


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


  def start_move(direction, duration, speed)


    return if is_moving?


    @move_direction = direction


    @move_duration = duration


    @speed = speed


  end


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


  def is_moving?


    return false if ![2,4,6,8].include?(@move_direction)


    return @speed > 0 && @move_duration > 0


  end


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


  def update_move


    return if @move_duration == 0


    @move_duration -= 1


    is_moving? && apply_move


    @move_duration == 0 && clear_move_data


  end


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


  def apply_move


    @x += @move_direction == 6 ? @speed : (@move_direction == 4 ? -@speed : 0)


    @y += @move_direction == 2 ? @speed : (@move_direction == 8 ? -@speed : 0)


  end


end


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


class Game_System


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


  attr_accessor :additive_val, :deleted_val


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


  alias xr_show_val_initialize initialize


  def initialize


    xr_show_val_initialize


    setup_initial_vals


  end


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


  def setup_initial_vals


    @xr_map_vals = []


    vals = XdRs_Show_Val_Set::Initial_vals


    vals.keys.each do |id|


      data = vals[id]


      show_map_val(id,data[0],data[1],data[2],data[3],data[4],data[5])


    end


    @additive_val = nil


  end


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


  def map_vals


    return @xr_map_vals.map{|d| d.id }


  end


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


  def get_map_val_data(id)


    return @xr_map_vals.find{|d| d.id == id }


  end


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


  def has_map_val(id)


    return @xr_map_vals.any?{|d| d.id == id}


  end


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


  def show_map_val(id, x, y, w=nil, s=nil, c1=nil, c2=nil)


    return if has_map_val(id) || id == 0


    @xr_map_vals.push(XdRs_Val_Data.new(id,x,y,w,s,c1,c2))


    @additive_val = id


  end


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


  def delete_map_val(id)


    return if !has_map_val(id)


    @xr_map_vals.delete(get_map_val_data(id))


    @deleted_val = id


  end


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


  def move_map_val_window(id, drc, drt, speed)


    has_map_val(id) && get_map_val_data(id).start_move(drc, drt, speed)


  end


end


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


class Game_Interpreter


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


  def show_map_val(id, x, y, w=nil, s=nil, c1=nil, c2=nil)


    $game_system.show_map_val(id, x, y, w, s, c1, c2)


  end


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


  def delete_map_val(id)


    $game_system.delete_map_val(id)


  end


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


  def move_val_window(id, direction, duration, speed)


    $game_system.move_map_val_window(id, direction, duration, speed)


  end


end


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


class Window_Map_Val < Window_Base


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


  def initialize(data)


    @data = data


    super(@data.x, @data.y, @data.window_width, @data.window_height)


    self.opacity = XdRs_Show_Val_Set::Opacity


    self.z = 9999


    refresh


  end


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


  def line_height


    return [@data.font_size, 24].max


  end


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


  def standard_padding


    return XdRs_Show_Val_Set::Standard_padding


  end


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


  def refresh


    contents.clear


    contents.font.size = @data.font_size


    @last_num = $game_variables[@data.id]


    draw_val_name(draw_val_icon(0))


    draw_val_num


  end


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


  def draw_val_icon(x)


    return x if @data.icon_index == 0


    y = (line_height - 24) / 2


    draw_icon(@data.icon_index, x, y)


    return x + 28


  end


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


  def draw_val_name(x)


    change_color(text_color(@data.name_color))


    tw = text_size(@data.name).width + 4


    y = (line_height - @data.font_size) / 2


    draw_text(x, y, tw, @data.font_size, @data.name)


  end


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


  def draw_val_num


    change_color(text_color(@data.num_color))


    y = (line_height - @data.font_size) / 2


    draw_text(0, y, contents_width, @data.font_size, @last_num.to_s, 2)


  end


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


  def is_val_changed?


    return @last_num != $game_variables[@data.id]


  end


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


  def update


    super


    @data.update_move


    update_state


    update_location


  end


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


  def update_state


    is_val_changed? && refresh


  end


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


  def update_location


    self.x = @data.x


    self.y = @data.y


  end


end


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


class Scene_Map


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


  def create_xr_val_window(id)


    $game_system.additive_val = nil


    window_name = "@xr_val_window#{id}"


    data = $game_system.get_map_val_data(id)


    window = instance_variable_get(window_name)


    return if !!window && !window.disposed? || !data


    instance_variable_set(window_name, Window_Map_Val.new(data))


  end


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


  def dispose_xr_val_window(id)


    $game_system.deleted_val = nil


    window_name = "@xr_val_window#{id}"


    return if !instance_variable_get(window_name)


    instance_variable_get(window_name).dispose


    instance_variable_set(window_name, nil)


  end


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


  alias xr_map_val_create_all_windows create_all_windows


  def create_all_windows  


    xr_map_val_create_all_windows


    $game_system.map_vals.each{|id| create_xr_val_window(id) }


  end


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


  alias xr_map_val_update update


  def update


    xr_map_val_update


    update_xr_map_val


  end


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


  def update_xr_map_val


    $game_system.additive_val && create_xr_val_window($game_system.additive_val)


    $game_system.deleted_val  && dispose_xr_val_window($game_system.deleted_val)


  end


end


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

这儿也有个示范用法的范例工程

地图显示变量.rar (1.42 MB, 下载次数: 101)

2019-6-4 10:07 上传

点击文件名下载附件