Page 1 of 1
Товарищи исправьте скрипт ПЛИзз
Posted: 2005-05-21 13:23:38
by GobliN
как изменить этот скрипт чтоб он не дедли поисон делал а лузер поисон
sub AlchemyPoison()
var Exit=0, LastTimer, TryToPoison
while Exit<>1
uo.DeleteJournal()
uo.FindType('0x0F0E',-1,'backpack') ; Áóòûëêè
if uo.GetQuantity('finditem')<10 then
uo.FindType('0x0F0E','0x0000','0x400DBFDA') ; Êîíòåéíåð ñ áóòûëêàìè (bottle, container)
wait(1000)
uo.Grab('500','finditem')
wait(100)
end if
uo.FindType('0x0F88','0x0000','backpack') ; Íàéò øåéä
if uo.GetQuantity('finditem')<20 then
uo.FindType('0x0F88','0x0000','0x400DBFDA') ; Íàéò øåéä , Êîíòåéíåð
wait(1000)
uo.Grab('1000','finditem')
wait(500)
end if
LastTimer=uo.Timer()
uo.WaitMenu('What','(last)') ; Ìåíþ
uo.UseType(0x0F88) ; Íàéò Øåéä
while not uo.InJournal("You put") and not uo.InJournal("You toss the failed")
wait(500)
wend
if uo.InJournal("You toss the failed") then
repeat
wait(100)
until uo.Timer()>=LastTimer+100 ; Âðåìÿ ñîçäàíèÿ äàããåðà
else
TryToPoison=1
repeat
uo.FindType('0x0F0E','0x0998','my')
if uo.GetQuantity('finditem')>0 then
uo.UseSkill('Poisoning')
uo.WaitTargetObject('0x402ACDF7','finditem') ; Äàããåð
wait(4000)
else
TryToPoison=0
end if
end if
uo.UseSkill('Spirit Speak')
wait(3000)
wend
end sub
Posted: 2005-05-21 15:54:53
by I'm
Рыть надо тут:
Code: Select all
uo.WaitMenu('What','(last)') ; Ìåíþ
'(last)' - заменяется на необходимое.
Подробнее в хелпе
Posted: 2005-05-21 17:04:51
by GobliN
I'm wrote:Рыть надо тут:
Code: Select all
uo.WaitMenu('What','(last)') ; Ìåíþ
'(last)' - заменяется на необходимое.
Подробнее в хелпе
В принцыпе я догодался что тут вот только вопрос на что необходимое(что вписать надо)
Posted: 2005-05-22 09:49:25
by flake
вместо ласт - lesser poison
Posted: 2005-05-22 10:58:41
by GobliN
sub AlchemyPoison()
var Exit=0, LastTimer, TryToPoison
while Exit<>1
uo.DeleteJournal()
uo.FindType('0x0F0E',-1,'backpack') ; Áóòûëêè
if uo.GetQuantity('finditem')<10 then
uo.FindType('0x0F0E','0x0000','0x400DBFDA') ; Êîíòåéíåð ñ áóòûëêàìè (bottle, container)
wait(1000)
uo.Grab('500','finditem')
wait(100)
end if
uo.FindType('0x0F88','0x0000','backpack') ; Íàéò øåéä
if uo.GetQuantity('finditem')<20 then
uo.FindType('0x0F88','0x0000','0x400DBFDA') ; Íàéò øåéä , Êîíòåéíåð
wait(1000)
uo.Grab('1000','finditem')
wait(500)
end if
LastTimer=uo.Timer()
uo.WaitMenu('What','(last)') ; Ìåíþ
uo.UseType(0x0F88) ; Íàéò Øåéä
while not uo.InJournal("You put") and not uo.InJournal("You toss the failed")
wait(500)
wend
if uo.InJournal("You toss the failed") then
repeat
wait(100)
until uo.Timer()>=LastTimer+100 ; Âðåìÿ ñîçäàíèÿ äàããåðà
else
TryToPoison=1
repeat
uo.FindType('0x0F0E','0x0998','my')
if uo.GetQuantity('finditem')>0 then
uo.UseSkill('Poisoning')
uo.WaitTargetObject('0x402ACDF7','finditem') ; Äàããåð
wait(4000)
else
TryToPoison=0
end if
end if
uo.UseSkill('Spirit Speak')
wait(3000)
wend
end sub
sub AlchemyPoison()
var Exit=0, LastTimer, TryToPoison
while Exit<>1
uo.DeleteJournal()
uo.FindType('0x0F0E',-1,'backpack') ; Áóòûëêè
if uo.GetQuantity('finditem')<10 then
uo.FindType('0x0F0E','0x0000','0x400DBFDA') ; Êîíòåéíåð ñ áóòûëêàìè (bottle, container)
wait(1000)
uo.Grab('500','finditem')
wait(100)
end if
uo.FindType('0x0F88','0x0000','backpack') ; Íàéò øåéä
if uo.GetQuantity('finditem')<20 then
uo.FindType('0x0F88','0x0000','0x400DBFDA') ; Íàéò øåéä , Êîíòåéíåð
wait(1000)
uo.Grab('1000','finditem')
wait(500)
end if
LastTimer=uo.Timer()
uo.WaitMenu('What','Lesser Poison') ; Ìåíþ
uo.UseType(0x0F88) ; Íàéò Øåéä
while not uo.InJournal("You put") and not uo.InJournal("You toss the failed")
wait(500)
wend
if uo.InJournal("You toss the failed") then
repeat
wait(100)
until uo.Timer()>=LastTimer+100 ; Âðåìÿ ñîçäàíèÿ äàããåðà
else
TryToPoison=1
repeat
uo.FindType('0x0F0E','0x0998','my')
if uo.GetQuantity('finditem')>0 then
uo.UseSkill('Poisoning')
uo.WaitTargetObject('0x402ACDF7','finditem') ; Äàããåð
wait(4000)
else
TryToPoison=0
end if
end if
uo.UseSkill('Spirit Speak')
wait(3000)
wend
end sub
сеньк за подсказку терь работает как часы и делает лозер поисоны!
Всем кто помог большое СПАСИБО!!!
Re: Товарищи исправьте скрипт ПЛИзз
Posted: 2005-05-22 12:43:32
by SAMURAI
GobliN wrote:...не дедли поисон делал а лузер поисон...
Интересные потионы однако
Re: Товарищи исправьте скрипт ПЛИзз
Posted: 2005-05-22 21:04:09
by Destruction
SAMURAI wrote:GobliN wrote:...не дедли поисон делал а лузер поисон...
Интересные потионы однако
All for you