##Injection - AutoLoot
sub loot()
repeat
UO.FindType("0x0EED","-1","lastcorpse") #Gold
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x26B4","-1","lastcorpse") #Scales
UO.FindType("0x0E34","-1","lastcorpse") #MMF
UO.FindType("0x2258","-1","lastcorpse") #EYM
UO.FindType("0x283B","-1","lastcorpse") #ZIP
UO.FindType("0x0E34","-1","lastcorpse") #MMF
UO.FindType("0x0F0E","-1","lastcorpse") #WUF
UO.FindType("0x2258","-1","lastcorpse") #EYM
UO.FindType("0x2F5A","-1","lastcorpse") #GWR
UO.FindType("0x1410","-1","lastcorpse") #MSH
UO.FindType("0x1B76","-1","lastcorpse") #CIK
UO.FindType("0x1415","-1","lastcorpse") #HSH
UO.FindType("0x1413","-1","lastcorpse") #NSH
UO.FindType("0x1412","-1","lastcorpse") #OSH
UO.FindType("0x1414","-1","lastcorpse") #ISH
UO.FindType("0x1411","-1","lastcorpse") #LSH
UO.FindType("0x14ED","-1","lastcorpse") #RVH
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1C06","-1","lastcorpse") #Female Leather Armor
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
until false
end sub
sub loot()
repeat
UO.FindType("0x0EED","-1","lastcorpse") #Gold
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x26B4","-1","lastcorpse") #Scales
UO.FindType("0x0E34","-1","lastcorpse") #MMF
UO.FindType("0x2258","-1","lastcorpse") #EYM
UO.FindType("0x283B","-1","lastcorpse") #ZIP
UO.FindType("0x0E34","-1","lastcorpse") #MMF
UO.FindType("0x0F0E","-1","lastcorpse") #WUF
UO.FindType("0x2258","-1","lastcorpse") #EYM
UO.FindType("0x2F5A","-1","lastcorpse") #GWR
UO.FindType("0x1410","-1","lastcorpse") #MSH
UO.FindType("0x1B76","-1","lastcorpse") #CIK
UO.FindType("0x1415","-1","lastcorpse") #HSH
UO.FindType("0x1413","-1","lastcorpse") #NSH
UO.FindType("0x1412","-1","lastcorpse") #OSH
UO.FindType("0x1414","-1","lastcorpse") #ISH
UO.FindType("0x1411","-1","lastcorpse") #LSH
UO.FindType("0x14ED","-1","lastcorpse") #RVH
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
UO.FindType("0x1C06","-1","lastcorpse") #Female Leather Armor
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(500)
end if
until false
end sub
Последнее редактирование: