Script:Loot.sc

#sub loot()
################################################################################
#sem dejte id kontejneru kam to ma hazet#
var loot_chest=0x40073107
################################################################################
var i,n
Dim A[36];
var mrkvola=uo.getserial("lastcontainer")
A[1] = 0x0E76;Bag
A[2] = 0x0eed;gold piece
A[3] = 0x108A;RR
A[4] = 0x1420;Cobweb
A[5] = 0x14EB;Treassure Map
A[6] = 0x1F03;Robky
A[7] = 0x1BEF;ingoty vseobecne
A[8] = 0x0F26;Diamant
A[9] = 0x0F13;Ruby
A[10] = 0x0F15;Citryny
A[11] = 0x0F10;Emeraldy
A[12] = 0x0F16;Ametysty
A[13] = 0x0F18;Tourmaliny
A[14] = 0x0F0F;Star Safiry
A[15] = 0x0F11;Safiry
A[16] = 0x0F25;Amber
A[17] = 0x0F78;Batwings#############
A[18] = 0x0F8E;Serpent's Scale#############
A[19] = 0x0F82;Dragons blood#############
A[20] = 0x0F7D;Vials of blood/Dark blood#############
A[21] = 0x0F7E;Bones#############
A[22] = 0x1848;elixiry elementalu#############
A[23] = 0x0f0e;prazdna sklenicka#############
A[24] = 0x0E34;Blank Scroll#############
A[25] = 0x0E21;Bandage#############
A[26] = 0x0F3F;Arrow#############
A[27] = 0x1BFB;Bolts#############
A[28] = 0x1BD1;Peri  #0x1F13 skillpoint
A[29] = 0x097B;Mala trofej
A[30] = 0x097A;Velka trofej
A[31] = 0x097E;Velka trofej
A[32] = 0x1549;bila maska
A[33] = 0x154B;cervena maska
A[34] = 0x0E80;Modra bedynka of wonders
A[35] = 0x0F87;Eyes of Newt
 
 
A[36] = 0x0F8D;Spider Silk
 
 
   Uo.set("quiet","1")
   if not UO.GetQuantity(mrkvola) == 400 and not uo.getquantity('lastcontainer')==401 then
      uo.canceltarget()
      uo.usetype("0x10E4") ; rizne Draw Knifem
   ; uo.say(",canceltarget")
      uo.waittargetobject(mrkvola)
      wait(500)
   else
      Uo.set("quiet","0")
      uo.print("kua to je clovicek")
      Uo.set("quiet","1")
   endif
   UO.SetReceivingContainer(loot_chest)
   FOR n=1 TO 36
      uo.findtype(A[n],"-1",mrkvola) ; hleda v mrtvole
      if uo.findcount() > 0 then
         UO.grab(0,"finditem");
         Wait(500);
      endif
   Next
   FOR n=1 TO 35                                               #lze zmenit na 32, aby to bralo i spidersilk ze zeme, davejte tu vzdy o jednu mene, at to nebere to smeti ze zeme..
      uo.findtype(A[n],"-1","ground") ; hleda na zemi
      if uo.findcount() > 0 then
         UO.grab(0,"finditem");
         Wait(500);
      endif
   Next
   UO.UnSetReceivingContainer()
   Uo.set("quiet","0")
end sub