как такое правильно написать?

[Driskill]

Code: Select all

sub main()
while wait(300000) then
   repeat
   if UO.Life < UO.Str then
   heal()
   endif
wend
end sub

суть: чар втыкает 5мин. если его атачат начинает кричать гвардс и хилятся... хил у меня есть интересует только как правильно реализовать что бы он и втыкал и проверял в тоже время не бьют ли его. Я вот только до такого додумался[/code]

[Edred]

Неисповедимы пути твои, Господи... Чего только не бывает на свете... Даже такие "конструкции" оказывается:

Code: Select all

while wait(300000) then

Ну и как? Заработало?

ЗЫ: Хинт - в другом разделе этого форума есть уроки по скриптингу. Проштудировать первые три.

[Grin]

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

[Destruction]

Неисповедимы пути твои, Господи... Чего только не бывает на свете... Даже такие "конструкции" оказывается:

Code: Select all

while wait(300000) then

Ну и как? Заработало?

ЗЫ: Хинт - в другом разделе этого форума есть уроки по скриптингу. Проштудировать первые три.

А чем тебе такой конструкций не нравится? Вроде как должно работать, а коду на строчку меньше

Другое дело, что у него там как минимум repeat не закрытый..

[Driskill]

да ну и бред я написал... в состоянии был неочень...
проблему свою решил (чар просто летит домой заходит в дом и там ждет)
всем спасибо за участие и помощь!

[Edred]

А чем тебе такой конструкций не нравится? Вроде как должно работать, а коду на строчку меньше

Тогда уж на две. Потому как тут в одну строку склеены цикл вайл, пауза, и кусок оператора if...then

Работать, естественно, не должно. По определению.

[Destruction]

А чем тебе такой конструкций не нравится? Вроде как должно работать, а коду на строчку меньше

Тогда уж на две. Потому как тут в одну строку склеены цикл вайл, пауза, и кусок оператора if...then

Работать, естественно, не должно. По определению.

Ггг, "Then" не заметил, а вот без него может и заработать