| 
	 
	 
Здравствуйте, гость ( Вход | Регистрация )
![]() ![]()  | 
	
 | 
	 
	 
			
			  22.12.2008, 0:21
			
				 Сообщение
					#1
					
				
			 
		 | 
	|
        	
				
					![]() [n00b] ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 291 Регистрация: 10.7.2008 Из: Россия,Пенза Пользователь №: 168 Спасибо сказали: 24 раза  | 
       
			
			 
				Название: MonPorn 
			
			
			
					
		Автор: c00Lo Версия: ? Версия API: 1&2 Язык: Русский Описание: Антипорно. При поиске запрешенных слов, в чате появляется уведомление о том,что ктото ищет порнуху 
	Прикрепленные файлы
	 
 
 MonPorn_newapi.lua ( 1.78 килобайт )
Кол-во скачиваний: 387 
 MonPorn.lua ( 1.67 килобайт )
Кол-во скачиваний: 136 | 
	
| 
			
			 | 
	|
			
			  25.2.2009, 20:44
			
				 Сообщение
					#2
					
				
			 
		 | 
	|
        	
				
					![]() Продвинутый участник ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 136 Регистрация: 16.9.2008 Пользователь №: 545 Спасибо сказали: 1 раз  | 
       
			
			 
				подскажите, как сделать чтобы этот скрипт выдавал фразы в чат не каждый раз когда ищут XXX porno и тд, а скажем через раз а лучше через два? а то дрочеры весь чат зафлудили )) К тому же так интереснее имхо один набрал в поиске порно и ничего, другой спалился. Подскажите как это реализовать?
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  26.2.2009, 12:26
			
				 Сообщение
					#3
					
				
			 
		 | 
	|
        	
				
					![]() Продвинутый участник ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 136 Регистрация: 16.9.2008 Пользователь №: 545 Спасибо сказали: 1 раз  | 
       
			
			 
				P.S. подскажите как сделать, чтобы фраза в чате была видна всем кроме автора этого самого поискового запроса?
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  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 ) тем меньше вероятность появления палева в чате  | 
	
| 
			
			 | 
	|
			
			  26.2.2009, 20:42
			
				 Сообщение
					#5
					
				
			 
		 | 
	|
        	
				
					![]() Продвинутый участник ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 136 Регистрация: 16.9.2008 Пользователь №: 545 Спасибо сказали: 1 раз  | 
       
			
			 
				А как сделать чтобы палево в чате видели все, кроме того кто пробил в поиске порно и спалился ?  
			
			
			
					
		такой уж у нас народ избалованный, чуть начинает палиться сразу сливаються с хаба ((  | 
	
| 
			
			 | 
	|
			
			  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  | 
	
| 
			
			 | 
	|
			
			  26.2.2009, 23:00
			
				 Сообщение
					#7
					
				
			 
		 | 
	|
        	
				
					![]() Продвинутый участник ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 136 Регистрация: 16.9.2008 Пользователь №: 545 Спасибо сказали: 1 раз  | 
       
			
			 
				спасибо буду пробовать
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  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  | 
	
| 
			
			 | 
	|
			
			  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  | 
	
| 
			
			 | 
	|
			
			  27.2.2009, 2:01
			
				 Сообщение
					#10
					
				
			 
		 | 
	|
        	
				
					![]() Продвинутый участник ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 136 Регистрация: 16.9.2008 Пользователь №: 545 Спасибо сказали: 1 раз  | 
       
			
			 
				народ у вас пашет скрипт ? чето ниче в чат не выдает с каких бы IP-ов и ников не искали порнуху.
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  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
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  14.3.2009, 20:21
			
				 Сообщение
					#12
					
				
			 
		 | 
	|
        	
				
					![]() Активный участник ![]() ![]() ![]() Группа: Пользователи Сообщений: 83 Регистрация: 14.3.2009 Из: Belarus', Minsk Пользователь №: 2 593 Спасибо сказали: 0 раз  | 
       
			
			 
				Супер!   
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  15.3.2009, 15:44
			
				 Сообщение
					#13
					
				
			 
		 | 
	|
        	
				
					![]() Начинающий ![]() Группа: Пользователи Сообщений: 18 Регистрация: 20.2.2009 Пользователь №: 2 287 Спасибо сказали: 1 раз  | 
       |
| 
			
			 | 
	|
			
			  15.3.2009, 16:14
			
				 Сообщение
					#14
					
				
			 
		 | 
	|
        	
				
					![]() Самый главный активист :-D ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 2 790 Регистрация: 29.6.2008 Из: г. Тула Пользователь №: 97 Спасибо сказали: 440 раз  | 
       
			
			 
				Это исправление можно вносить только в API 2
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  25.3.2009, 5:06
			
				 Сообщение
					#15
					
				
			 
		 | 
	|
        	
				
					![]() Начинающий ![]() Группа: Пользователи Сообщений: 18 Регистрация: 20.2.2009 Пользователь №: 2 287 Спасибо сказали: 1 раз  | 
       |
| 
			
			 | 
	|
			
			  25.3.2009, 7:59
			
				 Сообщение
					#16
					
				
			 
		 | 
	|
        	
				
					![]() Самый главный активист :-D ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 2 790 Регистрация: 29.6.2008 Из: г. Тула Пользователь №: 97 Спасибо сказали: 440 раз  | 
       
			
			 
				2yaDroLLL: ты читать умеешь??? Написано же только для API 2!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  25.3.2009, 8:59
			
				 Сообщение
					#17
					
				
			 
		 | 
	|
        	
				
					![]() Начинающий ![]() Группа: Пользователи Сообщений: 18 Регистрация: 20.2.2009 Пользователь №: 2 287 Спасибо сказали: 1 раз  | 
       
			
			 
				я вкурсе!, Но не можешь ли ты сделать на API1 ?   
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  25.3.2009, 12:08
			
				 Сообщение
					#18
					
				
			 
		 | 
	|
| 
        	
				
					 RusHub team lead ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 030 Регистрация: 20.6.2008 Из: г. Королёв (Моск. обл.) Пользователь №: 46 Спасибо сказали: 1708 раз  | 
       |
| 
			
			 | 
	|
			
			  28.7.2009, 14:30
			
				 Сообщение
					#19
					
				
			 
		 | 
	|
        	
				
					![]() Абсолютный новичок Группа: Пользователи Сообщений: 5 Регистрация: 28.7.2009 Из: UA Пользователь №: 3 989 Спасибо сказали: 0 раз  | 
       
			
			 
				Кто подскажет, как сделать, чтобы отчёты о поиске приходили не в общак, а в приват опу хаба?
				
				
				
			 
			
			
			
					
		 | 
	
| 
			
			 | 
	|
			
			  28.7.2009, 15:48
			
				 Сообщение
					#20
					
				
			 
		 | 
	|
        	
				
					![]() Наруто на аваторке ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 2 606 Регистрация: 11.10.2008 Из: Харькова Пользователь №: 771 Спасибо сказали: 774 раза  | 
       
			
			 я вкурсе!, Но не можешь ли ты сделать на API1 ?   Вот  
 MonPorn.lua ( 1.61 килобайт )
Кол-во скачиваний: 9 | 
	
| 
			
			 | 
	|
![]() ![]()  | 
	
 Похожие темы
| Тема | Ответов | Автор | Просмотров | Последнее сообщение | |
|---|---|---|---|---|---|
![]()  | 
	  Переделать переменную в функцию  | 
	5 | thehawk | 10 663 | 21.10.2014, 21:23 Посл. сообщение: thehawk | 
![]()  | 
	  Средство от уродов  | 
	36 | valdis73 | 38 653 | 5.1.2012, 13:43 Посл. сообщение: Enyby | 
![]()  | 
	 Сервер антипорно Флуд из темы антисерч  | 
	15 | DEN 007 | 18 912 | 8.3.2011, 14:15 Посл. сообщение: mariner | 
![]()  | 
	 От: Антипорно От темы с ID: 3844  | 
	5 | переподвыподверт | 10 196 | 17.2.2011, 19:42 Посл. сообщение: SAG | 
![]()  | 
	  Verlihub  | 
	4 | Vizunchik | 10 713 | 1.12.2010, 21:44 Посл. сообщение: KT315 | 
![]()  | 
	  убрать из общего чата о кикнутых за расшаренные порноресурсы  | 
	1 | доктор ливси | 6 557 | 12.11.2010, 16:22 Посл. сообщение: Артём | 
![]()  | 
	Антипорно | 5 | voronf4 | 10 601 | 3.2.2010, 23:10 Посл. сообщение: Evil | 
 
 | 
Сейчас: 4.11.2025, 15:30 |