Yoko :: Раскладка в Контейнерах

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

Раскладка в Контейнерах http://forum.yoko.com.ua/viewtopic.php?f=17&t=11710	Page 1 of 1

Author:	$keR [ 2007-03-30 19:21:48 ]
Post subject:	Раскладка в Контейнерах
Доброе Время суток Уважаемые Скриптеры! вот видел у человека,в контейнерах разложены арморы, животные и тд.. ровно один за одним.. типо как полинеечке.. может кто знает такои скриптик , и выложит?

Author:

Ururu [ 2007-03-30 19:39:44 ]

Post subject:

Code:

sub sort()
var pack='0x4025C67A'; контейнер, где лежат бутыли
var bag='0x405CB674'; контейнер, куда складываем бутыли
var bottle='0x1CED'; тип бутыли
var color='0x04AF'; цвет бутыли
#############
var x,y,z,i
#############
uo.useobject(pack)
uo.useobject(bag)

uo.Print('Тыкни на бутылку в мешке относительно которой будеем складывать')
UO.Exec ('addobject ukazatel')
while uo.targeting() 
  wait(100) 
wend

uo.getx('ukazatel')
x=uo.getx('ukazatel')
uo.Print(str(x))

uo.gety('ukazatel')
y=uo.gety('ukazatel')
uo.Print(str(y))

repeat
  x=x-10
   if x<34 then
    y=y+16
    x=150
   end if
  uo.findtype(bottle,color,pack)
   if UO.findcount()>0 then
    uo.moveitem('finditem','1',bag,x,y,'0')
   end if
  wait(500)
until UO.findcount()==0
end sub

Author:	$keR [ 2007-03-30 19:47:48 ]
Post subject:
пасибо, но чуть чуть не то.. он весь пак ранимает а мне нужно чтобы он почти одну на одну вещ кидал.. и чуть-чуть смещался.. вправо например..

Author:

$keR [ 2007-04-16 07:10:33 ]

Post subject:

Code:



sub sort() 
VAR Ttov 
 
var bottle= UO.GetGraphic( 'TTov' ) 
var color= UO.GetColor( 'TTov' )
############# 
############# 
var x,y,z,i 
############# 
UO.Print('Выбери ИСТОЧНИК') #  контейнер, где лежат бутыли 
UO.Exec('addobject pack') 
while UO.Targeting() 
wait(100) 
wend 
UO.UseObject('pack') 


UO.Print('Выбери ПРИЕМНИК') # контейнер, куда складываем бутыли 
UO.Exec('addobject bag') 
while UO.Targeting() 
wait(100) 
wend 
UO.UseObject('bag') 


UO.Print('Выбери ТОВАР') 
UO.Exec('addobject ttov') 
while UO.Targeting() 
wait(100) 
wend 
 

uo.Print('Тыкни на бутылку в мешке относительно которой будеем складывать') 
UO.Exec ('addobject ukazatel') 
while uo.targeting() 
  wait(100) 
wend 

uo.getx('ukazatel') 
x=uo.getx('ukazatel') 
uo.Print(str(x)) 

uo.gety('ukazatel') 
y=uo.gety('ukazatel') 
uo.Print(str(y)) 

repeat 
  x=x-10 
   if x<34 then 
    y=y+16 
    x=150 
   end if 
  uo.findtype(bottle,color,'pack') 
   if UO.findcount()>0 then 
    uo.moveitem('finditem','1','bag',x,y,'0') 
   end if 
  wait(500) 
until UO.findcount()==0 
end sub

чет я вот тут накалякал гляньте, подправьте плз, он вролде источник и приемник с приЦела берет, а вот проблема с товаром, из источника перекидывает все.. а надо чтоб тока то что я показал=(

Author:

to4a [ 2007-04-16 10:28:55 ]

Post subject:

был у меня где то такой скриптик...

Code:

sub Sorter()
   UO.IgnoreReset()
   AddObject('sorter','Выберите эталонный предмет')
   VAR ITEM=UO.GetSerial('lasttarget')
   VAR TYPE=UO.GetGraphic(ITEM)
   VAR COLOR=UO.GetColor(ITEM)
   VAR CONT=UO.ContainerOf(ITEM)
   UO.Print(ITEM+' '+TYPE+' '+COLOR)
   if TYPE=='0x0000' or TYPE=='0xFFFF' then
      UO.Print('ERROR!')
      return
   endif
   VAR X=UO.GetX(ITEM)
   VAR Y=UO.GetY(ITEM)
   UO.Ignore(ITEM)
   UO.FindType(TYPE,COLOR,CONT)
   while UO.FindCount()
      X=X+4
      Y=Y
      UO.MoveItem('finditem',-1,CONT,X,Y,0)
      wait(500)
      UO.Ignore('finditem')
      UO.FindType(TYPE,COLOR,CONT)
   wend
   UO.IgnoreReset()
endsub

Sub AddObject(obj,msg)
UO.Forget(obj)
UO.Print(msg)
UO.Set('quiet','1')
UO.CancelTarget()
UO.AddObject(obj)
while UO.Targeting()
 wait(50)
wend
UO.AddObject(obj,'lasttarget')
UO.Set('quiet','0')
UO.Print('Присвоен обьект: '+UO.GetSerial(obj))
endsub

если не нравятся линейки в которые скрипт складывает - две строчки:

Code:

      X=X+4
      Y=Y

прибавь/вычти пару пикселей..

Author:	$keR [ 2007-04-16 11:42:40 ]
Post subject:
СУППЕЕЕРРР!!!!!! СПАСИБО!! ТО ЧТО Я ИСКАЛ!!! ОГРОМНОЕ СПАСИБО=)

Author:	xatifnaft [ 2007-10-14 13:30:45 ]
Post subject:
что то у меня бред какой то вышел, начинает тупо перекладывать и выкидывать все что было в паке

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/