Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Скиньте скрипт на Медитацию и Алхимию.  >  Форум
Главная »
Форум » Форум » Вспомогательные программы
 Скиньте скрипт на Медитацию и Алхимию.
Опции Открыть меню
пїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅ (3363492)16 пїЅпїЅпїЅ
Urukhay
Сообщений: 780
Рег. 5.06.2010
7 июля 2010 16:15
Сообщение #1
Пожалуйста:)Будте так добры.
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (527412)17 пїЅпїЅпїЅ
Necromancer
Сообщений: 1238
Рег. 30.10.2009
7 июля 2010 16:17
Сообщение #2

sub up.Meditation()
VAR msg1="In Nox"
VAR msg2="You are at peace."
VAR msg3="You lose your concentration."
repeat
uo.DeleteJournal()
uo.WaitTargetObject("self")
uo.Cast("Poison")
repeat
Wait(50)
until uo.InJournal(msg1)
uo.Warmode(0)
repeat
uo.DeleteJournal()
uo.UseSkill("Meditation")
repeat
Wait(50)
until uo.InJournal(msg2) or uo.InJournal(msg3)
until uo.InJournal(msg2)
until not uo.Ns or uo.Dead()

end sub

 

Береш много нс и стоишь )))

Frozen
7 июля 2010 16:21
Сообщение #3
только против яда ченить напяль :)
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (527412)17 пїЅпїЅпїЅ
Necromancer
Сообщений: 1238
Рег. 30.10.2009
7 июля 2010 16:22
Сообщение #4

Причем тут яд?) Сначало посмотри скрипт внимательно а потом уже пиши.

 

Он кастует Пойзон! тут же его ФИЗЛИТ и медитирует. Не каких ядов на чара не проходит, хоть голый стой без бижы!
пїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅ (3363492)16 пїЅпїЅпїЅ
Urukhay
Сообщений: 780
Рег. 5.06.2010
7 июля 2010 16:23
Сообщение #5
Chekan,спс
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (527412)17 пїЅпїЅпїЅ
Necromancer
Сообщений: 1238
Рег. 30.10.2009
7 июля 2010 16:23
Сообщение #6
+ АДЫН :)

Frozen
7 июля 2010 16:26
Сообщение #7
Chekan,хмм точно, хитро сделано. 
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (527412)17 пїЅпїЅпїЅ
Necromancer
Сообщений: 1238
Рег. 30.10.2009
7 июля 2010 16:28
Сообщение #8
Ну так)

Frozen
7 июля 2010 16:35
Сообщение #9
А можно скрипт на  алхимию? Желательно такой, на котором кто-то её уже добил до гма) Спасибо.
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (8094880)17 пїЅпїЅпїЅ
Dragonstalker
Сообщений: 3336
Рег. 5.09.2009
7 июля 2010 16:35
Сообщение #10
хм, а под стелс такое можете замутить?
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (527412)17 пїЅпїЅпїЅ
Necromancer
Сообщений: 1238
Рег. 30.10.2009
7 июля 2010 16:38
Сообщение #11

под стелс можно все:)

 

На алху самый легкий скрипт делал на уо пилоте.

 

Варил грейт агилку, пил ее. Варил, пил.
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (8094880)17 пїЅпїЅпїЅ
Dragonstalker
Сообщений: 3336
Рег. 5.09.2009
7 июля 2010 17:22
Сообщение #12
переведите, пжлст, этот срипт на медитацию под стелс

+ на спирит спик скрипт(кстати, он зачем нужен?) добавьте?
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (527412)17 пїЅпїЅпїЅ
Necromancer
Сообщений: 1238
Рег. 30.10.2009
7 июля 2010 18:02
Сообщение #13

Спирит спик нужен только некросам, высасывать трупы.

 

Program SpiritSpeak;
var
TimeParser : TDateTime;
Begin

while not Dead do
begin
if Connected then
begin
TimeParser := Now
begin

UseSkill('Spirit Speak');
wait(50)
WaitJournalLine(Now, 'You stop|You fail|You channel|You lack|You establish|не удалось', 10000)
wait(500)
end;
if InJournalBetweenTimes('You channel',TimeParser,Now) >=0 then
begin
wait(300);
SetWarMode(true);
wait(300);
SetWarMode(false);
wait(300);
end;
end;
end;
End.
пїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅ (3363492)16 пїЅпїЅпїЅ
Urukhay
Сообщений: 780
Рег. 5.06.2010
7 июля 2010 21:02
Сообщение #14
Chekan,а с бинта ресать? Очень полезная примочка)
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (527412)17 пїЅпїЅпїЅ
Necromancer
Сообщений: 1238
Рег. 30.10.2009
7 июля 2010 21:07
Сообщение #15

waittargetground 0x2006; useobject _0x0E21

 

 

Frozen
7 июля 2010 21:23
Сообщение #16
sub main()
Var i
While not uo.dead()
uo.CancelMenu()
UO.waitmenu ('What sort of potion do you want to', 'Agility Potion')
uo.waittargettype('0x0F7B')
UO.usetype('0x0E9B')
wait(12000)
i=0
for i = 0 to 6
uo.waittargetobject('0x40EB1BE7')
uo.UseSkill('Taste Identification')
wait(1000)
next
UO.usetype('0x0E24')
wait(300)

wend

end sub

 

Алха + лоры, бутылка пьется раз в 16 сек, следотовательно есть время ченить покачать по пути :) Скажи какой лор вставить, вставлю если не надо качать лоры тогда такой скрипт

sub main()
Var i
While not uo.dead()
uo.CancelMenu()
UO.waitmenu ('What sort of potion do you want to', 'Agility Potion')
uo.waittargettype('0x0F7B')
UO.usetype('0x0E9B')
wait(16000)

UO.usetype('0x0E24')
wait(300)
wend

end sub
пїЅпїЅпїЅпїЅпїЅпїЅпїЅ (8094880)17 пїЅпїЅпїЅ
Dragonstalker
Сообщений: 3336
Рег. 5.09.2009
7 июля 2010 22:00
Сообщение #17
мадам и месью,  плизуа конструктуэ скрипта пот стелзуа?



sub up.Meditation()
VAR msg1="In Nox"
VAR msg2="You are at peace."
VAR msg3="You lose your concentration."
repeat
uo.DeleteJournal()
uo.WaitTargetObject("self")
uo.Cast("Poison")
repeat
Wait(50)
until uo.InJournal(msg1)
uo.Warmode(0)
repeat
uo.DeleteJournal()
uo.UseSkill("Meditation")
repeat
Wait(50)
until uo.InJournal(msg2) or uo.InJournal(msg3)
until uo.InJournal(msg2)
until not uo.Ns or uo.Dead()

end sub





мадлопт

Frozen
8 июля 2010 03:14
Сообщение #18
Ictli, а можно аналог без лоров, но с добором регов\бутылок с сундука? Спасибо.

Frozen
8 июля 2010 07:04
Сообщение #19
MaxHo,Конечно попожже скину, но вот токо зачем добор бутылок, если он пьет то что сварил? Мне 50шт хватило до ГМа качнуть.

Frozen
8 июля 2010 10:02
Сообщение #20
sub main()
var Cont='0x404F187C' #id сундука



While not uo.dead()
if uo.count('0x0F0E')<1 then
uo.print('Берем бутылки')
uo.useobject(cont)
uo.findtype('0x0F0E',0,cont)
UO.MoveItem('finditem','50')
endif
if uo.count('0x0F7B')<3 then
uo.print('Берем реги')
uo.useobject(cont)
uo.findtype('0x0F7B',0,cont)
UO.MoveItem('finditem','50')
endif
wait(50)
uo.CancelMenu()
UO.waitmenu ('What sort of potion do you want to', 'Agility Potion')
uo.waittargettype('0x0F7B')
UO.usetype('0x0E9B')
wait(16000)

UO.usetype('0x0E24')
wait(300)

wend

end sub

 

както так с добром бутылок и регов будет, если выдаст ошибку пиши, а то я не тестил.
Последние посетители (0):

 
Сейчас: 27 октября 2026 22:42


© The Best Ultima Online Shard Antares, 2004-2026