Enticement and Evaluta INT
Posted: 2006-08-07 02:08:27
U kogonet jest skriptik ? shtoby ito ito ko4al?
Ili s etih 2 zdelaite pliizz, jesli ne trudno !
Code: Select all
sub Evaluate()
var count=0
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT','TOT')
UO.Useskill('Evaluating')
while not UO.InJournal("unsure") and not UO.InJournal("looks") and not UO.InJournal("perform") and count<60
wait(100)
count=count+1
wend
wait(600)
count=0
UO.DeleteJournal()
until UO.Dead()
end sub
Code: Select all
sub Enticement()
var count=0
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT')
UO.Useskill('Enticement')
wait(8000)
until UO.Dead()
end sub
Ili s etih 2 zdelaite pliizz, jesli ne trudno !
