rendered paste body function VowelChange($word) // vowel change, astevaihtelu { global $vowels; $changeconsonants = Array("k", "p", "t"); for ($i = 2; $i <= 4; $i++){ $changeletter = substr($word, -$i, 1); if (in_array($changeletter, $changeconsonants)){ $changeletter = str_replace(k, K, $changeletter); $changeletter = str_replace(p, P, $changeletter); $changeletter = str_replace(t, T, $changeletter); $word = substr($word, 0, strlen($word)-$i) . $changeletter . substr($word, -$i+1); break; } } echo "Word with marked vowel change: " . $word . "<br>"; foreach ($vowels as $vKv) { $word = str_replace($vKv . "aKa", $vKv . "a'a", $word); $word = str_replace($vKv . "eKe", $vKv . "e'e", $word); $word = str_replace($vKv . "iKi", $vKv . "i'i", $word); $word = str_replace($vKv . "oKo", $vKv . "o'o", $word); $word = str_replace($vKv . "uKu", $vKv . "u'u", $word); $word = str_replace($vKv . "yKy", $vKv . "y'y", $word); $word = str_replace($vKv . "äKä", $vKv . "ä'ä", $word); $word = str_replace($vKv . "öKö", $vKv . "ö'ö", $word); } $word = str_replace("uKu", "uvu", $word); $word = str_replace("yKy", "yvy", $word); $word = str_replace("hKe", "hje", $word); $word = str_replace("lKe", "lje", $word); $word = str_replace("rKe", "rje", $word); $word = str_replace("lK", "l", $word); $word = str_replace("nK", "ng", $word); $word = str_replace("rK", "r", $word); $word = str_replace("kK", "k", $word); $word = str_replace("lK", "l", $word); $word = str_replace("K", "", $word); $word = str_replace("lP", "lv", $word); $word = str_replace("mP", "mm", $word); $word = str_replace("rP", "rv", $word); $word = str_replace("pP", "p", $word); $word = str_replace("P", "v", $word); $word = str_replace("hT", "hd", $word); $word = str_replace("nT", "nn", $word); $word = str_replace("lT", "ll", $word); $word = str_replace("rT", "rr", $word); $word = str_replace("tT", "t", $word); $word = str_replace("T", "d", $word); return $word; }