myDC.ru

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

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

> Антипорно, API1, API2

Теги
Нет тегов для показа
FallenAngel
сообщение 22.12.2008, 0:21
Сообщение #1


[n00b]
*****

Группа: Пользователи
Сообщений: 291
Регистрация: 10.7.2008
Из: Россия,Пенза
Пользователь №: 168
Спасибо сказали: 24 раза




Название: MonPorn
Автор: c00Lo
Версия: ?
Версия API: 1&2
Язык: Русский
Описание: Антипорно. При поиске запрешенных слов, в чате появляется уведомление о том,что ктото ищет порнуху big_smile.gif. Зы-слова ни редактирвал.все осталось как и было в оригинале).
Прикрепленные файлы
Прикрепленный файл  MonPorn_newapi.lua ( 1.78 килобайт ) Кол-во скачиваний: 387
Прикрепленный файл  MonPorn.lua ( 1.67 килобайт ) Кол-во скачиваний: 136
 


Спасибо сказали:
Go to the top of the page
+Quote Post
skonda
сообщение 25.2.2009, 20:44
Сообщение #2


Продвинутый участник
****

Группа: Пользователи
Сообщений: 136
Регистрация: 16.9.2008
Пользователь №: 545
Спасибо сказали: 1 раз




подскажите, как сделать чтобы этот скрипт выдавал фразы в чат не каждый раз когда ищут XXX porno и тд, а скажем через раз а лучше через два? а то дрочеры весь чат зафлудили )) К тому же так интереснее имхо один набрал в поиске порно и ничего, другой спалился. Подскажите как это реализовать?
Go to the top of the page
+Quote Post
skonda
сообщение 26.2.2009, 12:26
Сообщение #3


Продвинутый участник
****

Группа: Пользователи
Сообщений: 136
Регистрация: 16.9.2008
Пользователь №: 545
Спасибо сказали: 1 раз




P.S. подскажите как сделать, чтобы фраза в чате была видна всем кроме автора этого самого поискового запроса?
Go to the top of the page
+Quote Post
Wariner
сообщение 26.2.2009, 13:38
Сообщение #4


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

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




в принципе можно так
Код
            local numb = math.random (1, 3 )
            if numb == 1 then
                Core.SendToAll(gen2) --ппц короче палево
            end

чем больше интервал указанный в первой строке этого кода local numb = math.random (1, 3 ) тем меньше вероятность появления палева в чате
Go to the top of the page
+Quote Post
skonda
сообщение 26.2.2009, 20:42
Сообщение #5


Продвинутый участник
****

Группа: Пользователи
Сообщений: 136
Регистрация: 16.9.2008
Пользователь №: 545
Спасибо сказали: 1 раз




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

такой уж у нас народ избалованный, чуть начинает палиться сразу сливаються с хаба ((
Go to the top of the page
+Quote Post
Wariner
сообщение 26.2.2009, 21:26
Сообщение #6


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

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




геморно это при большом количестве народу будет хаб нагружать + всё равно спалит какой нибудь знакомый....
Код
function SearchArrival(user,data)
    Core.GetUserAllData(user)
    for i = 1,#Table do
    local s,e,what = string.find(data, "$Search %S+%s%S+?%S+?%S+?%S+?(.*)|")
        if string.find( what , Table[i] , 1 , true ) then
            local gen1 = Table2[math.random(1, #Table2)]    
            local gen2 = string.gsub(gen1, "666", "<"..user.sNick..">")
            local gen2 = string.gsub(gen2, "777", what)
            local gen2 = string.gsub(gen2, "$", " ")
            local numb = math.random (1, 3 )
            if numb == 1 then
                local tUsers = Core.GetOnlineUsers()
                for i,v in pairs(tUsers) do
                    if v.sNick ~= user.sNick then
                        Core.SendToUser(v, gen2) --ппц короче палево
                    end
                end                    
            end
        end
    end
end
Go to the top of the page
+Quote Post
skonda
сообщение 26.2.2009, 23:00
Сообщение #7


Продвинутый участник
****

Группа: Пользователи
Сообщений: 136
Регистрация: 16.9.2008
Пользователь №: 545
Спасибо сказали: 1 раз




спасибо буду пробовать
Go to the top of the page
+Quote Post
yaDroLLL
сообщение 27.2.2009, 1:23
Сообщение #8


Начинающий
*

Группа: Пользователи
Сообщений: 18
Регистрация: 20.2.2009
Пользователь №: 2 287
Спасибо сказали: 1 раз




А у меня ошибка((( (API1)

Syntax ...0.3.5.2.LUA.5.1.1.RUS.by.NRJ\scripts\палево.lua:25: 'then' expected near 'Core'

Это когда я добавляю
CODE
function SearchArrival(user,data)
Core.GetUserAllData(user)
for i = 1,#Table do
local s,e,what = string.find(data, "$Search %S+%s%S+?%S+?%S+?%S+?(.*)|")
if string.find( what , Table[i] , 1 , true ) then
local gen1 = Table2[math.random(1, #Table2)]
local gen2 = string.gsub(gen1, "666", "<"..user.sNick..">")
local gen2 = string.gsub(gen2, "777", what)
local gen2 = string.gsub(gen2, "$", " ")
local numb = math.random (1, 3 )
if numb == 1 then
local tUsers = Core.GetOnlineUsers()
for i,v in pairs(tUsers) do
if v.sNick ~= user.sNick
Core.SendToUser(v, gen2) --ппц короче палево
end
end
end
end
end
end
Go to the top of the page
+Quote Post
Setuper
сообщение 27.2.2009, 1:26
Сообщение #9


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

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




неужели непонятно, что слова then не хватает?
Код
if v.sNick ~= user.sNick then
  Core.SendToUser(v, gen2) --ппц короче палево
end
Go to the top of the page
+Quote Post
skonda
сообщение 27.2.2009, 2:01
Сообщение #10


Продвинутый участник
****

Группа: Пользователи
Сообщений: 136
Регистрация: 16.9.2008
Пользователь №: 545
Спасибо сказали: 1 раз




народ у вас пашет скрипт ? чето ниче в чат не выдает с каких бы IP-ов и ников не искали порнуху.
Go to the top of the page
+Quote Post
Drakula
сообщение 1.3.2009, 22:49
Сообщение #11


PtokaX DC Hub 0.4.1.2
*****

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




Ваще скрипт хороший, но в него нельзя добавить ещё слова для поиска. API2
Go to the top of the page
+Quote Post
Санёк
сообщение 14.3.2009, 20:21
Сообщение #12


Активный участник
***

Группа: Пользователи
Сообщений: 83
Регистрация: 14.3.2009
Из: Belarus', Minsk
Пользователь №: 2 593
Спасибо сказали: 0 раз




Супер! shocked.gif
Go to the top of the page
+Quote Post
yaDroLLL
сообщение 15.3.2009, 15:44
Сообщение #13


Начинающий
*

Группа: Пользователи
Сообщений: 18
Регистрация: 20.2.2009
Пользователь №: 2 287
Спасибо сказали: 1 раз




Цитата(skonda @ 27.2.2009, 2:01) *
народ у вас пашет скрипт ? чето ниче в чат не выдает с каких бы IP-ов и ников не искали порнуху.

у меня тоже самое. Когда я делаю т.к. там написали, чтобы тот кто ищет не видел что он палится в общем чате, вообще не отображает ничего.
Go to the top of the page
+Quote Post
Wariner
сообщение 15.3.2009, 16:14
Сообщение #14


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

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




Это исправление можно вносить только в API 2
Go to the top of the page
+Quote Post
yaDroLLL
сообщение 25.3.2009, 5:06
Сообщение #15


Начинающий
*

Группа: Пользователи
Сообщений: 18
Регистрация: 20.2.2009
Пользователь №: 2 287
Спасибо сказали: 1 раз




Цитата(Wariner @ 26.2.2009, 21:26) *
геморно это при большом количестве народу будет хаб нагружать + всё равно спалит какой нибудь знакомый....

Вообщем заново начну still_dreaming.gif Вот тот код что ты дал, его и заменял, и добавлял к готовому, ни чё не вылазит когда ищут порно. API1. Можно подробнее как сделать можно? confuse.gif
Go to the top of the page
+Quote Post
Wariner
сообщение 25.3.2009, 7:59
Сообщение #16


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

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




2yaDroLLL: ты читать умеешь??? Написано же только для API 2!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Go to the top of the page
+Quote Post
yaDroLLL
сообщение 25.3.2009, 8:59
Сообщение #17


Начинающий
*

Группа: Пользователи
Сообщений: 18
Регистрация: 20.2.2009
Пользователь №: 2 287
Спасибо сказали: 1 раз




я вкурсе!, Но не можешь ли ты сделать на API1 ? baffle.gif
Go to the top of the page
+Quote Post
Setuper
сообщение 25.3.2009, 12:08
Сообщение #18


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

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




http://mydc.ru/topic605.html
Go to the top of the page
+Quote Post
ArthurBlack
сообщение 28.7.2009, 14:30
Сообщение #19


Абсолютный новичок


Группа: Пользователи
Сообщений: 5
Регистрация: 28.7.2009
Из: UA
Пользователь №: 3 989
Спасибо сказали: 0 раз




Кто подскажет, как сделать, чтобы отчёты о поиске приходили не в общак, а в приват опу хаба?
Go to the top of the page
+Quote Post
Артём
сообщение 28.7.2009, 15:48
Сообщение #20


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

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




Цитата(yaDroLLL @ 25.3.2009, 8:59) *
я вкурсе!, Но не можешь ли ты сделать на API1 ? baffle.gif

Вот big_smile.gif Прикрепленный файл  MonPorn.lua ( 1.61 килобайт ) Кол-во скачиваний: 9
Go to the top of the page
+Quote Post

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

Collapse

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

  Тема Ответов Автор Просмотров Последнее сообщение
No New Posts Topic has attachmentsНужно сделать изменение в скрипте Антипорно
Переделать переменную в функцию
5 thehawk 9 719 21.10.2014, 21:23 Посл. сообщение: thehawk
No new Topic has attachmentsАнтипорно
Средство от уродов
36 valdis73 34 752 5.1.2012, 13:43 Посл. сообщение: Enyby
No new Сервер антипорно
Флуд из темы антисерч
15 DEN 007 16 804 8.3.2011, 14:15 Посл. сообщение: mariner
No New Posts От: Антипорно
От темы с ID: 3844
5 переподвыподверт 9 088 17.2.2011, 19:42 Посл. сообщение: SAG
No New Posts Topic has attachmentsАнтипорно
Verlihub
4 Vizunchik 9 849 1.12.2010, 21:44 Посл. сообщение: KT315
No New Posts Topic has attachmentsподредактировать скрипт антипорно для API 1
убрать из общего чата о кикнутых за расшаренные порноресурсы
1 доктор ливси 5 975 12.11.2010, 16:22 Посл. сообщение: Артём
No New Posts Антипорно
5 voronf4 9 686 3.2.2010, 23:10 Посл. сообщение: Evil

 



RSS Сейчас: 27.11.2024, 1:07