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

Помгите со спиритом !
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3135
Page 1 of 1

Author:  hmmm [ 2005-02-17 23:10:18 ]
Post subject:  Помгите со спиритом !

Code:
sub main() 
var Container='0x401A1257'
var IronCount = Val(STR((UO.STR*4+30-UO.Weight)/0.6,0))-600
Open('backpack')
Open('Container')
if UO.Count('0x1EBC','0x0000') > 0 then
UO.FindType('0x1EBC','0x0000','backpack')
UO.AddObject('objTools','finditem')
else
return
end if
UO.CancelMenu()
uo.automenu("Tinkering","Tools")
uo.automenu("Tools","lockpick")
While Move(Container,IronCount) > 0
While UO.Count("0x1BEF") > 1
UO.DeleteJournal()
UO.UseObject('objTools')
repeat
wait(300)
until UO.InJournal("You put") or UO.InJournal("failed")
wend
wend
UO.CancelMenu()
end sub
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
end sub

sub Move(Container, IronCount)
CheckLag()
UO.FindType('0x14FB','0x0000','backpack')
If UO.GetQuantity('finditem')>0 Then
UO.MoveItem('finditem','-1',Container)
wait(1000)
end if
toEat(Container)
UO.FindType('0x1BEF','0x0000',Container)
If UO.GetQuantity('finditem')<2 Then
return 0
Else
UO.Grab(str(IronCount),'finditem')
wait(1000)
Endif
Spirit()
CheckLag()
return 1
end sub

sub Open(Container)
UO.UseObject(Container)
wait(500)
end sub
sub toEat(cont)
var havka = '0x097B'
UO.FindType(havka, '0x0000', cont)
if UO.FindCount() > 0 then
UO.MoveItem('finditem','20','backpack')
else
return
end if
repeat
CheckLag()
uo.UseType(havka)
while not uo.InJournal("can't") and not uo.InJournal('full') and not uo.InJournal('stuffed') and not uo.InJournal('hungry') and not uo.InJournal('satiated') and not UO.Dead()
wait(100)
wend
until uo.InJournal('too full') or UO.Dead() or uo.InJournal("can't")
UO.FindType(havka, '0x0000','backpack')
if UO.FindCount() > 0 then
UO.MoveItem('finditem','20',cont)
end if
CheckLag()
wait(1000)
end sub

sub Spirit()
UO.DeleteJournal()
UO.UseSkill("Spirit Speak")
repeat
wait(500)
until UO.InJournal('You establish') or UO.InJournal('netherworld')
end sub


Почему в этом скрипте спирит юзается врод только в самом начал работы скрипта, а потом не работает ?
Заранее спасибо

Author:  Sfagnum [ 2005-02-18 09:17:17 ]
Post subject: 

до ужаса знакомый скрипт ;)

Спирит юзается при загрузке айроном ;) и кушает тогда же...

ЗЫ откуда скрипт взял?

Author:  Askaneli [ 2005-02-18 09:21:48 ]
Post subject: 

Sfagnum wrote:
до ужаса знакомый скрипт ;)

Спирит юзается при загрузке айроном ;) и кушает тогда же...

ЗЫ откуда скрипт взял?

А чё в нём такого ужасного ???

Author:  Sfagnum [ 2005-02-18 09:34:46 ]
Post subject: 

Askaneli wrote:
А чё в нём такого ужасного ???
да на мой изврат похоже ;)
я такое на коленке писал для одного чела и формула вычисления макс веса похожа вроде ;)

ЗЫ полюбому делал как грится фриваре :)

Author:  hmmm [ 2005-02-18 14:18:10 ]
Post subject: 

Sfagnum wrote:
до ужаса знакомый скрипт ;)

Спирит юзается при загрузке айроном ;) и кушает тогда же...

ЗЫ откуда скрипт взял?

Спасибо ) Скрипт друг дал )
P.S. Выражаю благодарность автору ;))

Author:  Sfagnum [ 2005-02-18 19:00:13 ]
Post subject: 

hmmm wrote:
Скрипт друг дал )
ёмко ;)
я к нему не в притензии, просто антересно как скрипт распространяется ;)

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