Yoko

All sides of Injection
It is currently 2026-01-22 01:42:46

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 9 posts ] 
  Print view Previous topic | Next topic 
Author Message
yxTbl
PostPosted: 2007-01-02 15:15:19 
Offline

Joined: 2007-01-02 15:09:35
Posts: 39
вопшем вот
Code:
sub AutoLoot()
var finddistance = "3"
var body = "0x2006" 

UO.Print('òêíè íà ñóìêó äëÿ ëóòà')
UO.Set('quiet','1')
UO.Exec('addobject LootBag')
while UO.Targeting()
wait(100)
wend
UO.Set('quiet','0')

uo.set("finddistance", finddistance)
var corpse
repeat
uo.findtype(body,"-1","ground")
if uo.findcount() then
corpse = uo.getSerial("finditem")
uo.useobject(corpse)
repeat
uo.findtype("-1","-1",corpse)
if uo.findcount() then
uo.moveitem("finditem","0","LootBag","50","50","0")
checklag()
endif
wait(1300)
until not uo.findcount()
uo.hide(corpse)
UO.Resend()
uo.ignore(corpse)
else
wait(500)
endif
until false
endsub

вот с ним всё классно но вылетает чег лаг =\


или вот ешо проблема
Code:
sub LootAll()
UO.DeleteJournal()
repeat
    repeat
        wait(1500)
    Until UO.InJournal('Body')
    wait(300)
    UO.FindType(-1,-1,'lastcorpse')
    While UO.FindCount()>0
        UO.Grab('0', 'finditem')
        wait(800)
        UO.FindType(-1,-1,'lastcorpse')
    wend
    UO.DeleteJournal()
Until UO.Dead()
endsub

очень часто пишет каннот реачь итем =\ хотя стаю на трупе =\
Top
   
Reply with quote  
Nmy
 Post subject:
PostPosted: 2007-01-02 20:03:35 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
стери чеклаг

пропишы finddistance

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Top
   
Reply with quote  
yxTbl
 Post subject:
PostPosted: 2007-01-02 20:46:50 
Offline

Joined: 2007-01-02 15:09:35
Posts: 39
NMY wrote:
стери чеклаг

пропишы finddistance

в скриптах вапше несеку =\
можеш переделать и выставить ?
Top
   
Reply with quote  
Nmy
 Post subject:
PostPosted: 2007-01-02 22:07:51 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
стери строку
Code:
checklag()


пропишы
Code:
sub LootAll() 
uo.set("finddistance","3")
UO.DeleteJournal()

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Top
   
Reply with quote  
yxTbl
 Post subject:
PostPosted: 2007-01-03 11:43:50 
Offline

Joined: 2007-01-02 15:09:35
Posts: 39
NMY wrote:
стери строку
Code:
checklag()

убрал ету строчку всё вроде работает но начинает вылитать Can't pickup item

пропишы
Code:
sub LootAll() 
uo.set("finddistance","3")
UO.DeleteJournal()

тут тоже самое =\

п.с. как я понял ето для 1-ва и 2-ого скрипта
Top
   
Reply with quote  
Nmy
 Post subject:
PostPosted: 2007-01-03 13:32:48 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
Code:
sub AutoLoot()
var finddistance = "3"
var body = "0x2006"

UO.Print('òêíè íà ñóìêó äëÿ ëóòà')
UO.Set('quiet','1')
UO.Exec('addobject LootBag')
while UO.Targeting()
wait(100)
wend
UO.Set('quiet','0')

uo.set("finddistance", finddistance)
var corpse
repeat
uo.findtype(body,"-1","ground")
if uo.findcount() then
corpse = uo.getSerial("finditem")
uo.useobject(corpse)
repeat
uo.findtype("-1","-1",corpse)
if uo.findcount() then
uo.moveitem("finditem","0","LootBag","50","50","0")
endif
wait(500)
until not uo.findcount()
uo.hide(corpse)
UO.Resend()
uo.ignore(corpse)
else
wait(500)
endif
until false
endsub

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')
        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
Top
   
Reply with quote  
yxTbl
 Post subject:
PostPosted: 2007-01-03 14:02:53 
Offline

Joined: 2007-01-02 15:09:35
Posts: 39
всёравно люибт писать Кан"т пикап итем =\
Top
   
Reply with quote  
Nmy
 Post subject:
PostPosted: 2007-01-03 14:21:22 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
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


а так?

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Top
   
Reply with quote  
yxTbl
 Post subject:
PostPosted: 2007-01-03 17:06:13 
Offline

Joined: 2007-01-02 15:09:35
Posts: 39
да всё классна спасибо 8)
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 9 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 4 guests

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

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited