Yoko

Nmy wrote:

Code: Select all

sub corpser()
	uo.waittargetobject('lastcorpse')
	uo.usetype('0x0F51')
	wait(500)
	Lootground()
	sword()
endsub
sub Lootground() 
	VAR n, f
	VAR Torso=uo.objatlayer('Torso')
	VAR Legs=uo.objatlayer('Legs')
	VAR Arms=uo.objatlayer('Arms')
	VAR Gloves=uo.objatlayer('Gloves')
	VAR Hat=uo.objatlayer('Hat')
	VAR Neck=uo.objatlayer('Neck')
	VAR Lhand=uo.objatlayer('Lhand')
	
	Dim Loot[40]
	Loot[1]='0x204E' ; Shroud
	Loot[2]='0x20D6' ; Dragon
	Loot[3]='0x0F5E' ; broadsword
	Loot[4]='0x143A' ; maul
	Loot[5]='0x13B9' ; Viking Sword
	Loot[6]='0x0F60' ; longsword
	Loot[7]='0x0F62' ; Spear
	Loot[8]='0x0E87' ; Pitchfork	
	Loot[9]='0x143E' ; Halberd
	Loot[10]='0x0F4D' ; Bardiche
	Loot[11]='0x0F45' ; Executioner's Axe
	Loot[12]='0x0F4B' ; double axe
	Loot[13]='0x13FA' ; Despise
	Loot[14]='0x13B1' ; Bow
	Loot[15]='0x0F4F' ; Heavy Crossbow
	Loot[16]='0x13FC' ; Crossbow
	Loot[17]='0x1086' ; Braclet
	Loot[18]='0x0EED' ; Gold Coin
	Loot[19]='0x13BF' ; chainmail tunic
	Loot[20]='0x13BE' ; chainmail leg
	
	Dim armor[12]
	armor[1]='0x1B77'  ; Heater Sheild
	armor[2]='0x1B76'  ; Heater Sheild
	armor[3]='0x1415'  ; Plate Mail
	armor[4]='0x1416'  ; Plate Mail
	armor[5]='0x141A'  ; Platemail Legs
	armor[6]='0x1411'  ; Platemail Legs
	armor[7]='0x1418'  ; Platemail Gauntlets
	armor[8]='0x1414'  ; Platemail Gauntlets
	armor[9]='0x1410'  ; Platemail Arms
	armor[10]='0x1419' ; Platemail Helm
	armor[11]='0x1412' ; Platemail Helm
	armor[12]='0x1413' ; Platemail Gorget
	
	for n=1 to 12
		if uo.countground(armor[n]) then
			uo.usefromground(armor[n])
			wait(50)
			f=1
		endif
	next
	for n=1 to 20
		if uo.countground(Loot[n]) then
			uo.moveitem('~'+Loot[n],0,'backpack')
			wait(700)
		endif
	next
	if f==1 then
		if Torso<>'' then
			uo.useobject(Torso)
		endif
		if Legs<>'' then
			uo.useobject(Legs)
		endif
		if Arms<>'' then
			uo.useobject(Arms)
		endif
		if Gloves<>'' then
			uo.useobject(Gloves)
		endif
		if Hat<>'' then
			uo.useobject(Hat)
		endif
		if Neck<>'' then
			uo.useobject(Neck)
		endif
		if Lhand<>'' then
			uo.equip('Lhand',Lhand)
		endif
	endif
	uo.print(' -= done =- ')
endsub

for n=1 to 20
if uo.countground(Loot[n]) then
uo.moveitem('~'+Loot[n],0,'backpack')
wait(700)
endif
next

Mirage wrote:Это не совсем лут. Это собиралка брони с земли брони и одевание на себя.

Лутает только с земли

for n=1 to 20
if uo.countground(Loot[n]) then
uo.moveitem('~'+Loot[n],0,'backpack')
wait(700)
endif
next

   for n=1 to 12
      if uo.countground(armor[n]) then
         uo.usefromground(armor[n])
         wait(50)
         f=1
      endif
   next

Mirage wrote:На новом парни перелопатили много процедур. Какие то старые перестали работать ввиду старости. Можно чуть длинше расписать без countground и usefromground и будет гуд.

sub LootTest()
   
   DIM loot[9]
   
   loot[0]='0x0EED' ; GP
   loot[1]='0x0F78' ; Batwings
   loot[2]='0x0F91' ; Wyrm's Hearts
   loot[3]='0x0F3F' ; Arrows
   loot[4]='0x0F81' ; Fertile Dirt
   loot[5]='0x0F7E' ; Bones
   loot[6]='0x0F82' ; Dragons Blood
   loot[7]='0x0F8F' ; Volcanic Ash
   loot[8]='0x0F8E' ; Serpents Scales
   
   var i
   uo.set('finddistance','2')
   for i = 0 to 8
      uo.FindType(loot[i],'-1','ground')
      if uo.FindCount() then
         uo.MoveItem('finditem')
         wait(750)
      end if
      wait(50)
   next
end sub