Прокомментируйте маленький код

[sektor2011]

//Запрещаем вводить буквы 
	    // огранничиваем выводить символ ','
			String ^tmp = pole->Text->Trim();
			String ^outS = String::Empty;
			bool zapyataya = true;
			bool _minus = true;
			for each (Char ch in tmp)
				if (Char::IsDigit(ch) || (ch == ',' && zapyataya)||(ch=='-'&&_minus))
				{
					outS += ch;
					if (ch == ',')
						zapyataya = false;
					else if(ch=='-')
						_minus=false;
					
				}


			pole->Text = outS;
			pole->SelectionStart = outS->Length;
		 }