Add(MainForm,12286980,189,91)
{
 Left=20
 Top=105
}
Add(StrCat,14513383,301,147)
{
 link(onStrCat,7857746:doCase,[])
 link(Str1,8047897:Value,[])
}
Add(Memory,8047897,301,98)
{
 Default=String()
 Point(Data)
 link(Data,14513383:Result,[(307,86)(295,86)(295,191)(307,191)])
}
Add(Case,7857746,364,147)
{
 Value=String( )
 link(onNextCase,8047897:doValue,[(408,153)(408,80)(286,80)(286,104)])
 link(onTrue,8047897:doClear,[(418,160)(418,71)(274,71)(274,111)])
}