Помогите переделать макрос на лут!!!

[qqqqqq]

Вот макрос но надо чтоб он этоже самое лутил но только не из трупа а с земли и нечего более!!!

sub loot()
VAR WaitTime=500
VAR Exit=1, i
DIM Loot[19]
Loot[1]="0x0EED"
Loot[2]="0x1ECE"
Loot[3]="0x143E"
Loot[4]="0x0F4E"
Loot[5]="0x1401"
Loot[6]="0x13FE"
Loot[7]="0x0F63"
Loot[8]="0x1402"
Loot[9]="0x1406"
Loot[10]="0x1438"
Loot[11]="0x13FA"
Loot[12]="0x0F45"
Loot[13]="0x0F49"
Loot[14]="0x1401"
Loot[15]="0x1940"
Loot[16]="0x0DF0"
Loot[17]="0x0E87"
Loot[18]="0x1F03"
Loot[19]="0x1088"


wait (500)
for i = 1 to 19
UO.FindType(Loot[i],"-5","lastcorpse")
UO.Grab("0","finditem")
next
end sub

[Savage]

Code: Select all

sub loot() 
VAR WaitTime=500 
VAR i =1
DIM Loot[20] 
Loot[1]="0x0EED" 
Loot[2]="0x1ECE" 
Loot[3]="0x143E" 
Loot[4]="0x0F4E" 
Loot[5]="0x1401" 
Loot[6]="0x13FE" 
Loot[7]="0x0F63" 
Loot[8]="0x1402" 
Loot[9]="0x1406" 
Loot[10]="0x1438" 
Loot[11]="0x13FA" 
Loot[12]="0x0F45" 
Loot[13]="0x0F49" 
Loot[14]="0x1401" 
Loot[15]="0x1940" 
Loot[16]="0x0DF0" 
Loot[17]="0x0E87" 
Loot[18]="0x1F03" 
Loot[19]="0x1088" 


wait (WaitTime) 
While i<20
UO.FindType(Loot[i],"-5","ground") 
If UO.FindCount() Then
UO.Grab("0","finditem") 
Else
i=i+1
Endif
Wend
end sub

[Nmy]

Code: Select all

sub loot()
VAR  i
DIM Loot[19]
Loot[1]="0x0EED"
Loot[2]="0x1ECE"
Loot[3]="0x143E"
Loot[4]="0x0F4E"
Loot[5]="0x1401"
Loot[6]="0x13FE"
Loot[7]="0x0F63"
Loot[8]="0x1402"
Loot[9]="0x1406"
Loot[10]="0x1438"
Loot[11]="0x13FA"
Loot[12]="0x0F45"
Loot[13]="0x0F49"
Loot[14]="0x1401"
Loot[15]="0x1940"
Loot[16]="0x0DF0"
Loot[17]="0x0E87"
Loot[18]="0x1F03"
Loot[19]="0x1088"

for i = 1 to 19
 UO.FindType( Loot[i] , -1 ,"lastcorpse")
 while uo.findcount()
  uo.moveitem('finditem')
  wait(250)
  checklag()
  UO.FindType( Loot[i] , -1 ,"lastcorpse")
 wend
next
end sub

[Savage]

Думаю в данном случае лучше не юзать чеклаг, если будет сэйв или другой лаг можно скрипт пульнуть повторно.

[Askaneli]

нуна проверять на фаст лут и на сейф.
сори что вмешиваюсь ))))

[Savage]

хехе, читай внимательно техзадание

[Askaneli]

а я ток тебе ответил )))
юзеру я отвичаю в другом топике )))

[Askaneli]

да и ваще лучше сразу и с земли и с трупа одной кнопой лутать
просто проверить на наличие ласткорпса поблизости
если нету то тока с земли, а если есть то режем ласткорпсу лутаем ласткорпсу и с земли прихватываем то же ...