Page 1 of 1
Автолут по циклу
Posted: 2006-08-23 15:04:44
by predator-uo
поискал, посматрел, попробывал... А ваще может ли существовать этакий макр

Пусть лутает только ГП хоть, но быстро
И есть ли какаета команда которая заставляет клиент грузить ЦП на 100%? если есть то какая...
взаранее спасибо.
Posted: 2006-08-23 15:57:03
by predator-uo
Если нету такого скрипта который по циклу, то что нужна изменить в этом макре чтобы он лутал толька "бабло"
Code: Select all
sub Loot()
uo.WaitTargetObject('lastcorpse')
wait(500)
uo.FindType('-1','-1','lastcorpse')
while uo.FindCount()
uo.FindType('-1','-1','lastcorpse')
uo.moveitem('finditem','-1','backpack')
wait(500)
wend
end sub
Posted: 2006-08-23 18:20:25
by Leo
Code: Select all
sub Loot()
uo.WaitTargetObject('lastcorpse')
wait(500)
uo.FindType('тип бабла','-1','lastcorpse') #командой ,info узнай тип бабла и впиши сюда
while uo.FindCount()
uo.FindType('тип бабла','-1','lastcorpse') #и тут впиши
uo.moveitem('finditem','-1','backpack')
wait(500)
wend
end sub
Posted: 2006-08-23 19:04:31
by predator-uo
спасибо, всё работает, но я сделал в цикл:
sub Loot()
uo.WaitTargetObject('lastcorpse')
wait(500)
uo.FindType('0x0EED','-1','lastcorpse') #êîìàíäîé ,info óçíàé òèï áàáëà è âïèøè ñþäà
while uo.FindCount()
uo.FindType('0x0EED','-1','lastcorpse') #è òóò âïèøè
uo.moveitem('finditem','-1','backpack')
wait(500)
wend
wait(300)
Loot()
end sub
что нужно теперь сделать, чтобы не писалося в левой части экрана:
Items found: 0
Auto target cancelled
Re: Автолут по циклу
Posted: 2006-08-23 19:17:08
by Edred
predator-uo wrote:И есть ли какаета команда которая заставляет клиент грузить ЦП на 100%?
Пустой цикл поможет от подобных проблем.
Code: Select all
sub ProseccorNa100()
while TRUE
If UO.Dead() Then
return
Endif
wend
endsub
Вот тебе полная загрузка проца при живом чаре. Выход через суицид.
Posted: 2006-08-23 19:37:08
by predator-uo
Стало лишь жестоко лагать

Posted: 2006-08-23 20:10:17
by SLAK
predator-uo wrote:спасибо, всё работает, но я сделал в цикл:
sub Loot()
end sub
Code: Select all
sub Loot()
While not uo.dead()
uo.FindType('0x0EED','-1','lastcorpse')
if uo.findcount() then
uo.moveitem('finditem','-1','backpack')
wait(500)
end if
wait(300)
wend
end sub
Постоянная рекурсия скрипта ведёт к неприятностям!!!
Posted: 2006-08-23 20:28:56
by predator-uo
теперь пишется лишь Items found: 0
Posted: 2006-08-24 18:01:03
by SLAK
Из хелпника: lastcorpse - Последний появившийся в области радиусом два экрана труп. Тобиш не самый лучший вариант, поскольку если контейнер не открыт инжа ,обычно, не знает что в нём...
Лучше юзать lastcontainer (Последний контейнер открытый сервером для вас), а на закладке Main инжекта поставить галочку напротив Corpses autoopen, а в скрипт добавить проверку : лутить с ластконтейнера только если он не бекпак или контейнер сам не в паке:
Code: Select all
sub Loot()
While not uo.dead()
uo.FindType('0x0EED','-1','lastcontainer')
if uo.findcount() and uo.GetSerial('lastcontainer')<>uo.GetSerial('backpack') and uo.ContainerOf('lastcontainer')<>GetSerial('backpack') then
uo.moveitem('finditem','-1','backpack')
wait(500)
end if
wait(300)
wend
end sub
или можно сделать проверку на растояние до трупа, но галочку на закладке мейн всьо равно поставь:
Code: Select all
sub Loot()
While not uo.dead()
if uo.GetDistance('lastcorpse')<2 then
uo.FindType('0x0EED','-1','lastcorpse')
if uo.findcount() then
uo.moveitem('finditem','-1','backpack')
wait(500)
end if
endif
wait(300)
wend
end sub
Posted: 2006-08-28 07:45:14
by predator-uo
SLAK wrote:predator-uo wrote:спасибо, всё работает, но я сделал в цикл:
sub Loot()
end sub
Code: Select all
sub Loot()
While not uo.dead()
uo.FindType('0x0EED','-1','lastcorpse')
if uo.findcount() then
uo.moveitem('finditem','-1','backpack')
wait(500)
end if
wait(300)
wend
end sub
Постоянная рекурсия скрипта ведёт к неприятностям!!!
Вот юзаю этот макр, а можнали чтобы он при 1 повторе тащил гп ( что он щас и делает), при втором повторе он уже не гп лутал а кожу к примеру, при 3 повторе снова гп, при четвертом кожу.... Вот... но не в кем случае чтобы он всё это за одно повторение делал.
Posted: 2006-08-28 09:56:41
by Nmy
,emptycontainer 600 'lastcorpse'
+ ставим галку корпс автоопен

Posted: 2006-08-28 10:50:23
by Ex-Brodyaga
SLAK wrote:Постоянная рекурсия скрипта ведёт к неприятностям!!!
И где же там рекурсия?
Posted: 2006-08-28 21:25:39
by SLAK
Ex-Brodyaga wrote:И где же там рекурсия?
predator-uo wrote:спасибо, всё работает, но я сделал в цикл:
sub Loot()
uo.WaitTargetObject('lastcorpse')
wait(500)
uo.FindType('0x0EED','-1','lastcorpse')
while uo.FindCount()
uo.FindType('0x0EED','-1','lastcorpse')
uo.moveitem('finditem','-1','backpack')
wait(500)
wend
wait(300)
Loot()
end sub
что нужно теперь сделать, чтобы не писалося в левой части экрана:
Items found: 0
Auto target cancelled
Выделил жирным