myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 
2 страниц V   1 2 >  
Ответить в данную темуНачать новую тему

> Антимат, Замена мата на слово

Теги
Нет тегов для показа
Drakula
сообщение 15.11.2009, 15:59
Сообщение #1


PtokaX DC Hub 0.4.1.2
*****

Группа: Пользователи
Сообщений: 203
Регистрация: 20.1.2009
Из: Republic of Belarus, Minsk, Uruchie, Avalon.
Пользователь №: 1 890
Спасибо сказали: 4 раза




Нашёл отличный антимат, вот тока 1 проблема, нельзя добавлять слова исключения. Выкидываю скрипт добавьте плиз.
Прикрепленные файлы
Прикрепленный файл  ________newapi.lua ( 5.25 килобайт ) Кол-во скачиваний: 162
 
Go to the top of the page
+Quote Post
Setuper
сообщение 15.11.2009, 18:52
Сообщение #2


RusHub team lead
**************

Группа: Модераторы
Сообщений: 4 030
Регистрация: 20.6.2008
Из: г. Королёв (Моск. обл.)
Пользователь №: 46
Спасибо сказали: 1708 раз




И что же в этом скрипте отличного? Думаю на форуме можно и получше найти)
Go to the top of the page
+Quote Post
Drakula
сообщение 15.11.2009, 20:15
Сообщение #3


PtokaX DC Hub 0.4.1.2
*****

Группа: Пользователи
Сообщений: 203
Регистрация: 20.1.2009
Из: Republic of Belarus, Minsk, Uruchie, Avalon.
Пользователь №: 1 890
Спасибо сказали: 4 раза




Я воспользовался поиском на сайте (+внизу пишутся похожие темы), нашёл все темы с антиматом, но не нашёл я скрипта где бы заменялся сам мат а не всё предложение. Если я пропустил какую не будь тему то киньте ссылку, но походу все темы просмотрел, но лучше бы добавить всё таки то, что я попросил. Зарание сенк.
Go to the top of the page
+Quote Post
Panda
сообщение 7.2.2010, 17:40
Сообщение #4


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 513
Спасибо сказали: 0 раз




Хороший скрипт, вот только никто не подскажет, что нужно туда добавить, что бы писать слова исключения не требующие проверки?
Дело встало за словом Дебиан, соответственно скрипт "Д" и "ан" оставляет а три буквы между ними заменяет.
PS возможно еще какие слова появятся
Go to the top of the page
+Quote Post
Wariner
сообщение 7.2.2010, 20:23
Сообщение #5


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




попробуйте что то в этом роде
Раскрывающийся текст
Код
local sBot = "БОТанег"                      -- Имя бота
local bRegBot = true                       -- Регистрировать бота на хабе true-1/nil-0
local sReplWord = " [Здесь был: Мат] "      -- Cлово для замены
local tProfiles = {                          -- пользователи чьи слова нужно фильтровать
   [0]     = 1,     -- [Master]
   [1]     = 1,     -- [OP]
   [2]     = 1,     -- [VIP]
   [3]     = 1,     -- [Reg]
   [-1]     = 1,     -- [UnReg]
}
local tMask = {
    ["[хХxX][yYуУеЕeE][йЙеЕeEёЁяЯюЮиИuUpPрР]"] = {},
    ["[пП][иИеЕeE][дД][оОoO0eEеЕaAаА][pPрР]"] = {},
    ["[пП][иИеЕeE][дД][pPрР][иИ][лЛ]"] = {},
    ["[пП][иИеЕeE][дД][оОoO0eEеЕaAаА][pPрР][ЫыАа]"] = {},
    ["[пП][иИеЕeEёЁuU][зЗ3][дД]"] = {},
    ["[зЗ3][aAаА][eEеЕёЁяЯиИuU][бБ6]"] = {},
    ["[eEеЕёЁяЯ][бБ6][иИ]"] = {
        "дебиан",
    },    
    ["[eEеЕёЁяЯ][бБ6][aAаА][нНHpPрРтТTлЛшШ]"] = {},
    ["[бБ6][лЛ][яЯ]"] = {},
    ["[Гг][аАоО0][НнHh][дДтТ][Оо0][HhНн]"] = {},
    ["[cCсС][yYуУ][kKкК][aAаА]"] = {},
    ["[СсCc][YyУу][Чч4][AaАа][РрPp][АаЫыУу]"] = {},
    ["[МмMm][yYуУ][дДdD][аАaA]"] = {},
    ["[МмMm][yYуУ][дДdD][иИuU][лЛ]"] = {},
    ["[МмMm][yYуУ][дДdD][OoОо][Зз]"] = {},
}

function OnStartup()
    if bRegBot == 1 then
        Core.RegBot(sBot,"","",true)
    end
end

function ChatArrival(tUser, sData)
    if tProfiles[tUser.iProfile] == 1 then
        for i,v in pairs(tMask) do
            if sData:match(i) and Ext(sData, v) then
                sData = sData:gsub(i, sReplWord)
                Core.SendToAll(sData)
                return true
            end
        end
    end
end

function Ext(sData, tTable)
    for i in ipairs(tTable) do
        if sData:match(tTable[i]) then
            return nil
        end
    end
    return true
end
Go to the top of the page
+Quote Post
Артём
сообщение 8.2.2010, 10:19
Сообщение #6


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 774 раза




Цитата(Wariner @ 7.2.2010, 19:23) *
попробуйте что то в этом роде

Код
\птока 4.1.2\scripts\Antimat.lua:2: unexpected symbol near 'local'
\птока 4.1.2\scripts\Antimat.lua:3: unexpected symbol near 'local'
Go to the top of the page
+Quote Post
Setuper
сообщение 8.2.2010, 12:45
Сообщение #7


RusHub team lead
**************

Группа: Модераторы
Сообщений: 4 030
Регистрация: 20.6.2008
Из: г. Королёв (Моск. обл.)
Пользователь №: 46
Спасибо сказали: 1708 раз




убери запятые в конце первых двух строк
Go to the top of the page
+Quote Post
Артём
сообщение 8.2.2010, 12:56
Сообщение #8


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 774 раза




не одна так другая...
Код
scripts\Antimat.lua:13: ']' expected near '='
Go to the top of the page
+Quote Post
Setuper
сообщение 8.2.2010, 13:24
Сообщение #9


RusHub team lead
**************

Группа: Модераторы
Сообщений: 4 030
Регистрация: 20.6.2008
Из: г. Королёв (Моск. обл.)
Пользователь №: 46
Спасибо сказали: 1708 раз




посмотри внимательно на различия между 12 и 13 строками и попробуй сам исправить
Go to the top of the page
+Quote Post
Артём
сообщение 8.2.2010, 14:02
Сообщение #10


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 774 раза




big_smile1.gif исправил одно, выдало другое
Код
Antimat.lua:40: attempt to call method 'Match' (a nil value)

big_smile.gif
Go to the top of the page
+Quote Post
Setuper
сообщение 8.2.2010, 14:19
Сообщение #11


RusHub team lead
**************

Группа: Модераторы
Сообщений: 4 030
Регистрация: 20.6.2008
Из: г. Королёв (Моск. обл.)
Пользователь №: 46
Спасибо сказали: 1708 раз




нет такого метода Match, есть только match big_smile.gif
Go to the top of the page
+Quote Post
Артём
сообщение 8.2.2010, 15:00
Сообщение #12


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 774 раза




Setuper
secret_smile.gif спасибо, но теперь он ругается на
Код
sData = sData:gsub(i, sRepWord)
Antimat.lua:41: bad argument #2 to 'gsub' (string/function/table expected) beaten.gif
Go to the top of the page
+Quote Post
Setuper
сообщение 8.2.2010, 15:05
Сообщение #13


RusHub team lead
**************

Группа: Модераторы
Сообщений: 4 030
Регистрация: 20.6.2008
Из: г. Королёв (Моск. обл.)
Пользователь №: 46
Спасибо сказали: 1708 раз




sReplWord вместо sRepWord
Go to the top of the page
+Quote Post
Артём
сообщение 8.2.2010, 15:11
Сообщение #14


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 774 раза




Setuper victory.gif спасибо заработал, big_smile1.gif правда он заменяет только один мат в предложение, а остальные игнорит.
Go to the top of the page
+Quote Post
Wariner
сообщение 8.2.2010, 19:28
Сообщение #15


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




Подправил все косяки(просто на скорую руку воял) и добавил замены всего мата. пробуем
Прикрепленные файлы
Прикрепленный файл  Antimat.lua ( 2.34 килобайт ) Кол-во скачиваний: 146
 


Спасибо сказали:
Go to the top of the page
+Quote Post
Panda
сообщение 11.2.2010, 20:13
Сообщение #16


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 513
Спасибо сказали: 0 раз




Цитата(Wariner @ 8.2.2010, 20:28) *
Подправил все косяки(просто на скорую руку воял) и добавил замены всего мата. пробуем

Во, спасибо, а не подскажешь еще, что надо вписать что бы "гыыыыыыыыыы" (невыжно сколько "ы") менять на слово?
Go to the top of the page
+Quote Post
Артём
сообщение 11.2.2010, 20:28
Сообщение #17


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 774 раза




unhappy.gif в смысли?
Цитата
(невыжно сколько "ы")


Спасибо сказали:
Go to the top of the page
+Quote Post
Panda
сообщение 11.2.2010, 21:31
Сообщение #18


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 513
Спасибо сказали: 0 раз




Цитата(Артём @ 11.2.2010, 21:28) *
unhappy.gif в смысли?

Ну в чате бывает любят посмеяться: что то типа ололололо, ахахахахахах, гыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыы (гыыыыыы) и т.д.
Вот надо вот это "Гыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыыы" сократить до, хотя бы, "Гыыы" beat_plaster.gif
Go to the top of the page
+Quote Post
Wariner
сообщение 11.2.2010, 21:36
Сообщение #19


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




был такой скрипт у Николя! Не помню как называется! Где то в готовых если найду дам ссылку! ну и сами попробуйте поискать!
Go to the top of the page
+Quote Post
Артём
сообщение 11.2.2010, 21:43
Сообщение #20


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 774 раза




Вот этот скрипт Прикрепленный файл  NoCaps___v1.2__.lua ( 3.79 килобайт ) Кол-во скачиваний: 53

P.S. сори что не ссыль big_smile.gif
Go to the top of the page
+Quote Post

2 страниц V   1 2 >
Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No new Topic has attachmentsАнтиреклама+антимат
API2
55 Setuper 72 648 2.7.2019, 17:59 Посл. сообщение: Артём
No new Topic has attachmentsАнтимат Из Хуббы
API2
73 Wariner 90 968 31.1.2013, 18:44 Посл. сообщение: Yamakasi
No New Posts Topic has attachmentsАнтимат
не кикаем, а ставим гаг
0 MaxFox 6 776 30.11.2012, 10:41 Посл. сообщение: MaxFox
No new Topic has attachmentsАнтимат
Скрипт антимата с заглушкой
29 Drakula 36 092 9.1.2012, 18:28 Посл. сообщение: Артём
No New Posts Скрипт антимат и антиреклама с базой в Mysql
1 Vizunchik 6 910 7.12.2011, 20:17 Посл. сообщение: Ksan
No New Posts Антимат !
2 CrazyKiller 8 490 3.8.2011, 14:52 Посл. сообщение: CrazyKiller
No New Posts АнтиМАТ
5 AURUM0301 9 503 3.7.2011, 10:41 Посл. сообщение: Артём
No New Posts Topic has attachmentsАнтимат
API1 | Скрипт антимата
9 bot9ra 16 165 17.10.2010, 15:04 Посл. сообщение: -Alex-
No New Posts От: Антимат
От темы с ID: 3265
3 Ksan 6 665 11.9.2010, 20:07 Посл. сообщение: Don_Kocha
No New Posts Помогите найти!АнтиМат
0 Тёмич 5 145 6.4.2010, 20:13 Посл. сообщение: Тёмич
Closed Topic has attachmentsАнтимат
помогите переделать его!!!
2 Vladimir_71_RUS 6 242 1.4.2010, 11:46 Посл. сообщение: Vladimir_71_RUS
No New Posts Topic has attachmentsАнтиМат чтобы в ЛС предупредждало юзера
а после 3 предупреждений - бан на 5-10 минут
5 Тёмич 9 707 17.3.2010, 21:28 Посл. сообщение: Артём
No new Topic has attachmentsАнтиреклама/антимат (api 2)
API2 | Проверяет лички и чат и можно выбрать наказание
43 D'aspid 61 630 25.2.2010, 12:21 Посл. сообщение: kc_duke
No New Posts Topic has attachmentsАнтимат
2 random name 7 115 10.1.2010, 13:37 Посл. сообщение: Saymon21
No New Posts Антимат
6 crake 10 059 21.11.2009, 2:14 Посл. сообщение: crake

 



RSS Сейчас: 24.4.2024, 4:03