Ultima Online Antares

sub RareRegEmpter()
DIM K[18]
var j
k[1] ='0x0F87'; Glazki
k[2] ='0x0F8A'; Pig Iron
k[3] ='0x0F8E'; Serpent Scale
k[4] ='0x0F7E'; Kosti
k[5] ='0x0F87'; Glazki
k[6] ='0x0F90'; Dead Wood
k[7] ='0x0F82'; Dragon Blood
k[8] ='0x0F91'; Wyrm Hearts
k[9] ='0x0F80'; Daemon Bones
k[10] ='0x0F8F'; Vulcanic Ash
k[11] ='0x0F8B'; Pumice
k[12] ='0x0F7F'; Brimstone
k[13] ='0x0F83'; Executioners Cap
k[14] ='0x0F78'; Batwings
k[15] ='0x0F81'; Fertile Dirt
k[16] ='0x0F89'; Obsidian
k[17] ='0x0E34'; Blank Scroll
k[18] ='0x0F7D'; Vial of Blood


wait(600)
for j=1 to 18
uo.findtype(K[j],-1,'backpack')
wait(600)
uo.moveitem('finditem',0,RareRegSunduk)
next
wait(600)
end sub

sub autoloot()
var corpse,i,j,meshok ,kortik
uo.set('finddistance','2')
uo.set('distance','2')
DIM R[86]
R[0]= 0x0E24 # áóòûëêè
R[1] ='0x0EED' # Gold
R[2] ='0x0F3F' # Arrow
R[3] ='0x14FB' # Lockpick
R[4] ='0x1414' # Sloted Gloves
R[5] ='0x1411' # Sloted Legs
R[6] ='0x1410' # Sloted Arms
R[7] ='0x1415' # Sloted Chest
R[8] ='0x1402' # Sloted Spear
R[9] ='0x1078' # Êîæà ñðåçàííàÿ
R[10] ='0x13CB' # Legs skin
R[11] ='0x13CC' # Tunik skin
R[12] ='0x13C5' # Sleeves skin
R[13] ='0x13C6' # Gloves skin
R[14] ='0x13C7' # Gorget skin
R[15] ='0x1DB9' # Head skin
R[16] ='0x1087' # Earings
R[17] ='0x1087' # Ring
R[18] ='0x0E24' # Bottle mana, agil & co
R[19] ='0x1BDD' # Logs
R[20] ='0x14EF' # Deed
R[21] ='0x0F26' # Granate
R[22] ='0x0F11' # Saphire
R[23] ='0x0F16' # Amethysts
R[24] ='0x0F10' # Emeralds
R[25] ='0x0F13' # Rubys
R[26] ='0x0F18' # Tourmalines
R[27] ='0x0F15' # Citrines
R[28] ='0x0F25' # Ambers
R[29] ='0x0F8E' # Serpent Scales
R[30] ='0x0E37' # Ñâèòîê ðåàãåíòîâ ìàë
R[31] ='0x0F80' # Deamon Bone
R[32] ='0x0F8B' # Pumice
R[33] ='0x0F7F' # Brimstone
R[34] ='0x0F82' # Dragon Blood
R[35] ='0x0F90' # Dead Wood
R[36] ='0x0F7E' # Kosti
R[37] ='0x0F8A' # Pig Iron
R[38] ='0x0F87' # Glazki
R[39] ='0x09B5' # Serpent Eggs
R[40] ='0x1E89' # Dragon Meat
R[41] ='0x1085' # Lizard Beads
R[42] ='0x0EE3' # Pautinka
R[43] ='0x1CED' # Serdce
R[44] ='0x0F91' # Wyrm Hearts
R[45] ='0x0F80' # Deamon Bone
R[46] ='0x0F78' # Batwing
R[47] ='0x1415' # Platemal Chest
R[48] ='0x1413' # Platemal Gorghet
R[49] ='0x1414' # Platemal Gloves
R[50] ='0x1B78' # Shield Kite Wooden
R[51] ='0x1B76' # Shield Heater
R[52] ='0x1411' # Platemal Nogi
R[53] ='0x1410' # Platemal Plechi
R[54] ='0x140E' # Noce Shelm
R[55] ='0x1B74' # Kite Metal Shield
R[56] ='0x143C' # Hammer pick
R[57] ='0x1400' # Kriss
R[58] ='0x0F60' # Longsword
R[59] ='0x13B1' # Bow
R[60] ='0x143E' # Halbert
R[61] ='0x1404' # Wsar Fork
R[62] ='0x13B9' # Viking Sword
R[63] ='0x143A' # Maul
R[64] ='0x1402' # Short Spear
R[65] ='0x0F61' # Mirel's Hand
R[66] ='0x0F7A' # Ðåãè ÁÏ
R[67] ='0x0F7B' # Ðåãè ÁÌ
R[68] ='0x0F86' # Ðåãè ÌÐ
R[69] ='0x0F88' # Ðåãè ÍÑ
R[70] ='0x0F8C' # Ðåãè ÑÀ
R[71] ='0x0F84' # Ðåãè ÃÀ
R[72] ='0x0F85' # Ðåãè ÃÈ
R[73] ='0x0F8D' # Ðåãè ÑÑ
R[74] ='0x0F81' # Fertile Dirt
R[75] ='0x0F0E' # Empty Bottle
R[76] ='0x19B7' # 1 ore
R[77] ='0x19BA' # 2 ore
R[78] ='0x19B9' # 3+ ore
R[79] ='0x0F26' # Diamonds
R[80] ='0x1869' # Enchant
R[81] ='0x0C4F' # Ðîñòîê õëîïêà
R[82] ='0x09F1' # Ìÿñî
R[83] ='0x13B5' # Scimitar
R[84] ='0x0F4B' # Double Axe
R[85] ='0x1EBD' # Wheat Sheaf
R[86] ='0x0F79' # Blackmoor

uo.print('Óêàæè êîðòèê???')
uo.addobject('kortik')
while uo.targeting()
wait(2000)
wend

uo.print('Êóäà ñêèäûâàòü ëóò???')
uo.addobject('meshok')
while uo.targeting()
wait(100)
wend

while true

while uo.countonground('0x2006') > 0
uo.findtype('0x2006','-1','ground')
if uo.findcount() > 0 then
corpse=uo.getserial('finditem')
uo.useobject(corpse)
wait(500)

uo.useobject('kortik')
uo.waittargetobject(corpse)
wait(1000)
uo.print("Start looting!!")
for i=0 to 86
j=0

repeat
UO.FindType(R[i],-1,corpse)
if UO.GetQuantity('finditem') then
uo.print("Looting......!")
UO.MoveItem('finditem','0','meshok')
wait(500)

end if

j = j + 1
if j > 15 then
goto stuck
end if
until uo.findcount()==0
next
stuck:
uo.ignore(corpse)
Else
uo.print("No Corpses Beside!!!")
end if
end:
wend
wait(100)
wend
end sub

Это определенно какие то макросы. Судя по всему, макрос на ловлю или жарку рыбы (больше просто нечего так долго перерабатывать). Не знаю, чего можно двигать при жарке, это вообще уо-лупный макрос, но уже были прецеденты. С ловлей вообще все понятно - рыбку тягаете из-под ног. Так что рыбная промышленность будет наказана, если технологию обработки не пересмотрит.)

XpycT,
что мешает сбрасывать грабом? )

XpycT,
что мешает сбрасывать грабом? )