变量商店脚本出错了

小小西

这个脚本某个事件可以正常购买东西关闭，在其他事件不管买不买东西，只要关闭商店时就出现错误，看不懂问题。

RUBY 代码复制

=begin
===============================================================================
  变量商店 By喵呜喵5
===============================================================================
【说明】
  
  可以使用变量在商店进行购物
  
  首先先在事件中使用脚本命令输入：shop_set(变量的ID,"变量的单位")，例如：  
  shop_set(1,"节操")
  
  接着使用事件中的商店处理时，购买物品不会消耗金钱而是消耗对应的变量
  
  使用命令shop_set可以恢复原来使用金钱购物的商店
  
=end
$m5script = {} if $m5script.nil?
$m5script["M5VARShop"] = true
module M5VARShop
#==============================================================================
#  设定部分
#==============================================================================
 
  PRICE = false   #true
 
  #设置为true的情况下，变量商店物品的出售价格为【数据库中】物品售价的一半
  #设置为false的情况下， 变量商店物品的出售价格为【该商店】物品售价的一半
 
  VAR = 1
 
  #这里设置一个没有使用到的变量的ID，游戏中请不要修改这个ID的变量数值
 
#==============================================================================
#  设定结束
#==============================================================================
end
class Game_Interpreter
  def shop_set(gold=0,unit="")
    gold = 0 if gold == M5VARShop::VAR
    $game_variables[M5VARShop::VAR]=[gold,unit]
  end
end
class Window_Gold_New < Window_Gold
  def initialize(gold,unit)
    @gold,@unit = gold,unit
    super()
  end
  def value
    @gold == 0 ? super : $game_variables[@gold]    
  end
  def currency_unit
    (@gold == 0 || @unit == "") ? super : @unit
  end
end
class Scene_Shop
  def create_gold_window
    $game_variables[M5VARShop::VAR] = [0,""] if \
    !$game_variables[M5VARShop::VAR].is_a?(Array)
    @gold_window = Window_Gold_New.new($game_variables[M5VARShop::VAR][0],$game_variables[M5VARShop::VAR][1])
    @gold_window.viewport = @viewport
    @gold_window.x = Graphics.width - @gold_window.width
    @gold_window.y = @help_window.height
  end
  alias m5_20140318_do_buy  do_buy  
  def do_buy(number)
    if $game_variables[M5VARShop::VAR][0] == 0
      m5_20140318_do_buy(number)
    else
      $game_variables[$game_variables[M5VARShop::VAR][0]] -= number * buying_price
      $game_party.gain_item(@item, number)
    end    
  end
  alias m5_20140318_do_sell do_sell
  def do_sell(number)
    if $game_variables[M5VARShop::VAR][0] == 0
      m5_20140318_do_sell(number)
    else
      $game_variables[$game_variables[M5VARShop::VAR][0]] += number * selling_price
      $game_party.lose_item(@item, number)
    end
  end
  alias m5_20140318_selling_price selling_price
  def selling_price
    return m5_20140318_selling_price if M5VARShop::PRICE || $game_variables[M5VARShop::VAR][0] == 0
    buying_price / 2
  end
end

=begin


===============================================================================


  变量商店 By喵呜喵5


===============================================================================


【说明】


  


  可以使用变量在商店进行购物


  


  首先先在事件中使用脚本命令输入：shop_set(变量的ID,"变量的单位")，例如：  


  shop_set(1,"节操")


  


  接着使用事件中的商店处理时，购买物品不会消耗金钱而是消耗对应的变量


  


  使用命令shop_set可以恢复原来使用金钱购物的商店


  


=end


$m5script = {} if $m5script.nil?


$m5script["M5VARShop"] = true


module M5VARShop


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


#  设定部分


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


 


  PRICE = false   #true


 


  #设置为true的情况下，变量商店物品的出售价格为【数据库中】物品售价的一半


  #设置为false的情况下， 变量商店物品的出售价格为【该商店】物品售价的一半


 


  VAR = 1


 


  #这里设置一个没有使用到的变量的ID，游戏中请不要修改这个ID的变量数值


 


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


#  设定结束


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


end


class Game_Interpreter


  def shop_set(gold=0,unit="")


    gold = 0 if gold == M5VARShop::VAR


    $game_variables[M5VARShop::VAR]=[gold,unit]


  end


end


class Window_Gold_New < Window_Gold


  def initialize(gold,unit)


    @gold,@unit = gold,unit


    super()


  end


  def value


    @gold == 0 ? super : $game_variables[@gold]    


  end


  def currency_unit


    (@gold == 0 || @unit == "") ? super : @unit


  end


end


class Scene_Shop


  def create_gold_window


    $game_variables[M5VARShop::VAR] = [0,""] if \


    !$game_variables[M5VARShop::VAR].is_a?(Array)


    @gold_window = Window_Gold_New.new($game_variables[M5VARShop::VAR][0],$game_variables[M5VARShop::VAR][1])


    @gold_window.viewport = @viewport


    @gold_window.x = Graphics.width - @gold_window.width


    @gold_window.y = @help_window.height


  end


  alias m5_20140318_do_buy  do_buy  


  def do_buy(number)


    if $game_variables[M5VARShop::VAR][0] == 0


      m5_20140318_do_buy(number)


    else


      $game_variables[$game_variables[M5VARShop::VAR][0]] -= number * buying_price


      $game_party.gain_item(@item, number)


    end    


  end


  alias m5_20140318_do_sell do_sell


  def do_sell(number)


    if $game_variables[M5VARShop::VAR][0] == 0


      m5_20140318_do_sell(number)


    else


      $game_variables[$game_variables[M5VARShop::VAR][0]] += number * selling_price


      $game_party.lose_item(@item, number)


    end


  end


  alias m5_20140318_selling_price selling_price


  def selling_price


    return m5_20140318_selling_price if M5VARShop::PRICE || $game_variables[M5VARShop::VAR][0] == 0


    buying_price / 2


  end


end

喵呜喵5

你的某个事件的出现条件是否设置成了变量商店脚本所使用的变量了？

（另外，我看了下这段代码，稍微有点旧了，之后我更新一个兼容性更好的版本


==========


变量商店脚本更新了一个更好的版本

https://rpg.blue/home.php?mod=sp ... o=blog&id=12019

（请注意，使用方法相对旧版发生了细微变化）