Page 1 of 1

Бросок с задержкой

Posted: 2010-12-22 10:53:40
by chuv
Помогите внести следующие изменения в скрипт, чтобы бросок бомбы был с задержкой 2,5 сек.
sub BOMB()
var i
Dim Bomb[2]
Bomb[0]=0x0F0D
Bomb[1]=0x0F0E
Dim Color[2]
Color[0]=0x0B99
Color[1]=0x09DA
for i=0 to 1
UO.FindType(Bomb[i],Color[i],'backpack')
If UO.FindCount() > 0 Then
UO.UseType(Bomb[i],Color[i])
uo.waittargetobject('laststatus')
wait (500)
endif
next
UO.Say("Ãðàíàòà")
end sub

Re: Бросок с задержкой

Posted: 2010-12-22 17:13:15
by Mirage
Если так не получитс ято сервер не позволяет такие задержки сделать. По крайней мере через инжект без бубна не сделаешь - проще руками юзать 2 кнопки отдельные.

Code: Select all

sub BOMB()
var i
    Dim Bomb[2]
            Bomb[0]=0x0F0D
            Bomb[1]=0x0F0E
    Dim Color[2]
            Color[0]=0x0B99
            Color[1]=0x09DA
       for i=0 to 1
             UO.FindType(Bomb[i],Color[i],'backpack')
                  If UO.FindCount() > 0 Then
                        UO.UseType(Bomb[i],Color[i])
         wait (2000)
         uo.waittargetobject('laststatus')
         wait (500)
   endif
       next
       UO.Say("Ãðàíàòà")
end sub

Re: Бросок с задержкой

Posted: 2010-12-22 20:14:33
by chuv
Так пробовал - не получилось. Вероятно это сервер.