function kontrola_formulare(pkomentar) {
if (pkomentar.komentar.value==""){ 
window.alert('Musíte zadat komentář!'); 
return false;
}
if (pkomentar.autor.value==""){ 
window.alert('Musíte zadat Vaše jméno nebo přezdívku!'); 
return false;
}
}

var max_smajl = 0;
function emo(s) {
	max_smajl++;
	if (max_smajl > 10) {
		alert("Nanejvýš 10 smajlíků");
		return;
	}
	document.pkomentar.komentar.value += '`' + s;
	document.pkomentar.komentar.focus();
	return;
}

function filtr() {
	var msg = document.pkomentar.komentar.value;
	match = /kurv| kokot| fab| FAB| Fab| que| hal| fabrique-hall| FABRIQUE-HALL| FABRIQUE| suka| šuka| trtk| kretén| jeba| zjeba| debil| mrda| hovn| prd| piča| piči| kund| pind| čuba| kurva| sračka| sračku| fuck| piss| prick| cunt| penis| fanny| shit| crap| gonad| tosser| kráva| arse|bollock| knob| smeg/.test(msg);
	if (match == true) {
		alert("Zpráva obsahuje nepovolená slova");
		document.pkomentar.komentar.focus();
		return false;
	}
	return true;
}


function prazdnaZprava () {
	var inp = document.pkomentar.komentar.value;
	out = '';
	for (var cnt = 0; cnt < inp.length; cnt++) {
		if (inp.charAt(cnt) != ' ') { out += inp.charAt(cnt); }
	}
	if (out.length < 1) {
		alert ('!!!Zapomněli jste vyplnit text zprávy!!!');
		return false;
	}
	return true;
}


function prazdneJmeno () {
	var inp = document.pkomentar.jmeno;
	var out = '';
	for (var cnt = 0; cnt < inp.value.length; cnt++) {
		if (inp.value.charAt(cnt) != ' ') { out += inp.value.charAt(cnt); }
	}

	if (out.length < 1 ) {
		alert ('!!!Zapomněli jste vyplnit jméno!!!');
		return false;
	}
	return true;
}

function smajl() {
	var ct = 0;
	var inp = document.pkomentar.komentar; 
	for (var cnt = 0; cnt < inp.value.length; cnt++) { 
		if (inp.value.charAt(cnt) == '`') { 
			ct++; 
		}
	}
	if (ct > 10) {
		alert("10 smajlíků max");
		return false;
	}
	return true;
} 

function kontrola() {
	if (!prazdneJmeno() || !prazdnaZprava() || !filtr() || !smajl()) {
		alert('Zpráva nebyla odeslána.');
		return false;
	}
	max_smajl = 0;
	return true;
}