Yoko
http://forum.yoko.com.ua/

даработка скриптов
http://forum.yoko.com.ua/viewtopic.php?f=20&t=11061		 Page 1 of 1
Author:  yxTbl [ 2007-01-10 18:10:51 ]
Post subject:  даработка скриптов
вопшем вот скриптег
Code:
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

дикая просьба дабавить в етот скрипт чтобы он таскал всё в выбраный контейнер , каторый выбираеш при запуске скрипта
Author:  Nmy [ 2007-01-10 18:57:58 ]
Post subject: 
Code:
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
Author:  yxTbl [ 2007-01-10 20:29:40 ]
Post subject: 
NMY wrote:
Code:
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-ой строчке косяк
вариабле ундефинед -БАГ
Author:  Nmy [ 2007-01-10 22:03:13 ]
Post subject: 
поправил
Author:  yxTbl [ 2007-01-12 23:41:07 ]
Post subject: 
NMY wrote:
поправил

любит глючить с итемами например в трупе 20 итемов , он покажет что 7-мь , и несможет взять не одного :o
чтобы забрал всё нада падайти к трупу и открыть его , просто встать на него некатит :(
Author:  Nmy [ 2007-01-13 01:05:36 ]
Post subject: 
Code:
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
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/