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

все о том же . если не сложно ..)
http://forum.yoko.com.ua/viewtopic.php?f=17&t=15688		 Page 1 of 1
Author:  Chapa [ 2010-04-08 01:00:20 ]
Post subject:  все о том же . если не сложно ..)
простой скрипт на выкидывание под себя мешков из бек пака .. написал . пустые выкидывает на ура . как только открывает мешок в котором что-то лежит не выкидывает и пишет дисконект . что не так?


sub GroundDrop()
;------------------------------------------------------------------------------
Var Bags = '0x40A8AEE3'; Коробка для мешков
Var Trash = '0x40B9F4E3'; Мешок для мусора
Var Bag = '0x0E76'; Тип мешка
Var BagSerial
;------------------------------------------------------------------------------
Repeat
UO.FindType(Bag,-1,'backpack')
BagSerial = UO.GetSerial( 'finditem' )
UO.UseObject(BagSerial)
Wait(500)
Repeat
UO.FindType(-1,-1,BagSerial)
UO.MoveItem('finditem',0,Trash)
Wait(200)
Until not UO.GetQuantity('finditem')
Wait(200)
UO.drop('1',str(UO.GETX()),str(UO.GETY()),str(UO.GETZ()),BagSerial)
Until not UO.Count(Bag)
uo.say('End!')
End sub
Author:  Scripts Writer [ 2010-04-08 10:32:53 ]
Post subject:  Re: все о том же . если не сложно ..)
По логике скрипта, если в мешке что-то есть, то он пытается сначало всё содержимое выбросить в мешок с мусором, а затем уже сам мешок выкидывает.

Code:
sub GroundDrop()
;------------------------------------------------------------------------------
Var Bags = '0x40A8AEE3'; Коробка для мешков
Var Bag = '0x0E76'; Тип мешка
Var BagSerial
;------------------------------------------------------------------------------
Repeat 
UO.FindType(Bag,-1,'backpack')
BagSerial = UO.GetSerial( 'finditem' )
Wait(200)
UO.drop('1',str(UO.GETX()),str(UO.GETY()),str(UO.GETZ()),BagSerial)
Until not UO.Count(Bag)
uo.say('End!')
End sub
Author:  Chapa [ 2010-04-08 11:13:31 ]
Post subject:  Re: все о том же . если не сложно ..)
огромное спасибо !.)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/