Yoko

Code: Select all

sub loot()
DIM Nado[3] 
   Nado[0]  = '0x0F7A'   ; свитки улучшения 
   Nado[1]  = '0x0F7B'   ; голда 
   Nado[2]  = '0x0F84'   ; garlic 
var serboby, i,  typ, serpack
UO.Set( 'finddistance', '6' )
   repeat
	uo.findtype('тип трупа дрейка', '-1', '1')
	if uo.findcount()>0 then
	   serbody=uo.getserial('finditem')
		for i=0 to 2
		   UO.FindType( Nado[i], '-1', 'serbody' )
			if uo.findcount()>0 then
			UO.MoveItem( 'finditem' ) 
                        wait( 500 )
			UO.FindType( Nado[i], '-1', 'Cont' )
			wait(500)
			end if
		next
	    	UO.Print( 'The loot was finished' )		
	else
	   wait(500)
	end if
	until uo.findcount()==0	
end sub