Yoko

All sides of Injection
It is currently 2018-12-12 19:42:10

All times are UTC+02:00




Post new topic  Reply to topic  [ 2 posts ] 
Author Message
PostPosted: 2015-10-30 17:56:29 
Offline

Joined: 2014-06-03 16:10:29
Posts: 30
Code:
sub Blacksmithy() 
   VAR Sunduk1 = '0x4027B817' ; Сериал сундука с пустыми мешками
   VAR Sunduk2 = '0x40074B86' ; Сериал пустого сундука
   VAR Meshok = '0x0E76' ; Тип мешка
   VAR Logi = '0x1BEF' ; Тип ингов
   VAR Rubanok = '0x13E3' ; Тип инструмента блексмита
   VAR Udochka = '0x1413' ; Тип делаемого
   VAR Kolvo = 500 ; Брать ингов (3 инга = 1 ножик)
   VAR MeshSer, j, k
   While TRUE
      UO.FindType( Logi, -1, Sunduk2 ) ; Ищем инги в сундуке 2
      UO.Grab( Str( Kolvo ), 'finditem' ) ; Кладем инги в пак
      wait( 2000 )
      If UO.FindCount() == 0 Then
         UO.Print("Logs not found, script terminated")
         return
      Endif
      UO.FindType( Meshok, -1, Sunduk1 ) ; Ищем мешок в сундуке 1
      MeshSer = UO.GetSerial( 'finditem' )
      UO.Grab( '1', 'finditem' ) ; Кладем его в бэкпак
      wait( 2000 )
      UO.MoveItem( MeshSer, 0, Sunduk2 )
      wait( 2000 )
      While UO.Count( Logi ) > 12 ; Пока в паке есть инги
         UO.Print('Ostalos ' + Str( UO.Count( Logi ) ) + ' ingov' )
         UO.DeleteJournal()
         UO.CancelMenu()
         UO.automenu('Blacksmithing','Colored Armor & Weapons')
         uo.automenu ('Colored Armor & Weapons', 'Rusty Armor')
         uo.automenu ('Rusty Armor', 'Rusry Plate Armor & Shields')
         uo.automenu ('Rusry Plate Armor & Shields', 'Rusty Platemail Gorget')
         uo.UseType(Rubanok)
         uo.waittargettype(Logi)
         k = 0
         while NOT UO.InJournal('You put') AND NOT UO.InJournal('fail') AND ( k < 30 )
            k = k + 1
            wait(500)
         wend
         ; Wait( 14000 )
         ; Скрафтили даггер
         ; Сразу переложим ее в мешок
         if UO.Count( Udochka ) > 0 then
            UO.FindType( Udochka, -1, 'backpack' )
            UO.MoveItem( 'finditem', 0, MeshSer )
            wait( 2000 )
            UO.Print( 'dagger perelozhen' )
         end if
      Wend
   Wend
end sub

меню было под даггеры из айрона, я вот пытаюсь переделать под изготовление из цветных ингов. меню менял сам, все какбы норм, берет инги, мешок начинает работать меню блексмита и тут все- пишет "вайт таргет канселед???"(только по английски :) ) и чар просто стоит.
помогите плиз разобратся что и где я напутал :(


Top
   
PostPosted: 2015-10-31 10:47:39 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2783
Location: Иваново
попробуй такой меню вынести выше While TRUE
Code:
         UO.CancelMenu()
         UO.automenu('Blacksmithing','Colored Armor')
         uo.automenu ('Colored Armor', 'Rusty Armor')
         uo.automenu ('Rusty Armor', 'Rusry Plate')
         uo.automenu ('Rusry Plate', 'Gorget')


Автоменю обычно выше рабочего крафта пишут. Так как ты используют WaitMenu.

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 2 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited