Yoko
http://forum.yoko.com.ua/

Скрипт "Боевой Ассистент"
http://forum.yoko.com.ua/viewtopic.php?f=20&t=138		 Page 1 of 1
Author:  BETEP [ 2004-04-20 06:39:49 ]
Post subject:  Скрипт "Боевой Ассистент"
Привет всем !!!
Думаю всем хочется знать ....ЧТО ЖЕ ЭТО ЗА "Ассистент"
Рассказываю....Обычный скрипт для посивного висения в инже и супорте в бою
Идея простая ....Пьет ГХ когда мало хелсов или Кастует ,Выбевает из паралайза(путем кастования стрелки на Экспу в Паке)или выпивание Противоядия....
Написал криво ....думаю те кто сможет помочь и сами будут рады иметь такой скрипт под рукой (тем более его можно и вырубить если привык к ручному режиму )

sub Start()
UO.Say("Support Mode ON")
Wait(1000)
Main()
end sub

sub Main()
Wait(2000)
GHeal()
Wait(2000)
Cure()
Wait(2000)
UnParalaise()
Wait(2000)
end sub

sub GHeal()
If UO.Life<100 Then
Wait(1000)
UO.FindType('0x0F0E','0x09BB',-1,'my')
UO.WaitTargetSelf()
UO.UseObject('finditem')
UO.Print("Áóòûëêà!")
Else
if UO.InJournal("drink another potion yet")Then
Wait(1000)
UO.Cast('Greater Heal','self')
UO.Print("Çàêëèíàíèå!")
Endif
Endif
Else
End sub

sub UnParalaise()
if UO.InJournal("You are frozen")Then
wait(500)
UO.FindType('0x0F0D','0x0B99',-1,'my')
wait(500)
UO.Cast('Magic Arrow','finditem')
UO.Print("Àíòèïàðàëàéç!")
endif
endif
Else
end sub

sub Cure()
If UO.Poisoned() Then
Wait(1000)
UO.FindType('0x0F0E','0x09A6',-1,'my')
UO.WaitTargetSelf()
UO.UseObject('finditem')
UO.Print("ËÅ×ÈÒ!")
Endif
Endif
Endif
endif
Main()
end sub

Думаю все понятно....основная прозьба.
Переделать все в 1 масив (Сделать чуточку проще)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/