Add(MainForm,12188145,252,238)
{
 Width=288
 Height=166
}
Add(Keyboard,14030189,252,196)
{
 Key=39
 link(onReadKey,11683692:doData,[])
}
Add(Label,2320462,427,203)
{
 Left=145
 Top=55
 Width=10
 Height=17
 Caption="0"
}
Add(Timer,13807707,196,196)
{
 Interval=25
 link(onTimer,14030189:doReadKey,[])
}
Add(Case,4749895,357,196)
{
 Value=Integer(1)
 DataOnTrue=Integer(60)
 link(onNextCase,6184956:doWork1,[(410,202)])
 link(onTrue,6184956:doWork2,[])
}
Add(HubEx,6184956,406,203)
{
 link(onEvent,2320462:doText,[])
}
Add(ChangeMon,11683692,301,196)
{
 link(onData,4749895:doCase,[])
}