Function xlate_string

extlibs/soloud/src/audiosource/speech/tts.cpp:1264–1421

int xlate_string(const char *string, darray *phone)
{
	int nph = 0;
	const char *s = string;
	char ch;

	while (isspace(ch = *s))
		s++;

	while ((ch = *s))
	{
		const char *word = s;

		if (isalpha(ch))
		{
			while (isalpha(ch = *s) || ((ch == '\'' || ch == '-' || ch == '.') && isalpha(s[1])))
			{
				s++;
			}

			if (!ch || isspace(ch) || ispunct(ch) || (isdigit(ch) && !suspect_word(word, (int)(s - word))))
			{
				nph += xlate_word(word, (int)(s - word), phone);
			}
			else
			{
				while ((ch = *s) && !isspace(ch) && !ispunct(ch))
				{
					s++;
				}

				nph += spell_out(word, (int)(s - word), phone);
			}
		}
		else
		{
			if (isdigit(ch) || (ch == '-' && isdigit(s[1])))
			{
				int sign = (ch == '-') ? -1 : 1;
				int value = 0;

				if (sign < 0)
				{
					ch = *++s;
				}

				while (isdigit(ch = *s))
				{
					value = value * 10 + ch - '0';
					s++;
				}

				if (ch == '.' && isdigit(s[1]))
				{
					word = ++s;
					nph += xlate_cardinal(value * sign, phone);
					nph += xlate_string("point", phone);