помогите составить блок - схемы

[Langel2214]

нужно составить блок схемы по коду. помогите они нужны срочно, но у меня не получается

1) код расчитывает количество букв, слов, предложений и абзацев тексте

private: System::Void button1_Click(System::Object^  sender, System::EventArgs^  e) {
if (richTextBox1->Text != "")
			{
				int bukv = 0;
				int slov = 0;
				int pred = 0;
				int abzac = 0;
				int schet_slov = 0;
				String^ stroka = "";
				stroka = richTextBox1->Text;
				int n = stroka->Length;
				for (int i = 0; i<n; i++)
						{
							if (System::Char::IsLetter(stroka[i]))
								{bukv++;
								schet_slov++;
							}
							if (!(System::Char::IsLetter(stroka[i])))
							{
								if (schet_slov > 0)
								{slov++;}
								schet_slov = 0;
							}
							if (i==n-1)
							{
							if (System::Char::IsLetter(stroka[i]))
								slov++;
							}
							if (stroka[i] == '.' && System::Char::IsLetter(stroka[i-1]) && System::Char::IsLetter(stroka[i-2]) 
            || stroka[i] == '!' && System::Char::IsLetter(stroka[i-1]) && System::Char::IsLetter(stroka[i-2]) 
            || stroka[i] == '?' && System::Char::IsLetter(stroka[i-1]) && System::Char::IsLetter(stroka[i-2]) )
							{pred++;}
							if (stroka[i] == '\t')
								abzac++;
						}
					textBox1->Text = System::Convert::ToString(bukv);
					textBox2->Text = System::Convert::ToString(slov);
					textBox3->Text = System::Convert::ToString(pred);
					textBox5->Text = System::Convert::ToString(abzac);
				}
			 else {richTextBox1->Text="Введите текст в это поле!";
			 textBox1->Text = "0";
			 textBox2->Text = "0";
			 textBox3->Text = "0";
			 textBox5->Text = "0";
			 }				 
			 }

2) код поиска введённого слова

private: System::Void button2_Click(System::Object^  sender, System::EventArgs^  e) {
		 String^ strokas = "";
			 String^ first = "";
			 String^ verh = "";
			 String^ niz = "";
			 String^ search = "";
			 String^ text = "";
			 String^ slovo = "";
			 int stroka = 0;
			 int schet = 0;
			 search = textBox4->Text;
			 text = richTextBox1->Text;
			 int n = text->Length;
			 int iskomoe_kol = search->Length;
			 if (search!="")
			 {
				 first = search->String::Substring(0,1);
				 verh = first->String::ToUpper() + search->String::Substring(1,iskomoe_kol-1) ;
				 niz = first->String::ToLower() + search->String::Substring(1,iskomoe_kol-1)  ;
				for (int i = 0; i < n; i++)
				{
					if (verh[0] == text[i])
					{
					slovo = text->String::Substring(i,iskomoe_kol);
					if (slovo == verh)
					{
						stroka = richTextBox1->GetLineFromCharIndex(i) + 1;
						strokas = strokas + "_" + System::Convert::ToString(stroka);
						schet++;
					}
					}					
				}
				for (int i = 0; i < n; i++)
				{
					if (niz[0] == text[i])
					{
					slovo = text->String::Substring(i,iskomoe_kol);
					if (slovo == niz)
					{
						stroka = richTextBox1->GetLineFromCharIndex(i) + 1;
						strokas = strokas + "_" + System::Convert::ToString(stroka);
						schet++;
					}
					}					
				}
				if (schet>0)
			 {
			 textBox6->Text ="Найдено " + System::Convert::ToString(schet) + " слов(а)";
			 textBox7->Text ="Найдено на строке(ках): " + strokas;
			 }
			 else {
			  textBox6->Text = "Не найдено!!!";
				   textBox7->Text =  "Не найдено!!!";
			 }
			 }
			 else {textBox6->Text = "Вы не ввели слово!";textBox7->Text = "Вы не ввели слово!";}
			  }

___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE]
(кнопочка на панели форматирования с решёточкой #)
Не забывайте об этом!

Модератор.