我这个脚本这样写可以吗

yang1zhi

然后我只要在事件的脚本里输入def daojubianhua就可以执行了吧


[pre lang="ruby"]#由于使用了完美物品系统
#函数：gain_item(item_id, kind=1, n=true)，给某角色增减物品。
#      item_id : 物品 ID；n: true是增加，false是减少；kind:种类，1是物品，2是武器，3是防具


class Window_Item
  def daojubianhua
    #变化前的物品ID
    a = [0,1,2,3,4]
    #变化后的物品ID
    b = [5,6,7,8,9]
    #队伍此物品的数量
    c = $game_party.item_number(a)
    #1号角色此物品的数量
    d = $game_actors[1].item_number(a)
    #2号角色此物品的数量
        e = $game_actors[2].item_number(a)
        #3号角色此物品的数量
    f = $game_actors[3].item_number(a)
    #4号角色此物品的数量
    g = $game_actors[4].item_number(a)
#队伍减去所有变化前物品
     $game_party.gain_item(a,-c)
     #队伍增加对应的变化后物品
     $game_party.gain_item(b,c)
     #1号角色此物品拥有时循环
     while d >= 1
       #减去1号角色此物品
     $game_actors[1].gain_item(a,1, false)
     #增加1号角色对应物品
      $game_actors[1].gain_item(b, 1, true)
    end
    #2号角色此物品拥有时循环
        while e >= 1
           #减去2号角色此物品
     $game_actors[2].gain_item(a, 1, false)
     #增加2号角色对应物品
           $game_actors[2].gain_item(b, 1, true)

         end
         #3号角色此物品拥有时循环
     while f >= 1
        #减去3号角色此物品
     $game_actors[3].gain_item(a, 1, false)
     #增加3号角色对应物品
           $game_actors[3].gain_item(b, 1, true)

         end
         #4号角色此物品拥有时循环
     while g >= 1
        #减去4号角色此物品
     $game_actors[4].gain_item(a, 1, false)
     #增加4号角色对应物品
           $game_actors[4].gain_item(b, 1, true)

   end
[/pre]

cinderelmini

目测少了两个end…………
然后这样并不能如愿召唤…………

---

试试看这样吧，这样可以在事件的【脚本】中召唤了。

点击展开／收起

1. #由于使用了完美物品系统
   
2. #函数：gain_item(item_id, kind=1, n=true)，给某角色增减物品。
   
3. #      item_id : 物品 ID；n: true是增加，false是减少；kind:种类，1是物品，2是武器，3是防具
   
4. 
   
5. 
   
6. class Interpreter
   
7.   def daojubianhua
   
8.     # 变化列表
   
9.     item_change = {
   
10.     #变化前ID => 变化后ID
    
11.     1 => 6,
    
12.     2 => 7,
    
13.     3 => 8,
    
14.     4 => 9,
    
15.     5 => 10,
    
16.     }
    
17.     # 遍历变化前的物品ID
    
18.     for mae in item_change.keys
    
19.       # 变化后的物品ID
    
20.       after = item_change[mae]
    
21.       # 队伍此物品的数量
    
22.       party_num = $game_party.item_number(mae)
    
23.       # 队伍减去所有变化前物品
    
24.       $game_party.gain_item(mae,-party_num)
    
25.       #队伍增加对应的变化后物品
    
26.       $game_party.gain_item(after, party_num)
    
27.       for i in 1..4
    
28.         # 角色
    
29.         actor = $game_actors[i]
    
30.         # 如果角色持有变化前的物品
    
31.         if actor.items.include?($data_items[mae])
    
32.           # 减去角色变化前物品
    
33.           actor.gain_item(mae, 1, false)
    
34.           # 增加角色变化后物品
    
35.           actor.gain_item(after, 1, true)
    
36.         end
    
37.       end
    
38.     end
    
39.   end
    
40. end
    

复制代码

---

关于数组里删除一个相等元素的办法之一：

1. Array.each do |a|
   
2.   if a == something
   
3.     a = nil
   
4.     break
   
5.   end
   
6. end
   
7. Array.delete(nil)
   

复制代码

yang1zhi

cinderelmini 发表于 2015-12-14 22:46
目测少了两个end…………
然后这样并不能如愿召唤…………

---

试试看这样吧，这样可以在事件的【脚本】中 ...

原来大神有给出答案了。
我自己修改的是这样的。
我马上试试你给的脚本效果。

脚本

[pre lang="ruby"]#由于使用了完美物品系统
#函数：gain_item(item_id, kind=1, n=true)，给某角色增减物品。
#      item_id : 物品 ID；n: true是增加，false是减少；kind:种类，1是物品，2是武器，3是防具


class Window_Item
  def daojubianhua
    @a = []  
    @b = []
        #变化前
    @a[1] = [0,1,1]   
        #变化后
    @b[1] = [0,2,1]
            #变化前
    @a[2] = [0,3,1]   
        #变化后
    @b[3] = [0,4,1]
    #队伍变化前物品数大于1
while  $game_party.item_number(@a)>=1
  #队伍减去变化前物品
         $game_party.gain_item(@a,-1)
              #队伍增加变化后物品
     $game_party.gain_item(@b,1)
         end
    #1号角色变化前物品数大于1
   while $game_actors[1].item_number(@a)>=1
            #减去1号角色此物品
     $game_actors[1].gain_item(@a,1, false)
          #增加1号角色对应物品
      $game_actors[1].gain_item(@b, 1, true)

end
    #2号角色变化前物品数大于1
     while   $game_actors[2].item_number(@a)>=1
                  #减去2号角色此物品
     $game_actors[2].gain_item(@a, 1, false)
     #增加2号角色对应物品
           $game_actors[2].gain_item(@b, 1, true)
end
        #3号角色变化前物品数大于1
   while $game_actors[3].item_number(@a)>=1
             #减去3号角色此物品
     $game_actors[3].gain_item(@a, 1, false)
     #增加3号角色对应物品
           $game_actors[3].gain_item(@b, 1, true)

end
    #4号角色变化前物品数大于1
  while  $game_actors[4].item_number(@a)>=1
            #减去4号角色此物品
     $game_actors[4].gain_item(@a, 1, false)
     #增加4号角色对应物品
           $game_actors[4].gain_item(@b, 1, true)

end
end
end[/pre]

yang1zhi

cinderelmini 发表于 2015-12-14 22:46
目测少了两个end…………
然后这样并不能如愿召唤…………

---

试试看这样吧，这样可以在事件的【脚本】中 ...

事件脚本里直接输入daojubianhua  可以调用。
不过31行报错


角色(Game_Actor)：
属性：max_size，最大负重，可在游戏更改。如$game_actors[1].max_size += 1
属性：items，物品列表，只可读取，不可修改。如$a = $game_actors[1].items[0]
函数：judge_equip，判断一下是否装备正确。如果不正确就把装备设置为空
函数：gain_item(item_id, kind=1, n=true)，给某角色增减物品。
      item_id : 物品 ID；n: true是增加，false是减少；kind:种类，1是物品，2是武器，3是防具
函数：item_amount，返回现有负重物品数量
函数：have_item?(item)，判断是否拥有某物
函数：item_full?，判断背包是不是满了


队伍(Game_Party)：
属性：max_amount，最大背包中物品数量
属性：now_amount，背包中现有物品数量
函数：item_full?，判断背包是否放满
函数：refresh_item_amount，重新刷新背包中现有物品数量，发生意外的时候用