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

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

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

Top

Profile

Reply with quote

Nmy

Post subject:

PostPosted: 2007-01-10 18:57:58

Offline

Expert!

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia

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

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

Last edited by Nmy on 2007-01-10 22:03:01, edited 1 time in total.

Top

Profile

Reply with quote

yxTbl

Post subject:

PostPosted: 2007-01-10 20:29:40

Offline

Joined: 2007-01-02 15:09:35
Posts: 39

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

Top

Profile

Reply with quote

Nmy

Post subject:

PostPosted: 2007-01-10 22:03:13

Offline

Expert!

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia

поправил

Top

Profile

Reply with quote

yxTbl

Post subject:

PostPosted: 2007-01-12 23:41:07

Offline

Joined: 2007-01-02 15:09:35
Posts: 39

NMY wrote:

поправил

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

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

Top

Profile

Reply with quote

Nmy

Post subject:

PostPosted: 2007-01-13 01:05:36

Offline

Expert!

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia

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

Top

Profile

Reply with quote

Post new topic Reply to topic

Page 1 of 1

[ 6 posts ]

Home » Board index » Scripts » Scripting Ore

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 1 guest

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum