глючит в 60 строке, которой нет

[Ex-Brodyaga]

Code: Select all

sub WETERINARY() 
var bandage='0x0E21'
var bloodb='0x0E20'
var wb='0x1008'
var eda='0x097B'

while not UO.Dead()
    int=UO.Str     
    UO.arm("10")
    repeat 
     wait(200) 
    until UO.Hits<int 
    uo.disarm() 
    UO.DeleteJournal() 
    healing()  
  if UO.Count(bandage)==0 then 
    uo.waittargettype(wb) 
    uo.usetype(bloodb) 
    wait(500) 
    UO.DeleteJournal() 
  endif 
  if UO.STR < 300 then 
    caster() 
  endif 
wend 
end sub 

sub caster() 
castq:
UO.cast("Polymorph")
UO.waitmenu("What","Daemon") 
wait(6000) 
if UO.STR < 320 then 
  if UO.Mana < 50 then 
     medit() 
  endif
goto castq
endif 
end sub 

sub medit()
 while UO.Mana < 50
  while not UO.InJournal("You attempt")
    UO.UseSkill("Meditation")
    wait(2000)
  wend
  wait(500)
 wend
end sub

sub healing() 
while not UO.Life==uo.str
  UO.exec("bandageself")
  UO.Deletejournal()
  repeat  
    wait(200)
  until UO.InJournal("apply") or UO.InJournal("bloody")
wend
end sub

[Yoko]

когда говорится что ошибка в последней строке скрипта это означает что для какой то операторной скобки (for, while, repeat, if, sub,...( недостаёт или не в правильном порядке вторая часть (next, wend, until, end sub,...)

[Ex-Brodyaga]

ну так у меня же всё вроде закрыто. Найди плз место ошибки

[Yoko]

int=UO.Str

[Ex-Brodyaga]

нет, не то

[AGRS]

ну так у меня же всё вроде закрыто.

Ты думаешь интерпритатор ищет где у тебя wend'а не хватает? Нет. Он анализирует строку за строкой. Делай также.



PS И придержи ругательства когда дойдешь до пятой строки.

[333333]

та же фигня была. по мойму там левые символы. лучше скопировать все до и после строки, а саму ее переписать

[AGRS]

та же фигня была. по мойму там левые символы. лучше скопировать все до и после строки, а саму ее переписать

А по моему там просто кавычек маловато.

[GrayLord]

"...а по моему, а по моему..."....
чтобы не путаться надо выделять операторные скобки хотя бы одним пробелом или tab, чтобы можно было проследить структуру кода:

Code: Select all

sub abc()
    if ... then
        for ... to ...
            ...
        next
        .....
    else
        .....
    endif
end sub

ЗЫЖ а насчет кавычек - верно. там в самом начале где-то не закрыты. =)

[Ex-Brodyaga]

я и вообщето выделяю, просто при копировании и вставке, они пропадают

[GrayLord]

я и вообщето выделяю, просто при копировании и вставке, они пропадают

а кавычку вот тут

Code: Select all

var eda='0x097B 

закрыл?

[AGRS]

ЗЫЖ а насчет кавычек - верно. там в самом начале где-то не закрыты. =)

А ты думал я просто пошутил? )))

[AGRS]

я и вообщето выделяю, просто при копировании и вставке, они пропадают

В тэге CODE табуляция сохраняется.

[GrayLord]

ЗЫЖ а насчет кавычек - верно. там в самом начале где-то не закрыты. =)

А ты думал я просто пошутил? )))

это еще в светлые времена увлечения программированием в школьные годы у нас с друзьями такая шутка была. =)

[AGRS]

ЗЫЖ а насчет кавычек - верно. там в самом начале где-то не закрыты. =)

А ты думал я просто пошутил? )))

это еще в светлые времена увлечения программированием в школьные годы у нас с друзьями такая шутка была. =)

А я уже после школы садистом стал.

[GrayLord]

А ты думал я просто пошутил? )))

это еще в светлые времена увлечения программированием в школьные годы у нас с друзьями такая шутка была. =)

А я уже после школы садистом стал.

=)