Разработка синтаксического анализатора по автоматной грамматике языка цепочек условного оператора языка программирования FORTRAN 77

                                        richTextBox1.Focus();

                                        richTextBox1.SelectionStart = pos[k];

                                        return;

                                    }

                                }

                                else if (str2[j] == "call" || str2[j] == "format" || str2[j] == "for" || str2[j] == "to")

                                {

                                    label1.Text = "идентификаторы не должны совпадать \n с зарезервированными словами: CALL,\n FORMAT, FOR, TO";

                                    richTextBox1.Focus();

                                    richTextBox1.SelectionStart = pos[j];

                                    return;

                                }

                            }

                        }

                    }

                    label1.Text = "строка принадлежит языку"; b = true;

                }

              }

        }

        private void семантикаToolStripMenuItem_Click(object sender, EventArgs e)

        {

            if (b == false) { label1.Text = "невозможно вывести семантику. \nСтрока не принадлежит языку"; }

            else

            {

                this.Width = 900;

                label9.Text = "таблица идентификаторов";    label10.Text = "таблица констант";   label2.Text = "номер\n";                label3.Text = "имя\n";  label4.Text = "вид\n";    label5.Text = "номер\n";    label6.Text = "имя\n";  label7.Text = "вид\n";                label8.Text = "тип\n";

                string[] str1 = s.Split(new Char[] { ' ', ')', '(', ',' });

                str2 = new string[str1.Length];

                j = 0;

                for (int k = 0; k < str1.Length; k++)

                {

                    if (str1[k] != "" && k!=str1.Length)

                    {

                        str2[j] = str1[k];

                        j++;

                    }

                }

                richTextBox1.Enabled = false;

                button1.Enabled = false;

                j = 1;

                for (int k = 1; k < znach.Length; k++)

                {

                    if (str2[k]!=null)

                    {

                        if (Char.IsDigit(str2[k][0]) || str2[k][0] == '+' || str2[k][0] == '-')

                        {

                            if (znach[k]=="константа")

                            {

                                label5.Text += j +"\n";

                                label6.Text += str2[k] + "\n";

                                label7.Text += znach[k] + "\n";

                                label8.Text+=tip[k]+"\n";

                                j++;

                            }

                            else if (znach[k] == "индекс")

                            {

                                label5.Text += "--\n";

                                label6.Text += str2[k] + "\n";

                                label7.Text += znach[k] + "\n";

                                label8.Text += tip[k] + "\n";

                            }

                        }

                        else if (Char.IsLetter(str2[k][0])==true)

                        {

                            if (znach[k] == "идентификатор" || znach[k] == "массив")

                            {

                                label2.Text += j + "\n";

                                label3.Text += str2[k] + "\n";

                                label4.Text+=znach[k]+"\n";

                                j++;

                            }

                            else if (znach[k] == "индекс" || znach[k] == "имя процедуры")

                            {

                                label2.Text += "--\n";

                                label3.Text += str2[k] + "\n";

                                label4.Text += znach[k] + "\n";

                            }

                        }

                     }

                    else break;

                }

            }

        }

    }

}