Yoko

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

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 

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

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

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 

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

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.