Add(KeyHook,11112430,308,266)
{
 Point(doKillKey)
 link(onKeyDown,11037999:doWork1,[(375,272)])
 link(onRepeat,11037999:doWork2,[])
}
Add(KeyEvent,16277678,616,259)
{
 link(Handle,11112430:Handle,[(622,230)(717,230)(717,310)(314,310)])
}
Add(Memo,3824179,672,245)
{
 Left=10
 Top=10
 Width=370
}
Add(StrList,2253040,399,238)
{
 Strings=#2:65|2:87|2:68|2:83|
 Point(doGetIndex)
 Point(onGetIndex)
 link(onGetIndex,7385370:doCase,[])
}
Add(StrList,1069414,546,238)
{
 Strings=#2:70|2:84|2:72|2:71|
 Point(doGetString)
 Point(onGetString)
 Point(String)
 link(onGetString,16277678:doPress,[(597,251)(597,265)])
}
Add(Hub,827145,504,245)
{
 link(onEvent1,1497397:doWork2,[(529,251)(529,230)(240,230)(240,279)])
 link(onEvent2,1069414:doGetString,[(529,258)(529,286)])
}
Add(ChanelToIndex,1497397,252,266)
{
 link(onIndex,11112430:doKillKey,[])
}
Add(HubEx,11037999,371,280)
{
 link(onEvent,2253040:doGetIndex,[])
}
Add(Case,7385370,455,245)
{
 Value=Integer(-1)
 link(onNextCase,827145:doEvent1,[])
}