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

скрипт на хилинг...
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3181		 Page 1 of 1
Author:  ksardas [ 2005-02-22 21:03:12 ]
Post subject:  скрипт на хилинг...
Прошу написать скрипт на хилинг...как только сносят тебе хп...
юзается команда
[bhs
...
спасибо!
Author:  VlastV [ 2005-02-22 22:31:25 ]
Post subject:  Re: скрипт на хилинг...
ksardas wrote:
Прошу написать скрипт на хилинг...как только сносят тебе хп...
юзается команда
[bhs
...
спасибо!

Это то, что ты просил, данный код работает все время, по этому лучше вызывать перед началом боя и соответственно выключать после боя:
Code:
while UO.Dead() == 0
  while UO.Str > UO.Life
    UO.Exec('[bhs')
    wait(5000)
  wend
wend


А вот то, чем пользуюсь я, но нажимая клавишу:
Code:
sub Healing()
   while UO.Str > UO.Life and UO.Dead() == 0
      UO.WaitTargetSelf()
      UO.UseType('0x0e21')
      wait(5000)
   wend
end sub
Author:  I'm [ 2005-02-22 22:43:44 ]
Post subject: 
Как альтернатива =)
Code:
############# 
sub Hits() ####################################################################################### 
############# 
# Чар пьет Heal Potion кагда Hits <=100. 
# 
sub Hits() 
While NOT UO.Dead() 
If UO.Life<=100 then 
   UO.FindType(HealPotionType,HealPotionColor) 
   UO.UseObject('finditem') 
   Wait(6000) 
EndIf 
CheckLag() 
Wend 
end sub
Author:  ksardas [ 2005-02-23 07:53:52 ]
Post subject: 
sub Hits()
While NOT UO.Dead()
If UO.Life<=100 then
UO.FindType(0x0F0C,0x0000)
UO.UseObject('finditem')
Wait(10000)
EndIf
Wend
end sub

хорошии скрипт , а те что были до етого , с ними идут сильно большие лаги...
надо бы скрипт на подобии етого... ТОлько один человек придумал антихил для етого скрипта , и бинты порятся на постои... Вот скрипт:

sub healing()
var i
Var Ñli1="cliloc# 0xA4E9"

while not uo.dead()

if uo.gethp()<uo.getmaxhp() then
uo.deletejournal()
uo.msg("[BHS")
for i=1 to 50
wait(100)
if uo.injournal(Ñli1) or uo.injournal("cliloc# 0xA4E7") or uo.injournal("cliloc# 0x2D47") or uo.injournal("cliloc# 0x2D70") then
i=50
end if
next
end if
wait(100)
wend
end sub

:)

Антихил заключается в том , когда кто то кричит cliloc# 0xA4E9 , все бинты порятса , начинают юзатся каждую секунду не успивая хилится... Може те ли вы Опытные скриптеры переделать етот скрипт ... и прояснить...
Author:  ksardas [ 2005-02-23 08:07:17 ]
Post subject: 
sub healing()
var i
Var Nli1="cliloc# 0xA4E9"

while not uo.dead()

if uo.gethp()<uo.getmaxhp() then
uo.deletejournal()
uo.msg("[drink heal")
for i=1 to 50
wait(100)
if uo.injournal(Nli1) or uo.injournal("cliloc# 0xA4E7") or uo.injournal("cliloc# 0x2D47") or uo.injournal("cliloc# 0x2D70") then
i=50
end if
next
end if
wait(100)
wend
end sub


етот же скрипт можно и переделать чтобы пил хил поушены когда сбивают Хп... но проблема таже...
cliloc# 0xA4E9

и вообще обьясните что ето клиок , что он дает , и откудо его взяли...
Если можно етот клиок заменить не помишая работе скрипту то скажите как...

Сенкс за внимание -))...
Author:  ksardas [ 2005-02-23 08:11:45 ]
Post subject: 
sub poison()
If uo.poisoned() > 0 And uo.count(0x0F07) > 0 Then
uo.msg ("[drink cure")
wait(100)
return 1
Else
wait(100)
return 0
Endif
end sub


вот млин пофонтазировал крапаль , сделал скриптик , когда травят пьет банку , а вот я не могу понять как сделать чтобы он всегда работал... Переделаите крапаль...сенкс
Author:  The Cheater [ 2005-02-23 12:15:31 ]
Post subject: 
Code:
sub tty()
While UO.Count(0x0F07)>0
poison() 
wait(500)
wend
end sub
Author:  Leks [ 2005-02-28 06:25:40 ]
Post subject: 
sub autoheal()
while UO.Dead() == 0
while UO.Str > UO.Life
Healing()
wait(5000)
wend
wend
end sub

sub Healing()
UO.SetArm('TempWeapon')
wait(800)
UO.Exec("bandageself")
wait(800)
UO.Arm('TempWeapon')
end sub
Author:  ksardas [ 2005-02-28 13:37:43 ]
Post subject: 
Leks wrote:
sub autoheal()
while UO.Dead() == 0
while UO.Str > UO.Life
Healing()
wait(5000)
wend
wend
end sub

sub Healing()
UO.SetArm('TempWeapon')
wait(800)
UO.Exec("bandageself")
wait(800)
UO.Arm('TempWeapon')
end sub



ДИКИЕ ЛАГИ РЫВКИ , ВПЕРЕД НАЗАД :(( а вот с тем было лучше тем что я вылаживал вообще не лагало...разве что етот клиок...передеалали бы его чтобы клиок не мешал было бы так... Офигенно
Author:  Vaha) [ 2005-03-01 00:59:50 ]
Post subject: 
ksardas wrote:
Leks wrote:
sub autoheal()
while UO.Dead() == 0
while UO.Str > UO.Life
Healing()
wait(5000)
wend
wend
end sub

sub Healing()
UO.SetArm('TempWeapon')
wait(800)
UO.Exec("bandageself")
wait(800)
UO.Arm('TempWeapon')
end sub



ДИКИЕ ЛАГИ РЫВКИ , ВПЕРЕД НАЗАД :(( а вот с тем было лучше тем что я вылаживал вообще не лагало...разве что етот клиок...передеалали бы его чтобы клиок не мешал было бы так... Офигенно

вот тебе ася моя стукни 202056775 может я тебе и помогу))
Author:  BEPMYT [ 2005-03-01 20:41:34 ]
Post subject: 
sub bondage()
uo.setarm('arm1')
if uo.life<uo.str then
#uo.waittargetself()
#wait(200)
#uo.usetype(0x0e21)
uo.bandageself()
wait(1000)
end if

uo.arm('arm1')

end sub
в инже бендишь и всё супер!
Author:  Saruman [ 2005-03-04 14:18:40 ]
Post subject: 
BEPMYT wrote:
sub bondage()
uo.setarm('arm1')
if uo.life<uo.str then
#uo.waittargetself()
#wait(200)
#uo.usetype(0x0e21)
uo.bandageself()
wait(1000)
end if

uo.arm('arm1')

end sub
в инже бендишь и всё супер!

а не легче в самой уо зайти в опции и на макросниках забиндить


(клавиша для бинда)

say ,bandageself

и другие команды для инжы
Author:  BETEPAH [ 2005-03-04 14:41:52 ]
Post subject: 
Скрипт запоминает оружие и потом его одевает ...и скрипт не будет срабатывать если у тебя жизнь максимум.......а команда тока вылечит ...потом придется заного одевать оружее
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/