Page 1 of 1
даработка скриптов
Posted: 2007-01-10 18:10:51
by yxTbl
вопшем вот скриптег
Code: Select all
sub LootAll()
uo.set("finddistance","3")
UO.DeleteJournal()
repeat
repeat
wait(1500)
Until UO.InJournal('Body') and UO.GetDistance('lastcorpse') <= 2
wait(300)
UO.FindType(-1,-1,'lastcorpse')
While UO.FindCount()>0
UO.Grab('0', 'finditem')
uo.ignore('finditem')
wait(800)
UO.FindType(-1,-1,'lastcorpse')
wend
UO.DeleteJournal()
Until UO.Dead()
endsub
дикая просьба дабавить в етот скрипт чтобы он таскал всё в выбраный контейнер , каторый выбираеш при запуске скрипта
Posted: 2007-01-10 18:57:58
by Nmy
Code: Select all
sub LootAll()
uo.exec('addobject bag')
while uo.targeting()
wait(200)
wend
uo.set("finddistance","3")
UO.DeleteJournal()
repeat
repeat
wait(1500)
Until UO.InJournal('Body') and UO.GetDistance('lastcorpse') <= 2
wait(300)
UO.FindType(-1,-1,'lastcorpse')
While UO.FindCount()>0
UO.moveitem('finditem', -1 ,'bag')
uo.ignore('finditem')
wait(800)
UO.FindType(-1,-1,'lastcorpse')
wend
UO.DeleteJournal()
Until UO.Dead()
endsub
Posted: 2007-01-10 20:29:40
by yxTbl
NMY wrote:Code: Select all
sub LootAll()
uo.exec('addobject bag')
while uo.targeting()
wait(200)
wend
uo.set("finddistance","3")
UO.DeleteJournal()
repeat
repeat
wait(1500)
Until UO.InJournal('Body') and UO.GetDistance('lastcorpse') <= 2
wait(300)
UO.FindType(-1,-1,'lastcorpse')
While UO.FindCount()>0
UO.moveitem('finditem', -1 , bag )
uo.ignore('finditem')
wait(800)
UO.FindType(-1,-1,'lastcorpse')
wend
UO.DeleteJournal()
Until UO.Dead()
endsub
на 16-ой строчке косяк
вариабле ундефинед -БАГ
Posted: 2007-01-10 22:03:13
by Nmy
поправил
Posted: 2007-01-12 23:41:07
by yxTbl
NMY wrote:поправил
любит глючить с итемами например в трупе 20 итемов , он покажет что 7-мь , и несможет взять не одного
чтобы забрал всё нада падайти к трупу и открыть его , просто встать на него некатит
Posted: 2007-01-13 01:05:36
by Nmy
Code: Select all
sub LootAll()
uo.exec('addobject bag')
while uo.targeting()
wait(200)
wend
uo.set("finddistance","3")
UO.DeleteJournal()
repeat
repeat
wait(1500)
Until UO.InJournal('Body') and UO.GetDistance('lastcorpse') <= 2
uo.useobject('lastcorpse')
wait(300)
UO.FindType(-1,-1,'lastcorpse')
While UO.FindCount()>0
UO.moveitem('finditem', -1 ,'bag')
uo.ignore('finditem')
wait(800)
UO.FindType(-1,-1,'lastcorpse')
wend
UO.DeleteJournal()
Until UO.Dead()
endsub