RagBot Forum
 

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

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

Ответ
 
Опции темы Опции просмотра
Старый 11.06.2007, 20:11   #1
4epT
Админ
 
Аватар для 4epT
 
Регистрация: 10.12.2006
Сообщений: 4,370
Вы сказали Спасибо: 7
Поблагодарили 387 раз(а) в 240 сообщениях
Отправить сообщение для 4epT с помощью ICQ
Лампочка макрос: варп для указанной гилды

Описание:
Прист варпает в 1 точку (пока). Схема такая:
1. Рядом с пристом (в радиусе 10 клеток) в общий чат пишут слово варп (можно не переключать раскладку и написать dfhg, кстати можно написать и ВаРп - тоже поймёт. Макрос реагирует на 4 слова: варп, dfhg, порт, gjhn).
2. бот анализирует кто это, дальше:
а) если этот засранец (автор слов) не из наших гильдий, то молчим
б) если же - свой чувак, то открываем 1 варп (мало?)

Навтройка макроса:
$guild = гилда1,гилда2,...
сюда прописываем имена "своих в доску" гильдий. Имена не чувствительны к РеГиСтРу. После запятой пробела быть не должно!
$warp = 0
вместо '0' ставим тот портал который нужен (их всего четыре: 0, 1, 2, 3)

Достоинства макроса:
1. Прист не привязан к координатам, может стоять в любом городе, почти в любом месте.Почему почти? Читай далее.
2. Прист варпает в рандомные координаты. Причём всегда выше себя. Варпы могут быть левее и правее приста.
3. Если гемов нету, то макрос срабатывать не будет

Недостатки макроса:
А кто же о них пишет?
1. Нет оповещения о том, что кончились гемы (кому нада сами прикрутите, или настроете, чтоб бот сам брал гемы)
2. Прист не кидает санки (кому нада сам допишет)

Сам макрос:
Код:
##Варпаем гильдию##
automacro warp {
pubm /варп|порт|dfhg|gjhn/i,10
inventory "Blue Gemstone" > 0
run-once 1
	call {
	$guild = гилда1,гилда2,...
	$warp = 0
	$i = @player ($.lastpub)
	if ($id = -1) goto stop
	$g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
	if ($g ~ $guild) goto ok
	release warp
	stop
	:ok
	if (@eval($::char->{sitting}) = 1) goto stand
	do stand
	:stand
	$x = @eval($::char->{pos}{x})
	$y = @eval($::char->{pos}{y})
	do sl 27 @eval($x + @rand(-5, 5)) @eval($y + @rand(2, 7))
	pause 2
	do warp $warp
	pause 5
	release warp
	}
}
#4epT©
Внимание, т.к в макросе исользуются русские слова (варп|порт), то файл macros.txt необходимо сохранить в кодировке UTF-8
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!

Последний раз редактировалось 4epT; 02.07.2007 в 00:12. Причина: добавил stand
4epT вне форума   Ответить с цитированием
Старый 18.06.2007, 19:14   #2
reas0n
Гость
 
Сообщений: n/a
По умолчанию

а как зделать тоже самое только если игрок не в гильдии?
  Ответить с цитированием
Старый 18.06.2007, 19:25   #3
4epT
Админ
 
Аватар для 4epT
 
Регистрация: 10.12.2006
Сообщений: 4,370
Вы сказали Спасибо: 7
Поблагодарили 387 раз(а) в 240 сообщениях
Отправить сообщение для 4epT с помощью ICQ
Стрелка

1. принять его в гильдию
или
2 . Удалить:
Код:
	$i = @player ($.lastpub)
	if ($id = -1) goto stop
	$g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
	$guild = гилда1, гилда2, ... <<указываем имя гилды или несколько
	if ($g ~ $guild) goto ok
	release warp
	stop
	:ok
или
3. написать гильдию null $guild = null

Тогда бот будет включать варп всем
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!
4epT вне форума   Ответить с цитированием
Старый 18.06.2007, 23:28   #4
reas0n
Гость
 
Сообщений: n/a
По умолчанию

спасибо работает...хотя на шёт куска макроса его убрать я давно догадалься,просто у меня бот сидел поэтому не варпал,вот такой йа нупко =/

хм теперь другая проблема он юзает 1 раз всего варп если бота не резетнуть он показывает ошибку и не варпает....есть какое нибуть решение?

P.S> ошибка "Skill Warp Portal failed (Basic) Casting failed: Basic (0)"

Последний раз редактировалось 4epT; 19.06.2007 в 03:27.
  Ответить с цитированием
Старый 19.06.2007, 03:32   #5
4epT
Админ
 
Аватар для 4epT
 
Регистрация: 10.12.2006
Сообщений: 4,370
Вы сказали Спасибо: 7
Поблагодарили 387 раз(а) в 240 сообщениях
Отправить сообщение для 4epT с помощью ICQ
Стрелка

на счёт вставания (нету времени тестить, проверять) я подправил, теперь если бот сидит, то он встаёт
на счёт того что 1 раз юзает это ты брешиш когда я тестил он мне кучу варпов наоткрывал. может он у тебя пытается поставить варп на запрещённый участок (столб например)? место варпа радомное, поэтому вполне возможно. Приста лучше помещать так что бы сверху от него можно было варпы кидать.
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!

Последний раз редактировалось 4epT; 27.06.2007 в 11:24.
4epT вне форума   Ответить с цитированием
Старый 27.06.2007, 10:19   #6
endigro
Нюб делает первые шаги
 
Регистрация: 22.01.2007
Сообщений: 3
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию

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

endigro, чтобы точно после тебя - это запаришься, можно поставить через 7 сек после открытия.

а команду move x y ещё никто не отменял
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!

Последний раз редактировалось 4epT; 28.06.2007 в 16:23.
4epT вне форума   Ответить с цитированием
Старый 27.06.2007, 17:55   #8
endigro
Нюб делает первые шаги
 
Регистрация: 22.01.2007
Сообщений: 3
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию

Я плохо понял что ты имел ввиду, поясни
endigro вне форума   Ответить с цитированием
Старый 28.06.2007, 16:26   #9
4epT
Админ
 
Аватар для 4epT
 
Регистрация: 10.12.2006
Сообщений: 4,370
Вы сказали Спасибо: 7
Поблагодарили 387 раз(а) в 240 сообщениях
Отправить сообщение для 4epT с помощью ICQ
По умолчанию

Убераешь:
Цитата:
$x = @eval($::char->{pos}{x})
$y = @eval($::char->{pos}{y})
do sl 27 @eval($x + @rand(-5, 5)) @eval($y + @rand(2, 7))
пишешь конкретные координаты, типо "do sl 27 x y"
потом паузу и "do move x y"
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!

Последний раз редактировалось 4epT; 13.09.2007 в 13:35.
4epT вне форума   Ответить с цитированием
Старый 13.09.2007, 00:21   #10
kumar
Гость
 
Сообщений: n/a
По умолчанию

Обьясните нубу пожалуста что нужно изменить.
Настроил всё как указано в первом посте.
В итоге, при слове в общий чат "warp", прист встаёт, но варп не вскрывает...

Код:
do sl 27 @eval($x + @rand(-5, 5)) @eval($y + @rand(2, 7))
Что значит эта строка, может тут надо что-то менять? Извините зе глупые вопросы, просто ваще не понимаю тут ничего:D
  Ответить с цитированием
Ответ

Опции темы
Опции просмотра

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

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

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Варп по приказу где угодно timpson Макросы и Плагины 8 24.06.2008 20:35
Нырок в варп. Pavel Макросы и Плагины 2 12.12.2007 03:00
варп и покупка Sergi Вопросы по Боту 6 13.01.2007 17:31
варп на место.. Mal4ik Вопросы по Боту 1 10.01.2007 00:13


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