Yoko
http://forum.yoko.com.ua/

Скидывание
http://forum.yoko.com.ua/viewtopic.php?f=20&t=17450
Page 1 of 1

Author:  dubd [ 2014-07-01 10:51:31 ]
Post subject:  Скидывание

народ помогите пожалуйста. вот на скидку руды в сундук. подскажите, как добавить чтобы чар скидывал ещё камушки которые добывает?
Code:
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

Author:  Mirage [ 2014-07-01 17:36:12 ]
Post subject:  Re: Скидывание

Code:
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

Author:  dubd [ 2014-07-01 19:15:20 ]
Post subject:  Re: Скидывание

Мираж спасибо!! сделал как ты сказал - получилось. Скажите ещё пожалуйста. Вот по идее, когда после выгрузки прилетаешь - сразу хайдитцца должен или постоять чуток чото подумать?

Author:  Mirage [ 2014-07-02 22:06:40 ]
Post subject:  Re: Скидывание

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

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

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/