swear.php

<?php

function register_swear() {
	global $dics;
          
	$dics = array_merge($dics, array(
		"@swear" => "bot_resp_swear",
	));
}

function bot_resp_swear($word, $strong = true) {
	$word = trim($word);

	if (empty($word))
		return false;

	$dic = array (
		'архипиздрит' => 'архипиздрит',
		'басран' => 'басран',
		'бздение' => 'бздение',
		'бздеть' => 'бздеть',
		'бздех' => 'бздех',
		'бзднуть' => 'бзднуть',
		'бздун' => 'бздун',
		'бздунья' => 'бздунья',
		'бздюха' => 'бздюха',
		'бикса' => 'бикса',
		'блежник' => 'блежник',
		'блудилище' => 'блудилище',
		'бляд' => 'бляд',
		'блябу' => 'блябу',
		'блябуду' => 'блябуду',
		'блядун' => 'блядун',
		'блядунья' => 'блядунья',
		'блядь' => 'блядь',
		'блять' => 'блять',
		'блядюга' => 'блядюга',
		'взьебка' => 'взьебка',
		'волосянка' => 'волосянка',
		'взьебывать' => 'взьебывать',
		'взъебывать' => 'взъебывать',
		'выблядок' => 'выблядок',
		'выблядыш' => 'выблядыш',
		'выебать' => 'выебать',
		'выеть' => 'выеть',
		'выпердеть' => 'выпердеть',
		'высраться' => 'высраться',
		'выссаться' => 'выссаться',
		'говенка' => 'говенка',
		'говенный' => 'говенный',
		'говешка' => 'говешка',
		'говназия' => 'говназия',
		'говнецо' => 'говнецо',
		'говно' => 'говно',
		'говноед' => 'говноед',
		'говночист' => 'говночист',
		'говнюк' => 'говнюк',
		'говнюха' => 'говнюха',
		'говнядина' => 'говнядина',
		'говняк' => 'говняк',
		'говняный' => 'говняный',
		'говнять' => 'говнять',
		'гондон' => 'гондон',
		'дермо' => 'дермо',
		'долбоеб' => 'долбоеб',
		'дрисня' => 'дрисня',
		'дрист' => 'дрист',
		'дристать' => 'дристать',
		'дристануть' => 'дристануть',
		'дристун' => 'дристун',
		'дристуха' => 'дристуха',
		'дрочена' => 'дрочена',
		'дрочила' => 'дрочила',
		'дрочилка' => 'дрочилка',
		'дрочить' => 'дрочить',
		'дрочка' => 'дрочка',
		'ебало' => 'ебало',
		'ебальник' => 'ебальник',
		'ебануть' => 'ебануть',
		'ебаный' => 'ебаный',
		'ебаная' => 'ебаная',
		'ебарь' => 'ебарь',
		'ебатория' => 'ебатория',
		'ебать' => 'ебать',
		'ебаться' => 'ебаться',
		'ебец' => 'ебец',
		'ебливый' => 'ебливый',
		'ебля' => 'ебля',
		'ебло' => 'ебло',
		'ебнуть' => 'ебнуть',
		'ебнуться' => 'ебнуться',
		'ебнутый' => 'ебнутый',
		'ебня' => 'ебня',
		'ебун' => 'ебун',
		'ебучий' => 'ебучий',
		'ебучая' => 'ебучая',
		'елда' => 'елда',
		'елдак' => 'елдак',
		'елдачить' => 'елдачить',
		'заговнять' => 'заговнять',
		'задристать' => 'задристать',
		'задрока' => 'задрока',
		'заеба' => 'заеба',
		'заебанец' => 'заебанец',
		'заебать' => 'заебать',
		'заебаться' => 'заебаться',
		'заебываться' => 'заебываться',
		'заеть' => 'заеть',
		'залупа' => 'залупа',
		'залупаться' => 'залупаться',
		'залупить' => 'залупить',
		'залупиться' => 'залупиться',
		'замудохаться' => 'замудохаться',
		'засерун' => 'засерун',
		'засеря' => 'засеря',
		'засерать' => 'засерать',
		'засирать' => 'засирать',
		'засранец' => 'засранец',
		'засрун' => 'засрун',
		'захуячить' => 'захуячить',
		'злоебучий' => 'злоебучий',
		'изговнять' => 'изговнять',
		'изговняться' => 'изговняться',
		'кляпыжиться' => 'кляпыжиться',
		'козлина' => 'козлина',
		'курва' => 'курва',
		'курвенок' => 'курвенок',
		'курвин' => 'курвин',
		'курвяжник' => 'курвяжник',
		'курвяжница' => 'курвяжница',
		'курвяжный' => 'курвяжный',
		'манда' => 'манда',
		'мандавошка' => 'мандавошка',
		'мандей' => 'мандей',
		'мандеть' => 'мандеть',
		'мандища' => 'мандища',
		'мандюк' => 'мандюк',
		'мать твою' => 'мать твою',
		'мать его' => 'мать его',
		'минет' => 'минет',
		'минетчик' => 'минетчик',
		'минетчица' => 'минетчица',
		'мокрохвостка' => 'мокрохвостка',
		'мокрощелка' => 'мокрощелка',
		'мудак' => 'мудак',
		'муде' => 'муде',
		'мудеть' => 'мудеть',
		'мудила' => 'мудила',
		'мудистый' => 'мудистый',
		'мудня' => 'мудня',
		'мудоеб' => 'мудоеб',
		'мудозвон' => 'мудозвон',
		'муйня' => 'муйня',
		'набздеть' => 'набздеть',
		'наговнять' => 'наговнять',
		'надристать' => 'надристать',
		'надрочить' => 'надрочить',
		'наебать' => 'наебать',
		'наебнуться' => 'наебнуться',
		'наебывать' => 'наебывать',
		'нассать' => 'нассать',
		'нахезать' => 'нахезать',
		'нахуйник' => 'нахуйник',
		'насцать' => 'насцать',
		'обдристаться' => 'обдристаться',
		'обосранец' => 'обосранец',
		'обосрать' => 'обосрать',
		'обосцать' => 'обосцать',
		'обосцаться' => 'обосцаться',
		'обсирать' => 'обсирать',
		'опизде' => 'опизде',
		'отпиздячить' => 'отпиздячить',
		'отпороть' => 'отпороть',
		'отъеть' => 'отъеть',
		'охуевательский' => 'охуевательский',
		'охуевать' => 'охуевать',
		'охуевающий' => 'охуевающий',
		'охуеть' => 'охуеть',
		'охуительный' => 'охуительный',
		'охуячивать' => 'охуячивать',
		'охуячить' => 'охуячить',
		'педрик' => 'педрик',
		'педрила' => 'педрила',
		'педрило' => 'педрило',
		'пердеж' => 'пердеж',
		'пердение' => 'пердение',
		'пердеть' => 'пердеть',
		'пердильник' => 'пердильник',
		'перднуть' => 'перднуть',
		'пердун' => 'пердун',
		'пердунец' => 'пердунец',
		'пердунина' => 'пердунина',
		'пердунья' => 'пердунья',
		'пердуха' => 'пердуха',
		'пердь' => 'пердь',
		'передок' => 'передок',
		'пернуть' => 'пернуть',
		'пидор' => 'пидор',
		'пизда' => 'пизда',
		'пиздануть' => 'пиздануть',
		'пизденка' => 'пизденка',
		'пиздеть' => 'пиздеть',
		'пиздить' => 'пиздить',
		'пиздища' => 'пиздища',
		'пиздобратия' => 'пиздобратия',
		'пиздоватый' => 'пиздоватый',
		'пиздорванец' => 'пиздорванец',
		'пиздорванка' => 'пиздорванка',
		'пиздострадатель' => 'пиздострадатель',
		'пиздо' => 'пиздо',
		'пиздун' => 'пиздун',
		'пиздюга' => 'пиздюга',
		'пиздюк' => 'пиздюк',
		'пиздячить' => 'пиздячить',
		'писять' => 'писять',
		'питишка' => 'питишка',
		'плеха' => 'плеха',
		'подговнять' => 'подговнять',
		'подъебнуться' => 'подъебнуться',
		'поебать' => 'поебать',
		'поеть' => 'поеть',
		'попысать' => 'попысать',
		'посрать' => 'посрать',
		'поставить' => 'поставить',
		'поцоватый' => 'поцоватый',
		'презерватив' => 'презерватив',
		'проблядь' => 'проблядь',
		'проебать' => 'проебать',
		'промандеть' => 'промандеть',
		'промудеть' => 'промудеть',
		'пропиздеть' => 'пропиздеть',
		'пропиздячить' => 'пропиздячить',
		'пысать' => 'пысать',
		'разъеба' => 'разъеба',
		'разъебай' => 'разъебай',
		'распиздай' => 'распиздай',
		'распиздеться' => 'распиздеться',
		'распиздяй' => 'распиздяй',
		'распроеть' => 'распроеть',
		'растыка' => 'растыка',
		'сговнять' => 'сговнять',
		'секель' => 'секель',
		'серун' => 'серун',
		'серька' => 'серька',
		'сика' => 'сика',
		'сикать' => 'сикать',
		'сикель' => 'сикель',
		'сирать' => 'сирать',
		'сирывать' => 'сирывать',
		'скурвиться' => 'скурвиться',
		'скуреха' => 'скуреха',
		'скурея' => 'скурея',
		'скуряга' => 'скуряга',
		'скуряжничать' => 'скуряжничать',
		'спиздить' => 'спиздить',
		'срака' => 'срака',
		'сраный' => 'сраный',
		'сранье' => 'сранье',
		'срать' => 'срать',
		'срун' => 'срун',
		'ссака' => 'ссака',
		'ссаки' => 'ссаки',
		'ссать' => 'ссать',
		'старпер' => 'старпер',
		'струк' => 'струк',
		'суходрочка' => 'суходрочка',
		'сцавинье' => 'сцавинье',
		'сцака' => 'сцака',
		'сцаки' => 'сцаки',
		'сцание' => 'сцание',
		'сцать' => 'сцать',
		'сциха' => 'сциха',
		'сцуль' => 'сцуль',
		'сцыха' => 'сцыха',
		'сыкун' => 'сыкун',
		'титечка' => 'титечка',
		'титечный' => 'титечный',
		'титка' => 'титка',
		'титочка' => 'титочка',
		'титька' => 'титька',
		'трипер' => 'трипер',
		'триппер' => 'триппер',
		'уеть' => 'уеть',
		'усраться' => 'усраться',
		'усцаться' => 'усцаться',
		'ублюдок' => 'ублюдок',
		'фик' => 'фик',
		'фуй' => 'фуй',
		'хезать' => 'хезать',
		'хер' => 'хер',
		'херня' => 'херня',
		'херовина' => 'херовина',
		'херовый' => 'херовый',
		'хитрожопый' => 'хитрожопый',
		'хлюха' => 'хлюха',
		'хуевина' => 'хуевина',
		'хуевый' => 'хуевый',
		'хуек' => 'хуек',
		'хуепромышленник' => 'хуепромышленник',
		'хуерик' => 'хуерик',
		'хуесос' => 'хуесос',
		'хуище' => 'хуище',
		'хуй' => 'хуй',
		'хуйня' => 'хуйня',
		'хуйрик' => 'хуйрик',
		'хуякать' => 'хуякать',
		'хуякнуть' => 'хуякнуть',
		'целка' => 'целка',
		'шлюха' => 'шлюха',
	);

	$chunks = split_chanks($word);

	foreach ($chunks as $chunk) {
		if (isset($dic[$chunk]))
			return $dic[$chunk];

		foreach ($dic as $key => $val) {
			if (strstr($chunk, $key))
				return $val;
		}
	}
                
	return false;
}
?>