论坛 › 炼金合成 › 【新装】2013/04/17更新装备金龙大刀、禁灵法杖、魔影镰刀、寂静之服、紫阎战袍附图

空_Husun 发表于 2017-10-20 14:22:08

鲜厨当道

server0451 发表于 2017-11-2 13:18:56

{
   int ItemID = Value("MainMaterialID");
   int MainOrd;
   int SubItemID = Value("SubMaterialID");
   int SubOrd;
   int ExchangeOrd;
   MainOrd = GetItemOrdByCount(ItemID,1);
   if(MainOrd == 0)
   {
      MainOrd = GetFirstItemOrd(ItemID);
      ExchangeOrd = GetFirstEmptyPlace(0);
      if(ExchangeOrd == 0)
      {
          ShowText("No Empty Place for MainItem");
          return;
      }
      ExchangeItem(MainOrd,ExchangeOrd,1);
      MainOrd = GetItemOrdByCount(ItemID,1);
      if(MainOrd == 0)
      {
         ShowText("Exchange Item Failure");
         return;
      }
   }
   
   SubOrd = GetItemOrdByCount(SubItemID,1);
   if(SubOrd == 0)
   {
      SubOrd             = GetFirstItemOrd(SubItemID);
      if(SubOrd == 0)
      {
         ShowText("No SubItem");
               return;
      }
      ExchangeOrd = GetFirstEmptyPlace(0);
      if(ExchangeOrd == 0)
      {
         ShowText("No Empty Place for SubItem");
         return;
      }
      ExchangeItem(SubOrd,ExchangeOrd,1);
      SubOrd = GetItemOrdByCount(SubItemID,1);
      if(SubOrd == 0)
      {
         ShowText("Exchange Item Failure");
         return;
      }
   }
   BeginCompoundItem(MainOrd,SubOrd);
   
   while(1)
   {
         MainOrd = Value("CompoundOrd");
         if(MainOrd == 0)
         {
            ShowText("CompoundItem Failure");
            return;
         }
                      SubOrd = GetItemOrdByCount(SubItemID,1);
                      if(SubOrd == 0)
                      {
                         SubOrd            = GetFirstItemOrd(SubItemID);
                         if(SubOrd == 0)
                         {
                            ShowText("No SubItem");
                            return;
                         }
                        ExchangeOrd = GetFirstEmptyPlace(0);
                         if(ExchangeOrd == 0)
                         {
                                 ShowText("No Empty Place for SubItem");
                                 return;
                         }
                         ExchangeItem(SubOrd,ExchangeOrd,1);
                         SubOrd = GetItemOrdByCount(SubItemID,1);
                         if(SubOrd == 0)
                         {
                                 ShowText("Exchange Item Failure");
                                 return;
                         }
                      }
                      BeginCompoundItem(MainOrd,SubOrd);
                      Yield(0);            
   }      
}

q8585449 发表于 2017-11-18 15:20:07

111111111111

正儿八经的米爸 发表于 2017-11-29 22:39:00

看看

zxc777777 发表于 2018-1-14 22:00:09

学习一下超级班长

小白乖宝宝噢 发表于 2018-2-3 14:15:58

看看哦      谢谢大大了

keliandeyao 发表于 2018-2-10 00:12:16

学习一下

爱在裆下 发表于 2018-2-10 08:53:37

看一眼看一眼

qqwoshyxx 发表于 2018-2-13 22:28:46

1234

qyytyyp 发表于 2018-2-17 09:25:28

啦啦啦

查看完整版本: 【新装】2013/04/17更新装备金龙大刀、禁灵法杖、魔影镰刀、寂静之服、紫阎战袍附图