It is currently 28 Mar 2024, 18:20

All times are UTC + 2 hours [ DST ]




Post new topic Reply to topic  [ 2 posts ] 
Author Message
PostPosted: 14 Jun 2010, 00:10 
Offline
Бывалый игрок
User avatar

Joined: 30 Apr 2010, 09:33
Posts: 406
Запускаем функцию Start
Появляется прицел, указываем контейнер откуда скидывать
Появляется второй прицел, указываем контейнер куда скидывать
Ждем ...

Code:
sub Start()
var DropBag=1 # 1 - пустой контейнер выкидывать, 2 - оставить
uo.Print('Откуда?')
uo.Exec('addobject otkuda')
while uo.Targeting()
wait(100)
wend

uo.Print('Куда?')
uo.Exec('addobject kuda')
while uo.Targeting()
wait(100)
wend

uo.SetReceivingContainer('otkuda')
var i
DIM MoveRegi[9]
MoveRegi[0]=0x0F7A # Black Pearls
MoveRegi[1]=0x0F85 # Ginseng
MoveRegi[2]=0x0F88 # Nightshade
MoveRegi[3]=0x0F8C # Sulfurous Ash
MoveRegi[4]=0x0F8D # Spider's Silk
MoveRegi[5]=0x0F86 # Mandrake Roots
MoveRegi[6]=0x0F84 # Garlic
MoveRegi[7]=0x0F7B # Blood Moss
for i=0 to 8

uo.UseObject('otkuda')
CheckLag()
UO.FindType(MoveRegi[i], '-1','otkuda')
while UO.GetQuantity('finditem')>=1
UO.MoveItem('finditem','-1','kuda')
Wait(150)
UO.FindType(MoveRegi[i],'-1','otkuda')
wend
next
uo.print('Переброс Регов Закончен!')
if DropBag==1 then
wait(100)
CheckLag()
uo.drophere('otkuda')
end if
uo.UnSetReceivingContainer('otkuda')
end sub

sub CheckLag()
if uo.Waiting()>0 then
uo.Exec('canceltarget')
end if
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub

_________________
Image
Gefest, The Crafter 12 lvl
Commander Lee, The Knight 12 lvl


Top
 Profile  
 
PostPosted: 02 Sep 2010, 11:30 
Offline
Начинающий игрок
User avatar

Joined: 02 Sep 2010, 11:11
Posts: 31
Location: Украина, Киев
В Разоре есть записаный Agent - Organizer, в котором достаточно отметить все необходимые предметы для переброски, указать конечную сумку - и нажать Organize Now - все что было указанно и лежало в инвентаре - будет в указанной сумке! )

_________________
Tyronniko/HELL/Archer/7lvl
Pufon/Empire/Craft/2lvl


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 2 posts ] 

All times are UTC + 2 hours [ DST ]


Who is online

Users browsing this forum: No registered users and 171 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:  
Powered by phpBB® Forum Software © phpBB Group