求一个有成功率的合成脚本。

yuxuan

如题。
找了一下，发现KCG的合成脚本不带成功率设置的，默认100%成功。
可以的话请帮忙改动下KCG的合成脚本，谢谢。
KCG合成：
http://ytomy.sakura.ne.jp/tkool/rpgtech/php/tech.php?tool=VX&cat=tech_vx/item&tech=compose_item

---

版务信息：本贴由楼主自主结贴～

njx937

1122行
$game_party.gain_item(@item, @number_window.number)
改成

1. if rand(5) > 3
   
2. $game_party.gain_item(@item, @number_window.number)
   
3. end
   

复制代码

之后再建flag说明合成失败就行
rand是个好东西啊~
p.s.我用rand。。做了个卖假货的系统。。。
商店1/10几率买到假货。。。

yuxuan

以下引用njx937于2009-2-8 20:56:29的发言：

1122行
$game_party.gain_item(@item, @number_window.number)
改成if rand(5) > 3
$game_party.gain_item(@item, @number_window.number)
end


之后再建flag说明合成失败就行
rand是个好东西啊~
p.s.我用rand。。做了个卖假货的系统。。。
商店1/10几率买到假货。。。

感谢，我对脚本有点感冒，请说明下使用方法吧...

njx937

以下引用yuxuan于2009-2-8 21:03:57的发言：

感谢，我对脚本有点感冒，请说明下使用方法吧...

是指kgc的脚本？还是我加的？

yuxuan

以下引用njx937于2009-2-8 21:06:24的发言：


以下引用yuxuan于2009-2-8 21:03:57的发言：

感谢，我对脚本有点感冒，请说明下使用方法吧...


是指kgc的脚本？还是我加的？

你加的

njx937

理解脚本。。。弄了很久。。。失败了。。还是不知道怎么合成。。。。
大概这样吧。。
脚本的最后

1.   #--------------------------------------------------------------------------
   
2.   # ○ 合成の処理
   
3.   #--------------------------------------------------------------------------
   
4.   def operation_compose
   
5.     $game_party.lose_gold(@number_window.number * @item.compose_cost)
   
6.     if  rand(5) > 3     # 3/5左右吧。。数学不好。。自己改
   
7.       $game_party.gain_item(@item, @number_window.number)
   
8.      compose_ok = true
   
9.     else
   
10.      compose_ok = false
    
11.             t_window = Window_Base.new((640-200)/2,128,200,56)
    
12.       t_window.contents = Bitmap.new( t_window.width - 32, t_window.height - 32)
    
13.       t_window.contents.draw_text(0,0,208,24,"合成失败：")
    
14.       t_window.opacity = 160
    
15.       # 停顿 2/3秒
    
16.       for i in 0..40
    
17.         Graphics.update
    
18.       end
    
19.       # 淡出
    
20.       for i in 0..30
    
21.         t_window.opacity -= 30
    
22.         t_window.contents_opacity -= 30
    
23.         Graphics.update
    
24.       end
    
25.     t_window.dispose
    
26.     end  
    
27.     # 素材を減らす
    
28.     @item.compose_materials.each { |material|
    
29.       $game_party.lose_item(material.item,
    
30.         material.number * @number_window.number)
    
31.     }
    
32.     # 合成済みにする
    
33.     $game_party.set_item_composed(@item,compose_ok)
    
34.   end

复制代码

由于不会怎么弄出合成的。。。测试不能。。。
原谅我的低能。。。
估计是可以的。。
估计。。。

---

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～

yuxuan

以下引用njx937于2009-2-8 21:50:10的发言：

理解脚本。。。弄了很久。。。失败了。。还是不知道怎么合成。。。。
大概这样吧。。
脚本的最后  #--------------------------------------------------------------------------
  # ○ 合成の処理
  #--------------------------------------------------------------------------
  def operation_compose
    $game_party.lose_gold(@number_window.number * @item.compose_cost)
    if  rand(5) > 3     # 3/5左右吧。。数学不好。。自己改
      $game_party.gain_item(@item, @number_window.number)
     compose_ok = true
    else
     compose_ok = false
            t_window = Window_Base.new((640-200)/2,128,200,56)
      t_window.contents = Bitmap.new( t_window.width - 32, t_window.height - 32)
      t_window.contents.draw_text(0,0,208,24,"合成失败：")
      t_window.opacity = 160
      # 停顿 2/3秒
      for i in 0..40
        Graphics.update
      end
      # 淡出
      for i in 0..30
        t_window.opacity -= 30
        t_window.contents_opacity -= 30
        Graphics.update
      end
    t_window.dispose
    end  
    # 素材を減らす
    @item.compose_materials.each { |material|
      $game_party.lose_item(material.item,
        material.number * @number_window.number)
    }
    # 合成済みにする
    $game_party.set_item_composed(@item,compose_ok)
  end

由于不会怎么弄出合成的。。。测试不能。。。
原谅我的低能。。。
估计是可以的。。
估计。。。

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～


[本贴由作者于 2009-2-8 21:54:55 最后编辑]

你尽力就行了，感谢你{/wx}