Code: sub looter() var lc, lf, i, j, summ, ig, sp, st, tt var sp_len = 8#Для спец паков var db_len = 195#Для игнора var ct_len = 2#Для контейнеров DIM cont[val(str(ct_len))] cont[0] = '0x0E76'#Bag cont[1] = '0x0E75'#Backpack DIM sp_type[val(str(sp_len))] sp_type[0] = '0x0F7A'#Black Pearl sp_type[1] = '0x0F88'#Nightshade sp_type[2] = '0x0F8D'#Spider's Silk sp_type[3] = '0x0F85'#Ginseng sp_type[4] = '0x0F84'#Garlic sp_type[5] = '0x0F86'#Mandrake Root sp_type[6] = '0x0F7B'#Blood Moss sp_type[7] = '0x0F8C'#Sulphorous Ash DIM sp_pack[val(str(sp_len))] sp_pack[0] = '0x40111CE8' sp_pack[1] = sp_pack[0] sp_pack[2] = sp_pack[0] sp_pack[3] = sp_pack[0] sp_pack[4] = sp_pack[0] sp_pack[5] = sp_pack[0] sp_pack[6] = sp_pack[0] sp_pack[7] = sp_pack[0] DIM db[val(str(db_len))] db[0] = '0x14EF'#Deed db[1] = '0x13FE'#Katana db[2] = '0x1057'#Sextant db[3] = '0x1713'#Floppy Hat db[4] = '0x1404'#War Fork db[5] = '0x0F9E'#Scissors db[6] = '0x0C7F'#Ear of corn db[7] = '0x153B'#Half apron db[8] = '0x13C7'#Leather Gorget db[9] = '0x13D4'#Studded sleeves db[10] = '0x0994'#Pear db[11] = '0x1030'#Jointing plane 0 0x1030 db[12] = '0x0EB3'#Lute db[13] = '#0x1EBC'#Tinker Tools db[14] = '0x13E3'#Smith Hammer db[15] = '0x1F7B'#Doublet db[16] = '0x1B78'#Kite wooden shield db[17] = '0x0C74'#Honeydew melon db[18] = '0x1516'#Long skirt db[19] = '0x1EFD'#Fancy shirt db[20] = '0x0F39'#Showel db[21] = '0x170F'#Shoes db[22] = '0x170D'#Sandals db[23] = '0x1539'#Long pants db[24] = '0x13EE'#Ringmail sleeves db[25] = '0x13EE'#Leather cap db[26] = '0x171C'#Jester's cap db[27] = '0x1517'#Plain shirt db[28] = '0x0FBB'#Tongs db[29] = '0x1541'#Body sash db[30] = '0x0EC2'#Cleaver db[31] = '0x1EFF'#Fancy dress db[32] = '0x1FA1'#Tunic db[33] = '0x0E87'#Pitchfork db[34] = '0x0E9C'#Drum db[35] = '0x0F9D'#Sewening kit db[36] = '0x1C02'#Studded armor db[37] = '0x1400'#Kryss db[38] = '0x0F4B'#Double axe db[39] = '0x1C08'#Leather skirt db[40] = '0x1531'#Short skirt db[41] = '0x1B7B'#Metal shield db[42] = '0x172A'#Lime db[43] = '0x1F01'#Plain dress db[44] = '0x1F03'#Robe db[45] = '0x1515'#Cloak db[46] = '0x1B74'#Kite metal shield db[47] = '0x1402'#Short spear db[48] = '0x0EB2'#Lap Harp db[49] = '0x1034'#Saw db[50] = '0x0C70'#Head of lettuce db[51] = '0x0E85'#Pickaxe db[52] = '0x1B7B'#Metal shield db[53] = '0x0C64'#Gourd db[54] = '0x1711'#Thigh Boots db[55] = '0x0EC4'#Skinning Knife db[56] = '#0x0F43'#Hatchet db[57] = '0x0F49'#Axe db[58] = '0x171A'#Feather Hat db[59] = '0x0F51'#Dagger db[60] = '0x0F0D'#Explosion Bottle db[61] = '0x0F0A'#Poison Bottle db[62] = '0x0F0B'#Refresh Bottle db[63] = '0x0F08'#Agility Bottle db[64] = '0x0F07'#Cure Bottle db[65] = '0x0F0C'#Heal Bottle db[66] = '0x0F09'#Strength Bottle db[67] = '0x0E9D'#Tambourine db[68] = '0x13CB'#Leather Leggins db[69] = '0x1716'#Straw Tall Hat db[70] = '0x13CC'#Leather Tunic db[71] = '0x13CC'#Ringmain Leggins db[72] = '0x13D5'#Studded gloves db[73] = '0x1442'#Two Handed Axe db[74] = '0x13B9'#Viking Sword db[75] = '0x1C06'#Leather Armor db[76] = '0x1C00'#Leather Shorts db[77] = '0x1715'#Cap db[78] = '0x1714'#Brim Hat db[79] = '0x13F6'#Butcher knife db[80] = '0x1C00'#Leather Shorts db[81] = '0x13F0'#Ringmail Leggins db[82] = '0x1F9F'#Jester's Suit db[83] = '0x13BE'#Chainmail Leggins db[84] = '0x1718'#Wizards Hat db[85] = '0x1406'#War Mace db[86] = '0x0F60'#Long Sword db[87] = '0x1537'#Kilt db[88] = '0x1DB9'#Leather Cap db[89] = '0x153F'#Bandana db[90] = '0x0E9B'#Mortat and Pestle db[91] = '0x13B3'#Club db[92] = '0x0F06'#Nightsight Bottle db[93] = '0x1543'#Scullcap db[94] = '0x0F62'#Spear db[95] = '0x0F5E'#Broadsword db[96] = '0x170B'#Boots db[97] = '0x1F49'#Short Pants db[98] = '0x171B'#Tricone Hat db[99] = '0x0C79'#Canteloupe db[100] = '0x13DA'#Studded Leggins db[101] = '0x13FA'#Large Battle Axe db[102] = '0x1C0A'#Leather Bustier db[103] = '0x152E'#Shrort Pants db[104] = '0x13BB'#Chainmail Coif db[105] = '0x13B5'#Scimitar db[106] = '0x1B7A'#Wooden Shield db[107] = '0x13DB'#Studded Tunic db[108] = '0x13BF'#Ringmail Tunic db[109] = '0x1438'#War Hammer db[110] = '0x1C0C'#Studded Bustier db[111] = '0x13EB'#Ringmail Gloves db[112] = '0x13EC'#Ringmail Tunic db[113] = '0x143E'#Halberd db[114] = '0x13D6'#Studded Gorget db[115] = '0x13C6'#Leather Gloves db[116] = '0x1717'#Straw Hat db[117] = '0x1B76'#Platemail Heater db[118] = '0x1411'#Platemail Legs db[119] = '0x1410'#Platemail Arms db[120] = '0x1414'#Platemail Gloves db[121] = '0x1415'#Platemail Chest db[122] = '0x1412'#Platemail Helm db[123] = '0x140E'#Nose Helm db[124] = '0x140A'#Helmet db[125] = '0x0F47'#Battle Axe db[126] = '0x1413'#Platemail Gorget db[127] = '0x0F4D'#Bardiche db[128] = '0x1440'#Cutlass db[129] = '0x1408'#Closed Helm db[130] = "0x1F2E"#Scrolls db[131] = "0x1F2F"#Scrolls db[132] = "0x1F30"#Scrolls db[133] = "0x1F31"#Scrolls db[134] = "0x1F32"#Scrolls db[135] = "0x1F33"#Scrolls db[136] = "0x1F2D"#Scrolls db[137] = "0x1F34"#Scrolls db[138] = "0x1F35"#Scrolls db[139] = "0x1F36"#Scrolls db[140] = "0x1F37"#Scrolls db[141] = "0x1F38"#Scrolls db[142] = "0x1F39"#Scrolls db[143] = "0x1F3A"#Scrolls db[144] = "0x1F3B"#Scrolls db[145] = "0x1F3C"#Scrolls db[146] = "0x1F3D"#Scrolls db[147] = "0x1F3E"#Scrolls db[148] = "0x1F3F"#Scrolls db[149] = "0x1F40"#Scrolls db[150] = "0x1F41"#Scrolls db[151] = "0x1F42"#Scrolls db[152] = "0x1F43"#Scrolls db[153] = "0x1F44"#Scrolls db[154] = "0x1F45"#Scrolls db[155] = "0x1F46"#Scrolls db[156] = "0x1F47"#Scrolls db[157] = "0x1F48"#Scrolls db[158] = "0x1F49"#Scrolls db[159] = "0x1F4A"#Scrolls db[160] = "0x1F4B"#Scrolls db[161] = "0x1F4C"#Scrolls db[163] = "0x1F4D"#Scrolls db[164] = "0x1F4E"#Scrolls db[165] = "0x1F4F"#Scrolls db[166] = "0x1F50"#Scrolls db[167] = "0x1F51"#Scrolls db[168] = "0x1F52"#Scrolls db[169] = "0x1F53"#Scrolls db[170] = "0x1F54"#Scrolls db[171] = "0x1F55"#Scrolls db[172] = "0x1F56"#Scrolls db[173] = "0x1F57"#Scrolls db[174] = "0x1F58"#Scrolls db[175] = "0x1F59"#Scrolls db[176] = "0x1F5A"#Scrolls db[177] = "0x1F5B"#Scrolls db[178] = "0x1F5C"#Scrolls db[179] = "0x1F5D"#Scrolls db[180] = "0x1F5E"#Scrolls db[181] = "0x1F60"#Scrolls db[182] = "0x1F61"#Scrolls db[183] = "0x1F62"#Scrolls db[184] = "0x1F63"#Scrolls db[185] = "0x1F64"#Scrolls db[186] = "0x1F65"#Scrolls db[187] = "0x1F66"#Scrolls db[188] = "0x1F67"#Scrolls db[189] = "0x1F68"#Scrolls db[190] = "0x1F69"#Scrolls db[191] = "0x1F6A"#Scrolls db[192] = "0x1F6B"#Scrolls db[193] = "0x1F6C"#Scrolls db[194] = "0x1F5F"#Scrolls uo.exec('set injectecho 1') uo.exec('set finddistance 2') repeat uo.findtype('0x2006','-1','ground') if uo.findcount() && uo.getDistance('finditem') < 4 then lc=uo.getSerial('finditem') uo.useobject(lc) checklag() repeat uo.findtype(-1,-1,lc) if uo.findcount() then ig = false sp = false st = false lf = uo.getGraphic('finditem') for i=0 to db_len-1 if lf == db[i] then ig = true endif next if ig then uo.ignore('finditem') else for i=0 to sp_len-1 if lf == sp_type[i] then sp = true summ = i endif next if sp then repeat uo.moveitem('finditem',0,sp_pack[i]) wait(200) uo.findtype(-1,-1,lc) until not uo.getGraphic('finditem')==lf else if uo.getQuantity('finditem') > 1 then repeat uo.moveitem('finditem',0,'backpack') wait(200) uo.findtype(-1,-1,lc) until not uo.getGraphic('finditem')==lf else repeat uo.moveitem('finditem',0,'backpack',50,130,0) wait(200) uo.findtype(-1,-1,lc) until not uo.getGraphic('finditem')==lf endif endif endif endif until not uo.findcount() uo.ignore(lc) endif for j=0 to ct_len-1 uo.findtype(cont[j],-1,'backpack') while uo.findcount() lc = uo.getSerial('finditem') uo.useobject(lc) checklag() uo.findtype(-1,-1,lc) repeat uo.findtype(-1,-1,lc) if uo.findcount() then ig = false sp = false st = false lf = uo.getGraphic('finditem') for i=0 to db_len-1 if lf == db[i] then ig = true endif next if ig then uo.ignore('finditem') else for i=0 to sp_len-1 if lf == sp_type[i] then sp = true summ = i endif next if sp then repeat uo.moveitem('finditem',0,sp_pack[i]) wait(200) uo.findtype(-1,-1,lc) until not uo.getGraphic('finditem')==lf else if uo.getQuantity('finditem') > 1 then repeat uo.moveitem('finditem',0,'backpack') wait(200) uo.findtype(-1,-1,lc) until not uo.getGraphic('finditem')==lf else repeat uo.moveitem('finditem',0,'backpack',50,130,0) wait(200) uo.findtype(-1,-1,lc) until not uo.getGraphic('finditem')==lf endif endif endif endif until not uo.findcount() while uo.containerOf(lc)==uo.getSerial('backpack') uo.moveitem(lc,0,'ground') wait(100) wend uo.findtype(cont[j],-1,'backpack') wend next wait(100) until false endsub
Так, если кому не лень - можете прописать, чтобы када отойдет от трупа - переставаил пытаться лутить.
Эмм, ну что еще, описание сами пишите. Единственное скажу, что все то, что в db[] он не лутит, а то, что в sp_type складывается в соответвующий sp_pack.
|