sub Begging()
var count=0
uo.Print('Выберите обьект...')
uo.Exec('addobject Creature')
while uo.Targeting()
wait(100)
wend
uo.DeleteJournal()
repeat
uo.WaitTargetObject('Creature')
uo.Useskill('Begging')
wait(2700)
uo.UseSkil l('Spirit Speak')
wait(3000)
until uo.Dead()
end sub