Перейти к содержанию
Форум шарда Middle-Earth
Вирд

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

Рекомендуемые сообщения

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

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
дайте скрип на реколы ПЛЗ

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Всем привет. Извеняюсь что залез с этим вопросом именно сюда, может конечно не совсем по теме. Я Завязал с УО примерно год назад, щас опять вернулся, настроил инжу, вроде все как надо но у меня стали слетаь скрипты почемуто. К пирмеру фишинг с этого топика раньше работал норм, а щас максимум 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 строки он работает дольше но все равно слетает.

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

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

 

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
дайте пожалуйста скрипт на Tailoring, для прокачки с 33%....

 

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

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

Поделиться сообщением


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

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

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

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

переписал плавилку по 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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

 

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Ребят помоги пожалуйста, не могу понять что такое со скриптом при запуске пишет 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)

next

 

for x=1 to 1

wait(500)

uo.press(35)

next

 

for i=1 to a

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)

next

 

for x=1 to 1

wait(500)

uo.press(36)

next

 

for i=1 to a

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)

next

 

for x=1 to 1

wait(500)

uo.press(33)

next

 

for i=1 to a

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)

next

 

for x=1 to 1

wait (500)

uo.press(34)

next

wend

end sub

 

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
Ребята, выложите скрипт на Фишинг плизззз.

 

 

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

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

next

next

 

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

wend

end sub

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

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

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Гость
Ответить в этой теме...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

Загрузка...

×
×
  • Создать...