Yoko
http://forum.yoko.com.ua/

Доработайте скрипт плз!!!
http://forum.yoko.com.ua/viewtopic.php?f=20&t=790		 Page 1 of 1
Author:  AD [ 2004-07-07 02:59:32 ]
Post subject:  Доработайте скрипт плз!!!
sub tinkering()
VAR Exit=0, LastTimer
while Exit<>1
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.WaitMenu('Tinkering','Jewelry','Jewelry','necklace') ; ??? ????
UO.UseType(0x1EBC) ; ???? ??????

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
wait(1000)
wend
end sub



Мне надо 4тоб он когда сделает 300 продовал вендору у которого буду стоRть R!
Заранее благодарен!!!!
Author:  BETEPAH [ 2004-07-07 18:13:11 ]
Post subject: 
Code:
sub Jewerly() 
VAR Exit=0, LastTimer, TryToPoison 
while Exit<>1 
UO.DeleteJournal() 
UO.FindType('0x1086','0x0000','backpack'); 
If UO.GetQuantity('finditem')>200 Then 
wait(1000) 
uo.sell(listname,[vendorname]); тут лист продажи и имя вендора
wait(1000) 
Endif 
LastTimer=UO.Timer() 
UO.DeleteJournal() 
UO.UseType('0x1EBC') ; 
UO.WaitMenu ('Tinkering','Jewelry','Jewelry','bracelet')  ;
while NOT UO.InJournal("You put") AND NOT UO.InJournal("Tinkering failed") 
wait(500) 
wend 
If UO.InJournal("You failed") then 
repeat 
wait(100) 
until UO.Timer()>=LastTimer+100 
Else 
EndIf 
wend    
end sub


попробуй не проверял
Author:  AD [ 2004-07-09 05:18:32 ]
Post subject:  !!
Спосибо! Да кстате ты на сходку оскома поедишь?
Author:  BETEPAH [ 2004-07-09 06:42:20 ]
Post subject: 
Так я ДРВшник......наф мне оском...И не флуди ...пиши в асю
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/