ring ())
{: «Ключове слово»: +=LexGridView [«lex», i]. Value.ToString () + « »;;« Невідома лексема »:« змінна »:
case «Константа (Строкова)»: «Константа (8-ва)»: +=«E»;; «Знак Закінчення рядка»:
try
{(LexGridView [«lex», i + 1]. Value.ToString () == «}» | | i == LexGridView.RowCount - 2)
{+=«F»;
}
{+=«F S»;// Розбіваємо на символ качана и кінця рядка
}
}
{+=«F»;
}; «Знак Відкриття блоку»: +="{S»;; «Знак Закриття блоку»: (LexGridView [«lex», i + 1]. Value.ToString () == «}»)
{+=«} F»;
}
{+=«} F S»;
};
}
}=SyntText.Replace («ПРОГРАМА», «»);=SyntText.Replace («КІНЕЦЬ», «»);
/ / Згортаємо ті, что в лапках (бо це строкова константа)
/ / Если кількість лапок непарна - згортається все после лапки
int firstIndex, secondIndex; (SyntText.Contains («"" ))
{= SyntText.IndexOf («" »);=SyntText.IndexOf (« " », firstIndex + 1); (secondIndex <0)
{= SyntText.Remove (firstIndex, SyntText.Length - firstIndex);;
}=SyntText.Remove (firstIndex, secondIndex - firstIndex + 1);=SyntText.Insert (firstIndex, «E»);
}. TrimEnd (new Char [] {«»});
/ / згортка умів (Т) (SyntText.Contains («E> E») | | SyntText.Contains («E
{= SyntText.Replace («E> E», «T»);=SyntText.Replace («E
}
/ / згортка Дій № 1 (E математ. опеації) (SyntText.Contains («E + E») | | SyntText.Contains («E - E») | | SyntText.Contains («E * E») | | SyntText.Contains («E=E») | | SyntText.Contains («E / E») | | SyntText.Contains («(E)»))
{= SyntText.Replace («E + E», «E»);=SyntText.Replace («E - E», «E»);=SyntText.Replace ( «E * E», «E»);=SyntText.Replace («E / E», «E»);=SyntText.Replace («E=E», «E»);= SyntText.Replace («(E)», «E»);
}
/ / згортка Дій № 2 (E) (SyntText.Contains («друк E») | | SyntText.Contains («ціле E») | | SyntText.Contains («SE F» ;) | | SyntText.Contains («B B»))
{= SyntText.Replace («друк E», «E»);=SyntText.Replace («ціле E», «E»);=SyntText.Replace (« SE F »,« B »);=SyntText.Replace (« B B »,« B »);
}
/ / згортка Дій № 3 (B блоки) (SyntText.Contains («доки T {B}») | | SyntText.Contains («Якщо T {B}») | | SyntText.Contains («SE F») | | SyntText.Contains («B B»))
{= SyntText.Replace («доки T {B}», «E»);=SyntText.Replace («Якщо T {B}», «E») ;=SyntText.Replace («SE F», «B»);=SyntText.Replace («B B», «B»);
}
/ / ПЕРЕЛІК можливіть синтаксичною помилок:
/ / «має почінатісь словом ПРОГРАМА и закінчуватісь словом КІНЕЦЬ»
if (richTextBox1.Text.IndexOf ...
