как сажать грибы?
Модератор: 4epT
Правила форума
Все вопросы по OK не касающиеся плагинов и макросов публикуются в этом разделе.
Перед тем как что то писать, пожалуйста, удостоверьтесь что данная тема не поднималась, вы полностью изучили мануалы по конфигурационным файлам бота и не нашли там решения.
Все вопросы по OK не касающиеся плагинов и макросов публикуются в этом разделе.
Перед тем как что то писать, пожалуйста, удостоверьтесь что данная тема не поднималась, вы полностью изучили мануалы по конфигурационным файлам бота и не нашли там решения.
- 4epT
- macro-маньячина
- Сообщения: 2792
- Зарегистрирован: Чт дек 21, 2006 1:23 pm
- Сервер RO:: 4game
- Discord: ya4ept#8494
- Контактная информация:
Re: как сажать грибы?
наверное я туплю тогда
- chuvachok
- Грамотный
- Сообщения: 320
- Зарегистрирован: Ср авг 06, 2008 12:47 pm
- Сервер RO:: iRO
- Discord: chuvachok #2811
- Откуда: г. Москва
Re: как сажать грибы?
может для уменьшения макроса можно связать кору с мирАИ,в которой есть мод для посадки грибов при условии что гом будет рядом
вот мод для мирАИ:
на сервере где я играю,различные моды с мирАИ не работают
вот мод для мирАИ:
Код: Выделить всё
-------------------------------------------------------------
-- Mir AI -> Cultivation
-------------------------------------------------------------
-- Biochemist Cultivation Mod By PX63[WoH]@raggame.ru/Chaos
-------------------------------------------------------------
-------------------------------------------------------------
-- Options
-------------------------------------------------------------
SC_ID = 491 -- Cultivation Skill ID - Cultivation
SC_LVL = 1 -- Cultivation Skill Level, 1 - for Mushrooms, 2 - Plants
SC_LOOP = 1 -- Looping planted, if = 0 after planted Homunculus go to Rest, if = 1 Hommie continue planted
SC_WIDTH = 2 -- Width of Area on X coordinate
SC_HEIGHT = 2 -- Height of Area on Y coordinate
-------------------------------------------------------------
-- Extra Globals
-------------------------------------------------------------
--SC_ID = 229
V_OWNER = 0
V_POSITION = 1
_X = -SC_WIDTH
_Y = -SC_HEIGHT
SC_pos = 0
SC_time = 0
SC_SkillDelay = 500
--------------------------------------------------
function ModInit()
-- plugin initialization
--------------------------------------------------
-- Replace standard Mir AI's functions
StdOnIDLE_ST = OnIDLE_ST
OnIDLE_ST = SDnOnIDLE_ST
StdOnCHASE_ST = OnCHASE_ST
OnCHASE_ST = SDnOnCHASE_ST
end
-----------------------
function Cultivation()
-----------------------
if(SC_time == 0) then
SC_time = GetTick()
end
if(GetTick() - SC_time >= SC_SkillDelay) then
if _X <= SC_WIDTH then
if _Y <= SC_HEIGHT then
isSelf = math.abs(_X) + math.abs(_Y)
if isSelf ~= 0 then
OwnerX, OwnerY = GetV(V_POSITION,GetV(V_OWNER,MyID))
SC_X = OwnerX + _X
SC_Y = OwnerY + _Y
SkillGround(MyID, SC_LVL, SC_ID, SC_X, SC_Y)
SC_time = GetTick()
-- Log("x:".._X.." y:".._Y.." -- "..SC_time)
end
_Y = _Y + 1
else
_Y = -SC_HEIGHT
_X = _X + 1
end
else
_X = -SC_WIDTH
if SC_LOOP == 0 then SkillObject(MyID, 1, 244, MyID) end
end
end
end
-----------------------------
function SDnOnIDLE_ST()
-----------------------------
Cultivation()
StdOnIDLE_ST()
end
-----------------------------
function SDnOnCHASE_ST()
-----------------------------
Cultivation()
StdOnCHASE_ST()
end
- 4epT
- macro-маньячина
- Сообщения: 2792
- Зарегистрирован: Чт дек 21, 2006 1:23 pm
- Сервер RO:: 4game
- Discord: ya4ept#8494
- Контактная информация:
Re: как сажать грибы?
мирАИ с корой незачем связывать.. проще тогда держать открытым окно клиента
- Святой Инквизитор
- Грамотный
- Сообщения: 455
- Зарегистрирован: Вт окт 28, 2008 3:57 am
- Сервер RO:: DarkRO
- Откуда: Далёкая и тёмная страна Украина
- Контактная информация:
Re: как сажать грибы?
Он как пример дал.... Но там написано таким же способом как и у меня, через 2 ИФа...
- 4epT
- macro-маньячина
- Сообщения: 2792
- Зарегистрирован: Чт дек 21, 2006 1:23 pm
- Сервер RO:: 4game
- Discord: ya4ept#8494
- Контактная информация:
Re: как сажать грибы?
а я 5 ифоф насчитал
- Святой Инквизитор
- Грамотный
- Сообщения: 455
- Зарегистрирован: Вт окт 28, 2008 3:57 am
- Сервер RO:: DarkRO
- Откуда: Далёкая и тёмная страна Украина
- Контактная информация:
Re: как сажать грибы?
Ну я имел в виду 2 if в качестве замены 2 while))))
- chuvachok
- Грамотный
- Сообщения: 320
- Зарегистрирован: Ср авг 06, 2008 12:47 pm
- Сервер RO:: iRO
- Discord: chuvachok #2811
- Откуда: г. Москва
Re: как сажать грибы?
подскажите плиз что дописать чтобы после посадки последнего гриба возвращался на начальную точку посадки и потом выходил?
а то у меня получается что бот садит последний гриб и на этом замирает,я закрываю бота,и когда снова его запускаю,то он читает автомакрос и "понимает" что находится не на старте и автоматически закрывается
а то у меня получается что бот садит последний гриб и на этом замирает,я закрываю бота,и когда снова его запускаю,то он читает автомакрос и "понимает" что находится не на старте и автоматически закрывается
- Святой Инквизитор
- Грамотный
- Сообщения: 455
- Зарегистрирован: Вт окт 28, 2008 3:57 am
- Сервер RO:: DarkRO
- Откуда: Далёкая и тёмная страна Украина
- Контактная информация:
Re: как сажать грибы?
заново переписать конфиг.ТхТ с координтатами начала сажания)))
или модифицировать макрос:
Думаю понятно что вместо <точка начала х> <точка начала у> написать)
Добавлено спустя 1 минуту 18 секунд:
Если не нада выходить из игры тогда поменять все do quit на do ai off
или модифицировать макрос:
Код: Выделить всё
automacro Cast {
run-once 1
priority 2
call {
log @invamount(Mushroom Spore) Spores left!
if (@invamount(Mushroom Spore) > 0) goto next
pause 2
do conf PlantX <точка начала х>
do conf PlantY <точка начала у>
do quit
:next
$x = @eval($::config{PlantX})
$y = @eval($::config{PlantY})
do move @eval($x - 1) @eval($y - 1)
do sl 491 @eval($::config{PlantX}) @eval($::config{PlantY}) 1
pause 1
[
if (@eval($::config{PlantY}) >= @eval($::config{PlantYf})) goto two
if (@eval($::config{PlantX}) >= @eval($::config{PlantXf})) goto one
$prom = @eval($::config{PlantX})
do conf PlantX @eval($prom + 1)
goto end
:one
$prom = @eval($::config{PlantY})
do conf PlantY @eval($prom + 1)
do conf PlantX @eval($::config{PlantXd})
goto end
:two
do conf PlantX <точка начала х>
do conf PlantY <точка начала у>
do quit
:end
]
release Cast
}
}
automacro SkillFail {
console /Skill Cultivation failed/
priority 1
call onemoreCast
}
macro onemoreCast {
log @invamount(Mushroom Spore) Spores left!
if (@invamount(Mushroom Spore) > 0) goto next
pause 2
do conf PlantX <точка начала х>
do conf PlantY <точка начала у>
do quit
:next
$x = @eval($::config{PlantX})
$y = @eval($::config{PlantY})
do move @eval($x - 1) @eval($y - 1)
do sl 491 @eval($::config{PlantX}) @eval($::config{PlantY}) 1
pause 1
[
if (@eval($::config{PlantY}) >= @eval($::config{PlantYf})) goto two
if (@eval($::config{PlantX}) >= @eval($::config{PlantXf})) goto one
$prom = @eval($::config{PlantX})
do conf PlantX @eval($prom + 1)
goto end
:one
$prom = @eval($::config{PlantY})
do conf PlantY @eval($prom + 1)
do conf PlantX @eval($::config{PlantXd})
goto end
:two
do conf PlantX <точка начала х>
do conf PlantY <точка начала у>
do quit
:end
]
release Cast
}
Добавлено спустя 1 минуту 18 секунд:
Если не нада выходить из игры тогда поменять все do quit на do ai off
- Святой Инквизитор
- Грамотный
- Сообщения: 455
- Зарегистрирован: Вт окт 28, 2008 3:57 am
- Сервер RO:: DarkRO
- Откуда: Далёкая и тёмная страна Украина
- Контактная информация:
Re: как сажать грибы?
неа.... Рассчитано на тупое сажание грибов от х у до х1 у1..
Re: как сажать грибы?
А зачем выходить или отключать аи O_o Бот тупо встает и всё... Может что-нибудь другое написать, кроме откл АИ и выхода из коры?Святой Инквизитор писал(а): Если не нада выходить из игры тогда поменять все do quit на do ai off
- Святой Инквизитор
- Грамотный
- Сообщения: 455
- Зарегистрирован: Вт окт 28, 2008 3:57 am
- Сервер RO:: DarkRO
- Откуда: Далёкая и тёмная страна Украина
- Контактная информация:
Re: как сажать грибы?
напиши do c Всё, а теперь хаваем
Re: как сажать грибы?
Хе, йа догадался на смайлик уже поменять Вот только он у мя чисто в одну клетку начинает сажать >.<Святой Инквизитор писал(а):напиши do c Всё, а теперь хаваем
- Святой Инквизитор
- Грамотный
- Сообщения: 455
- Зарегистрирован: Вт окт 28, 2008 3:57 am
- Сервер RO:: DarkRO
- Откуда: Далёкая и тёмная страна Украина
- Контактная информация:
Re: как сажать грибы?
Вот поэтому нудно аи отрубать и юзать самый последний макрос что я выложил. А когда нужно заново начать то просто аи врубить...