Add(MainForm,2953706,182,161)
{
 Width=500
 Position=1
 Point(WidthControls)
 Point(HeightControls)
 Point(Width)
 Point(Height)
 link(WidthControls,8172223:GetData,[])
}
Add(EventFromData,8172223,182,98)
{
 link(onEvent,605616:doCase,[])
}
Add(If_else,11730540,287,98)
{
 Type=1
 Op2=Integer(400)
 link(onTrue,16327687:doClear,[])
 link(Op1,2953706:Width,[(293,68)(146,68)(146,194)(188,194)])
}
Add(Case,605616,231,98)
{
 Value=Integer(1)
 link(onNextCase,11730540:doCompare,[])
}
Add(Memory,16327687,336,91)
{
 Default=Integer(0)
 link(onData,8172223:doData,[(375,97)(375,89)(175,89)(175,104)])
}