sub pvp()
   var i,n
   var kam="0x401EF883" #kam to chces sazet
   Dim A[131]
   var k
   repeat
      repeat
         wait(10)
         if UO.Hidden() then
            repeat
               wait(100)
            until NOT UO.Hidden()
            UO.ServerPrint(".resync")
         endif
      until Uo.hex2int(uo.getgraphic("lastcorpse"))==0x2006 and Uo.getserial("lastcorpse")<>k
      k=Uo.getserial("lastcorpse")
      uo.deletejournal()
      Uo.set('quiet','1')
      A[1] = 0x13F8 ;Gnarledka 1
      A[2] = 0x13F9 ;Gnarledka 2
      A[3] = 0x0E89 ;Quarterka 1
      A[4] = 0x0E8A ;Quarterka 2
      A[5] = 0x0DF1 ;Blacka 1
      A[6] = 0x0DF0 ;Blacka 2
      A[7] = 0x143E ;Hala 1
      A[8] = 0x143F ;Hala 2
      A[9] = 0x0F4D ;Bardicha 1
      A[10] = 0x0F4E ;Bardicha 2
      A[11] = 0x13FA ;Lba 1
      A[12] = 0x13FB ;Lba 2
      A[13] = 0x1438 ;War hammer 1
      A[14] = 0x1439 ;War hammer 2
      A[15] = 0x1442 ;Two handed axe 1
      A[16] = 0x1443 ;Two handed axe 2
      A[17] = 0x0F4B ;Double axe 1
      A[18] = 0x0F4C ;Double axe 2
      A[19] = 0x0F62 ;Spear 1
      A[20] = 0x0F63 ;Spear 2
      A[21] = 0x1406 ;War mace 1
      A[22] = 0x1407 ;War mace 2
      A[23] = 0x13FE ;Katana 1
      A[24] = 0x13FF ;Katana 2
      A[25] = 0x13B9 ;Viking 1
      A[26] = 0x13BA ;Viking 2
      A[27] = 0x0F60 ;Long 1
      A[28] = 0x0F61 ;Long 2
      A[29] = 0x1400 ;Kryss 1
      A[30] = 0x1401 ;Kryss 2
      A[31] = 0x13B5 ;Scim 1
      A[32] = 0x13B6 ;Scim 2
      A[33] = 0x1440 ;Cutlass 1
      A[34] = 0x1441 ;Cutlass 2
      A[35] = 0x0E88 ;Pitchfork 1
      A[36] = 0x0E87 ;Pitchfork 2
      A[37] = 0x13B1 ;Luk 1
      A[38] = 0x13B2 ;Luk 2
      A[39] = 0x13FC ;Hxb 1
      A[40] = 0x13FD ;Hxb 2
      A[41] = 0x0F4F ;Bleedovacka 1
      A[42] = 0x0F50 ;Bleedovacka 2
      A[43] = 0x13BF ;Thief hrud 1
      A[44] = 0x13C4 ;Thief hrud 2
      A[45] = 0x13BE ;Thief nohy
      A[46] = 0x1B7B ;Thief stit
      A[47] = 0x13C8 ;Thief ramena 1
      A[48] = 0x13CD ;Thief ramena 2
      A[49] = 0x13C0 ;Thief coifa 1
      A[50] = 0x13BB ;Thief coifa 2
      A[51] = 0x13C6 ;Thief rukavice 1
      A[52] = 0x13CE ;Thief rukavice 2
      A[53] = 0x13C7 ;Thief gorget
      A[54] = 0x1416 ;War hrud muzska 1
      A[55] = 0x1415 ;War hrud muzska 2
      A[56] = 0x1C05 ;War hrud zenska 1
      A[57] = 0x1C04 ;War hrud zenska 2
      A[58] = 0x1B77 ;War stit 1
      A[59] = 0x1B76 ;War stit 2
      A[60] = 0x1411 ;War nohy 1
      A[61] = 0x141A ;War nohy 2
      A[62] = 0x1410 ;War ramena 1
      A[63] = 0x1417 ;War ramena 2
      A[64] = 0x1412 ;War plate helm 1
      A[65] = 0x1419 ;War plate helm 2
      A[66] = 0x1408 ;War closed helm 1
      A[67] = 0x1409 ;War closed helm 2
      A[68] = 0x140E ;War nose helm 1
      A[69] = 0x140F ;War nose helm 2
      A[70] = 0x140C ;War bascinet helm 1
      A[71] = 0x140D ;War bascinet helm 2
      A[72] = 0x1414 ;War rukavice 1
      A[73] = 0x1418 ;War rukavice 2
      A[74] = 0x1413 ;War gorget
      A[75] = 0x13EC ;Ringmail hrud 1
      A[76] = 0x13ED ;Ringmail hrud 2
      A[77] = 0x13F1 ;Ringmail nohy 1
      A[78] = 0x13F0 ;Ringmail nohy 2
      A[79] = 0x13EE ;Ringmail ramena 1
      A[80] = 0x13EF ;Ringmail ramena 2
      A[81] = 0x140A ;Ringmail helm 1
      A[82] = 0x140B ;Ringmail helm 2
      A[83] = 0x13EB ;Ringmail rukavice 1
      A[84] = 0x13F2 ;Ringmail rukavice 2
      A[85] = 0x13C7 ;Ringamil gorget
      A[86] = 0x13E2 ;Studdet hrud 1
      A[87] = 0x13DB ;Studdet hrud 2
      A[88] = 0x13E2 ;Studdet hrud zenska
      A[89] = 0x13DA ;Studdet nohy 1
      A[90] = 0x13E1 ;Studdet nohy 2
      A[91] = 0x13D4 ;Studdet ramena 1
      A[92] = 0x13DC ;Studdet ramena 2
      A[93] = 0x1DB9 ;Studdet helm 1
      A[94] = 0x1DBA ;Studdet helm 2
      A[95] = 0x13DD ;Studdet rukavice 1
      A[96] = 0x13D5 ;Studdet rukavice 2
      A[97] = 0x13D6 ;Studdet gorget
      A[98] = 0x1454 ;Bone hrud 1
      A[99] = 0x144F ;Bone hrud 2
      A[100] = 0x1457 ;Bone nohy 1
      A[101] = 0x1452 ;Bone nohy 2
      A[102] = 0x1453 ;Bone ramena 1
      A[103] = 0x144E ;Bone ramena 2
      A[104] = 0x1456 ;Bone helm 1
      A[105] = 0x1451 ;Bone helm 2
      A[106] = 0x1450 ;Bone rukavice 1
      A[107] = 0x1455 ;Bone rukavice 2
      A[108] = 0x0efa ;Fullbook
      A[109] = 0x1F03 ;Roba 1
      A[110] = 0x1F04 ;Roba 2
      A[111] = 0x1515 ;Plast 1
      A[112] = 0x1530 ;Plast 2
      A[113] = 0x1086 ;Braclik
      A[114] = 0x1087 ;Nausnice
      A[115] = 0x108A ;Prsten
      A[116] = 0x1541 ;Serpa 1
      A[117] = 0x1542 ;Serpa 2
      A[118] = 0x1088 ;Necklace
      A[119] = 0x0E75 ;Velky vacek
      A[120] = 0x0E76 ;Kulaty vacek
      A[121] = 0x0E79 ;Hranaty vacek 1
      A[122] = 0x09B0 ;Hranaty vacek 2
      A[123] = 0x1718 ;Klobouk
      A[124] = 0x1544 ;Satek
      A[125] = 0x171A ;Cepka s pirkem
      A[126] = 0x14EF ;Sek 1
      A[127] = 0x14F0 ;Sek 2
      A[128] = 0x0F09 ;Stoneskin
      A[129] = 0x0F09 ;Shrink
      A[130] = 0x0F06 ;GH
      A[131] = 0x0EED ;GP

      i = 990
      wait(2300)
      FOR n=1 TO 131
         uo.findtype(A[n],"-1","lastcorpse")
         if UO.findcount() and Uo.Weight<Uo.STR*3.2 and uo.getdistance() < 4 then
            UO.moveitem("finditem",65000,kam)
            Wait(i)
         end if
      NEXT
      Uo.set('quiet','0')
      konec1444:
   until uo.dead()
end sub