sub MoveFromTo() var qType = '200' #кол-во перекладываемых за раз item'ов var tType, cType UO.Print('Откуда тырим?') uo.addobject('objFrom') while uo.Targeting() wait(200) wend UO.Print('И куда ж пререложим то?') uo.addobject('objResiv') while uo.Targeting() wait(200) wend uo.useobject('objFrom') CheckLag() UO.Print('Что брать то?') uo.addobject('objType') while uo.Targeting() wait(200) wend tType = uo.GetGraphic('objType') cType = uo.GetColor('objType') UO.Findtype(tType,cType,'objFrom') while UO.GetQuantity('finditem')>0 UO.MoveItem('finditem',qType,'objResiv') wait(1000) CheckLag() UO.Findtype(tType,cType,'objFrom') wend UO.Print('< < < Усё > > >') end sub sub CheckLag() UO.DeleteJournal() UO.Click('backpack') repeat wait(50) until UO.InJournal('backpack') end sub
|