Лут
Posted: 2012-05-09 13:58:06
Люди,с праздником победы всех!!Помогите добавить в скрипт чтобы после резки и лута перс брал в руги последнее оружие,лук меч и пр.Спасибо.
Code: Select all
sub Loot4()
VAR i,Exit
DIM Loot[19]
Loot[0]=0x0EED ; gp
Loot[1]=0x0F7B ; BM
Loot[2]=0x0F7A ; BP
Loot[3]=0x0F84 ; GA
Loot[4]=0x0F85 ; GI
Loot[5]=0x0F86 ; MR
Loot[6]=0x0F88 ; NS
Loot[7]=0x0F8C ; SA
Loot[8]=0x0F8D ; SS
Loot[9]=0x13FA ;two handed axe
Loot[10]=0x0F3F ;arm
Loot[11]=0x1415 ;arm
Loot[12]=0x1BFB ;arm
Loot[13]=0x1410 ;arm
Loot[14]=0x1BD1 ;arm
Loot[15]=0x0E21 ;ban
Loot[16]=0x0F78 ;batw
Loot[17]=0x0F8B ;pumise
Loot[18]=0x0DF8 ;wool
UO.SetReceivingContainer('0x4000C313') ;ID backpacka
uo.waittargetobject('lastcorpse')
uo.UseType('0x13F6')
For i=0 to 17
Exit=0
repeat
UO.FindType(Loot[i],-1,'lastcontainer')
if UO.GetQuantity('finditem') then
UO.Grab('0','finditem')
wait(100)
Else
Exit=1
endif
until Exit==1 OR uo.injournal("loot")
Next
UO.UnSetReceivingContainer()
end sub