Code: Select all
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.