Ответ

Никита Козин 19.06.2005 07:54

@format[params][type]
$type[^switch[$params.gost]{
	^case[1]{$gost}
	^case[DEFAULT]{$eng}
}]
$result[^params.text.replace[$type]]

^if(def $params.string){
	$result[^result.match[^if(^params.string.int(0)){'}{\s}][g]{_}]
}

# Соответственно вызов:
^translit:format[
	$.text[Вася Петров Шьявлев Эмолъволяновь]
	$.gost(1)
	$.string(1)
]