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

Help With uo.moveitem()
http://forum.yoko.com.ua/viewtopic.php?f=3&t=12580		 Page 1 of 1
Author:  Injectioner [ 2007-10-07 13:58:50 ]
Post subject:  Help With uo.moveitem()
Code:
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


What's wrong with this macro, when I press 'Run Function' it Runs normally, but when come the part mover: the macro don't move the item to the bagserial[k].
If I put the bagserial direct in the place of bagserial[k] it's runs normally.
Somebody can help me with this ?

[]'s
Author:  Scripts Writer [ 2007-10-07 14:07:09 ]
Post subject: 
Your script has lot of mistake. Rewrite it or find another one
Author:  Injectioner [ 2007-10-07 16:43:18 ]
Post subject: 
Scripts Writer wrote:
Your script has lot of mistake. Rewrite it or find another one


The script runs normally here... O.o'
But I want the change of bagserial ID when happen the 'full' InJournal message.

[]'s
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/