Page 1 of 1
Арчери + сс
Posted: 2006-06-10 09:56:42
by a2kat
Пробовал искать не получилося...
есть у кого скрипт на то чтобы :
1 палить из лука по друкону с другово этажа
2 когда у него 30% Хп (ну или нупример гдето 150хп) качать СпиритСпик и хелить его бинтами, когда отхелишь продолжать палить...
3 если у меня меньше 180 Хп хелить себя бинтами... и сново в бой...
заранее спс
Posted: 2006-06-13 09:29:22
by a2kat
мдя жалко =(
Posted: 2006-06-15 02:20:07
by ZWERb
товарищь у вас ручки откудова растут???
я бы с радостью написал... но виллы у меня пока нет... и врядли в скором времени появица! так что у тебя 3 пути
1) ждать
2) учить инжект
3) купить мне виллу =-)
Posted: 2006-06-15 09:36:01
by 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
Вроде все правильно-смотри и тести сам.
Posted: 2006-06-15 10:30:32
by ZWERb
You Must Die wrote: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
Вроде все правильно-смотри и тести сам.
А мытьебинтиков тяжело было добавить?!
Шас сам зделаю!
Posted: 2006-06-15 10:32:57
by ZWERb
вот лови!
Code: Select all
var Moy ='0x40011782' ; ID Мойки
var BandBL ='0x0E20' ; Тип грязных бинтов
sub cln()
UO.WaitTargetObject(Moy)
UO.UseType(BandBL)
wait(500)
end sub
Posted: 2006-06-15 11:06:28
by Scripts Writer
ZWERb wrote:вот лови!
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
п.с. Незабудь дописать взятие бинтов дополнительных, взятие стрел, проверка -не сломался ли лук, проверку на то как близко дракон, на скилкап , реконектор, параметр ловкости.
Posted: 2006-06-15 12:46:18
by ZWERb
You Must Die wrote:ZWERb wrote:вот лови!
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
п.с. Незабудь дописать взятие бинтов дополнительных, взятие стрел, проверка -не сломался ли лук, проверку на то как близко дракон, на скилкап , реконектор, параметр ловкости.
Дак мне етот скрипт нафиг не нада! я ж не автор темы! А написать не смог потому что негде было тестить!
Posted: 2006-06-15 17:05:34
by Scripts Writer
ZWERb wrote:You Must Die wrote:ZWERb wrote:вот лови!
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Зато поддакнуть на мойку бинтов мозгов хватило, а норм скрипт оформить неможешь