中网宝典论坛

 找回密码
 立即注册
搜索
查看: 4141|回复: 2

[脚本] 极速 刷 初级炼金术

[复制链接]
发表于 2017-2-12 20:56:26 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

x
  1. {
  2.      int ItemID = Value("MainMaterialID");
  3.      int MainOrd;
  4.      int SubItemID = Value("SubMaterialID");
  5.      int SubOrd;
  6.      int ExchangeOrd;
  7.      MainOrd = GetItemOrdByCount(ItemID,1);
  8.      if(MainOrd == 0)
  9.      {
  10.         MainOrd = GetFirstItemOrd(ItemID);
  11.         ExchangeOrd = GetFirstEmptyPlace(0);
  12.         if(ExchangeOrd == 0)
  13.         {
  14.           ShowText("No Empty Place for MainItem");
  15.           return;
  16.         }
  17.         ExchangeItem(MainOrd,ExchangeOrd,1);
  18.         MainOrd = GetItemOrdByCount(ItemID,1);
  19.         if(MainOrd == 0)
  20.         {
  21.            ShowText("Exchange Item Failure");
  22.            return;
  23.         }
  24.      }
  25.      
  26.      SubOrd = GetItemOrdByCount(SubItemID,1);
  27.      if(SubOrd == 0)
  28.      {
  29.         SubOrd             = GetFirstItemOrd(SubItemID);
  30.         if(SubOrd == 0)
  31.         {
  32.            ShowText("No SubItem");
  33.                  return;
  34.         }
  35.         ExchangeOrd = GetFirstEmptyPlace(0);
  36.         if(ExchangeOrd == 0)
  37.         {
  38.            ShowText("No Empty Place for SubItem");
  39.            return;
  40.         }
  41.         ExchangeItem(SubOrd,ExchangeOrd,1);
  42.         SubOrd = GetItemOrdByCount(SubItemID,1);
  43.         if(SubOrd == 0)
  44.         {
  45.            ShowText("Exchange Item Failure");
  46.            return;
  47.         }
  48.      }
  49.      BeginCompoundItem(MainOrd,SubOrd);
  50.      
  51.      while(1)
  52.      {
  53.          MainOrd = Value("CompoundOrd");
  54.          if(MainOrd == 0)
  55.          {
  56.             ShowText("CompoundItem Failure");
  57.             return;
  58.          }
  59.                       SubOrd = GetItemOrdByCount(SubItemID,1);
  60.                       if(SubOrd == 0)
  61.                       {
  62.                          SubOrd            = GetFirstItemOrd(SubItemID);
  63.                          if(SubOrd == 0)
  64.                          {
  65.                             ShowText("No SubItem");
  66.                             return;
  67.                          }
  68.                           ExchangeOrd = GetFirstEmptyPlace(0);
  69.                          if(ExchangeOrd == 0)
  70.                          {
  71.                                    ShowText("No Empty Place for SubItem");
  72.                                    return;
  73.                          }
  74.                          ExchangeItem(SubOrd,ExchangeOrd,1);
  75.                          SubOrd = GetItemOrdByCount(SubItemID,1);
  76.                          if(SubOrd == 0)
  77.                          {
  78.                                    ShowText("Exchange Item Failure");
  79.                                    return;
  80.                          }
  81.                       }
  82.                       BeginCompoundItem(MainOrd,SubOrd);
  83.                       Yield(0);            
  84.      }      
  85. }
复制代码


发表于 2017-6-11 06:43:56 | 显示全部楼层
发表于 2023-7-29 05:32:17 | 显示全部楼层
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

联系本站:chinagww@qq.com|手机版|中网宝典论坛. ( ICP备05000080号

GMT+8, 2025-5-14 14:09 , Processed in 1.484364 second(s), 20 queries .

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表