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

Помогите со скриптом на БС !
http://forum.yoko.com.ua/viewtopic.php?f=17&t=14111
Page 1 of 1

Author:  OnlyMe [ 2008-10-28 22:35:25 ]
Post subject:  Помогите со скриптом на БС !

Ни как не выходит! подскажи плиз , скрипт на БС ! чтоб делал дагеры , и плавил брал инги из ящика ! вот этот скрипт , только открывает окно,меню выбора дагера , а на дагер не кликает , если докликать руками , делает дагер , плавит , потом берет почему то все инги из сундука , они у него падают под ноги из за веса , опять табличка ...и опять не кликает ( в чем дело ?скрипт я с топика вытащил скрипт и исправил ид всякие!

sub BlacksmithyIM()

VAR Exit=0, LastTimer
while Exit<>1
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.WaitMenu('Blacksmithing','Weapons','Weapons','Swords','Swords','dagger') ;Что куем
UO.UseType(0x1BF2) ;Инги айрона

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('0x0F51',-1,'backpack')
wait(500)

If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x4038E05E) ; Форж
Endif

UO.FindType('0x1BF2',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BF2','0x0000','0x4129B06B') ;Cундук с ингами
wait(1000)
UO.Grab('1000','finditem')
Endif
wait(1000)
wend
end sub


oskom

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/