Project1

标题: 随机脚本报错求教。。。 [打印本页]
作者: 是猪别乱叫    时间: 2016-6-16 15:49
标题: 随机脚本报错求教。。。

作者: 是猪别乱叫    时间: 2016-6-16 15:52
本帖最后由 是猪别乱叫 于 2016-6-16 15:55 编辑

AAAAAAAAAAAA
作者: 是猪别乱叫    时间: 2016-6-16 15:55
  1. =begin

  3.   說明：
  4.   
  5.   事件中執行腳本呼叫隨機物品商店
  6.   
  7.     random_shop(group, number)
  8.     例：隨機出售組:A中的三件商品:  random_shop(:A, 3)
  9.   
  10.    
  11.   打折出售
  12.   
  13.     random_shop(group, number, disount)
  14.     例：8折出售商品: random_shop(:B, 4, 0.8)
  15.    
  16.    
  17.   不讓玩家出售物品
  18.   
  19.     random_shop(group, number, discount, purchase_only)
  20.     例（須設定折扣）：random_shop(:C, 20, 1, 1)
  21.    
  22. =end


  25. class Game_Interpreter
  26.   Random_Goods = { #在這裡定義你的商品列表
  27.     :A => [:i1, :i2, :i3, :w1, :w2, :a1, :a3], #i物品，w武器，每個組用逗號隔開
  28.     :B => [:i9, :i11_16,:a1_116,:a233_259,:a261_301,:a320_372],
  29.            #這樣代表i物品1~10，w武器1~12，a護甲5~9
  30.     :C => [:w1_60]
  31.   }
  32.   # 設置變數號碼，當變數改變后商人才會更新商品
  33.   # 設置為 nil 的話，每次跟商人對話商品都會更新
  34.   Goods_Change_Var = nil
  35.   #
  36.   def random_shop(group, num, discount = 1, purchase_only = false)
  37.     return if $game_party.in_battle
  38.     goods = []
  39.     Random_Goods[group].each {|g|
  40.       g = g.to_s
  41.       type = g[0]=="i" ? 0 : g[0]=="w" ? 1 : 2
  42.       if g.include?("_")
  43.         a, b = g.scan(/\d+/)
  44.         for i in a.to_i..b.to_i
  45.           begin
  46.             goods.push(random_goods_info(discount, type, i))
  47.           rescue
  48.             report_random_goods_crash(group, g)
  49.             return
  50.           end
  51.         end
  52.       else
  53.         g =~ /(\d+)/
  54.         begin
  55.           goods.push(random_goods_info(discount, type, $1.to_i))
  56.         rescue
  57.           report_random_goods_crash(group, g)
  58.           return
  59.         end
  60.       end
  61.     }
  62.     SceneManager.call(Scene_Shop)
  63.     SceneManager.scene.prepare(new_random_goods(goods, num), purchase_only)
  64.     Fiber.yield
  65.   end
  66.   #
  67.   def new_random_goods(goods, num)
  68.     return unless event = get_character(0)
  69.     if Goods_Change_Var
  70.       key = [@map_id, @event_id, :random_goods]
  71.       var = $game_variables[Goods_Change_Var]
  72.       unless $game_self_switches.get_value(key) &&
  73.              $game_self_switches.get_value(key)[0] == var
  74.         goods = goods.sample(num).sort
  75.         $game_self_switches.set_without_refresh(key, [var, goods])
  76.         return goods
  77.       else
  78.         return $game_self_switches.get_value(key)[1]
  79.       end
  80.     else
  81.       return goods.sample(num).sort
  82.     end
  83.   end
  84.   #
  85.   def random_goods_info(discount, type, i)
  86.     discount == 1 ?
  87.       [type, i, 0, which_random_goods(type)[i].price] :
  88.       [type, i, 1, (which_random_goods(type)[i].price * discount).round]
  89.   end
  90.   def which_random_goods(type)
  91.     case type
  92.     when 0; $data_items
  93.     when 1; $data_weapons
  94.     when 2; $data_armors
  95.     end
  96.   end
  97.   #
  98.   def report_random_goods_crash(group, g)
  99.     msgbox("隨機商店發生錯誤：Group :#{group}  Element :#{g}") if $TEST
  100.   end
  101. end

  103. class Game_SelfSwitches
  104.   def set_without_refresh(key, value)
  105.     @data[key] = value
  106.   end
  107.   def get_value(key)
  108.     @data[key]
  109.   end
  110. end

复制代码




欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1