Помогите поправить

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
sluntai
Posts: 66
Joined: 2008-05-13 17:04:26

Помогите поправить

Post by sluntai »

Народ помогите пожалуйста поправить скриптики на хилл и лут.Хилинг нужно поправить чтобы после после того как чар отхилится скрипт полностью отключался,и чтобы после хилла брал в руки щит и веп.В Лут нужно добавить чтобы после резки брал в руки щит и веп.Спасибо.Вот скрипты:

Code: Select all

sub Loot4() 
   VAR i,Exit 
   DIM Loot[18]
   
 
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

UO.SetReceivingContainer('0x4000C313') ;ID backpacka
   uo.waittargetobject('lastcorpse')
   uo.UseType('0x0EC3 ')
   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

sub autoheal()
while 1
wait(1000)
if uo.life < 107 then
uo.usetype("GH")
uo.bandageself()
wait(1500)
endif
wend
end sub
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: Помогите поправить

Post by ZeroDX »

Code: Select all

sub autoheal()
uo.setarm('asd255')
while uo.life < uo.str
wait(1000)
if uo.life < 107 then
uo.usetype("GH")
uo.bandageself()
wait(1500)
endif
wend
uo.arm('asd255')
end sub
sluntai
Posts: 66
Joined: 2008-05-13 17:04:26

Re: Помогите поправить

Post by sluntai »

ZeroDX wrote:

Code: Select all

sub autoheal()
uo.setarm('asd255')
while uo.life < uo.str
wait(1000)
if uo.life < 107 then
uo.usetype("GH")
uo.bandageself()
wait(1500)
endif
wend
uo.arm('asd255')
end sub


Спасибо а как на счет лута?? :oops:
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: Помогите поправить

Post by ZeroDX »

Post Reply