Антимат непашет как надо...

Форумы Между деломАнтимат непашет как надо... ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 632

Рейтинг: 16

#1: 2006-09-27 13:30:22 ЛС | профиль | цитата

Делаю к программе чату антимат...

Пишу:
верблюд [заменяет на] <мат>
заверблюдить [заменяет на] за<мат>ить
лось [заменяет на] <мат>
заверблюдить [заменяет на] заверблюдить (несрабатывает)

У меня два вопроса:
как удерживать фокус на всех матерных словах с заменой на слово <мат>?
как удалять приставки и окончания к матерному слову от и до пробела?

пока все

code_326

карма: 0

файлы: 1

code_326.txt [1.2KB] [414]

Google vip	#1.1контекстная реклама от партнеров

Ответов: 8890

Рейтинг: 823

#2: 2006-09-27 21:15:02 ЛС | профиль | цитата

Geka, вот схемка, она не пропустит, но может исключить и подходящие слова:
code_339

ещё вариант - поставить последовательно несколько BlockFind в каждом из которых по одному заменяемому слову ("Слов немного, пять иль шесть, зато какие комбинации!" А. Иванов), поэтому несколько - не менее 1000

карма: 19

файлы: 1

code_339.txt [2.2KB] [493]

Ответов: 3655

Рейтинг: 69

#3: 2006-09-27 21:19:30 ЛС | профиль | цитата

Леонид,

поэтому несколько - не менее 1000

Добрый дядя

карма: 0

Ответов: 632

Рейтинг: 16

#4: 2006-09-29 15:46:48 ЛС | профиль | цитата

Леонид, спасибо, буду разбиратся...
Вячеслав, доброта спасет мир (великие слова)

карма: 0

Ответов: 1305

Рейтинг: 29

#5: 2006-09-29 19:07:06 ЛС | профиль | цитата

Geka, это про красоту говорили

карма: 0

Ответов: 632

Рейтинг: 16

#6: 2006-09-29 19:48:36 ЛС | профиль | цитата

v258, это мое определение ИМХО

карма: 0

Ответов: 1305

Рейтинг: 29

#7: 2006-09-29 21:45:04 ЛС | профиль | цитата

Geka писал(а):

(великие слова)

карма: 0

Ответов: 88

Рейтинг: 1

#8: 2006-10-08 04:01:14 ЛС | профиль | цитата

а исчо можно файлик поиметь от ботов из IRC сетей, там много матных словей в списке

добавит в стринговый компонент, правда как это отразится на скорости, вот вопрос

карма: 1

Ответов: 632

Рейтинг: 16

#9: 2006-10-09 17:20:09 ЛС | профиль | цитата

еще вопрос,
как зделать подсчет букв и выдавать сообщение об ошибке при тексте более чем 130 символов?

и плюс интервал между отправкой текста 30 секунд?

карма: 0

Ответов: 262

Рейтинг: 6

#10: 2006-10-09 17:35:06 ЛС | профиль | цитата

Geka, подсчет букв

Add(Length,10641934,189,301)
{
 link(onLength,11967054:doCompare,[])
}
Add(Edit,15322479,133,301)
{
 Left=15
 Top=35
 Width=385
 Text=""
 link(onChange,10641934:doLength,[])
}
Add(Message,6277755,294,301)
{
}
Add(If_else,11967054,238,301)
{
 Type=2
 Op2=Integer(130)
 link(onTrue,6277755:doMessage,[])
}

карма: 0

Ответов: 655

Рейтинг: 0

#11: 2006-10-09 18:06:08 ЛС | профиль | цитата

для memo
code_408

[size=-2]------ Добавлено в 18:06
Задержка 3 сек
code_409

карма: 0

файлы: 2

code_408.txt [906B] [259], code_409.txt [499B] [306]

Форумы Между деломАнтимат непашет как надо... ← Ctrl1Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)