|
ПК и все все все... Все что связано с ПК... Логи, обсуждения, пальцы... |
|
Опции темы | Опции просмотра |
|
07.10.2008, 22:03 | #1 |
Знакомый Мадера
Регистрация: 19.02.2005
Сообщений: 70
|
|
08.10.2008, 12:28 | #2 |
Новичок
Регистрация: 04.02.2007
Сообщений: 20
|
Никогда не играл на жабе, на ммс это будет примерно так
Код:
sub color($$) { return chr(ord(substr($_[0], 2*$_[1]+1, 1))+ord('A')); } $rus = "абвгдеёжзийклмнопрстуфхцчшщъыьэюяАБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ"; $botleader = "Сидор"; P::trig { return unless $1 eq $botleader; return unless color($;,2) eq 'H'; P::sendl "$3"; } "^([$rus]+) сообщил(а|о)? группе \: \'Котар - (.*)\'\$", "f:BOT"; Последний раз редактировалось Kai; 08.10.2008 в 13:38. |