Add(Timer,7084768,98,196)
{
 Interval=50
 link(onTimer,7029483:doCheckMask,[])
}
Add(KeyMask,7029483,168,196)
{
 Key=97
 link(onTrue,11245201:doMessage,[])
}
Add(Message,11245201,238,203)
{
}

Add(Timer,7084768,14,245)
{
 Interval=50
 link(onTimer,14424896:doReadKey,[])
}
Add(Keyboard,14424896,77,245)
{
 Key=17
 link(onReadKey,10889121:doCase,[])
}
Add(Case,10889121,140,245)
{
 Value=Integer(1)
 link(onTrue,11507812:doReadKey,[])
}
Add(Keyboard,11507812,196,252)
{
 link(onReadKey,14950194:doCase,[])
 link(Key,2833220:Value,[])
}
Add(Case,14950194,252,252)
{
 Value=Integer(1)
}
Add(Memory,2833220,196,189)
{
 Default=Integer(97)
}