Sh@dow wrote:
Нужен скрипт на форенсик желательно такой чтобы убивал нуба качал на нем форенсик и ресал и заново повторял процес ! скиньте плз!
Code:
sub forenc()
VAR i, an, nub= #ID нуба поставь
VAR skiltime= '5000'#Время действия скила Форенсик
VAR bint= # Тут поставь тип бинтов
uo.Set('finddistance','3')
while not uo.dead()
uo.FindType(nub,'1','ground')
if uo.Count('finditem') > 0 then
uo.WarMode(true)
an = uo.GetSerial('finditem')
uo.Attack(an)
while not uo.InJournal('Body')
wait(500)
wend
for i = 0 to 50
uo.waittargetobject('lastcorpse')
uo.UseSkill('Forensic ')
wait(skiltime)
next
uo.waittargetobject(an)
uo.usetype(bint)
end if
wend
end sub