Rename admin mute command because it actually bans chat prticipants
This commit is contained in:
@@ -217,7 +217,7 @@ ${csign}admin obutts # - где 1 - вкл, 0 - выкл плагина o
|
|||||||
${csign}admin obutts - показываем ли попки по просьбе участников чата (команды ${csign}ass, ${csign}butt, ${csign}booty, ${csign}попа, ${csign}попка)
|
${csign}admin obutts - показываем ли попки по просьбе участников чата (команды ${csign}ass, ${csign}butt, ${csign}booty, ${csign}попа, ${csign}попка)
|
||||||
${csign}admin chan_msg - оставляем ли сообщения присланные от имени (других) каналов
|
${csign}admin chan_msg - оставляем ли сообщения присланные от имени (других) каналов
|
||||||
${csign}admin chan_msg # - где 1 - оставляем, 0 - удаляем
|
${csign}admin chan_msg # - где 1 - оставляем, 0 - удаляем
|
||||||
${csign}admin mute userid sec - выдаём mute указанному user-у на указанное количество секунд (от 30 сек до 1 года), доступно только создателю чата
|
${csign}admin ban userid sec - выдаём ban указанному user-у на указанное количество секунд (от 30 сек до 1 года), доступно только создателю чата
|
||||||
```
|
```
|
||||||
Типы сообщений:
|
Типы сообщений:
|
||||||
audio voice photo video animation sticker dice game poll document
|
audio voice photo video animation sticker dice game poll document
|
||||||
@@ -235,11 +235,11 @@ MYADMIN
|
|||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
# Мьютить через бота можно только создателю чятика
|
# Банить через бота можно только создателю чятика
|
||||||
if (($member->status eq 'creator') && $cmd =~ /^(admin|админ)\s+mute\s+(\d+)\s+(\d+)$/gu) {
|
if (($member->status eq 'creator') && $cmd =~ /^(admin|админ)\s+ban\s+(\d+)\s+(\d+)$/gu) {
|
||||||
my (undef, undef, $user_id_to_mute, $time) = split /\s+/, $cmd;
|
my (undef, undef, $user_id_to_ban, $time) = split /\s+/, $cmd;
|
||||||
|
|
||||||
# Бот должен быть админом, чтобы мьютить юзеров
|
# Бот должен быть админом, чтобы банить юзеров
|
||||||
my $me = $self->getMe ();
|
my $me = $self->getMe ();
|
||||||
|
|
||||||
if ($me->{error}) {
|
if ($me->{error}) {
|
||||||
@@ -248,7 +248,7 @@ MYADMIN
|
|||||||
|
|
||||||
my $myId = $me->id;
|
my $myId = $me->id;
|
||||||
|
|
||||||
if ($myId == $user_id_to_mute) {
|
if ($myId == $user_id_to_ban) {
|
||||||
$reply = 'Я не буду себя мьютить.';
|
$reply = 'Я не буду себя мьютить.';
|
||||||
} else {
|
} else {
|
||||||
$me = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $me->id});
|
$me = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $me->id});
|
||||||
@@ -259,7 +259,7 @@ MYADMIN
|
|||||||
|
|
||||||
if ($me->status eq 'administrator') {
|
if ($me->status eq 'administrator') {
|
||||||
# Проверим, что такой юзер есть в чятике
|
# Проверим, что такой юзер есть в чятике
|
||||||
my $chatMember = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $user_id_to_mute});
|
my $chatMember = $self->getChatMember ({'chat_id' => $chatid, 'user_id' => $user_id_to_ban});
|
||||||
|
|
||||||
if ($chatMember->{error}) {
|
if ($chatMember->{error}) {
|
||||||
return;
|
return;
|
||||||
@@ -269,25 +269,25 @@ MYADMIN
|
|||||||
my $memberStatus = $chatMember->status;
|
my $memberStatus = $chatMember->status;
|
||||||
|
|
||||||
if ($memberStatus eq 'creator') {
|
if ($memberStatus eq 'creator') {
|
||||||
$reply = 'Ты поехал себя мьютить?';
|
$reply = 'Ты поехал себя банить?';
|
||||||
} elsif ($memberStatus eq 'administrator') {
|
} elsif ($memberStatus eq 'administrator') {
|
||||||
$reply = 'Админов мьютить не буду.';
|
$reply = 'Админов банить не буду.';
|
||||||
} else {
|
} else {
|
||||||
if ($time < 30) {
|
if ($time < 30) {
|
||||||
$reply = 'Ты слишком добр.';
|
$reply = 'Ты слишком добр.';
|
||||||
} elsif ($time > (60 * 60 * 24 * 366)) {
|
} elsif ($time > (60 * 60 * 24 * 366)) {
|
||||||
$reply = 'Мьют более чем на 366 дней - перманентный, ты слишком жесток, я так не играю.';
|
$reply = 'Бан более чем на 366 дней - перманентный, ты слишком жесток, я так не играю.';
|
||||||
} else {
|
} else {
|
||||||
my $result = $self->banChatMember (
|
my $result = $self->banChatMember (
|
||||||
{
|
{
|
||||||
'chat_id' => 0 + $chatid,
|
'chat_id' => 0 + $chatid,
|
||||||
'user_id' => 0 + $user_id_to_mute,
|
'user_id' => 0 + $user_id_to_ban,
|
||||||
'until_date' => $time + time (),
|
'until_date' => $time + time (),
|
||||||
},
|
},
|
||||||
);
|
);
|
||||||
|
|
||||||
if ($result->{error}) {
|
if ($result->{error}) {
|
||||||
$reply = 'Что-то пошло не так, не получается замьютить.';
|
$reply = 'Что-то пошло не так, не получается забанить.';
|
||||||
} else {
|
} else {
|
||||||
$reply = 'Готово.';
|
$reply = 'Готово.';
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user