ТИнкер-бутылки

[Azumi]

Народ дайти скрипт, чтобы он делал бутылки клал их, а когда айрон закочится снова брал айрон. по поисковику искал такого не нашел.

[Nort777]

жесть я на нем ща стою клепаю бутылки

Code: Select all

sub tinker() 
   VAR Sunduk = '0x404895B0'       ; ид сундука 
   VAR Ingi = '0x1BEF'          ; тип ингов
   VAR Instrum = '0x1EBC'          ; тип инструмента тинкера
   VAR lockpick = '0x0F0E'          ; тут тип бутылки а не локпики
   VAR Kolvo = 300          ; кол-во айрона котоое нада брать
   VAR k = 0 
   While TRUE 
      UO.FindType( Ingi, -1, Sunduk )   ; Èùåì èíãè â ñóíäóêå 
      If UO.FindCount() == 0 Then 
         UO.Print("Iron Ingots not found, script terminated") 
         return 
      Endif 
      UO.Grab( Str( Kolvo ), 'finditem' ) 
      wait( 2000 ) 
      While UO.Count( Ingi ) > 0 
         ; Ïîêà â ïàêå åñòü èíãè 
         UO.Print('Ostalos ' + Str( UO.Count( Ingi ) ) + ' ingots' ) 
         UO.DeleteJournal() 
         UO.CancelMenu() 
         UO.WaitMenu ('Tinkering', 'Tools', 'Tools', 'empty bottle' ) 
         UO.UseType( Instrum ) 
         k = 0 
         while NOT UO.InJournal('You put') AND NOT UO.InJournal('fail') AND ( k < 30 ) 
            k = k + 1 
            wait(500) 
         wend 
         if UO.Count( lockpick ) > 0 then 
            UO.FindType( lockpick, -1, -1 ) 
            UO.MoveItem( 'finditem', 0, Sunduk ) 
            wait( 1000 ) 
            UO.Print( 'lockpick' ) 
         end if 
      Wend 
   Wend 
end sub

тока тут одна проблема, если в паке остается кол-во ингов не кратное трем, то скрипт виснет

[Grin]

Code: Select all

While UO.Count( Ingi ) > 0

исправь на

Code: Select all

While UO.Count( Ingi ) > 2

[Azumi]

спасибо тебе

[Azumi]

ну кто мож еще какой скрипт подкинет. а то этот то работает, то нет а мне нужен постоянный без сбоев

[LordTom]

Пролетая над гнездом кукушки Кизи Ну, это первое, что пришло мне в голову. Возможно, кто-то сможет привести другие примеры Женская литература точно также отличается от мужск
Э-э-э-э.. Эдак, вы счас незаметно перепрыгните на подростковую приключенческую литературу, которой, как известно покорна всем полам и пубертатам Я привела примеры Робинзона

[Nort777]

иногда ошибка выскакивает Unhandled exceptoon in parser
как от нее вобще избавляться? скрипт может часами работать и потом она выскакивает, иногда и клиент вырубает

[LordTom]

Епти Сколько всего я аж соглашаться с вами устал, но как всегда ГОТОВ показать вам и обратную ось ВСЕХ ВАШИХ ВЫСКАЗЫВАНИЙ. ТУ СТОРОНУ О КОТОРОЙ ВЫ НУ НИКАК НЕ ПОДУМАЛИ, А НАДО БЫЛО. НО ЭТОГО Я ПИСА
Мля.сколько всего я аж соглашаться с вами устал, но как всегда ГОТОВ показать вам и обратную ось ВСЕХ ВАШИХ ВЫСКАЗЫВАНИЙ. тУ СТОРОНУ О КОТОРОЙ ВЫ НУ НИКАК НЕ ПОДУМАЛИ , А НАДО БЫЛО. ЧИТАЯ ТРИНИ З

[GimFlex]

viewtopic.php?t=5539

поработай с этим там несложно все как ты хочешь сделать

[Azumi]

извени но я вскриптах дуб дубом. если не трудно измени все на бутылочки))