Page 1 of 1
Forensic
Posted: 2017-03-22 13:41:46
by vertijok2000
Помогите разобраца с этим скриптом а то что то не могу зделать
суть скрипта что бы он пять раза то ко использовал скил форенсик
Code: Select all
sub fore()
var telo = '0x2006' #???? ?????
uo.warmode(0)
uo.findtype(telo,-1,"ground")
if uo.findcount()<5 then
uo.waittargetobject("finditem")
uo.UseSkill("Forensic Evaluation")
wait(3000)
uo.findtype(telo,-1,"ground")
end if
end sub
Re: Forensic
Posted: 2017-03-22 21:40:04
by Mirage
Re: Forensic
Posted: 2017-03-22 22:19:53
by vertijok2000
Code: Select all
sub fore()
; var telo = '0x2006' #???? ?????
var i
Dim fore[2]
fore[0] = '0x0000'
fore[1] = '0x2006'
For i = 0 To 1
uo.warmode(0)
uo.findtype(fore[i],-1,"ground")
while uo.findcount() > 5
uo.waittargetobject("finditem")
uo.UseSkill("Forensic Evaluation")
wait(3000)
uo.findtype(fore[i],-1,"ground")
wend
next
end sub
попробывал я зделать через фор и нехт и без изминения
легче зделать так
fore()
fore()
fore()
fore()
fore()
Re: Forensic
Posted: 2017-03-23 22:02:42
by Mirage
ты либо не понял идею либо не правильно сформулировал задау.
Code: Select all
sub fore()
var i
var telo = '0x2006'
uo.warmode(0)
uo.findtype(telo,-1,"ground")
if uo.findcount() then
for i = 1 to 5 от
uo.waittargetobject("finditem")
uo.UseSkill("Forensic Evaluation")
wait(3000)
next
end if
end sub
