sub odevalka()

uo.exec ("useobject 0x4000B553")
wait(100)
uo.Lclick (208,184); Bandages 
wait(100)
uo.exec ("useobject 0x4000B553")
wait(100)
uo.Lclick (234,206); Potions 
wait(100)
uo.exec ("useobject 0x4000B553")
wait(100)
uo.Lclick (208,225); Reagents 
wait(100)
uo.exec ("useobject 0x4000B553")
wait(100)
uo.Lclick (209,244); Arrows 
wait(100)
uo.exec ("useobject 0x4000B553")
wait(100)
uo.Lclick (208,326); Lama 
wait(100)
uo.exec ("useobject 0x4000B553")
wait(100)
uo.Lclick (257,386); Mom's mixture 
wait(100)

end sub

sub dressPal()
uo.Set('finddistance','3')
var i
DIM amaza[8]
amaza[0]='0x13CC'
amaza[1]='0x1C08'
amaza[2]='0x13C5'
amaza[3]='0x13C6'
amaza[4]='0x1DB9'
amaza[5]='0x13CB'
amaza[6]='0x170D'
amaza[7]='0x1087'
  for i = 0 to 7
 uo.FindType(amaza[i],'-1','backpack')
   uo.UseType(amaza[i])
   wait(100)
  next
  uo.UseObject('0x40007F9F')
            UO.Recall('0x0002063d','13') ; Arrow
            wait(500)
              uo.UseObject('0x40007F9F')
            UO.Recall('0x0002063d','25') ; Mixture
            wait(500)
uo.UseObject('0x40007F9F')
            UO.Recall('0x0002063d','2') ; Bandage
            wait(500)
uo.UseObject('0x40007F9F')
            UO.Recall('0x0002063d','6') ; Potions
            wait(500)
uo.UseObject('0x40007F9F')
            UO.Recall('0x0002063d','9') ; Reagents
            wait(500)
uo.UseObject('0x40007F9F')
            UO.Recall('0x0002063d','30') ; Lama
            wait(500)
end sub

exec ...