Yoko

Code: Select all

sub main() 

DIM bagserial[10]; 
bagserial[0]=0x71E039FA; ########################
bagserial[1]=0x71EA88E9; ########################
bagserial[2]=0x71EA88E7; ########################
bagserial[3]=0x71EA88EA; ### Id das Bag's     ###
bagserial[4]=0x71EA88E4; ### que estão a sua  ###
bagserial[5]=0x71EA88E6; ### volta.           ###
bagserial[6]=0x71EA88E2; ###                  ###
bagserial[7]=0x71EA88E3; ########################
bagserial[8]=0x71EA88E8; ########################
bagserial[9]=0x58DAD597;
var k;


inicio: 
uo.deletejournal() 
uo.exec("waitmenu 'O' 'Ferramentas' 'O' 'Machadinho'") 
uo.exec("waittargettype 0x1BF2")     ###Lings 
uo.exec("usetype 0x1ebc")            ### Ferramenta 
wait(3000) 
uo.say("10") 
wait(1000) 
UO.Ongump('withtext', 'Marcar os itens?', '(1') ###Marca o Item 
  repeat 
   wait(1000) 
  until uo.injournal('Voce parou de trabalhar.') 
goto contar: 

contar: 
UO.FindType("0x0F43","-1","my")  
  if UO.FindCount()>0 then 
   goto mover:
  endif    
wait(500)
goto inicio:

mover: 
for k=0 to 9
 repeat 
   UO.FindType("0x0F43","-1","my")     ##ID Machadinho
   uo.moveitem('finditem', '1', 'bagserial[k]')
   wait(100)
    if Uo.InJournal('full') then  ###Verificar a msg qnd a bag tá full. 
      next
    endif 
 until UO.FindCount() == 0
goto inicio: 
end sub