网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
飘流贝贝吧 关注：149贴子：1,196

我开个脚本帖子,谁有脚本请往这放吧,予人方便予己方便

只看楼主收藏回复

我找到了就来
1楼2007-09-07 11:52回复
    雪橇狼脚本
    --------------------------------------------------------------

    void EnterTentResume()
    {
     ActiveNormalAI(0); //必须禁用普通状态ai
     if (Value("InTent") ==0) //不在帐篷中
     {
     PutDownTent(0); //放下帐篷
     EnterTent(0); //进入帐篷
     if (Value("InTent") ==0) //人不在帐篷中
     {
     ActiveNormalAI(1);
     ReDisConnect(0);
     RefreshStat("Enter Tent Fail");
     return;
     }
     }
     EnterBathtub(0); //进入浴缸
     if (Value("HASFIGHTPET") == 0) //⊿Τ胐 
     {
     while((Value("CURHPPERCENT") < Value("RoleSafeHPPercent")) || (Value("CURSPPERCENT") < Value("RoleSafeSPPercent")))
     {
     Yield(0);
     RefreshStat("wait resume hp sp");
     }
     }
     else
     {
     while((Value("CURHPPERCENT") < Value("RoleSafeHPPercent"))||
     (Value("CURSPPERCENT") < Value("RoleSafeSPPercent"))|| 
     (Value("PETHPPERCENT") < Value("PetSafeHPPercent"))|| 
     (Value("PETSPPERCENT") < Value("PetSafeSPPercent")) ||
     (Value("TEAMMEMBERHP") < Value("MemberSafeHPPercent"))||
     (Value("TEAMMEMBERHP") < Value("MemberSafeSPPercent")))
     {
     Yield(0);
     RefreshStat("wait resume hp sp");
     }
     }
     LeaveBathTub(0);
     Remap(1);
     DrawBackTent(0);
     ActiveNormalAI(1); //开启普通状态AI
    }


    {
     while(1)
     {
     if((Value("MAPNO") != 12350 )&&(Value("MAPNO") != 11035))
     {
     ShowText("you are not in right position");
     return;
     }
     if(Value("MAPNO") == 12350)
     {
     EventTalk(11); 
     } 
     if(Value("MAPNO") == 11035)
     {
     Remap(1);
     } 
     Sleep(1);
     if(Value("IsRunTent") == 1)
     { 
     EnterTentResume(); 
     } 
     }
    }
    2楼2007-09-07 11:53
    回复
      海盗脚本
      -----------------------------------------------------

      void EnterTentResume()
      {
       ActiveNormalAI(0); //必须禁用普通状态ai
       if (Value("InTent") ==0) //不在帐篷中
       {
       PutDownTent(0); //放下帐篷
       EnterTent(0); //进入帐篷
       if (Value("InTent") ==0) //人不在帐篷中
       {
       ActiveNormalAI(1);
       ReDisConnect(0);
       RefreshStat("Enter Tent Fail");
       return;
       }
       }
       EnterBathtub(0); //进入浴缸
       if (Value("HASFIGHTPET") == 0) //⊿Τ胐 
       {
       while((Value("CURHPPERCENT") < Value("RoleSafeHPPercent")) || (Value("CURSPPERCENT") < Value("RoleSafeSPPercent")))
       {
       Yield(0);
       RefreshStat("wait resume hp sp");
       }
       }
       else
       {
       while((Value("CURHPPERCENT") < Value("RoleSafeHPPercent"))||
       (Value("CURSPPERCENT") < Value("RoleSafeSPPercent"))|| 
       (Value("PETHPPERCENT") < Value("PetSafeHPPercent"))|| 
       (Value("PETSPPERCENT") < Value("PetSafeSPPercent")) ||
       (Value("TEAMMEMBERHP") < Value("MemberSafeHPPercent"))||
       (Value("TEAMMEMBERHP") < Value("MemberSafeSPPercent")))
       {
       Yield(0);
       RefreshStat("wait resume hp sp");
       }
       }
       LeaveBathTub(0);
       Remap(1);
       DrawBackTent(0);
       ActiveNormalAI(1); //开启普通状态AI
      }


      {
       while(1)
       {
       if((Value("MAPNO") != 11040 )&&(Value("MAPNO") != 11035))
       {
       ShowText("you are not in right position");
       return;
       }
       if(Value("MAPNO") == 11040)
       {
       EventTalk(3); 
       } 
       if(Value("MAPNO") == 11035)
       {
       Remap(1);
       } 
       Sleep(5000);
       if(Value("IsRunTent") == 1)
       { 
       EnterTentResume(); 
       } 
       }
      }
      3楼2007-09-07 11:55
      回复
        小麦脚本
        ------------------------------------------------------
        void EnterTentResume()
        {
         ActiveNormalAI(0); //必须禁用普通状态ai
         if (Value("InTent") ==0) //不在帐篷中
         {
         PutDownTent(0); //放下帐篷
         EnterTent(0); //进入帐篷
         if (Value("InTent") ==0) //人不在帐篷中
         {
         ActiveNormalAI(1);
         ReDisConnect(0);
         RefreshStat("Enter Tent Fail");
         return;
         }
         }
         EnterBathtub(0); //进入浴缸
         if (Value("HASFIGHTPET") == 0) //⊿Τ胐 
         {
         while((Value("CURHPPERCENT") < Value("RoleSafeHPPercent")) || (Value("CURSPPERCENT") < Value("RoleSafeSPPercent")))
         {
         Yield(0);
         RefreshStat("wait resume hp sp");
         }
         }
         else
         {
         while((Value("CURHPPERCENT") < Value("RoleSafeHPPercent"))||
         (Value("CURSPPERCENT") < Value("RoleSafeSPPercent"))|| 
         (Value("PETHPPERCENT") < Value("PetSafeHPPercent"))|| 
         (Value("PETSPPERCENT") < Value("PetSafeSPPercent")) ||
         (Value("TEAMMEMBERHP") < Value("MemberSafeHPPercent"))||
         (Value("TEAMMEMBERHP") < Value("MemberSafeSPPercent")))
         {
         Yield(0);
         RefreshStat("wait resume hp sp");
         }
         }
         LeaveBathTub(0);
         Remap(1);
         DrawBackTent(0);
         ActiveNormalAI(1); //开启普通状态AI
        }


        {
         while(1)
         {
         if((Value("MAPNO") != 11049 )&&(Value("MAPNO") != 11035))
         {
         ShowText("you are not in right position");
         return;
         }
         if(Value("MAPNO") == 11049)
         {
         EventTalk(4); 
         } 
         if(Value("MAPNO") == 11035)
         {
         Remap(1);
         } 
         Sleep(5000);
         if(Value("IsRunTent") == 1)
         { 
         EnterTentResume(); 
         } 
         }
        }
        4楼2007-09-07 11:55
        回复
          ..顶..正在寻找这个呢~
          IP属地:重庆5楼2007-09-16 17:39
          回复
            • 58.33.95.*
            有没有制作脚本呢
            6楼2007-09-20 16:14
            回复
              抱歉。。。我是制作ruby脚本的。。
              7楼2007-10-02 10:12
              回复
                顶个
                8楼2007-10-03 06:06
                回复
                  • 121.227.33.*
                  有没蜜蜂的?还有能不能告诉刷那个能得到什么东西..我是新手 拜托了~~
                  9楼2007-10-04 16:06
                  回复
                    • 121.227.33.*
                    有没蜜蜂的?还有能不能告诉刷那个能得到什么东西..我是新手 拜托了~~
                    10楼2007-10-04 16:07
                    回复
                      高阶炼金脚本有吗
                      11楼2007-11-19 12:43
                      回复
                        • 60.218.172.*
                        有制作脚本的软件吗？
                        12楼2007-12-02 18:25
                        回复
                          {
                           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;
                           }
                           }
                           BeginCompoundItemExAdv(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;
                             }
                             } 
                             BeginCompoundItemExAdv(MainOrd,SubOrd);
                             Yield(0); 
                           } 
                          }


                          高级练金
                          13楼2007-12-11 03:11
                          收起回复
                            • 122.5.38.*
                            要蜜蜂的，
                            14楼2007-12-30 11:12
                            回复
                              • 220.172.55.*
                              谢谢楼主XD
                              15楼2008-01-02 20:25
                              回复

                                扫二维码下载贴吧客户端

                                下载贴吧APP
                                看高清直播、视频！
                                发表回复
                                发贴请遵守贴吧协议及“七条底线”贴吧投诉
                                内  容:
                                  查看全部
                                发 表
                                保存至快速回贴

                                发布成功
                                去贴吧APP订阅抽奖结果通知
                                扫码进入贴吧APP
                                ···········
                                开奖后第一时间站内信通知
                                ···········
                                中奖结果全员公示