
Скрипт на лут
Moderators: Murderator+, Murderator
Скрипт на лут
Спасибо GrayLord'y, всё заработало 

Last edited by Optical on 2004-11-03 06:30:53, edited 1 time in total.
вот интересно, а открывать труп не надо?
на zuluhotel rezurrection (rezurrection.zuluhotel.ru)
такой скрипт тоже не будет работать.
а вот этот будет:
на zuluhotel rezurrection (rezurrection.zuluhotel.ru)
такой скрипт тоже не будет работать.
а вот этот будет:
Code: Select all
sub main()
var corpse='0x2006' ; objtype для всех трупов, независимо от того, чей труп.
var waittime=500
var body,bodypack,i
DIM Loot[12]
Loot[0]=0x0EED
Loot[1]=0x13B9
Loot[2]=0x1B76
Loot[3]=0x1411
Loot[4]=0x141A
Loot[5]=0x1416
Loot[6]=0x1410
Loot[7]=0x1417
Loot[8]=0x1418
Loot[9]=0x1419
Loot[10]=0x0E76
Loot[11]=0x1413
Loot[12]=0x1086
uo.set('finddistance','2')
repeat
while uo.countonground(corpse)>0
uo.findtype(corpse,'-1','ground')
body=uo.getserial('finditem')
#-----------открываем свой пак
uo.useobject('backpack')
#-----------ждем открытия своего пака
repeat
wait(100)
until uo.getserial('lastcontainer')==uo.getserial('backpack')
#-----------открываем труп
uo.useobject(body)
repeat
wait(100)
until uo.getserial('lastcontainer')<>uo.getserial('backpack')
#------------
bodypack=uo.getserial('lastcontainer')
For i=0 to 12
repeat
UO.FindType(Loot[i],-1,bodypack)
if UO.GetQuantity('finditem') then
UO.MoveItem('finditem','backpack')
repeat
wait(100)
until uo.containerof('finditem')==uo.getserial('backpack')
wait(waittime)
endif
until uo.findcount()==0
next
uo.ignore(body)
wend
until UO.Dead()
endsub