переделать авто-атаку

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
invis
Posts: 17
Joined: 2006-06-05 20:33:19

переделать авто-атаку

Post by invis »

вот такой скриптик он выключаеться сам после 2 мобов

Code: Select all

sub war()
dim monster[2]
    monster[1]='0x0023' ;lizard
    monster[2]='0x0011' ;ogr
var i
uo.set('finddistance','10')
for i=1 to 2
   uo.findtype(monster[i],'-1','ground')
        wait(100)
   if uo.findcount()>0 then
      uo.attack('finditem')
          repeat
           wait(500)
          until uo.getx('finditem')==0
   if UO.Weight>=UO.Str*4 then
           wait(500)
          UO.Ignore('finditem')
           unload()
    end if
until uo.dead()
end sub


помогите исправить за рание спасибо

было бы не плохо если можно было бы еще присобачить вот это

Code: Select all

sub zz() 
   VAR Trigger=2
   Repeat
      If UO.GetDistance('lastattack')>2 AND Trigger<>1 Then
         UO.Exec(',exec archery')
         Trigger=1
      Endif
      If UO.GetDistance('lastattack')<2 AND Trigger<>2 Then
         UO.Exec(',exec sword')
         Trigger=2
      Endif   
      If UO.Life<50 Then
         uo.usetype(0x0F0E)  # invizka
           wait(10000)
         UO.Say('boo')
           wait(100)
      Endif
      wait(100)
   Until UO.Dead()
end sub
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: переделать авто-атаку

Post by Mirage »

в первом скрипте достаточно пропустить через мою подпись вторую строку и будет видно что как бы for есть а next нет, есть until а repeat нет.
Post Reply