Думал легко и просто

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
frost
Posts: 11
Joined: 2006-06-11 12:02:44

Думал легко и просто

Post by frost »

Господа скриптеры прошу помощи...поискал скрипты на автохил...нашол не совсем то что мне надо.
Решил подправить но как видите без успешно вроде бы все легко и просто ....НУ НЕ скриптер я.
Принцип работы скрипта такой.
1.Как только чару наносят урон чтоб сразу сам хилялся (при этом не надо делать чтоб оружие падало).
2.выпивание Грител Хэла по задданому ХП..

Ну вот впринципе и все...всем кто откликница спасибо.
Те кто нет заходите пофлудим. :)
С УВ.
Top
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Re: Думал легко и просто

Post by to4a »

frost wrote:при этом не надо делать чтоб оружие падало
А как ты хочешь так хилится чтоб оружие не падало?
Top
frost
Posts: 11
Joined: 2006-06-11 12:02:44

Re: Думал легко и просто

Post by frost »

to4a wrote:
frost wrote:при этом не надо делать чтоб оружие падало
А как ты хочешь так хилится чтоб оружие не падало?
А вот шард такой хилишся и оружие не падает...падает тока когда кастуеш т.е юзаеш магию. :roll:
Top
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

Тоесть суть такая ты стоишь с полными хп, как только они уменьшаются сразу хилится? и если совсем мало то пить гх?
Top
frost
Posts: 11
Joined: 2006-06-11 12:02:44

Post by frost »

to4a wrote:Тоесть суть такая ты стоишь с полными хп, как только они уменьшаются сразу хилится? и если совсем мало то пить гх?
ТОЧНО....именно так. 8)
Top
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

Code: Select all

sub Heal()
var k
var ghtype='' #СЮДА ПОДСТАВИТЬ ТИП ГХ
var ghcolor='' #СЮДА ПОДСТАВИТЬ ЦВЕТ ГХ
while true
 while UO.GetHP()==UO.GetMaxHP()
  wait(100)
 wend
 repeat
 UO.BandageSelf()
 k=0
 repeat
  k=k+1
  wait(100)
 until UO.InJournal("You put|You apply the|interrupted") or k==50
 until UO.GetHP()==UO.GetMaxHP()
 if UO.GetHP()<=50 then 
  UO.UseType(ghtype,ghcolor)
  wait(200)
 endif
wend
endsub
Вот такой вот простенький скрипт, постоянно висит в памяти, когда хп падает меньше максимума бинтуется, бинты не моет, если хп становится меньше 50(можешь изменить встроке if UO.GetHP()<=50 then пьет гх...
Писал в окне ответа, не тестил...
Last edited by to4a on 2006-06-18 23:27:29, edited 2 times in total.
Top
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:
Contact Scripts Writer

Post by Scripts Writer »

Code: Select all

sub heal()
var greater=' type '
var heal=' color '
  while not uo.Dead()
    while not uo.hp < uo.str
      wait(100)
    wend
    while uo.hp < uo.str 
      uo.bandageself()
      wait(3000)
      if uo.life < 50 then
        uo.UseType(greater,heal)
        wait(500)
      end if
    wend
  wend
end sub
Top
frost
Posts: 11
Joined: 2006-06-11 12:02:44

Post by frost »

to4a wrote:

Code: Select all

sub Heal()
var k
var ghtype='' #СЮДА ПОДСТАВИТЬ ТИП ГХ
var ghcolor='' #СЮДА ПОДСТАВИТЬ ЦВЕТ ГХ
while true
 while UO.GetHP()==UO.GetMaxHP()
  wait(100)
 wend
 repeat
 UO.BandageSelf()
 k=0
 repeat
  k=k+1
  wait(100)
 until UO.InJournal("You put|You apply the|interrupted") or k==50
 until UO.GetHP()==UO.GetMaxHP()
 if UO.GetHP()<=50 then 
  UO.UseType(ghtype,ghcolor)
  wait(200)
 endif
wend
endsub
Вот такой вот простенький скрипт, постоянно висит в памяти, когда хп падает меньше максимума бинтуется, бинты не моет, если хп становится меньше 50(можешь изменить встроке if UO.GetHP()<=50 then пьет гх...
Писал в окне ответа, не тестил...
Огромное спасибо скрипт класс...но после 20 30 урона начинает появляться курсор и инжект пишет
Auto target cancaled - это бывает когда очень много наать кнопку bandageself.
Задержку уменьшить или что ? :roll:
Top
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:
Contact Scripts Writer

Post by Scripts Writer »

frost wrote:
to4a wrote:

Code: Select all

sub Heal()
var k
var ghtype='' #СЮДА ПОДСТАВИТЬ ТИП ГХ
var ghcolor='' #СЮДА ПОДСТАВИТЬ ЦВЕТ ГХ
while true
 while UO.GetHP()==UO.GetMaxHP()
  wait(100)
 wend
 repeat
 UO.BandageSelf()
 k=0
 repeat
  k=k+1
  wait(100)
 until UO.InJournal("You put|You apply the|interrupted") or k==50
 until UO.GetHP()==UO.GetMaxHP()
 if UO.GetHP()<=50 then 
  UO.UseType(ghtype,ghcolor)
  wait(200)
 endif
wend
endsub
Вот такой вот простенький скрипт, постоянно висит в памяти, когда хп падает меньше максимума бинтуется, бинты не моет, если хп становится меньше 50(можешь изменить встроке if UO.GetHP()<=50 then пьет гх...
Писал в окне ответа, не тестил...
Огромное спасибо скрипт класс...но после 20 30 урона начинает появляться курсор и инжект пишет
Auto target cancaled - это бывает когда очень много наать кнопку bandageself.
Задержку уменьшить или что ? :roll:

Code: Select all

sub Heal() 
var k 
var ghtype='' #СЮДА ПОДСТАВИТЬ ТИП ГХ 
var ghcolor='' #СЮДА ПОДСТАВИТЬ ЦВЕТ ГХ 
while true 
 while UO.GetHP()==UO.GetMaxHP() 
  wait(100) 
 wend 
 repeat 
 UO.BandageSelf() 
 k=0 
 uo.DeleteJournal()
 repeat 
  k=k+1 
  wait(100) 
 until UO.InJournal("You put|You apply the|interrupted") or k==50 
 until UO.GetHP()==UO.GetMaxHP() 
 if UO.GetHP()<=50 then 
  UO.UseType(ghtype,ghcolor) 
  wait(200) 
 endif 
wend 
endsub
Пробуй.
Top
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

Эээ... я не понял зачем много раз нажимать бандажселф, да и если появляется то наоборот увеличить задержку, а точнее после строки
until UO.InJournal("You put|You apply the|interrupted") or k==50
добавить wait(500) для начала, потом можно попробовать уменьшить
Top
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

точно, забыл чистить журнал, ну я ж говорю, писал в окне ответа, не тестил :oops: )))
Top
frost
Posts: 11
Joined: 2006-06-11 12:02:44

Post by frost »

You Must Die wrote:
frost wrote:
to4a wrote:

Code: Select all

sub Heal()
var k
var ghtype='' #СЮДА ПОДСТАВИТЬ ТИП ГХ
var ghcolor='' #СЮДА ПОДСТАВИТЬ ЦВЕТ ГХ
while true
 while UO.GetHP()==UO.GetMaxHP()
  wait(100)
 wend
 repeat
 UO.BandageSelf()
 k=0
 repeat
  k=k+1
  wait(100)
 until UO.InJournal("You put|You apply the|interrupted") or k==50
 until UO.GetHP()==UO.GetMaxHP()
 if UO.GetHP()<=50 then 
  UO.UseType(ghtype,ghcolor)
  wait(200)
 endif
wend
endsub
Вот такой вот простенький скрипт, постоянно висит в памяти, когда хп падает меньше максимума бинтуется, бинты не моет, если хп становится меньше 50(можешь изменить встроке if UO.GetHP()<=50 then пьет гх...
Писал в окне ответа, не тестил...
Огромное спасибо скрипт класс...но после 20 30 урона начинает появляться курсор и инжект пишет
Auto target cancaled - это бывает когда очень много наать кнопку bandageself.
Задержку уменьшить или что ? :roll:

Code: Select all

sub Heal() 
var k 
var ghtype='' #СЮДА ПОДСТАВИТЬ ТИП ГХ 
var ghcolor='' #СЮДА ПОДСТАВИТЬ ЦВЕТ ГХ 
while true 
 while UO.GetHP()==UO.GetMaxHP() 
  wait(100) 
 wend 
 repeat 
 UO.BandageSelf() 
 k=0 
 uo.DeleteJournal()
 repeat 
  k=k+1 
  wait(100) 
 until UO.InJournal("You put|You apply the|interrupted") or k==50 
 until UO.GetHP()==UO.GetMaxHP() 
 if UO.GetHP()<=50 then 
  UO.UseType(ghtype,ghcolor) 
  wait(200) 
 endif 
wend 
endsub
Пробуй.
Спасибо всем огромное. Все работает.
Вы лучшие ! :wink:
Top
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Помни... для пожертвований существует R143003794030 :roll: гы гы гы
DerMeister сейчас на нейрале!
Top
MrAiro
Posts: 10
Joined: 2015-05-05 00:20:36

Re: Думал легко и просто

Post by MrAiro »

Ребят помогите пожалуйста, нужен простейший скрипт на автохил как вы сделали, только не с командой bandageself а для вампира, нужно юзать окровавленные бинты, если использовать команду клиента (на сервере есть такая) .bandageself то юзаються кровавые бинты я так понимаю нужно просто поменять строчку UO.BandageSelf() на msg '.bandageself' ? верно?
Top
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:
Contact Mirage

Re: Думал легко и просто

Post by Mirage »

UO.BandageSelf()
поменять на
uo.msg('.bandageself')

Со скриптом ответил в другом твоем топике.
Top
MrAiro
Posts: 10
Joined: 2015-05-05 00:20:36

Re: Думал легко и просто

Post by MrAiro »

Спасибо еще раз!
Top
Post Reply

Return to “Scripting Ore”