Пока изменил так...

BeaVe 19.06.2005 10:21

@format[params][type]
$type[^switch[$params.type]{
	^case[GOST]{$gost}
	^case[DEFAULT]{$eng}
}]
$result[^params.text.replace[$type]]
^if(def $params.string){
	$result[^result.match[^if($string eq "s"){'}{\s}][g]{_}]
}

Т.к. будут ещё добавления, решил изменить таким образом.

Вызов.

^transliter:format[
	$.text[Вася Петров Шьявлев Эмолъволяновь]
	$.type[GOST]
	$.string[s]
]

---