Yoko

All sides of Injection
It is currently 2025-11-07 05:46:17

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 14 posts ] 
  Print view Previous topic | Next topic 
Author Message
-=Morf=-
PostPosted: 2006-05-06 20:42:29 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
Короч, нужно чтобы чар плавил руду не дабл кликом на руду, а сперва он искал неподалеку плавилку, или можно сделать чтобы самому указывать ID плавилки, воть жал на нее 2 раза и направлял на 1 руду....
Top
   
Reply with quote  
Kynep
PostPosted: 2006-05-06 20:56:16 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
-=Morf=- wrote:
Короч, нужно чтобы чар плавил руду не дабл кликом на руду, а сперва он искал неподалеку плавилку, или можно сделать чтобы самому указывать ID плавилки, воть жал на нее 2 раза и направлял на 1 руду....


Типа того, пробуй.. руда в сундуке sunduk, стоит рядом с тобой
Code:
sub plavka() 
VAR tip='0x19B9'    # Тип руды
VAR cvet='0x0193'  # Цвет руды 
VAR forg='0x40481C78'  # ID форжы 
VAR sunduk='0x404A06F9' #ID сундука с рудой 

UO.FindType(tip, cvet, sunduk) 
If UO.FindCount() > 0 then 
repeat 
UO.MoveItem('finditem', '1', 'backpack') 
Wait(500)
UO.FindType(tip, cvet, 'backpack') 
If UO.FindCount() > 0 then 
UO.WaitTargetObject('finditem') 
UO.UseObject(forg) 
wait(2000) 
endif
UO.FindType(tip, cvet, sunduk) 
until not UO.FindCount() 
else 
UO.Print('Руды нету') 
endif 
end sub


Last edited by Kynep on 2006-05-06 22:06:45, edited 2 times in total.

Top
   
Reply with quote  
-=Morf=-
 Post subject:
PostPosted: 2006-05-06 21:11:52 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
что то не работает...... :(
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2006-05-06 21:18:13 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Code:
##################################################################### 
; Training of Mining, ver 1.03, (c) Edred 
sub Smelt() 
VAR Ruda1 = '0x19B9'            ; Тип руды 
VAR Ruda2 = '0x19B8'            ; Тип руды - 3 шт. 
VAR Ruda3 = '0x19BA'            ; Тип руды - 2 шт. 
VAR Ruda4 = '0x19B7'            ; Тип руды - 1 шт. 
VAR Ing1 = '0x1BEF'               ; Тип ингов металлов 
VAR Ing2 = '0x1BF2'               ; Тип ингов строймата 
VAR MaxVes = 500               ; Максимальный вес пака 
repeat    
   UO.Findtype( Ruda1, -1, 1 )      ; Ищем руду на земле 
   If UO.Findcount() == 0 Then 
      UO.Findtype( Ruda2, -1, 1 ) 
      If UO.Findcount() == 0 Then 
         UO.Findtype( Ruda3, -1, 1 ) 
         If UO.Findcount() == 0 Then 
            UO.Findtype( Ruda4, -1, 1 ) 
            If UO.Findcount() == 0 Then 
               UO.Print( "No more ore for smelt..." ) 
               Return 
            Endif 
         Endif 
      Endif 
   Endif 
   UO.Exec( "moveitem finditem 1" )   ; Тащим 1 в пак 
   Wait( 1000 ) 
   UO.Useobject( 'finditem' )      ; переплавляем 
   Wait( 1000 ) 
   If UO.Weight > MaxVes Then 
      ; Максимальный вес пака превышен - разгружаемся 
      UO.Findtype( Ing1, -1, -1 ) 
      If UO.Findcount() > 0 Then 
         UO.Drophere( 'finditem' ) 
         Wait( 1000 ) 
      Endif 
      UO.Findtype( Ing2, -1, -1 ) 
      If UO.Findcount() > 0 Then 
         UO.Drophere( 'finditem' ) 
         Wait( 1000 ) 
      Endif 
   Endif 
until NOT Uo.CountGround( Ruda1 ) AND NOT UO.CountGround( Ruda2 ) AND NOT UO.CountGround( Ruda3 ) AND NOT UO.CountGround( Ruda4 ) 
UO.Print( "No more ore for smelt..." ) 
endsub


Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2006-05-06 21:40:27 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
-=Morf=- wrote:
что то не работает...... :(


Поправил... смотри выше
Top
   
Reply with quote  
-=Morf=-
 Post subject:
PostPosted: 2006-05-06 21:54:10 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
во втором скрипте чар не плавит руду, а опять же жмет на нее 2 раза
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2006-05-06 21:58:02 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
а в куперовском скрипте? помоему там всё ок расписано. =\
Top
   
Reply with quote  
-=Morf=-
 Post subject:
PostPosted: 2006-05-06 22:01:30 
Offline
User avatar

Joined: 2006-04-22 20:37:37
Posts: 79
а у меня там воще чот не плавит, или плавит все сразу
Top
   
Reply with quote  
Scripts Writer
 Post subject:
PostPosted: 2006-05-06 22:04:57 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
вроде там написано на языке инжекта :

возьми 1 штуку,кликни на форж и прицелом на руду. Тогда уже не знаю в чём проблемка
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2006-05-06 22:04:59 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
-=Morf=- wrote:
а у меня там воще чот не плавит, или плавит все сразу

Я же написал что поправил ((( и руду скинь в сундук отдельный
Top
   
Reply with quote  
Sanch
 Post subject:
PostPosted: 2006-05-06 22:05:48 
Offline
User avatar

Joined: 2005-07-17 15:30:52
Posts: 308
Location: www.drw.ru
Отпиши тип плавилки, ингов, чего на чего надо кликать и id мешка, который не подалеку с рудой, еще макс рассояние на которой можно юзать плавилку в шагах, нужна ли кирка или еще что в руках, куда все это потом кидать, напишу.
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2006-05-06 22:10:41 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Sanch wrote:
Отпиши тип плавилки, ингов, чего на чего надо кликать и id мешка, который не подалеку с рудой, еще макс рассояние на которой можно юзать плавилку в шагах, нужна ли кирка или еще что в руках, куда все это потом кидать, напишу.


Все что ты описал написанно в моем скрипте, просто чел не обратил внимание на пост "Поправил..." лень скопировать скрипт снова наверно :roll:
Top
   
Reply with quote  
Desktop
 Post subject:
PostPosted: 2006-05-15 18:41:29 
Offline
User avatar

Joined: 2006-04-02 01:07:46
Posts: 8
Do you have simple sript to smelt iron ringmail armor from backpack if you have 10k weight!? (dont drag this ingots aniway, dont use runbuk)
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2006-05-15 22:08:16 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
-=Morf=- wrote:
во втором скрипте чар не плавит руду, а опять же жмет на нее 2 раза


Переделать - две секунды. В начало вставить
Code:
VAR plavilka = 'сериал плавилки'


А строку
Code:
   UO.Useobject( 'finditem' )      ; переплавляем

Заменить на
Code:
   UO.WaitTargetObject( 'finditem' )
   UO.Useobject( plavilka )


И всего делов-то. Изучай язык и правь скрипты под себя и свой шард. Не всегда найдутся желающие этим заниматься вместо тебя.

_________________
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 14 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:  
Powered by phpBB® Forum Software © phpBB Limited