Скрипты от Leo для шарда Dragon World
Moderators: Murderator+, Murderator
-
Night Wolf
- Posts: 26
- Joined: 2005-01-12 13:33:49
а можно узнать где можно вщять нужной весрии ижект под ламбер
если есть у кого то пришлите плз
Ulf@sknt.ru
если есть у кого то пришлите плз
Ulf@sknt.ru
viewtopic.php?p=30260#30260
Чё то у меня на оскоме(не фри) не пашет.
пишет: Line 31: Variable Undefined -TIMER
Может кто знает в чё прабла?
Чё то у меня на оскоме(не фри) не пашет.
пишет: Line 31: Variable Undefined -TIMER
Может кто знает в чё прабла?
Быстрая телепортация на Duels Arena
Биндим на клавишу и пробегая мимо столба нажимаем.
Биндим на клавишу и пробегая мимо столба нажимаем.
Code: Select all
sub TravelDuels()
#¤Leo¤#
UO.Exec("set norbcheck 1")
UO.Exec("set norbcalc 1")
UO.FindType('0x0EDE','-1','ground')
if UO.FindCount() AND UO.GetDistance('finditem')<3 then
UO.Recall('finditem','28')
else
UO.Print('Подойди ко мне поближе!!! Столб телепортации.')
endif
end sub
Тейлоринг на коже
Шьёт горжеты.
Шьёт горжеты.
Code: Select all
var Cont='0x400079F9' ##ID сундука с кожей
VAR Trash='0x40024DBA' ##Куда суём готовую продукцию
var Creat='0x13C7' ##Тип того, что сшили
sub Tailoring()
#¤Leo¤#
while NOT UO.Dead()
ToHide()
UO.FindType('0x1067','0x0000','backpack')
if UO.GetQuantity('finditem')<4 then
UO.UseObject(Cont)
UO.FindType('0x0E21','0x0000','backpack')
if UO.GetQuantity('finditem')>0 then
UO.SetReceivingContainer(Cont)
wait(1000)
UO.Grab('all','finditem')
wait(1000)
UO.UnSetReceivingContainer()
Endif
UO.FindType('0x1067','0x0000',Cont)
wait(1000)
UO.Grab('200','finditem')
wait(1000)
endif
CheckLag()
UO.WaitMenu('Leather','Leather Armour','Leather Armour','leather gorget')
UO.WaitTargetType('0x1067')
UO.UseType('0x0F9D')
UO.DeleteJournal()
wait(1000)
repeat
wait(100)
until UO.InJournal('fail') or UO.InJournal('put')
UO.DeleteJournal()
wait(500)
UO.FindType(Creat,'0x0000','backpack')
wait(100)
if UO.GetQuantity('finditem')>0 then
UO.MoveItem('finditem','-1',Trash)
wait(500)
endif
wend
endsub
Sub ToHide()
while NOT UO.Hidden()
UO.DeleteJournal()
UO.Exec('warmode 0')
UO.UseSkill('Stealth')
repeat
wait(50)
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied')
wend
end sub
Sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
end sub BorN2KiLL wrote:А можно получить скриптик: Чар берет из сундука1 ткань и мешочек, шьет робу и засовывает в мешочек, если ткань кончилась а мишочек не заполнен он берет из сундука1 еще ткани и т.д, кагда закончит наполнять мешочек кладет ево в сундук2, напиши если можно
Я бы помог но абсолютно нету времени
Leo wrote:Ламберждекинг
Собственно это скрипт Ветерана, переделанный мной.
Скрипт без каких-либо реколлов, просто рубит в лесу, потом подходит к сундуку, кушает и опять в лес.
Очень хорошо подходит для каторги.
Возможна прокачка спирит спика.Code: Select all
############################################
### Lumberjacking / Рубка деревьев ###
#####################################
.......
.......
.......
wait(50)
until uo.InJournal('backpack')
end sub
Абсолютным рандомом вылетает ошибка "Unhandled exception in parser" (может и на 1ом дереве вылететь и на 21), после чего скрипт останавливается.
Играю на дрв
версия инжы 505.18 Vendor
клиент стандартный 2.0.3.
переменные в скрипте не менял (кроме обязательных в начале)
После перезапуска скрипта, он может и пройти ето дерево и перед ним вобщем рандомно выключается... на Х дереве.
Поставил старую версию инжи, все работает нормально, но почему то в конце круга (после обхода всех деревьев и скидывания логов) скрипт выдает ошибку на строку 354: Runtime error - Invalid operation for this type
Code: Select all
...
if Numb(x-myX)<=1 and Numb(y-myY)<=2 then
...