Арчери + сс

[a2kat]

Пробовал искать не получилося...
есть у кого скрипт на то чтобы :

1 палить из лука по друкону с другово этажа

2 когда у него 30% Хп (ну или нупример гдето 150хп) качать СпиритСпик и хелить его бинтами, когда отхелишь продолжать палить...

3 если у меня меньше 180 Хп хелить себя бинтами... и сново в бой...

заранее спс

[a2kat]

мдя жалко =(

[ZWERb]

товарищь у вас ручки откудова растут???

я бы с радостью написал... но виллы у меня пока нет... и врядли в скором времени появица! так что у тебя 3 пути
1) ждать
2) учить инжект
3) купить мне виллу =-)

[Scripts Writer]

Code: Select all

sub Archery()
var drakon=' ID '
var bandage=' type '
while not uo.Dead()
  uo.WarMode(true)
  uo.Attack(drakon)
  while uo.GetHp(drakon) > uo.GetMaxHp(drakon) / 3
    wait(100)
    if uo.life < 180 then
      uo.bandageself()
      wait(3000)
    end if
  wend
  uo.WarMode(false)
  while uo.GetHp(drakon) < uo.GetMaxHp(drakon)
    uo.UseSkill('Spirit Speak')
    wait(3000)
    uo.WaitTargetObject(drakon)
    uo.USeType(bandage)
    wait(3000)
    if uo.life < 180 then
      uo.bandageself()
      wait(3000)
    end if
  wend
wend
end sub

Вроде все правильно-смотри и тести сам.

[ZWERb]

Code: Select all

sub Archery()
var drakon=' ID '
var bandage=' type '
while not uo.Dead()
  uo.WarMode(true)
  uo.Attack(drakon)
  while uo.GetHp(drakon) > uo.GetMaxHp(drakon) / 3
    wait(100)
    if uo.life < 180 then
      uo.bandageself()
      wait(3000)
    end if
  wend
  uo.WarMode(false)
  while uo.GetHp(drakon) < uo.GetMaxHp(drakon)
    uo.UseSkill('Spirit Speak')
    wait(3000)
    uo.WaitTargetObject(drakon)
    uo.USeType(bandage)
    wait(3000)
    if uo.life < 180 then
      uo.bandageself()
      wait(3000)
    end if
  wend
wend
end sub

Вроде все правильно-смотри и тести сам.

А мытьебинтиков тяжело было добавить?!
Шас сам зделаю!

[ZWERb]

вот лови!

Code: Select all

var Moy ='0x40011782' ; ID Мойки
var BandBL ='0x0E20' ; Тип грязных бинтов
sub cln()
UO.WaitTargetObject(Moy) 
UO.UseType(BandBL)
wait(500)
end sub

[Scripts Writer]

вот лови!

Code: Select all

var Moy ='0x40011782' ; ID Мойки
var BandBL ='0x0E20' ; Тип грязных бинтов
sub cln()
UO.WaitTargetObject(Moy) 
UO.UseType(BandBL)
wait(500)
end sub

А самому скрипт трудно было написать?

Code: Select all

п.с. Незабудь дописать взятие бинтов дополнительных, взятие стрел, проверка -не сломался ли лук, проверку на то как близко дракон, на скилкап , реконектор, параметр ловкости. 

[ZWERb]

вот лови!

Code: Select all

var Moy ='0x40011782' ; ID Мойки
var BandBL ='0x0E20' ; Тип грязных бинтов
sub cln()
UO.WaitTargetObject(Moy) 
UO.UseType(BandBL)
wait(500)
end sub

А самому скрипт трудно было написать?

Code: Select all

п.с. Незабудь дописать взятие бинтов дополнительных, взятие стрел, проверка -не сломался ли лук, проверку на то как близко дракон, на скилкап , реконектор, параметр ловкости. 

Дак мне етот скрипт нафиг не нада! я ж не автор темы! А написать не смог потому что негде было тестить!

[Scripts Writer]

вот лови!

Code: Select all

var Moy ='0x40011782' ; ID Мойки
var BandBL ='0x0E20' ; Тип грязных бинтов
sub cln()
UO.WaitTargetObject(Moy) 
UO.UseType(BandBL)
wait(500)
end sub

А самому скрипт трудно было написать?

Code: Select all

п.с. Незабудь дописать взятие бинтов дополнительных, взятие стрел, проверка -не сломался ли лук, проверку на то как близко дракон, на скилкап , реконектор, параметр ловкости. 

Дак мне етот скрипт нафиг не нада! я ж не автор темы! А написать не смог потому что негде было тестить!

1Думаешь я тестил?
2Зато поддакнуть на мойку бинтов мозгов хватило, а норм скрипт оформить неможешь