даработка скриптов

yxTbl · Post by **yxTbl** » 2007-01-10 18:10:51

вопшем вот скриптег

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

дикая просьба дабавить в етот скрипт чтобы он таскал всё в выбраный контейнер , каторый выбираеш при запуске скрипта

Nmy · Post by **Nmy** » 2007-01-10 18:57:58

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

yxTbl · Post by **yxTbl** » 2007-01-10 20:29:40

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-ой строчке косяк
вариабле ундефинед -БАГ

Nmy · Post by **Nmy** » 2007-01-10 22:03:13

поправил

yxTbl · Post by **yxTbl** » 2007-01-12 23:41:07

NMY wrote:поправил

любит глючить с итемами например в трупе 20 итемов , он покажет что 7-мь , и несможет взять не одного

чтобы забрал всё нада падайти к трупу и открыть его , просто встать на него некатит

Nmy · Post by **Nmy** » 2007-01-13 01:05:36

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