Открывание трупа!

[-=icq=-]

Скиньте плиз скрипт на простое открывание трупа с кнопки! Т.е. без лута без всего, просто открывание трупа!

Корпсес автоопен не предлогать, т.к. он палиться в логах сильно!

Шард оском =)

Спасибо!

[simple]

sub allloot()
var i,n
Dim A[8]

A[1] = 0x1402 ;pika elf
A[2] = 0x13FC ;Arbal
A[3] = 0x1B76 ;Heater
A[4] = 0x1411 ;Legs
A[5] = 0x1B74 ;dragon
A[6] = 0x13AF ;sword
A[7] = 0x13AF ;half
A[8] = 0x1088 ;orcAmulet
UO.UseObject('lastcorpse')
i = 600
FOR n=1 TO 8
uo.findtype(A[n],"-1","lastcorpse")
if uo.findcount() > 0 then
UO.grab(1, "finditem")
uo.print("Found "+str(uo.findcount()))
Wait(i)
END if
next
end sub


Вот скрипт первым нажатием открывает труп вторым нажатием ужен ачинает лутать

[simple]

sub find_pack()
uo.usefromground("0x0E75")
end sub



Это если труп режут то пок у тя сразу закрывается ,нажимаеш кнопку и он отркывается вновь

[BulldoZer]

Долго искал но ненашел((

нужен скрипт что бы открывался не 1 труп, а все которые только что убил

Code: Select all

sub looting()
var corpse,i,j
uo.set('finddistance','2')
uo.set('distance','2')
DIM Loot[4]
Loot[0] = 0x0EED; # Gold
Loot[1] = 0x0F7E; # Bone
Loot[2] = 0x0F0B; # Refresh
Loot[3] = 0x0F26; # Diamond
Loot[4] = 0x1BF2; # ignots

DIM Text[4]
Text[0] = 'Gold Coins'
Text[1] = 'Bone'
Text[2] = 'Refresh'
Text[3] = 'Diamons'
Text[4] = 'Ignots'

DIM Vars[4]
Vars[0] = uo.gold
Vars[1] = uo.count('0x0F7E')
Vars[2] = uo.count('0x0F0B')
Vars[3] = uo.count('0x0F26')
Vars[4] = uo.count('0x0F21')


while true
while uo.countonground('0x2006') > 0
if UO.Weight > 40000 then
uo.print("Too much weight! There're "+STR(UO.Gold)+" gold coins in backpack!")
uo.waittargettype('0x0EED')
wait(1000)
uo.useobject('0x40157FBF')
wait(1000)
goto end
end if
uo.findtype('0x2006','-1','ground')
if uo.findcount() > 0 then
corpse=uo.getserial('finditem')
uo.print("Found "+str(uo.findcount())+" corpse(s)!")
for i=0 to 4
j=0
repeat 
UO.FindType(Loot[i],-1,corpse) 
if UO.GetQuantity('finditem') then 
UO.MoveItem('finditem','0','backpack')
uo.print("Looted: "+STR(UO.GetQuantity('finditem'))+" "+Text[i]+"! In All: "+STR(vars[i]+UO.GetQuantity('finditem')))
wait(600)
end if
j = j + 1
if j > 3 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(600)
wend
end sub 

ЭТО ОБЫЧНЫЙ СКРИПТ НА ЛУТИНГ... как зделать что бы он открывал корпс а потом с него лутил...

[Nmy]

Code: Select all

uo.useobject('lastcorpse')

[BulldoZer]

Проблемав том когда я вставляю эту строку, то открываеться 1 корпс а лутяться все поочереди((( может я нетуда вставляю...

[BulldoZer]

я хачу что бы обязательно перед лутом открывался корпс... трупов неменьше 20 штук примерно...что делать?

[BulldoZer]

Да заметил еще такую лажу, когда открывает первый корпс то при его закрытии его снова открывает.... и так всевремя((( другие открыть немогу даже в ручную....

[Nmy]

Code: Select all

corpse=uo.getserial('finditem')
uo.useobject( corpse )

[BulldoZer]

СЕНК) Пашет как надо))))