Арчери
Moderators: Murderator+, Murderator
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
Арчери
Народ помогите скриптаком мне надо арчери прокачать, гамаю на дрв, мазы с мишками не проходят....
Re: Арчери
переделай на блайд спиритс (так вроде...)No Problem wrote:Народ помогите скриптаком мне надо арчери прокачать, гамаю на дрв, мазы с мишками не проходят....
Блин кривые руки...
ПОИСК в помощь...
ПОИСК в помощь...
Code: Select all
sub Archery()
while 1
uo.usetype("0x13B1") # тип оружия
UO.Exec("attack 0x002D23EF") #айди 2-го чара
Repeat
wait (500)
if uo.injournal("destroyed")then
UO.usetype("0x13B1") # тип оружия
uo.deletejournal()
endif
Until ((UO.GetHP("0x0007424F") <75)or (UO.GetHP("0x002D23EF") <100)) #
#жизни 1-го и 2-го чара
repeat
wait (500)
UO.Exec("warmode 0") # выключаем вар мод
UO.Usetype("0x0E21") #Bandages
UO.Exec("waittargetobject 0x002D23EF") # айди 2-го чара
wait(3500)
Until (UO.InJournal("need you"))
UO.DeleteJournal()
Repeat
UO.Usetype("0x0E21") #Bandages
UO.Exec("waittargetobject 0x0007424F") # айди 1-го чара
wait(3500)
Until (UO.InJournal("need healing"))
wend
end sub
sub Healing()
UO.SetArm('CWeapon')
UO.Exec("bandageself")
wait(500)
UO.Arm('CWeapon')Нет ничего невозможного...
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
Обьясни пожалуйста принцеп работыSAMURAI wrote:Блин кривые руки...
ПОИСК в помощь...
Code: Select all
sub Archery() while 1 uo.usetype("0x13B1") # тип оружия UO.Exec("attack 0x002D23EF") #айди 2-го чара Repeat wait (500) if uo.injournal("destroyed")then UO.usetype("0x13B1") # тип оружия uo.deletejournal() endif Until ((UO.GetHP("0x0007424F") <75)or (UO.GetHP("0x002D23EF") <100)) # #жизни 1-го и 2-го чара repeat wait (500) UO.Exec("warmode 0") # выключаем вар мод UO.Usetype("0x0E21") #Bandages UO.Exec("waittargetobject 0x002D23EF") # айди 2-го чара wait(3500) Until (UO.InJournal("need you")) UO.DeleteJournal() Repeat UO.Usetype("0x0E21") #Bandages UO.Exec("waittargetobject 0x0007424F") # айди 1-го чара wait(3500) Until (UO.InJournal("need healing")) wend end sub sub Healing() UO.SetArm('CWeapon') UO.Exec("bandageself") wait(500) UO.Arm('CWeapon')
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
Re: Арчери
умел бы =)))Sfagnum wrote:переделай на блайд спиритс (так вроде...)No Problem wrote:Народ помогите скриптаком мне надо арчери прокачать, гамаю на дрв, мазы с мишками не проходят....
Скрипт куль!SAMURAI wrote:Блин кривые руки...
ПОИСК в помощь...
Code: Select all
sub Archery() while 1 uo.usetype("0x13B1") # тип оружия UO.Exec("attack 0x002D23EF") #айди 2-го чара Repeat wait (500) if uo.injournal("destroyed")then UO.usetype("0x13B1") # тип оружия uo.deletejournal() endif Until ((UO.GetHP("0x0007424F") <75)or (UO.GetHP("0x002D23EF") <100)) # #жизни 1-го и 2-го чара repeat wait (500) UO.Exec("warmode 0") # выключаем вар мод UO.Usetype("0x0E21") #Bandages UO.Exec("waittargetobject 0x002D23EF") # айди 2-го чара wait(3500) Until (UO.InJournal("need you")) UO.DeleteJournal() Repeat UO.Usetype("0x0E21") #Bandages UO.Exec("waittargetobject 0x0007424F") # айди 1-го чара wait(3500) Until (UO.InJournal("need healing")) wend end sub sub Healing() UO.SetArm('CWeapon') UO.Exec("bandageself") wait(500) UO.Arm('CWeapon')
Для тех кому непонятно что за второй чар - скажу что и как в асе за очень скромную плату
Мытьё бандажек можно выцарапать в поискетоже, стрелы вынимать - бери часть из автолоада ВЕТЕРАНа или из других макров
Мытьё бандажек можно выцарапать в поискетоже, стрелы вынимать - бери часть из автолоада ВЕТЕРАНа или из других макров
Нет ничего невозможного...
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
Верно подмечено...No Problem wrote:Я бот в скриптах....
Интересно а что потвоему делает этот макрос?No Problem wrote:драк стоит на 2 этаже ты в него пуляешь потом хилишь его ( тоесть параллейно качаешь ветелинарию )
Нет ничего невозможного...
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
http://yoko.netroof.net/forum/viewtopic ... 9440#19440Adec[DrW] wrote:Обьясни пожалуйста принцеп работы
тебе сюда, стучишь в асю я в инвизе и может помогу даже нахаляву...
В асю стукни я в инвизе - может и подскажу кое что тоже нахалявуNo Problem wrote:Нахрена тогда 2 чар нужен тут ?
Last edited by SAMURAI on 2005-03-19 12:39:17, edited 1 time in total.
Нет ничего невозможного...
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
Ребят а может кто нить скрипт дороботать что б мыл бинтики и брал из сундука бинты и стрелыы, это вроде не сложно .... но я не умею ))))
Last edited by No Problem on 2005-03-21 20:35:20, edited 1 time in total.
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
Re: Арчери
Я уже удалил с михами, у тебя осталься ещё он ? он там на сумку кастит !Sfagnum wrote:переделай на блайд спиритс (так вроде...)No Problem wrote:Народ помогите скриптаком мне надо арчери прокачать, гамаю на дрв, мазы с мишками не проходят....
-
No Problem
- Posts: 16
- Joined: 2005-02-28 00:18:39
- Contact:
Re: Арчери
и как ты планируешь качать? со 2го этажа? засекут будет арчери у тебя = 0.No Problem wrote:Я уже удалил с михами, у тебя осталься ещё он ? он там на сумку кастит !
а с мишками.... не писал его я
Re: Арчери
Также как и все - на русскую авось понадеится придётсяSfagnum wrote:и как ты планируешь качать? со 2го этажа? засекут будет арчери у тебя = 0.
Нет ничего невозможного...
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm
Кто [url=http://forum.yoko.com.ua/search.php]ИЩЕТ[/url], тот всегда найдёт...
[code]sub UO()
UO.Chto-To("S Chem-To")
end sub[/code]
© I'm