Yoko

Posted: **2006-03-01 19:21:30**

Поиск ЮЗАл, но ничего не нашел... :cry:

Есть ли у кого нибудь такой скрипт: 1. берет с сундука определленое количество инги, 2. кует даггер 1 и сразу плавит и так далее. и обратный круг :?:

Posted: **2006-03-01 20:27:37**

Во ппц. Есть раздел спец. -там проверенные скрипты, и там именно такой. Вот он:

Code: Select all

sub BlacksmithyIM() 

VAR Exit=0, LastTimer 
while Exit<>1 
UO.DeleteJournal() 
LastTimer=UO.Timer() 
UO.WaitMenu('Blacksmithing','Shield','Shield','bronze shield') ;×òî êóåì 
UO.UseType(0x1BEF) ;Èíãè àéðîíà 

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed") 
wait(500) 
wend 

If UO.InJournal("You have failed") then 
repeat 
wait(100) 
until UO.Timer()>=LastTimer+100 ;Âðåìÿ ñîçäàíèÿ äàãåðà 
EndIf 

UO.FindType('0x1B72',-1,'backpack') 
wait(500) 

If UO.GetQuantity('finditem') then 
UO.WaitTargetObject('finditem') 
UO.UseObject(0x400D7F9C) ; Ôîðæ 
Endif 

UO.FindType('0x1BEF',-1,'backpack') 
If UO.GetQuantity('finditem')<10 then 
UO.FindType('0x1BEF','0x0000','0x4032B444') ;Cóíäóê ñ èíãàìè 
wait(1000) 
UO.Grab('750','finditem') 
Endif 
wait(1000) 
wend 
end sub

Posted: **2006-03-02 14:09:03**

нифига себе ниче тут не понятно + мне даггеры нужны а не щиты!

Posted: **2006-03-02 18:30:08**

я под себя делал, т.к. на щитах эффективнее ростёт. Замени строку на следующую:

Code: Select all

UO.WaitMenu('Blacksmithing','Weapon','Weapon','Sword','Sword','dagger') ;×òî êóåì

Если ошибся, загляни в раздел Tested Script

Posted: **2006-03-03 14:37:01**

You Must Die wrote:я под себя делал, т.к. на щитах эффективнее ростёт. Замени строку на следующую:
Code: Select all
UO.WaitMenu('Blacksmithing','Weapon','Weapon','Sword','Sword','dagger') ;×òî êóåì
Если ошибся, загляни в раздел Tested Script

расшифруй ироглифы, если не трудно.

Posted: **2006-03-03 21:24:55**

Это направление - какую вещь мутить. По менюшкам

Yoko

И снова БС :?

И снова БС :?