中网宝典论坛

 找回密码
 立即注册
搜索
查看: 2391|回复: 0

[脚本] 官方超级采集脚本

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

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

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

x
  1. int     ProcessFarMove(int MapID)
  2. {
  3.      if(MapID != Value("MAPNO"))
  4.      {
  5.         FarMove(MapID);
  6.         while(Value("IsFarMoving") == 1)
  7.         {
  8.              Yield(0);
  9.         }  
  10.      }
  11.      while(Value("IsWaitRemapData") == 1)
  12.      {
  13.          RefreshStat("IsWaitingRemapData");
  14.          Yield(0);
  15.      }
  16.      if(MapID != Value("MAPNO"))
  17.      {
  18.         return 0;
  19.      }
  20.      if(Value("IsOnSea") == 1)
  21.      {
  22.          if(GetInLandDoor(0) == 1)
  23.          {
  24.                     if(ProcessFarMove(MapID) == 0)
  25.                                              {
  26.                                                 ShowText("Process FarMove Fail");
  27.                                                 return 0;
  28.                                              }
  29.          }
  30.          else
  31.          {
  32.                     ShowText("Get In Land Door Fail");
  33.          }                    
  34.      }
  35.      return 1;
  36. }

  37. int  DoCollect()
  38. {
  39.                                     int CollectID;
  40.                   CollectID = Value("CurCollect");
  41.                   if(CollectID == 0)
  42.                   {
  43.                     return 0;
  44.                   }                 
  45.                         NPC(1,CollectID,0);
  46.                         ShowText("Begin Collect:" + IntToStr(CollectID));
  47.                         //Scriptinf CopyRight(0) ScriptFor(0) ScriptTime(9)   ScriptWriter(0)    Scripted(9)   ScripRevise(9)
  48.                                      return 1;
  49. }
  50. {
  51.      BeginEnhanceCollect(0);
  52.      int MapID = Value("FirstCollectMapID");
  53.      if(MapID == 0)
  54.      {
  55.         return;
  56.      }
  57.          if(ProcessFarMove(MapID) == 0)
  58.      {
  59.         ShowText("Process FarMove Fail");
  60.         return;
  61.      }      
  62.      while(1)
  63.      {
  64.         if(Value("IsCollectRound"))
  65.         {         
  66.           while(Value("IsCompleteCollect") == 0)
  67.           {
  68.                    ProcessEnhanceCollect(0);
  69.                    if(DoCollect()==0)
  70.                    {
  71.                       return;
  72.                    }
  73.                    MapID = Value("NextCollectMapID");
  74.                    if(ProcessFarMove(MapID)==0)
  75.                    {
  76.                       return;
  77.                    }
  78.                    Yield(0);                                         
  79.           }           
  80.         }
  81.         else
  82.         {
  83.            RefreshStat("Waitting for Next Collect Round");
  84.         }
  85.         Yield(0);
  86.      }
  87. }
复制代码


您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2025-5-15 14:21 , Processed in 1.351086 second(s), 20 queries .

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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