RagBot Forum
 

Вернуться   RagBot Forum > • Всё что касается бота • > Макросы и Плагины

Макросы и Плагины Всё что относится к макросам и плагинам. Сборник готовых макросов.

Ответ
 
Опции темы Опции просмотра
Старый 21.04.2009, 02:20   #1
Dima
Опытный Ботовод
 
Регистрация: 20.01.2007
Сообщений: 124
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию @showexp

короче на 90% пиратках есть такая каманда показывающий опыт на оффе нету вот интересно моно сделать чтонить подобное через бота скажем чтобы каждые 5 минут бот выводил в пати чат запись:
Получено опыта XXXXXXX(YY.Y%) за 5 минут ?

Добавлено через 1 час 9 минут
по шагам
Вход в игру пишим @showexp - > автомакрос

automacro opit {
console /@showexp/
call showexp
}

macro showexp{
Сброс отчета аналог нажатия кнопки в wxstart Инфо - >Сброс отчета
do exp reset
Пауза в 300 секунд
pause 300
call showexp2
}

macro showexp2{
Инфо->отчет по Exp аналог нажатия кнопок в WXstart
do exp
После в консоли выходит:
------------Exp Report------------
Botting time : 5 minutes 00 seconds
BaseExp : 0 надо чтобы это значение принимали за переменную допустим переменная 1 $bexp
JobExp : 0 и эту тоже переменная 2 $jexp
BaseExp/Hour : 0
JobExp/Hour : 0
Zenny : 0
Zenny/Hour : 0
Base Levelup Time Estimation : 0 seconds
Job Levelup Time Estimation : 0 seconds
Died : 0
Bytes Sent : 84
Bytes Rcvd : 168
---------------------------------
и вывод в пати чат только Переменная1 , Переменная 2 тоесть типо $bexp и $jexp
do p $bexp ,$jexp
call showexp
}


Добавлено через 51 минуту
получилось чтото типо
automacro opit {
console /@showexp/
call showexp
}
macro showexp {
do exp reset
pause 300
call showexp2
}
macro showexp2 {
do exp
console /------------Exp Report------------
Botting time : 2 minutes 43 seconds
BaseExp : $bexp
JobExp : $jexp
BaseExp/Hour : 0
JobExp/Hour : 0
Zenny : 0
Zenny/Hour : 0
Base Levelup Time Estimation : 0 seconds
Job Levelup Time Estimation : 0 seconds
Died : 0
Bytes Sent : 84
Bytes Rcvd : 168
---------------------------------/
do p $bexp ,$jexp
call showexp
}
ток нехрена не работает(

Последний раз редактировалось Dima; 21.04.2009 в 02:06.
Dima вне форума   Ответить с цитированием
Старый 22.04.2009, 02:02   #2
4epT
Админ
 
Аватар для 4epT
 
Регистрация: 10.12.2006
Сообщений: 4,370
Вы сказали Спасибо: 7
Поблагодарили 387 раз(а) в 240 сообщениях
Отправить сообщение для 4epT с помощью ICQ
По умолчанию

интерестно что означает в твоём макросе команда "console /------------Exp Report------------" или "Botting time : 2 minutes 43 seconds" ...

я таких команд не знаю, от того у тебя и матерится бот

попробуй вывести базовый опыт через:
Цитата:
log totalBaseExp = $::totalBaseExp
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!
4epT вне форума   Ответить с цитированием
Старый 22.04.2009, 17:38   #3
Dima
Опытный Ботовод
 
Регистрация: 20.01.2007
Сообщений: 124
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию

automacro opit {
party "showexp"
call {
log Включен Сщетчик опыта
}
call showexp1
}
macro showexp1 {
do exp reset
log Сброшет Отчет по опыту
pause 300
call showexp2
}
macro showexp2 {
$totalBaseExp = totalBaseExp
do p ($totalBaseExp)
pause 1
call showexp1
}
ток он выводит не то что нужно

Добавлено через 6 часов 29 минут
а можно какнить сделать так чтобы переменные грузились из другово файла скажем plugins/rogps.pl

Последний раз редактировалось Dima; 22.04.2009 в 14:47.
Dima вне форума   Ответить с цитированием
Старый 26.04.2009, 01:08   #4
Dima
Опытный Ботовод
 
Регистрация: 20.01.2007
Сообщений: 124
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию

automacro opit {
party "showexp"
call {
log Включен Сщетчик опыта
}
call showexp1
}
macro showexp1 {
$a = @eval($::char->{exp})
$b = @eval($::char->{exp_job})
do exp reset
log Сброшет Отчет по опыту
pause 30
call showexp2
}
macro showexp2 {
$c = @eval($::char->{exp})
$e = @eval($::char->{exp_job})
$a1 = @eval($::char->{exp_max})
$a2 = @eval($::char->{exp_job_max})
$d = @eval($c - $a)
$d1 = @eval(($c - $a)/$a1)
$f = @eval($e - $b)
$f1 = @eval(($e - $b)/$a2)
if ($a2 < 400000000) goto end
$f1 = 0
:end
if ($a1 < 400000000) goto end2
$d1 = 0
:end2
do p База $d($d1%) Джоб $f($f1%)
pause 1
call showexp1
}

Последний раз редактировалось Dima; 26.04.2009 в 02:23.
Dima вне форума   Ответить с цитированием
Ответ


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Текущее время: 00:32. Часовой пояс GMT +3.