Страница 1 из 1
Макрос "сказал в приват, ако варпнул"
Добавлено: Вс июн 17, 2007 12:57 am
Гость
Народ такой вопрос....
Есть ли такой макрос???
Я подхожу к присту(мой бот)пишу ему в приват определенные буквы допустим "варпни меня в ***" и он меня варпает в опр точку которая у него уже замемина?
P.S> Если есть,буду очень благодарен если выложите
Добавлено: Вс июн 17, 2007 2:55 am
piroJOKE
Поиском попользуйся, у нас где-то такое было. ЕЩЕ раз говорю, прежде чем писать всякую фигнб, сначала надо ее поискать поиском. Это хорошо и правильно. Делать наоборот - выглядеть лодырем.
ЗЫ:
viewtopic.php?t=1880&highlight=warp
viewtopic.php?t=817&highlight=warp
viewtopic.php?t=265&highlight=warp
...
и куча других тем.
Да да, там нет готового решения. Но, ты можешь на основании всего этого его легко написать то, что тебе нужно. Ну, и не забыть поделиццо с народом.
Добавлено: Вс июн 17, 2007 3:06 am
piroJOKE
Вот еще неплохой пример на смежную тему:
У монка стоит макрос
automacro sleepers {
location aldebaran
call {
do p "Move!"
pause 1
do move 150 170 yuno_fild11
}
run-once 1
}
automacro pereves {
weight > 48%
call storage
run-once 1
}
macro storage {
do p "Storage!"
pause 1
do ss 26 2
pause 1
do autostorage
pause 1
release sleepers
pause 1
release pereves
}
У приста
automacro onpc {
party "Storage!"
call ald
run-once 1
}
macro ald {
pause 2
do ss 26 2
pause 1
release onpc
pause 1
}
Вот так
(с)
Добавлено: Вс июн 17, 2007 6:35 pm
4epT
А мне нравится так:
Даём варп (в одно место) если его просик кто-то из указанной гилды.
automacro warp {
pubm /варп|порт/i,10
inventory "Blue Gemstone" > 0
run-once 1
call {
$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
$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 2 << ставим номер порта (всего 4)
pause 5
release warp
}
}
файл macros.txt пихаем в utf-8
ЗЫ: всё ровно
pеroJOKE откопалбы эту
тему