Yoko

Code: Select all

sub trash() 
While TRUE 
  UO.FindType( '0x1BDD','0x0000', -1 ) 
  if uo.FindCount() then 
    UO.MoveItem( 'finditem', 0, 'ground') 
    wait(1000) 
  end if 
  UO.FindType( '0x1BDD','0x03CD', -1 ) 
  if uo.FindCount() then 
    UO.MoveItem( 'finditem', 0, 'ground') 
    wait (1000) 
  endif 
  UO.FindType( '0x1BDD','0x04D1', -1 ) 
  if uo.FindCount() then 
    UO.MoveItem( 'finditem', 0, 'ground') 
    wait (1000) 
  endif 
  UO.FindType( '0x1BDD','0x0099', -1 ) 
  if uo.FindCount() then 
    UO.MoveItem( 'finditem', 0, 'ground') 
    wait (1000) 
  endif 
Wend 
end sub

Code: Select all

sub trash() 
; vikidivaet kosti s sunduka 
 While TRUE 

  if UO.Count( '0x1BDD','0x0000' ) > 0 then 
   UO.FindType( '0x1BDD','0x0000', -1 ) 
   UO.MoveItem( 'finditem', 0, 'ground') 
  wait(1000) 
  end if 
  
if UO.count( '0x1BDD','0x03CD' ) > 0 then 
UO.FindType( '0x1BDD','0x03CD', -1 ) 
 UO.MoveItem( 'finditem', 0, 'ground') 
 wait (1000) 
 endif 
  
if UO.count( '0x1BDD','0x04D1' ) > 0 then 
UO.FindType( '0x1BDD','0x04D1', -1 ) 
 UO.MoveItem( 'finditem', 0, 'ground') 
 wait (1000) 
 endif 
  
if UO.count( '0x1BDD','0x0099' ) > 0 then 
UO.FindType( '0x1BDD','0x0099', -1 ) 
 UO.MoveItem( 'finditem', 0, 'ground') 
 wait (1000) 
endif 

 Wend 
  
end sub