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/