Skript Na Vari pomogite

[Admeral]

vot nakatal takoy skriptik i on mne pishet error na stroke posle posledniy a yeyo nesushestvuyet vashe i niznayu 4o delat vrode vso gramotno

Code: Select all

sub wars()


var bandages       = 0x0E21
var bloodbandages  = 0x0E20
var washbasin      = 0x1008
var fizllecheck

UO.DeleteJournal()
UO.Automenu('What','Polar')

while NOT UO.Dead()
   If UO.Life<UO.Str then
   repeat
      UO.Bandageself()
      wait(5000)
      If UO.count("bandages")==0 AND UO.Count("bloodbandages")==0 then
         UO.closeUO()
      Else
         If UO.count("bandages")==0 then
            UO.usetype("bloodbandages")
            UO.waittargettype ("washbasin")
         Endif
      Endif
   until UO.Life==UO.Str
   UO.exec("usetype 0x1B76")
   UO.exec("usetype 0x0EC2")
   UO.canceltarget()
   UO.waittargetself()
   UO.cast('Summ. Crea')
   fizllecheck=0
   repeat
      wait(500)
      If fizllecheck>15 then
      UO.waittargetself()
      UO.cast('Summ. Crea')
      fizllecheck=0
      If UO.InJournal('lack sufficient') then 
         UO.DeleteJournal() 
         while UO.mana<UO.Int 
            UO.Warmode(0)      
            UO.UseSkill('Meditation') 
            repeat 
               wait(100) 
            until UO.InJournal("You are") OR UO.InJournal("You lose") 
            UO.DeleteJournal() 
            wait(1000) 
          wend 
      endif 
      endif
   UO.findtype('0x00d5','0xffff','ground') 
   until uo.FindCount()==1
   repeat 
      wait(1000) 
      UO.Attack('finditem') 
      UO.findtype('0x00d5','0xffff','ground')
      if UO.Life<15 then
         uo.usetype("0x0F0E")
      Endif
   until uo.FindCount()==0
wend
end sub

[BETEPAH]

Где то или 2 ключа или нету одного
либо закрываешь не открытий цикл либо наоборот забыл закрыть.

[Admeral]

Где то или 2 ключа или нету одного
либо закрываешь не открытий цикл либо наоборот забыл закрыть.

ya uzhe proveril eto vso vrodebi pravilno on niho4et rabotat

[Admeral]

ludi nu pomogite zhe ktonibut 4oya zra skript mailsa pisal
on u mena odin iz pervih i ya uzhe poprobival vso shto ya znayu
hotabi pomogli bi boliye opitniye

[BETEPAH]

Просто попробуй ради разнообразия в конце добавить
Wend или End if......иногда смотришь все вроде ок ,а не пашит, а так ключ добавил и все ..... пробуй