Add(MainForm,6812461,441,224)
{
 Width=375
 Height=292
}
Add(Memo,13393225,532,224)
{
 Left=5
 Top=5
 Width=345
 Height=190
 Font=[MS Sans Serif,14,0,0,1]
 Strings=#23:123*42112*43*4564*15*26|0:|
}
Add(Button,9265179,518,301)
{
 Left=15
 Top=215
 Caption="Replase"
 link(onClick,12287762:doReplace,[])
}
Add(Replace,12287762,567,301)
{
 SubStr="*"
 DestStr="+"
 Point(Skip)
 link(onReplace,13393225:doText,[(619,307)(619,217)(520,217)(520,251)])
 link(Str,13393225:Text,[(573,285)(538,285)])
 link(Skip,11020426:reCalc,[])
}
Add(MathParse,11020426,581,252)
{
 DataCount=0
 MathStr="%0 xor 1"
 ResultType=0
 Point(reCalc)
}