Linksniavimas

Sveiki,

norėčiau pasidomėt, gal kažkur, kažkas matėt formulę (funkciją - function), kuri linksniuotų lietuviškas galūnes, tarkim turim taip // reikia taip:

1 komentaras // 2 komentarai // 11 komentarų

(prašau atkreipti dėmesį į 'komentar...' galūnę.

Pats suprantu, kad galima parašyt su, tarkim, end if, bet tiesiog klausiu, gal kažkur tai yra tiksliau parašyta ir pasidalinta?

Dėkoju.

Forumų skriptuose paieškok punbb turėjo jei nesupainiojau kai teko daryti vertimą

/**
    * Chooses correct word form by number
    * 
    * @access public
    * @param integer $number
    * @param string $form1 First word form 'daiktų'
    * @param string $form2 Second word form 'daiktai'
    * @param string $form3 Third word form 'daiktas'
    * @return string Correct number form
    */
function number_word_form($number, $form1, $form2, $form3) {
	$nrend = substr($number, -2);
	if(($nrend <= 20 and $nrend >= 10) or !($number % 10)) {
		return $form1;
	}
	else if(!(($number - 1) % 10)) {
		return $form2;
	}
	return $form3;
}

Dar tuo pačiu, jei reik su vardų kreipiniais, pvz.: Jonas - Jonai, Marius - Mariau ir t.t.

function name_to_talk($name) {
	$length = strlen($name);
	$last_symbols = $name[$length-2] . $name[$length-1];
	$break_name = substr($name, 0, $length - 2);
	switch($last_symbols) {
		case 'as': return ($break_name . 'ai'); break;
		case 'us': return ($break_name . 'au'); break;
		case 'is': return ($break_name . 'i'); break;
		case 'ys': return ($break_name . 'y'); break;
		default:
			if($last_symbols[1] === 'ė') return ($break_name . $last_symbols[0] . 'e');
			return $name;
	}
}