Add(MainForm,1184708,238,154)
{
link(onCreate,15378499:doWork2,[])
}
Add(Image,4367637,371,168)
{
Left=35
Top=30
Width=64
Height=64
link(onClick,15816185:doSwitch,[])
}
Add(BitmapArray,9052646,322,112)
{
Bitmaps=['Bitmap'=[ZIP3604000078DAA593B10EC15014868FC42652D71334B188416231B0318AC1DAB5EF20F114E64E2693D568361A250C12222121124F50FEC3698EA30634F9D3F6DEF3FDFDEFB9B7AD6E3D4B7CD5EF2ADF55782A43FE63E239AFAF388E5951147D2D617F91F668363794CB8DC8F3A61F34A17C7ECC425DB5BA4A3C70F7BC39954A7BAA54DEE5FB9B44C5E29A9C5BB087E63157AB6DA9DDDEB11A8D3D4B8F8987734BCE6179D4A34ED6279C1E930C96474E5B2B1EFA5D32A01F9A47CE4EE7C0B28C66651DE8A9E691BDD73BB2D272481F85776EF6C2633C08D259FB7D78591EB985D70CD665FBF1890FC3137BE85AD943CBE3BC681EDC6070493CF45AACD2BE0F6E38BC52BF7FE667ED03A1AFB237C863F70F2C18A9D37B69CFA3F4F19F7F4FEB06C75FF5B6],'Bitmap'=[ZIP3604000078DA9D92BF0E014110C647A21339EB092ED18842A251D0518A42ABF50E124FA1BE4AA5D22AD54AA5844242242444E2098E6F98CD18FFC2255FEEF6767FB3DF7CBBB5663949FC94AFCA5F95B92B41E16DE23EAF9F388E595114FD2C61FF91AE51ADAE28951A50108CDF6844E9F4908575C5E2C2D7C03B08A694CB6DA950785618AEBCB2D9253937E31A9AC75CA9B4F6DE2A952D4BFF931ACECDD987E5B15EF767C7DA83E5E1B35EDFB05E6565FB401E9A87CF4663E7A559CC092F3E90A9E6E1B5D5DAB33EED2FBC7393071EBEDBEDFDD7FEA596E5E159F39285CE1FE7FB89EF740E5C033D600C5ECE5032101EF745F3E07ABD93AF617BB159D8FDC1F5FB67EA768FFCADEB584FF062CF0F2C185927921CF47D448EEFEEC93FBA003AEE05AC]]
}
Add(ArrayRW,12253031,322,168)
{
Index=Integer(0)
link(onRead,4367637:doLoad,[])
link(Array,9052646:Array,[])
link(Index,15816185:State,[(335,159)(363,159)(363,208)(426,208)])
}
Add(Switch,15816185,420,168)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(State)
link(onSwitch,15378499:doWork3,[(459,174)(459,216)(298,216)])
}
Add(HubEx,15378499,294,168)
{
link(onEvent,12253031:doRead,[])
}
Обнаружена одна отсутсвующая связь. Исправлено
------------ Дoбавленo в 16.34:
Еще один, более простой вариант
Add(MainForm,2953706,420,112)
{
link(onCreate,15610881:doWork1,[(473,132)])
}
Add(Image,4367637,357,168)
{
Left=35
Top=30
Width=64
Height=64
link(onClick,8293272:doEvent,[])
}
Add(BitmapArray,9052646,308,112)
{
Bitmaps=['Bitmap'=[ZIP3604000078DAA593B10EC15014868FC42652D71334B188416231B0318AC1DAB5EF20F114E64E2693D568361A250C12222121124F50FEC3698EA30634F9D3F6DEF3FDFDEFB9B7AD6E3D4B7CD5EF2ADF55782A43FE63E239AFAF388E5951147D2D617F91F668363794CB8DC8F3A61F34A17C7ECC425DB5BA4A3C70F7BC39954A7BAA54DEE5FB9B44C5E29A9C5BB087E63157AB6DA9DDDEB11A8D3D4B8F8987734BCE6179D4A34ED6279C1E930C96474E5B2B1EFA5D32A01F9A47CE4EE7C0B28C66651DE8A9E691BDD73BB2D272481F85776EF6C2633C08D259FB7D78591EB985D70CD665FBF1890FC3137BE85AD943CBE3BC681EDC6070493CF45AACD2BE0F6E38BC52BF7FE667ED03A1AFB237C863F70F2C18A9D37B69CFA3F4F19F7F4FEB06C75FF5B6],'Bitmap'=[ZIP3604000078DA9D92BF0E014110C647A21339EB092ED18842A251D0518A42ABF50E124FA1BE4AA5D22AD54AA5844242242444E2098E6F98CD18FFC2255FEEF6767FB3DF7CBBB5663949FC94AFCA5F95B92B41E16DE23EAF9F388E595114FD2C61FF91AE51ADAE28951A50108CDF6844E9F4908575C5E2C2D7C03B08A694CB6DA950785618AEBCB2D9253937E31A9AC75CA9B4F6DE2A952D4BFF931ACECDD987E5B15EF767C7DA83E5E1B35EDFB05E6565FB401E9A87CF4663E7A559CC092F3E90A9E6E1B5D5DAB33EED2FBC7393071EBEDBEDFDD7FEA596E5E159F39285CE1FE7FB89EF740E5C033D600C5ECE5032101EF745F3E07ABD93AF617BB159D8FDC1F5FB67EA768FFCADEB584FF062CF0F2C185927921CF47D448EEFEEC93FBA003AEE05AC]]
}
Add(ArrayRW,12253031,308,168)
{
link(onRead,4367637:doLoad,[])
link(Array,9052646:Array,[])
}
Add(IndexToChanel,8293272,420,168)
{
Data=Integer(1)
Point(Index)
link(onEvent1,10857211:doValue,[])
link(onEvent2,15610881:doWork2,[])
link(Index,10857211:Value,[(426,159)(412,159)(412,208)(496,208)])
}
Add(Memory,10857211,490,168)
{
Default=Integer(0)
link(onData,12253031:doRead,[(529,174)(529,216)(298,216)(298,174)])
}
Add(HubEx,15610881,469,175)
{
link(onEvent,10857211:doClear,[])
}