Вот то на что хватило мозгов наваять, если кто нибудь поможет нормальным рабочим скриптом на сбор крови вампом буду очень благодарен.
Code: Select all
sub dblood()
Var blood = '0x122A'
repeat
uo.exec("warmode '0'")
uo.waittargetobject('lastcorpse')
uo.usetype(0x0F51)
wait(500)
UO.FindType( blood, -1, 1 )
UO.Usetype ('blood')
until UO.Dead()
end sub