Yoko
http://forum.yoko.com.ua/

Forensic
http://forum.yoko.com.ua/viewtopic.php?f=20&t=17971
Page 1 of 1

Author:  vertijok2000 [ 2017-03-22 13:41:46 ]
Post subject:  Forensic

Помогите разобраца с этим скриптом а то что то не могу зделать
суть скрипта что бы он пять раза то ко использовал скил форенсик
Code:
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

Author:  Mirage [ 2017-03-22 21:40:04 ]
Post subject:  Re: Forensic

Вэлкам сюда пожалуйста. :)

Author:  vertijok2000 [ 2017-03-22 22:19:53 ]
Post subject:  Re: Forensic

Code:
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()

Author:  Mirage [ 2017-03-23 22:02:42 ]
Post subject:  Re: Forensic

ты либо не понял идею либо не правильно сформулировал задау.
Code:
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

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/