Make(delphi)
ver(4.04 build 184)
Add(MainForm,2953706,21,105)
{
}
Add(KeyboardLayout,871028,91,175)
{
}
Add(KeyHook,8698011,21,259)
{
 link(onKeyDown,13266315:doCompare,[])
}
Add(Beep,14978995,280,56)
{
}
Add(If_else,9812411,168,315)
{
 Op2=Integer(13)
 link(onTrue,10093856:doBeep,[(230,321)(230,405)])
 link(onFalse,14978995:doBeep,[(233,328)(233,62)])
}
Add(Beep,10093856,273,399)
{
 Duration=200
}
Add(If_else,13266315,105,259)
{
 Op1=Integer(409)
 link(onTrue,9812411:doCompare,[(153,265)(153,321)])
 link(onFalse,13745490:doCompare,[(142,272)(142,552)])
 link(Op2,12866551:Var,[])
}
Add(Debug,12866551,112,224)
{
 link(Data,871028:CurrentKbd,[(118,222)(97,222)])
}
Add(Beep,14658968,245,504)
{
 Freq=300
 Duration=500
}
Add(If_else,13745490,147,546)
{
 Op2=Integer(13)
 link(onTrue,4385242:doBeep,[(209,552)(209,573)])
 link(onFalse,14658968:doBeep,[(212,559)(212,510)])
}
Add(Beep,4385242,245,567)
{
 Freq=300
 Duration=200
}