макрос: варп для указанной гилды

[4epT]

Описание:
Прист варпает в 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

а как зделать тоже самое только если игрок не в гильдии?

[4epT]

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

Тогда бот будет включать варп всем

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

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

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

[4epT]

на счёт вставания (нету времени тестить, проверять) я подправил, теперь если бот сидит, то он встаёт
на счёт того что 1 раз юзает это ты брешиш когда я тестил он мне кучу варпов наоткрывал. может он у тебя пытается поставить варп на запрещённый участок (столб например)? место варпа радомное, поэтому вполне возможно. Приста лучше помещать так что бы сверху от него можно было варпы кидать.

[endigro]

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

[4epT]

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

а команду move x y ещё никто не отменял

[endigro]

Я плохо понял что ты имел ввиду, поясни

[4epT]

Убераешь:

$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"

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

do sl 27 @eval($x + @rand(-5, 5)) @eval($y + @rand(2, 7))

Что значит эта строка, может тут надо что-то менять? Извините зе глупые вопросы, просто ваще не понимаю тут ничего:D