Yoko
http://forum.yoko.com.ua/

Проблемка с добиранием. Помогите.
http://forum.yoko.com.ua/viewtopic.php?f=3&t=17542		 Page 1 of 1
Author:  Rufus0 [ 2015-02-08 13:13:35 ]
Post subject:  Проблемка с добиранием. Помогите.
Добрый День. Если есть у кого време помогите.

Проблема такая у меня на шарде бутылки в кучках не лежат. И бутылки некоторые даже похожи по типу цвет обычный тоже. И скрипт набирает 1 вид бутылак и пишет что в сундуке нету больше. Хотя все проставил и т.д. Вот хотелось что бы он набирал все бутылки которые прописаны всю химию. И что-бы он брал не по последнему контейнеру! А с в сундуке допустим 5 сумак и из каждый он берет определенные бутылки. Под каждый вид бутылки своя сумка.
Нашел много скриптов ну в частности все не работаю потому что у меня на шарде не кучками химия. Вотс Помогите у кого есть време.

Вот я пытался пользоваться этим скриптом там прописаны все бутылки моего шарда. Да и вопрос а если допустим тап и цвет бутылки одинаковый как быть? Тотал Мана и Мана рефрен. Одинаковые по типу и цвету.


Code:
sub CheckMana()
   VAR n, q, c
   Dim Req[50] ; Requirements
   Req[0]='0x0F09' ; Mana Refresh
   Req[1]='0x0F09' ; Invisibility
   Req[2]='0x0F0D' ; Explosion 
   Req[3]='0x0F0B' ; Refresh
   Req[4]='0x0F08' ; Agility
   Req[5]='0x0F09' ; Cleverness
   Req[6]='0x0F0C' ; Great Heal
   
   Dim Qnt[50] ; Quantity
   Qnt[0]=15 ; Mana Refresh
   Qnt[1]=10 ; Invisibility
   Qnt[2]=25 ; Explosion 
   Qnt[3]=15 ; Refresh
   Qnt[4]=10 ; Agility
   Qnt[5]=10 ; Cleverness
   Qnt[6]=5 ; Great Heal
   
   Dim Clr[50] ; Color
   Clr[0]='0x0388' ; Mana Refresh
   Clr[1]='0x0060' ; Invisibility
   Clr[2]='0x0000' ; Explosion 
   Clr[3]='0x0000' ; Refresh
   Clr[4]='0x0000' ; Agility
   Clr[5]='0x0641' ; Cleverness
   Clr[6]='0x0000' ; Great Heal
   
   if (uo.getserial('backpack') <> uo.getserial('lastcontainer')) then
      c=uo.getserial('lastcontainer')
      for n=0 to 6
         while uo.count(Req[n],Clr[n])<>Qnt[n]
            q=Qnt[n]-uo.count(Req[n],Clr[n])
            if q>0 then
               uo.findtype(Req[n],Clr[n],c)
               if uo.findcount() then
                  uo.moveitem('finditem',STR(q),'backpack',141,134,0)
                  wait(600)
               else
                  uo.msg(' item Req('+str(n)+') NOT FOUND ')
                  return
               endif
            else
               q=-q            
               uo.findtype(Req[n],Clr[n],'backpack')   
               if uo.findcount() then
                  uo.moveitem('finditem',STR(q),c)
                  checklag()
                  wait(600)
               endif
            endif
         wend
      next
   endif
   uo.print(' -= done =- ')
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/