То работает то нет скирпт на карпу! Раньше такого небыло...

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
rcz
Posts: 4
Joined: 2005-10-04 06:23:24

То работает то нет скирпт на карпу! Раньше такого небыло...

Post by rcz »

Вот собственно скрипт:

Code: Select all

sub carpaper()
   var edatype='0x103B'
   var logitype='0x1BDD'
   var nitki='0x0FA0'
   var sawtype='0x1030'
   var udochkatype='0x0DBF'
   
   #-- Ñóìêè --#
   var sumkalognit='0x41735CFD'
   var sumka1='0x41450969'
   var sumka2='0x4020DDF6'
   var sumka3='0x4146AB21'
   var sumka4='0x40BAAE92'
   var sumka5='0x40335528'
   var sumka6='0x40D48CE2'
   var sumka7='0x4145096B'
   var sumka8='0x4144F507'
   var sumka9='0x4145096A'
   
   #-- Ïðî÷åå --#
   var timeout=0,stopklad = 0
   var kuda,stop=0
   
   start:
      # Áåð¸ì ëîãè è íèòêè
      uo.deletejournal()
      If uo.Count(logitype) < 20 Then
         UO.Findtype(logitype,'-1',sumkalognit)
         UO.grab('300','finditem')
         wait(1500)
      end if
      if uo.Count(nitki) < 10 then
         UO.Findtype(nitki,'-1',sumkalognit)
         UO.grab('100','finditem')
         wait(1500)
      end if
      # Êóøàåì
      uo.usetype(edatype)
      wait(700)
      uo.usetype(edatype)
      wait(700)
      
      # Äåëàåì óäî÷êè
      repeat
         stop = 0
         If uo.Count(logitype) < 20 Then
            stop=1
         endif
         if uo.Count(nitki) < 10 then
            stop=1
         endif         
         
         CheckLag()
         UO.Exec("waitmenu 'Carpentry' 'Weapons & Tools' 'Weapons & Tools' 'fishing pole'")
         UO.usetype(sawtype)
         wait(500)
         repeat
             timeout=timeout+500
             wait(500)
         until UO.injournal("You put") OR UO.Injournal("You fail") OR (timeout>10000)
         timeout=0      
         UO.deletejournal()      
      until uo.injournal("with what you have") or stop==1
      
      UO.setreceivingcontainer(sumka1)
       UO.findtype(udochkatype,-1,sumka1)
       if uo.findcount()>245 then
          UO.setreceivingcontainer(sumka2)
           UO.findtype(udochkatype,-1,sumka2)
           if uo.findcount()>245 then
              UO.setreceivingcontainer(sumka3)
               UO.findtype(udochkatype,-1,sumka3)
               if uo.findcount()>245 then
                   UO.setreceivingcontainer(sumka4)
                    UO.findtype(udochkatype,-1,sumka4)
                     if uo.findcount()>245 then
                      UO.setreceivingcontainer(sumka5)
                       UO.findtype(udochkatype,-1,sumka5)
                        if uo.findcount()>245 then
                         UO.setreceivingcontainer(sumka6)
                            UO.findtype(udochkatype,-1,sumka6)
                         if uo.findcount()>245 then
                           UO.setreceivingcontainer(sumka7)
                               UO.findtype(udochkatype,-1,sumka7)
                               if uo.findcount()>245 then 
                                  UO.setreceivingcontainer(sumka8)
                                 UO.findtype(udochkatype,-1,sumka8)
                                  if uo.findcount()>245 then
                                      UO.setreceivingcontainer(sumka9)
                                       UO.findtype(udochkatype,-1,sumka9)
                                      if uo.findcount()>245 then
                                         uo.print("ALL BAGS ARE FULL")
                                         UO.CloseUO()
                                     endif
                                 endif
                               endif
                          endif
                        endif
                   endif
                 endif
            endif     
        endif
      
      while uo.findcount() > 0
         UO.findtype(udochkatype,-1,"pack")
          UO.grab(0,"finditem")
         wait(800)
      wend
      uo.unsetreceivingcontainer()
   wait(1000)
   goto start
end sub




sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub

...

Раньше такого небыло, все работало на ура, а теперь то перекладку пропускает ( вначале сэтает все сумки, а потом когда доходит до пустой сумки, сбрасывает перекладку и начинает заново скрипт ).. или ждет меню, а потом waiting canceled... и все в таком духе.... что не так не знаю.. ставил и АоС и ренисанс - сэйм щит :(

Скажи какие у Вас галочки инжи отмеченны и что посоветуете?
rcz
Posts: 4
Joined: 2005-10-04 06:23:24

Post by rcz »

UP блин помогите... :(
rcz
Posts: 4
Joined: 2005-10-04 06:23:24

Post by rcz »

С остальным скриптами также, помогите!!!
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

http://ultimasoft.ru/ftp.php?folder=Gam ... ine/_Tools

Injection with ASM посоветую.
rcz
Posts: 4
Joined: 2005-10-04 06:23:24

Post by rcz »

не помогло, скрипты все равно видут себя странно....
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Опиши подробно, на каких местах возникают проблемы.
Post Reply