Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

MyDC.ru _ Скрипты для RusHub'а _ Locker.lua

Автор: ShadoWx 25.1.2012, 1:38

Авторы: сожители MyDC.RU
Название: Locker.lua

Описание:
Скрипт позволяет блокировать чат и личные сообщения для не зарегистрированных пользователей, уведомляя их об этом...

Код

local sBot = Config.sHubBot
local sMsg = "*** ОШИБКА!!! Вы не зарегистрированы на хабе."

function OnChat(UID, sData)
  sData = sData:match"%b<> (.*)"
  if UID.iProfile == -1  then
      Core.SendToUser(UID, sMsg, sBot)
      return true
  end
end

function OnTo(UID,sData)
  local sTo,sFrom =  sData:match"^%$To:%s+(%S+)%s+From:%s+(%S+)"
  if UID.iProfile == -1  then
      Core.SendToUser(UID, sMsg, sBot, sTo)
      return true
  end
end

locker.lua ( 444 байт ) : 37

Автор: mod 25.1.2012, 8:45

А как сделать чтоб только личка блокировалась для не зарегистрированных?

Автор: Otshelnik-Fm 25.1.2012, 9:49

удалить

Код

function OnChat(UID, sData)
  sData = sData:match"%b<> (.*)"
  if UID.iProfile == -1  then
      Core.SendToUser(UID, sMsg, sBot)
      return true
  end
end

Автор: ShadoWx 25.1.2012, 11:45

нет, личка последняя функция, удалите или закомментируйте это для проверки только чата:

Код

function OnTo(UID,sData)
  local sTo,sFrom =  sData:match"^%$To:%s+(%S+)%s+From:%s+(%S+)"
  if UID.iProfile == -1  then
      Core.SendToUser(UID, sMsg, sBot, sTo)
      return true
  end
end

Автор: mod 25.1.2012, 11:58

ShadoWx, хм...
Воспользовался предложением Otshelnik-Fm и теперь личка доступна только зарегистрированным пользователям! Получил что хотел

Автор: ShadoWx 25.1.2012, 12:11

а не так прочитал твое сообщение, да все верно )

Автор: CrazyKiller 30.1.2012, 19:47

Спасибо большое !

Вроде маленький скрипт, а помог мне решить пару нюансов со спамерами )))

Кто может подсказать, как можно открыть доступ всем Операторам и Администраторам, чтоб им приходили ЛС с Гостей а другим заблокированно ?

Автор: Артём 30.1.2012, 20:11

CrazyKiller, посмотри как это сделано в http://mydc.ru/topic4974.html скрипте и попробуй сам сделать.

Автор: CrazyKiller 30.1.2012, 20:40

Артем Спасибо !

До пилял!
Если кому нужен, нате ))
Скрипт Запрещает только ЛС, Глав чат открыт

Скрипт

local sBot = Config.sHubBot
local sMsg = "*** ОШИБКА!!! Доступ закрыт Гостям. ( ERROR!!! Access is closed Guests )"
local tGoodPmUser = { --- Ники, которым смогут писать гости.
["CrazyKiller"] = true,
["Bloodwithmilk"] = true,
}

function OnTo(UID,sData)
local sTo,sFrom = sData:match"^%$To:%s+(%S+)%s+From:%s+(%S+)"
if sTo and tGoodPmUser[sTo] then return end
if UID.iProfile == -1 then
Core.SendToUser(UID, sMsg, sBot, sTo)
return true
end
end

Автор: Артём 30.1.2012, 20:50

Цитата(CrazyKiller @ 30.1.2012, 19:40)

Скрипт

local tGoodPmUser = { --- Ники кому разрешенно писать в лс Гостям.
["CrazyKiller"] = true,
["Bloodwithmilk"] = true,
}

может... "Ники, которым смогут писать гости" ?

Автор: CrazyKiller 30.1.2012, 20:56

прогнал бесса ))
Теребят по бокам, мешают

Автор: CrazyKiller 17.2.2012, 15:51

Кто подскажет, как в скрипте сделать ешё запрет на 3 профиль ?
Чтоб могли писать в пм 0-2 профиля, остальные в топку

Автор: dj hoodo 17.2.2012, 16:09

как же теперь я спамить то буду ???
хотя я вроде зареган на хабе

Автор: CrazyKiller 17.2.2012, 16:23

Цитата(dj hoodo @ 17.2.2012, 17:09)

как же теперь я спамить то буду ???

хотя я вроде зареган на хабе

не зарегин ))))

и да, уже разобрался сам, добавил функцию.