Project1»广场 › 技术讨论 › RPG Maker VX Ace 讨论区 › 求这段代码的正确写法！！

求这段代码的正确写法！！

查看数: 3129 | 评论数: 10 | 收藏 0

关灯 | 提示：支持键盘翻页<-左右->

帖子模式

雷影

发布时间: 2015-5-7 21:38

正文摘要:

本帖最后由雷影于 2015-5-7 21:40 编辑 RUBY 代码复制class Game_System #-------------------------------------------------------------------------- # ● ...

雷影 发表于 2015-5-8 11:32:10

cinderelmini 发表于 2015-5-8 10:57
就这样直接用，都是父类Window_Base里面的方法。
此外模块内模块的样式没用过，大概应该是这样用吧？
弹错 ...

谢谢了！你这方法是文字颜色都固定了！！
我只是想让佣兵等级的字母变色而已，研究了半天已经搞定了！！
放上完整代码，有谁需要的也可以用用。

RUBY 代码复制

#==============================================================================
# F10 - 变量窗口 - Ｂｙ芙蕾娅    
#------------------------------------------------------------------------------
# 　★ - 新增  ☆ - 修改  ■ - 删除　● - 无变更
#==============================================================================
 
#==============================================================================
#佣兵等级，积分显示窗口  Ｂｙ 雷影
#代码来自芙蕾娅变量窗口的改写！
#==============================================================================
module Freya
  # 初始游戏时是否显示窗口
  BeginShow = false
  # 变量ID
  WindowVariableID = 60   
  #$game_system.variable_show = true
  # 为显示进度窗口，要关闭则设把true设为false
 
end
#==============================================================================
# ■ Game_System
#------------------------------------------------------------------------------
# 　处理系统附属数据的类。保存存档和菜单的禁止状态之类的数据。
#   本类的实例请参考 $game_system 。
#==============================================================================
 
class Game_System
  #--------------------------------------------------------------------------
  # ● 定义实例变量
  #--------------------------------------------------------------------------
  attr_accessor :variable_show_text            # 佣兵积分
  attr_accessor :variable_show                 # 窗口是否显示 
  attr_accessor :variable_show_text2           # 佣兵等级
 
  #--------------------------------------------------------------------------
  # ● 初始化对象
  #--------------------------------------------------------------------------
  alias vw_initialize initialize
  def initialize
    vw_initialize    
    @variable_show_text = "佣兵积分"
    @variable_show_text2 = "佣兵等级"
    @variable_show = Freya::BeginShow
 
    #怎么写才不会出错啊？？
  end
end
#==============================================================================
# ■ Window_Variable
#------------------------------------------------------------------------------
# 　显示变量窗口
#==============================================================================
class Window_Variable < Window_Base
  #--------------------------------------------------------------------------
  # ● 初始化对象
  #--------------------------------------------------------------------------
  def initialize
    super(0,0, window_width,window_height)
    unless $game_system.variable_show
      self.opacity = 0
      self.contents_opacity = 0
    end
    refresh
  end
  #--------------------------------------------------------------------------
  # ● 获取窗口的宽度，高度
  #--------------------------------------------------------------------------
  def window_width
    return 150
  end
  def window_height
    return 75
  end
  #--------------------------------------------------------------------------
  # ● 更新画面
  #--------------------------------------------------------------------------
  def update
    super
    if $game_system.variable_show
      self.opacity = 255
      self.contents_opacity = 255
    else
      self.opacity = 0
      self.contents_opacity = 0
    end
    refresh
  end
 
 
  #-------------------------------------------------------------------------- 
  # ● 刷新
  #--------------------------------------------------------------------------
 
  $_PS0["Window_Base_textcolor"] = 20150508
  #==============================================================================
  # [PS0] 通用配置模块  
  #==============================================================================
  module PS0
    module Window_Base_textcolor
      Color1  = Color.new(255, 255, 255, 255)
      Color2  = Color.new(128, 255, 255, 255)
      Color3  = Color.new(128, 128, 255, 255)
      Color4  = Color.new(255, 255, 128, 255)
      Color5  = Color.new(128, 255, 128, 255)
      Color6  = Color.new(255, 128, 128, 255)
      Color7  = Color.new(255, 255,   0, 255)
      Color8  = Color.new(255,   0, 255, 255)
      Color9  = Color.new(255,   0,   0, 255)
    end
  end
 
  def refresh
 
    contents.clear
 
    temp = $game_variables ? $game_variables[60] : []
 
    case temp
 
    when 0..49 
      color = PS0::Window_Base_textcolor::Color1
      renk = "F"      
    when 50..99
      color = PS0::Window_Base_textcolor::Color2
      renk = 'E'
    when 100..199
      color = PS0::Window_Base_textcolor::Color3
      renk = 'D'
    when 200..399
      color = PS0::Window_Base_textcolor::Color4
      renk = 'C'    
    when 400..599
      color = PS0::Window_Base_textcolor::Color5 
      renk = 'B'    
    when 600..799      
      color = PS0::Window_Base_textcolor::Color6
      renk = 'A'          
    when 800..999
      color = PS0::Window_Base_textcolor::Color7   
      renk = 'S'    
    when 1000..1200      
      color = PS0::Window_Base_textcolor::Color8     
      renk = 'SS' 
    else      
      color = PS0::Window_Base_textcolor::Color9 
      renk = 'SSS' 
    end
 
    @variable_show_text3 = renk
 
    draw_text(0, line_height/4, contents.width, line_height, $game_system.variable_show_text2) #显示佣兵等级文字
 
    change_color(color) #等级文字变色
 
    draw_text(0, line_height/4, contents.width, line_height, @variable_show_text3,2) #显示佣兵等级
 
    change_color(Color.new(255, 255, 255))
 
    draw_text(0, line_height*1, contents.width, line_height, $game_variables[Freya::WindowVariableID],2)#显示佣兵积分的变量 
 
    draw_text(0, line_height*1, contents.width, line_height, $game_system.variable_show_text)#显示佣兵积分字样
 
    contents.font.size = Font.default_size
 
    reset_font_settings
  end
end
#==============================================================================
# ■ Scene_Map
#------------------------------------------------------------------------------
# 　地图画面
#==============================================================================
class Scene_Map < Scene_Base
  #--------------------------------------------------------------------------
  # ● 生成所有窗口
  #--------------------------------------------------------------------------
  alias vw_create_all_windows create_all_windows
  def create_all_windows
    vw_create_all_windows
    @variable_window = Window_Variable.new
    @variable_window.y = Graphics.height - @variable_window.height-128 #窗口位置
  end
end

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


# F10 - 变量窗口 - Ｂｙ芙蕾娅    


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


# 　★ - 新增  ☆ - 修改  ■ - 删除　● - 无变更


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


 


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


#佣兵等级，积分显示窗口  Ｂｙ 雷影


#代码来自芙蕾娅变量窗口的改写！


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


module Freya


  # 初始游戏时是否显示窗口


  BeginShow = false


  # 变量ID


  WindowVariableID = 60   


  #$game_system.variable_show = true


  # 为显示进度窗口，要关闭则设把true设为false


 


end


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


# ■ Game_System


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


# 　处理系统附属数据的类。保存存档和菜单的禁止状态之类的数据。


#   本类的实例请参考 $game_system 。


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


 


class Game_System


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


  # ● 定义实例变量


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


  attr_accessor :variable_show_text            # 佣兵积分


  attr_accessor :variable_show                 # 窗口是否显示 


  attr_accessor :variable_show_text2           # 佣兵等级


 


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


  # ● 初始化对象


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


  alias vw_initialize initialize


  def initialize


    vw_initialize    


    @variable_show_text = "佣兵积分"


    @variable_show_text2 = "佣兵等级"


    @variable_show = Freya::BeginShow


 


    #怎么写才不会出错啊？？


  end


end


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


# ■ Window_Variable


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


# 　显示变量窗口


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


class Window_Variable < Window_Base


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


  # ● 初始化对象


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


  def initialize


    super(0,0, window_width,window_height)


    unless $game_system.variable_show


      self.opacity = 0


      self.contents_opacity = 0


    end


    refresh


  end


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


  # ● 获取窗口的宽度，高度


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


  def window_width


    return 150


  end


  def window_height


    return 75


  end


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


  # ● 更新画面


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


  def update


    super


    if $game_system.variable_show


      self.opacity = 255


      self.contents_opacity = 255


    else


      self.opacity = 0


      self.contents_opacity = 0


    end


    refresh


  end


 


 


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


  # ● 刷新


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


 


  $_PS0["Window_Base_textcolor"] = 20150508


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


  # [PS0] 通用配置模块  


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


  module PS0


    module Window_Base_textcolor


      Color1  = Color.new(255, 255, 255, 255)


      Color2  = Color.new(128, 255, 255, 255)


      Color3  = Color.new(128, 128, 255, 255)


      Color4  = Color.new(255, 255, 128, 255)


      Color5  = Color.new(128, 255, 128, 255)


      Color6  = Color.new(255, 128, 128, 255)


      Color7  = Color.new(255, 255,   0, 255)


      Color8  = Color.new(255,   0, 255, 255)


      Color9  = Color.new(255,   0,   0, 255)


    end


  end


 


  def refresh


 


    contents.clear


 


    temp = $game_variables ? $game_variables[60] : []


 


    case temp


 


    when 0..49 


      color = PS0::Window_Base_textcolor::Color1


      renk = "F"      


    when 50..99


      color = PS0::Window_Base_textcolor::Color2


      renk = 'E'


    when 100..199


      color = PS0::Window_Base_textcolor::Color3


      renk = 'D'


    when 200..399


      color = PS0::Window_Base_textcolor::Color4


      renk = 'C'    


    when 400..599


      color = PS0::Window_Base_textcolor::Color5 


      renk = 'B'    


    when 600..799      


      color = PS0::Window_Base_textcolor::Color6


      renk = 'A'          


    when 800..999


      color = PS0::Window_Base_textcolor::Color7   


      renk = 'S'    


    when 1000..1200      


      color = PS0::Window_Base_textcolor::Color8     


      renk = 'SS' 


    else      


      color = PS0::Window_Base_textcolor::Color9 


      renk = 'SSS' 


    end


 


    @variable_show_text3 = renk


 


    draw_text(0, line_height/4, contents.width, line_height, $game_system.variable_show_text2) #显示佣兵等级文字


 


    change_color(color) #等级文字变色


 


    draw_text(0, line_height/4, contents.width, line_height, @variable_show_text3,2) #显示佣兵等级


 


    change_color(Color.new(255, 255, 255))


 


    draw_text(0, line_height*1, contents.width, line_height, $game_variables[Freya::WindowVariableID],2)#显示佣兵积分的变量 


 


    draw_text(0, line_height*1, contents.width, line_height, $game_system.variable_show_text)#显示佣兵积分字样


 


    contents.font.size = Font.default_size


 


    reset_font_settings


  end


end


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


# ■ Scene_Map


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


# 　地图画面


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


class Scene_Map < Scene_Base


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


  # ● 生成所有窗口


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


  alias vw_create_all_windows create_all_windows


  def create_all_windows


    vw_create_all_windows


    @variable_window = Window_Variable.new


    @variable_window.y = Graphics.height - @variable_window.height-128 #窗口位置


  end


end

cinderelmini 发表于 2015-5-8 10:57:20

#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
contents.clear
temp = $game_variables ? $game_variables[60] : []
case temp
when 0..49
renk = 'F'
when 50..99
renk = 'E'
when 100..149
renk = 'D'
#......
else
renk = 'SSS'
end
@variable_show_text3 = renk
change_color(PS0::Window_Base_Itemcolor::Color1)
draw_text(0, line_height * 0, contents.width, line_height, $game_variables[Freya::WindowVariableID],2)#显示佣兵积分的变量
contents.font.size = 16
change_color(PS0::Window_Base_Itemcolor::Color2)
draw_text(0, line_height * 1, contents.width, line_height, $game_system.variable_show_text)#显示佣兵积分字样
change_color(PS0::Window_Base_Itemcolor::Color3)
draw_text(0, line_height * 2, contents.width, line_height, @variable_show_text3) #显示佣兵等级字样
change_color(PS0::Window_Base_Itemcolor::Color4)
draw_text(0, line_height * 3, contents.width, line_height, $game_system.variable_show_text3,2) #显示Renk
#上面的文字重叠了怎么改才行？
reset_font_settings
end

复制代码

就这样直接用，都是父类Window_Base里面的方法。
此外模块内模块的样式没用过，大概应该是这样用吧？
弹错请通知~

雷影 发表于 2015-5-7 23:41:28

module PS0
module Window_Base_Itemcolor
Color1 = Color.new(255, 255, 255) # 一般品质的色彩（白，1）
Color2 = Color.new(128, 255, 128) # 平庸品质的色彩（绿，2）
Color3 = Color.new(128, 128, 255) # 精良品质的色彩（蓝，3）
Color4 = Color.new(255, 0, 255) # 卓越品质的色彩（紫，4）
Color5 = Color.new(255, 128, 128) # 神秘品质的色彩（红，5）
Color6 = Color.new(255, 128, 0) # 传说品质的色彩（橙，6）
Color7 = Color.new(255, 255, 128) # 特殊品质的色彩（黄，7）
end
end

复制代码

脚本库里有现成的设定好的颜色，要怎么用？

cinderelmini 发表于 2015-5-7 22:23:04

本帖最后由 cinderelmini 于 2015-5-7 22:35 编辑

#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
contents.clear
temp = $game_variables ? $game_variables[60] : []
case temp
when 0..49
renk = 'F'
when 50..99
renk = 'E'
when 100..149
renk = 'D'
#......
else
renk = 'SSS'
end
@variable_show_text3 = renk
draw_text(0, line_height * 0, contents.width, line_height, $game_variables[Freya::WindowVariableID],2)#显示佣兵积分的变量
contents.font.size = 16
draw_text(0, line_height * 1, contents.width, line_height, $game_system.variable_show_text)#显示佣兵积分字样
draw_text(0, line_height * 2, contents.width, line_height, @variable_show_text3) #显示佣兵等级字样
draw_text(0, line_height * 3, contents.width, line_height, $game_system.variable_show_text3,2) #显示Renk
#上面的文字重叠了怎么改才行？
contents.font.size = Font.default_size
end

复制代码

如果这都不行那么……………………

首先Game_System里initialize里面的两个变量分歧要记得去掉或者#掉……
然后上面这段是放在那个要显示的窗口里面的……里面原有refresh，看需求替换或者添加……

点评

cinderelmini

实在不行请上脚本或者工程…… 发表于 2015-5-7 22:37

cinderelmini

本楼已编辑…… 发表于 2015-5-7 22:36

雷影

不行呢！错误报告还是和上面一样！发表于 2015-5-7 22:28

VIPArcher 发表于 2015-5-7 22:04:58

本帖最后由 VIPArcher 于 2015-5-7 22:08 编辑

雷影发表于 2015-5-7 21:53
报错是这个！
加上上面哪个代码也是一样

默认脚本中$game_system先于$game_variables之前生成，这个时候变量还没有初始化，然而这里你不要这样做就可以了
解决方法:去掉你脚本里的各种 variable_show_text3 # Renk
绘制那里改成

RUBY 代码复制

#--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
    contents.clear
    renk = @variable_show_text3 = case $game_variables[60]
    when 0..49 then 'F'
    when 50..99 then 'E'
    when 100..149 then 'D'
    #......
    else 'SSS'
    end
    draw_text(0, line_height * 0, contents.width, line_height, $game_variables[Freya::WindowVariableID],2)#显示佣兵积分的变量      
    contents.font.size = 16
 
    draw_text(0, line_height * 1, contents.width, line_height, $game_system.variable_show_text)#显示佣兵积分字样
 
    draw_text(0, line_height * 2, contents.width, line_height, renk) #显示佣兵等级字样
 
    draw_text(0, line_height * 3, contents.width, line_height, $game_system.variable_show_text3,2) #显示Renk
    #上面的文字重叠了怎么改 才行？ 
    contents.font.size = Font.default_size
  end

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


  # ● 刷新


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


  def refresh


    contents.clear


    renk = @variable_show_text3 = case $game_variables[60]


    when 0..49 then 'F'


    when 50..99 then 'E'


    when 100..149 then 'D'


    #......


    else 'SSS'


    end


    draw_text(0, line_height * 0, contents.width, line_height, $game_variables[Freya::WindowVariableID],2)#显示佣兵积分的变量      


    contents.font.size = 16


 


    draw_text(0, line_height * 1, contents.width, line_height, $game_system.variable_show_text)#显示佣兵积分字样


 


    draw_text(0, line_height * 2, contents.width, line_height, renk) #显示佣兵等级字样


 


    draw_text(0, line_height * 3, contents.width, line_height, $game_system.variable_show_text3,2) #显示Renk


    #上面的文字重叠了怎么改 才行？ 


    contents.font.size = Font.default_size


  end

未测试

howhow1314 发表于 2015-5-7 21:45:53

本帖最后由 howhow1314 于 2015-5-7 21:54 编辑

你敢說一下報什麼錯嗎

目測是因為$game_variables[60]為nil

RUBY 代码复制

class Game_Variables
  alias initialize_z initialize
  def initialize
    @data[60] = 0
  end
end

class Game_Variables


  alias initialize_z initialize


  def initialize


    @data[60] = 0


  end


end

加這看看...

我口胡了..剛看到默認腳本裡有這東西
def [](variable_id)
@data[variable_id] || 0
end

点评

雷影

哪有什么办法解决吗？发表于 2015-5-7 22:05

帐号		自动登录	找回密码
密码			注册会员

求这段代码的正确写法！！

正文摘要:

回复

点评

点评