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

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

MyDC.ru _ Помощь по скриптам для PtokaX _ Антиреклама

Автор: TROJAN 28.4.2010, 13:41

Автор: STRELOK 28.4.2010, 14:02

Цитата(TROJAN @ 28.4.2010, 16:41)

-чтобы админу приходилдо сообщение по типу: *** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь nickname [ip] пытался сообщить в приват следующую фразу: (првиат/чат выбералось само)

В самое начало скрипта:

Код

Send = "Main" -- Main: чат; PM: Личка; OpChat: ОпЧат
sAdminNick = "admin" -- Ник админа

Перед

Код

Core.SendToAll("*** Пользователь "..tUser.sNick.." лишён права отправки сообщений. Причина: реклама.")

добавляем:

Код

if Send == "Main" then
Core.SendToNick(sAdminNick, "<"..sBot.."> *** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь "..tUser.sNick.." (IP: "..tUser.sIP..") пытался сообщить следующую фразу: "..sData)
elseif Send == "PM" then
Core.SendPmToNick(sAdminNick, sBot, "*** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь "..tUser.sNick.." (IP: "..tUser.sIP..") пытался сообщить следующую фразу: "..sData)
elseif Send == "OpChat" then
Core.SendToOpChat("<"..sBot.."> *** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь "..tUser.sNick.." (IP: "..tUser.sIP..") пытался сообщить следующую фразу: "..sData)
end

Автор: TROJAN 28.4.2010, 18:13

Автор: STRELOK 28.4.2010, 18:57

Цитата(TROJAN @ 28.4.2010, 21:13)

как разглушить чела?

Попробуй После function ChatArrival(tUser, sData) добавить:

Код

  sData = string.sub(sData,1,-2)
  local cmd = sData:match"%b<>%s+(%S+)"
  if cmd == "!delgaguser" then
        if tProfiles[tUser.iProfile] == 1 then
            local uIP = sData:match"^(%d+)%.(%d+)%.(%d+)%.(%d+)$"
                    for v in ipairs(tGagUser) do
                    table.remove(tGagUser, uIP)
            Core.SendToUser(tUser, "<"..sBot.."> Пользователь с IP-Адресом: "..uIP.." больше не заглушен.")
            end
        else
        Core.SendToUser(tUser, ("<%s> У вас нет прав для использования этой команды!"):format(sBot))
        end
            return true
    end

P.S: Не проверил.

Автор: jumshut 30.4.2010, 12:47

Вот скрипт тут всё чё нада настраивается! PS.У меня нормально пашет....Вместо своего поставь етот там то что тебе надо...

Antireclama.lua ( 12.07 килобайт ) : 28

Автор: TROJAN 30.4.2010, 15:53

Автор: Master-Grow 8.5.2010, 14:16

в твоей антиреламе нет базы фраз чтоб она меняла тебе нужен чтоб скрип антерекламы был с базой или этот монтировать, а тебе что дали там есть база фраз тоесть замена
попробуй вот я твою с той немного скрестил

Antireclama.lua ( 11.78 килобайт ) : 15

Автор: Ksan 8.5.2010, 14:35

2TROJAN:

http://mydc.ru/topic3431.html

То, что тебе надо.