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

Как зделать макрос на Алхимию!!!!
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2574		 Page 1 of 1
Author:  Vaha) [ 2005-01-11 01:51:21 ]
Post subject:  Как зделать макрос на Алхимию!!!!
Как зделать так что б чар Заполнял кегу и кода она уже заполнена он кидал ёё в сундук)?
Author:  BETEPAH [ 2005-01-11 10:54:14 ]
Post subject:  Re: Как зделать макрос на Алхимию!!!!
Vaha) wrote:
Как зделать так что б чар Заполнял кегу и кода она уже заполнена он кидал ёё в сундук)?

Проверяй количество потионов в кеге ...если стало к примеру 255 то сброс кеги в сундук ....... потом берем новую кегу и добавляем ее командой как ресив контейнер ...и все по кругу.
Author:  Vaha) [ 2005-01-11 20:46:58 ]
Post subject:  Re: Как зделать макрос на Алхимию!!!!
BETEPAH wrote:
Vaha) wrote:
Как зделать так что б чар Заполнял кегу и кода она уже заполнена он кидал ёё в сундук)?

Проверяй количество потионов в кеге ...если стало к примеру 255 то сброс кеги в сундук ....... потом берем новую кегу и добавляем ее командой как ресив контейнер ...и все по кругу.

На рануо пишется на соко кега заполнена ..... а вообще то в кегу у нас на шарде влазит максимум токо 100 банок)
Если тебе не трудно скинь пример)
Author:  BETEPAH [ 2005-01-12 09:53:34 ]
Post subject: 
Я на рануо не писал ......но на сфере проверка делается простоWhile

UO.FindType(Potion,-1,-1)
UO.MoveItem('finditem',0,BagSer)
FastLootCheck()
if UO.InJournal("Too many items") then
NewBag()
endif

sub NewBag()
Open(Cont1)
Open(Cont2)
UO.FindType(Bag, -1, Cont1)
BagSer=UO.GetSerial('finditem')
UO.MoveItem(BagSer, 0, Cont2)
wait(1000)
end sub

Так эту проблему решил Эмиль.
Author:  Vaha) [ 2005-01-13 01:28:42 ]
Post subject: 
BETEPAH wrote:
Я на рануо не писал ......но на сфере проверка делается простоWhile

UO.FindType(Potion,-1,-1)
UO.MoveItem('finditem',0,BagSer)
FastLootCheck()
if UO.InJournal("Too many items") then
NewBag()
endif

sub NewBag()
Open(Cont1)
Open(Cont2)
UO.FindType(Bag, -1, Cont1)
BagSer=UO.GetSerial('finditem')
UO.MoveItem(BagSer, 0, Cont2)
wait(1000)
end sub

Так эту проблему решил Эмиль.

Сенк !!.. щас буду тестить)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/