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

Переработка Хлопка.. нид Хелп
http://forum.yoko.com.ua/viewtopic.php?f=17&t=11382		 Page 1 of 1
Author:  $keR [ 2007-02-03 18:21:26 ]
Post subject:  Переработка Хлопка.. нид Хелп
Уважаемые скриптеры, прошу у Вас помощи, вот этот скрипт работает, но всего минут 5, на нем застревает хлопок на пальц(на курсоре) и пишет : аитим но фаунд..
помогите пожалуйсто


Code:
 sub Nitki() 
   VAR Spool='0x0FA0', Hlopok='0x0DF9', Cont='0x411C76BD', Stanok='0x413D0329',i, Ammount=30 

   While NOT UO.Dead() 
      UO.FindType(Hlopok,-1,Cont) 
      UO.Grab(STR(Ammount),'finditem')
      wait(1000)
      For i=1 to Ammount 
         checkLag() 
   UO.WaitTargetObject(Stanok) 
    wait(100) 
         UO.UseType(Hlopok) 
         wait(3000) 
               
      Next 
      UO.SetReceivingContainer(Cont) 
      UO.FindType(Spool,-1,'backpack') 
      UO.Grab('all','finditem') 
     # UO.UnSetReceivingContainer(Cont) 
   Wend 

end sub

sub checklag() 
IF UO.Waiting() > 0 THEN 
UO.Exec("canceltarget") 
END IF 
UO.DeleteJournal() 
UO.Click('backpack') 
REPEAT 
WAIT(50) 
UNTIL UO.InJournal('backpack') 
end sub
 
Author:  $keR [ 2007-03-08 15:29:31 ]
Post subject: 
ну что никто помоч не может? если нет то клоуз
Author:  Nmy [ 2007-03-08 17:49:09 ]
Post subject: 
Code:
    UO.FindType(Hlopok,-1,Cont)
      UO.Grab(STR(Ammount),'finditem')

можно поменять на
Code:
UO.FindType(Hlopok,-1,Cont)
If UO.FindCount() then
UO.MoveItem('finditem',STR(Ammount),'backpack') 
Endif

посмотреть что будет
Author:  $keR [ 2007-03-19 22:15:59 ]
Post subject: 
спасибо! работает!
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/