#sha
Add(MainForm,9531,105,190)
{
 Left=312
 Top=284
 Width=404
 Height=144
 Caption="Тестирование LPT порта"
}
Add(Hub,13797810,285,146)
{
 link(onEvent1,5429603:doTimer,[(333,152)(333,145)])
 link(onEvent2,4327890:doTimer,[(333,159)(333,187)])
}
Add(Button,14893351,161,126)
{
 Left=190
 Top=35
 Caption="start"
 Data=Integer(0)
 link(onClick,13797810:doEvent1,[(239,132)(239,152)])
}
Add(LPT,5504049,453,139)
{
 Point(doD2)
 Point(doD3)
}
Add(Timer,5429603,348,139)
{
 @Hint=#5:start|
 Interval=100
 Enable=1
 AutoStop=1
 Point(onStop)
 link(onStop,3247486:doClear,[])
}
Add(PointHint,8219499,509,146)
{
 Info=#5:start|
}
Add(Memory,4748299,397,181)
{
 @Hint=#10:I2S adress|
 Default=Integer(1)
 link(onData,9321745:doD2,[(441,187)(441,201)])
}
Add(LPT,9321745,453,181)
{
 Point(doD2)
 Point(doD3)
}
Add(Timer,4327890,348,181)
{
 @Hint=#5:start|
 Interval=100
 Enable=1
 AutoStop=1
 Point(onStop)
 link(onStop,4748299:doClear,[])
}
Add(Memory,3247486,397,139)
{
 @Hint=#10:I2S adress|
 Default=Integer(0)
 link(onData,5504049:doD2,[(441,145)(441,159)])
}