Скрипты / просьбы скриптов

EVILKILLER · August 5, 2009

Народ дайте сылку на пач что бы заместо деревев были пеньки за ранее спасибо :eating:

JAH KILL · August 5, 2009

Народ дайте сылку на пач что бы заместо деревев были пеньки за ранее спасибо :eating:

http://drguild.nm.ru/files/verdata/allstum...ovegetation.exe

EVILKILLER · August 5, 2009

А ЧЕ ТО ОН НЕ ПАШЕТ ((((((

JAH KILL · August 6, 2009

в папку с игрой закинь patchdata.mul и VerdataPatcher , потом запусти и нажми Старт или Го что там я не помню.

EVILKILLER · August 14, 2009

дайте скрип на реколы ПЛЗ

pibla2007 · August 15, 2009

Введи переменные с названиями заклинаний и напиши процедуру, и вызывай процедуру для конкретных переменных...скрипт уменьшиться в разы...

teloMan · August 18, 2009

дайте скрип на реколы ПЛЗ

sub Meditation()

while uo.Count(0x0e34) > 0

uo.Deletejournal()

uo.WaitTargetType(0x0e34)

uo.UseSkill("Inscription")

repeat

wait(100)

until uo.Waiting() == 0

uo.WaitTargetType(0x0efa)

uo.waitmenu("Select a circle to inscribe", "Circle 4spells", "Select a spell to inscribe", "Recall")

repeat

wait(1000)

until uo.InJournal("mana") or uo.InJournal("finished")

wait(1000)

uo.DeleteJournal()

repeat

uo.UseSkill("Meditation")

wait(10000)

until uo.InJournal("Points gained!") or (uo.mana == uo.int)

repeat

wait(500)

until uo.mana == uo.int

wait(1000)

wend

end sub

Murzilka · August 20, 2009

Всем привет. Извеняюсь что залез с этим вопросом именно сюда, может конечно не совсем по теме. Я Завязал с УО примерно год назад, щас опять вернулся, настроил инжу, вроде все как надо но у меня стали слетаь скрипты почемуто. К пирмеру фишинг с этого топика раньше работал норм, а щас максимум 10 мин поработает с слетает, потом пару раз слетит еще после пвторного запуска и вылетает УО. Скрипт на бс слетает тоже, но реже. Вот скрипт скажите что не так?

sub main()

while uo.count('0x1BF2')>30

UO.CancelMenu() ###может убрать?

UO.CancelTarget() ###может убрать?

UO.Exec("waitmenu 'What do you wish to make?' 'Armor' 'Select armor' 'Platemail' 'Select item' 'Dwarven Platemail Breastpla'")

UO.Exec("waittargetobject '^0x1BF2'")

UO.Exec("useobject '^0x13E3'")

wait(8000)

# и плавим ее

UO.Exec("waittargetobject '^0x13C0'")

Wait (500)

UO.Exec("useobject '^0x0FBB'");что плавить

Wait (3000)

uo.exec("usetype '0x097B'")#тип еды

wait(3000)

wend

end sub

Убрав 3 и 4 строки он работает дольше но все равно слетает.

даже простой скрипт на прокачку скилов типа армс лор итем ид, и тд слетает

Что делать охота играть, докачивать БС, фишинг алхимию ну и все такое и снова в бой, а я сижу и мучаюсь с инжой, кстати как тока установил уо, вроде не замечал ничего, может потому что тока копал, на хамере, а как начал пользоваться фишингом, так и поперли ве косяки, я жаже уо переставил заново, в другую папку оставив старую, в ней была инжа но я все равно взял еще и с сайта, но ничего не помогает

Psysuicide · August 21, 2009

дайте пожалуйста скрипт на Tailoring, для прокачки с 33%....

видел здесь на пошивку ковров... можно ли переделать его на пошивку скажем.... длинных фартухов.. ну или чёто в этом духе..

Murzilka · August 22, 2009

дайте пожалуйста скрипт на Tailoring, для прокачки с 33%....

видел здесь на пошивку ковров... можно ли переделать его на пошивку скажем.... длинных фартухов.. ну или чёто в этом духе..

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

CTEPX · August 29, 2009

Помогите написать скритп, чтоб он собирал стрелы, которые лежат в бэкпаке по одной в одну кучку и клал их в бэкпак или в другую сумку.

Murzilka · August 29, 2009

Помогите написать скритп, чтоб он собирал стрелы, которые лежат в бэкпаке по одной в одну кучку и клал их в бэкпак или в другую сумку.

,massmove [задержка] [количество]

к примеру ,massmove 50 50

берешь стрелу и тянешь в любой пак, можешь просто переложить в том же, скучкует 50 штук. Можно с любыми предметами, тока когда большое количествоу меня почемуто вылетает

Murzilka · August 29, 2009

пишет Unhandled exeption in parser когда скрипт какой нить работает, сначала работает норм, потом это пишет, потом пишет сразу после запуска, и так со всеми скриптами, а то и вылетает, подскажите что делать?

Dismal · September 6, 2009

переписал плавилку по 1(2) ору для кача майнинга, т.к. тот что был тут выложен у меня не работает.

(кладем себе в бекпак сумку, в сумку кидаем всю руду)

(сумка при этом должна быть открыта, должно быть видно руду)

sub test()
UO.Findtype('0x19B9', '-1','my')
while UO.Findcount()>0
UO.exec("grab 1 finditem");
repeat
UO.Findtype('0x19B9', '-1','backpack')
wait(30)
until uo.FindCount()>0
UO.useobject('finditem');
UO.DeleteJournal()
repeat
wait(100)
until UO.InJournal("You put")
UO.Findtype('0x19B9', '-1','my')
wend
end sub

DDC · September 10, 2009

Мужыки плыззз скинте скрипты на прокачку БС, МИНИНГА , ТЕЛОРИНГА только рабочие и поеснение для них что было понятно потому что я НУБ плыззз зделайте :rolleyes:

NaGiBaToR · September 22, 2009

......................... :blahblah:

-=Stasy=- · October 6, 2009

Ребят помоги пожалуйста, не могу понять что такое со скриптом при запуске пишет Line 37: paste error.

# You control Ultima Online client through the global class UO

# It has methods:

# UO.Print("string" - print message to the client window.

# UO.Exec("command" - execute a command. For the list of

# commands consult documentation.

# UO.Count("type",["color"]) - returns count of items of type

# UO.Say("something" - make you character say something.

# UO.Press(KeyCode[,Count[,Delay]]) - Simulate keypress.

# KeyCode - Virtual key code.

# Count - Optional. Number of keypresses.

# Delay - Time in msec to wait between keypresses.

# UO.LClick(X,Y) - Simulate left button click.

# UO.RClick(X,Y) - Simulate right button click.

# UO.LDblClick(X,Y) - Simulate left button double click.

# UO.RDblClick(X,Y) - Simulate right button double click.

# UO.Drag(X1,Y1, X2,Y2 [,amount]) - drag something.

# If you don't specify amount the whole stock is dragged.

# You can use "Insert key code" button to get virtual key code.

# And use "Pick coord" to find mouse coordinates on screen.

# Don't forget to call function Wait(time in msec) after

# using skill/spell to wait until it finishes!

# List of read-only properties:

# UO.Life, UO.Mana, UO.Stamina, UO.STR, UO.INT, UO.DEX,

# UO.Weight, UO.Armor, UO.Gold, UO.BM, UO.BP, UO.GA, UO.GS,

# UO.MR, UO.NS, UO.SA, UO.SS, UO.VA, UO.EN, UO.WH, UO.FD,

# UO.BR, UO.H, UO.C, UO.M, UO.L, UO.B, UO.AR, UO.BT

# Save script as autoload.scp to load automatically every start.

sub mining()

var i,x

var a=3 # âåëè÷èíà ðîìáà ïî ïåðèìåòðó êîòîðîãî õîäèò ÷àð.

wait(1000)

while not UO.dead()

for i=1 to a

start1:

UO.DeleteJournal()

wait(100)

uo.exec("usetype 'pickaxe'" # â îáæåêò òàéï ïðîïèñàòü êèðêó ïîä èìåíåì pickaxe

wait (500)

UO.LClick (400,311)

if (UO.InJournal("attacking you" or UO.InJournal("elemental" or UO.InJournal("an earth elemental" or UO.InJournal("slime") then

uo.deletejournal()

uo.say(".guards"

endif

wait (1500)

uo.exec("usetype 'pickaxe'"

wait (500)

UO.LClick (383,236)

if (UO.InJournal("attacking you" or UO.InJournal("elemental" or UO.InJournal("an earth elemental" or UO.InJournal("slime" or UO.InJournal("TrINIxYtE" or UO.InJournal ("ZAGER" or UO.InJournal ("unlucky" or UO.InJournal ("Mr.KuKuRuzo" or UO.InJournal ("UFO" or UO.InJournal ("Dimest" or UO.InJournal ("MAX-TERMIT" or UO.InJournal ("Ostap Bender" or UO.InJournal ("Bogdanov" or UO.InJournal ("DUSHKA" or UO.InJournal ("Snatcher" or UO.InJournal ("Heretic") then

uo.deletejournal()

uo.say(".guards"

endif

wait(1000)

If not (UO.InJournal("no ore here to mine." or UO.InJournal("you cannot mine that.") then

UO.DeleteJournal()

uo.exec("canceltarget"

goto start1

endif

uo.exec("unequip Rhand"

uo.press(34)

wait(500)

uo.press(35)

start2:

UO.DeleteJournal()

wait(100)

uo.exec("usetype 'pickaxe'"

wait (500)

UO.LClick (400,311)

if (UO.InJournal("attacking you" or UO.InJournal("elemental"or UO.InJournal("an earth elemental" or UO.InJournal("slime" or UO.InJournal("TrINIxYtE" or UO.InJournal ("ZAGER" or UO.InJournal ("unlucky" or UO.InJournal ("Mr.KuKuRuzo" or UO.InJournal ("UFO" or UO.InJournal ("Dimest" or UO.InJournal ("MAX-TERMIT" or UO.InJournal ("Ostap Bender" or UO.InJournal ("Bogdanov" or UO.InJournal ("DUSHKA" or UO.InJournal ("Snatcher" or UO.InJournal ("Heretic") then

uo.deletejournal()

uo.say(".guards"

endif

wait (1500)

uo.exec("usetype 'pickaxe'"

wait (500)

UO.LClick (383,236)

if (UO.InJournal("attacking you" or UO.InJournal("elemental"or UO.InJournal("an earth elemental" or UO.InJournal("slime" or UO.InJournal("TrINIxYtE" or UO.InJournal ("ZAGER" or UO.InJournal ("unlucky" or UO.InJournal ("Mr.KuKuRuzo" or UO.InJournal ("UFO" or UO.InJournal ("Dimest" or UO.InJournal ("MAX-TERMIT" or UO.InJournal ("Ostap Bender" or UO.InJournal ("Bogdanov" or UO.InJournal ("DUSHKA" or UO.InJournal ("Snatcher" or UO.InJournal ("Heretic") then

uo.deletejournal()

uo.say(".guards"

endif

SlayShave ?(14:58):

wait(10000)

If not (UO.InJournal("no ore here to mine." or UO.InJournal("you cannot mine that.") then

UO.DeleteJournal()

uo.exec("canceltarget"

goto start2

endif

uo.exec("unequip Rhand"

uo.press(35)

wait(500)

uo.press(36)

start3:

UO.DeleteJournal()

wait(100)

uo.exec("usetype 'pickaxe'"

wait (500)

UO.LClick (400,311)

if (UO.InJournal("attacking you" or UO.InJournal("elemental"or UO.InJournal("an earth elemental" or UO.InJournal("slime" or UO.InJournal("TrINIxYtE" or UO.InJournal ("ZAGER" or UO.InJournal ("unlucky" or UO.InJournal ("Mr.KuKuRuzo" or UO.InJournal ("UFO" or UO.InJournal ("Dimest" or UO.InJournal ("MAX-TERMIT" or UO.InJournal ("Ostap Bender" or UO.InJournal ("Bogdanov" or UO.InJournal ("DUSHKA" or UO.InJournal ("Snatcher" or UO.InJournal ("Heretic") then

uo.deletejournal()

uo.say(".guards"

endif

wait (1500)

uo.exec("usetype 'pickaxe'"

wait (500)

UO.LClick (383,236)

if (UO.InJournal("attacking you" or UO.InJournal("elemental"or UO.InJournal("an earth elemental" or UO.InJournal("slime" or UO.InJournal("TrINIxYtE" or UO.InJournal ("ZAGER" or UO.InJournal ("unlucky" or UO.InJournal ("Mr.KuKuRuzo" or UO.InJournal ("UFO" or UO.InJournal ("Dimest" or UO.InJournal ("MAX-TERMIT" or UO.InJournal ("Ostap Bender" or UO.InJournal ("Bogdanov" or UO.InJournal ("DUSHKA" or UO.InJournal ("Snatcher" or UO.InJournal ("Heretic") then

uo.deletejournal()

uo.say(".guards"

endif

wait(10000)

If not (UO.InJournal("no ore here to mine." or UO.InJournal("you cannot mine that.") then

UO.DeleteJournal()

uo.exec("canceltarget"

goto start3

endif

uo.exec("unequip Rhand"

uo.press(36)

wait(500)

uo.press(33)

start4:

UO.DeleteJournal()

wait(100)

uo.exec("usetype 'pickaxe'"

wait (500)

UO.LClick (400,311)

if (UO.InJournal("attacking you" or UO.InJournal("elemental" or UO.InJournal("slime" or UO.InJournal("TrINIxYtE" or UO.InJournal ("ZAGER" or UO.InJournal ("unlucky" or UO.InJournal ("Mr.KuKuRuzo" or UO.InJournal ("UFO" or UO.InJournal ("Dimest" or UO.InJournal ("MAX-TERMIT" or UO.InJournal ("Ostap Bender" or UO.InJournal ("Bogdanov" or UO.InJournal ("DUSHKA" or UO.InJournal ("Snatcher" or UO.InJournal ("Heretic") then

uo.deletejournal()

uo.say(".guards"

endif

wait (1500)

uo.exec("usetype 'pickaxe'"

wait (500)

UO.LClick (383,236)

if (UO.InJournal("attacking you" or UO.InJournal("elemental" or UO.InJournal("slime" or UO.InJournal("TrINIxYtE" or UO.InJournal ("ZAGER" or UO.InJournal ("unlucky" or UO.InJournal ("Mr.KuKuRuzo" or UO.InJournal ("UFO" or UO.InJournal ("Dimest" or UO.InJournal ("MAX-TERMIT" or UO.InJournal ("Ostap Bender" or UO.InJournal ("Bogdanov" or UO.InJournal ("DUSHKA" or UO.InJournal ("Snatcher" or UO.InJournal ("Heretic") then

uo.deletejournal()

uo.say(".guards"

endif

wait(10000)

If not (UO.InJournal("no ore here to mine." or UO.InJournal("you cannot mine that.") then

UO.DeleteJournal()

uo.exec("canceltarget"

goto start4

endif

uo.exec("unequip Rhand"

uo.press(33)

wait (500)

uo.press(34)

end sub

Energie · October 6, 2009

o_0

-=Stasy=- · October 9, 2009

Ребята, выложите скрипт на Фишинг плизззз.

EVILKILLER · October 22, 2009

Народ подкинте скрипт для стилинга и снупинга

EVILKILLER · October 23, 2009

Ребята, выложите скрипт на Фишинг плизззз.

sub FishTile(t, x, y, z)

var timer

repeat

uo.WaitTargetTile(Str(t), Str(x), Str(y), Str(z))

uo.UseType(0x0DBF) #Удочка

uo.DeleteJournal()

timer = 0

repeat

wait(1000)

timer = timer + 1

until uo.InJournal("Points") or uo.InJournal("here") or uo.InJournal("line") or uo.InJournal("broken") or timer > 120

end sub

sub Fishing()

var i, j, tile

uo.Disarm()

while not uo.dead()

for i = -6 to 6

for j = -6 to 6

tile = 168

while (not uo.PrivateGetTile(uo.GetX() + i, uo.GetY() + j, 251, tile, tile)) and (tile < 6045)

if tile == 171 then

tile = 310

else

if tile == 311 then

tile = 6039

else

tile = tile + 1

endif

wend

if tile < 6039 then

tile = 0

endif

if tile < 6045 then

uo.concolor(0x53)

uo.Print("Fishing: " + Str((i + 6) * 13 + j + 7) + "/169...")

uo.concolor(0)

FishTile(tile, uo.GetX() + i, uo.GetY() + j, 251)

endif

uo.Print("Завершил круг. Продолжаю.")

wend

end sub

Blackmamba · October 27, 2009

Скрипт шьет платья потом их режет. Подскажите, как сделать так, чтобы он получений после резки материал складировал в общую кучу материала, а то он режет, и пытается сшить потом из кусочка отрезанного, а его не хватает и скрипт виснет. Хелп!

sub materials()
while not uo.dead()
  uo.deletejournal()
save()
  uo.waittargettype('0x1766')
  uo.waitmenu('Choose a category.', 'shirts', 'What kind of shirt?', 'Plain Dress - takes 10 cloth')
  uo.usetype('0x0F9D')
   repeat
   wait(1000)
   until uo.injournal("create|make|failed")
   wait(1000)
save()
  if uo.injournal("create|make") then
  uo.waittargettype('0x1F01')
  uo.usetype('0x0F9E')
  wait(1000)
  else
  end if
save()
wend
end sub

sub save()
if uo.injournal("Saving World State") then
repeat
wait(1000)
until uo.injournal("Saving World State complete")
else
end if
end sub

Ragnar · November 27, 2009

Народ, перепробовад ВСЕ скрипты на мининг с форума, не работают, точнее парочка начинает, но потом виснет ВСЯ УО, выложите ПЛЗ рабочий скрипт на мининг и на БС, очень надо.

EVILKILLER · December 18, 2009

Вылажите плз рабочий скрипт на поизон если не трудно !!!! :rolleyes:

Insomnia · January 13, 2010

Дайте скриптик на тайлоринг ,чтоб из кожи шапки делал. Спасибо за ранее! :rolleyes:

Скрипты / просьбы скриптов

Recommended Posts

EVILKILLER 0

Share this post

Link to post

Share on other sites

JAH KILL 0

Share this post

Link to post

Share on other sites

EVILKILLER 0

Share this post

Link to post

Share on other sites

JAH KILL 0

Share this post

Link to post

Share on other sites

EVILKILLER 0

Share this post

Link to post

Share on other sites

pibla2007 0

Share this post

Link to post

Share on other sites

teloMan 0

Share this post

Link to post

Share on other sites

Murzilka 0

Share this post

Link to post

Share on other sites

Psysuicide 0

Share this post

Link to post

Share on other sites

Murzilka 0

Share this post

Link to post

Share on other sites

CTEPX 0

Share this post

Link to post

Share on other sites

Murzilka 0

Share this post

Link to post

Share on other sites

Murzilka 0

Share this post

Link to post

Share on other sites

Dismal 0

Share this post

Link to post

Share on other sites

DDC 0

Share this post

Link to post

Share on other sites

NaGiBaToR 0

Share this post

Link to post

Share on other sites

-=Stasy=- 0

Share this post

Link to post

Share on other sites

Energie 0

Share this post

Link to post

Share on other sites

-=Stasy=- 0

Share this post

Link to post

Share on other sites

EVILKILLER 0

Share this post