Скидывание

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
dubd
Posts: 249
Joined: 2012-07-27 23:43:14

Скидывание

Post by dubd »

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

Code: Select all

sub loot()    
if uo.waiting() then
uo.canceltarget()
endif
VAR a,Exit
VAR UnloadCont='0x513e4736'
DIM Ore[5]
Ore[0]=0x19B9 ; 4 and more ore
Ore[1]=0x19B7 ; 1 ore
Ore[2]=0x19BA ; 2 ore
Ore[3]=0x19B8 ; 3 ore
UO.SetReceivingContainer(UnloadCont)
wait(500)
For a=0 to 3
Exit=0
repeat
UO.FindType(Ore[a])
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(1500)
Else
Exit=1
endif
until Exit==1
Next
UO.UnSetReceivingContainer()
end sub
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Скидывание

Post by Mirage »

Code: Select all

DIM Ore[n+1] ; число должно равнятся последнему числу в скобках Ore + 1
Ore[0]=0x19B9 ; 4 and more ore
Ore[1]=0x19B7 ; 1 ore
Ore[2]=0x19BA ; 2 ore
Ore[3]=0x19B8 ; 3 ore
Ore[4] = тип предмета
Ore[5] = тип предмета
.......
Ore[n] = тип предмета ; где n должна быть цифрой естественно
UO.SetReceivingContainer(UnloadCont)
wait(500)
For a=0 to n
dubd
Posts: 249
Joined: 2012-07-27 23:43:14

Re: Скидывание

Post by dubd »

Мираж спасибо!! сделал как ты сказал - получилось. Скажите ещё пожалуйста. Вот по идее, когда после выгрузки прилетаешь - сразу хайдитцца должен или постоять чуток чото подумать?
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Скидывание

Post by Mirage »

я бы не хайдился а трекал сразу :) а вот если натрекал кого тогда хайдся не хайдся - надо сваливать :)

А так от сервера зависит. У нас вроде никто не прячется - админ наколдовал специально что при использовании топора/лопаты/кирки чар расхайдится так что особого смысла я не вижу.
Post Reply