Yoko

Posted: **2007-04-01 00:18:54**

sub lol()
UO.SetArm('CWeapon')
UO.Exec("bandageself")
wait(700)
UO.Arm('CWeapon')
end sub

как сделать чтобы этот скрипт работал постоянно??... пока я его не выключу в списке скриптов...не надо тока плз писать почитай уроки скриптинга и т.д.....просто дайте ответ на мой вопрос...

Posted: **2007-04-01 03:05:10**

Code: Select all

sub Start()
repeat
lol()
checklag()
until uo.dead()
end sub
Sub lol() 
UO.SetArm('CWeapon') 
UO.Exec("bandageself") 
wait(700) 
UO.Arm('CWeapon') 
end sub
Sub checklag()
deljournal("backpack|Backpack")
UO.Click("backpack")
repeat
wait(100)
until UO.InJournal("backpack|Backpack")
end sub
Sub deljournal(msg)
while UO.InJournal(msg)
  UO.SetJournalLine(UO.InJournal(msg)-1,"")
wend
end sub

Posted: **2007-04-01 14:21:19**

в списке скриптов появляется но не работает....

Posted: **2007-04-01 20:43:28**

repeat

until uo.dead()

Posted: **2007-04-21 01:38:27**

Mihail wrote:repeat

until uo.dead()

Code: Select all

sub lol()

UO.SetArm('CWeapon')
repeat
UO.Exec("bandageself")
wait(700)
UO.Arm('CWeapon')
until uo.dead()
end sub

Малоли не поймеш

Posted: **2007-04-23 12:42:30**

пасиба

Yoko

простой вопрос

простой вопрос