------------ Дoбавленo в 21.51:
-
Add(MainForm,2953706,14,77)
{
Width=736
Height=384
}
Add(Memo,10200691,763,77)
{
Left=15
Top=15
Width=695
Height=305
}
Add(COM,244296,651,112)
{
Port=3
BaudRate=2400
link(onRead,10200691:doAdd,[(716,125)(716,83)])
}
Add(DoData,16340559,707,245)
{
Data=Integer(255)
link(onEventData,244296:doRead,[(779,251)(779,188)(639,188)(639,146)])
}
Add(Button,8361617,301,98)
{
Left=25
Top=325
Width=150
Caption="открыть порт"
link(onClick,244296:doOpen,[(411,104)(411,118)])
}
Add(Button,12686499,301,147)
{
Left=190
Top=325
Width=140
Caption="закрыть порт"
link(onClick,244296:doClose,[(411,153)(411,125)])
}
Add(FormatStr,13018158,112,336)
{
Mask="01
"
link(onFString,793395:doConvert,[(152,342)(152,335)])
}
Add(FormatStr,15311392,112,385)
{
Mask="01
"
link(onFString,1646743:doConvert,[(152,391)(152,384)])
}
Add(FormatStr,14894399,105,434)
{
Mask="03
"
link(onFString,9496535:doConvert,[(149,440)(149,433)])
}
Add(FormatStr,12609487,105,476)
{
Mask="2E
"
link(onFString,7153659:doConvert,[(149,482)(149,475)])
}
Add(FormatStr,15246177,102,522)
{
Mask="C1"
link(onFString,6929649:doConvert,[(148,528)(148,524)])
}
Add(Hub,10462990,266,287)
{
link(onEvent1,8779023:doEvent1,[(312,293)(312,300)])
link(onEvent2,13018158:doString,[(292,300)(292,321)(107,321)(107,342)])
}
Add(Hub,13191828,266,336)
{
link(onEvent1,8779023:doEvent2,[(312,342)(312,307)])
link(onEvent2,15311392:doString,[(292,349)(292,370)(100,370)(100,391)])
}
Add(Hub,8446437,266,385)
{
link(onEvent1,8779023:doEvent3,[(312,391)(312,314)])
link(onEvent2,14894399:doString,[(292,398)(292,419)(100,419)(100,440)])
}
Add(Hub,11313918,266,434)
{
link(onEvent1,8779023:doEvent4,[(312,440)(312,321)])
link(onEvent2,12609487:doString,[(292,447)(292,465)(100,465)(100,482)])
}
Add(Hub,554767,273,476)
{
InCount=2
link(onEvent1,8779023:doEvent5,[(315,482)(315,328)])
link(onEvent2,15246177:doString,[(299,489)(299,509)(97,509)(97,528)])
}
Add(Hub,8205384,266,518)
{
link(onEvent1,8779023:doEvent6,[(312,524)(312,335)])
link(onEvent2,16340559:doData,[(581,531)(581,251)])
}
Add(Hub,8779023,343,294)
{
InCount=6
link(onEvent1,244296:doWrite,[(504,300)(504,139)])
}
Add(MMTimer,10030436,42,273)
{
link(onTimer,2893190:doString,[])
}
Add(Convertor,15531688,161,273)
{
Mode=5
link(onResult,6576420:doConvert,[])
}
Add(Convertor,6576420,210,273)
{
Mode=4
link(onResult,10462990:doEvent1,[(254,279)(254,293)])
}
Add(FormatStr,2893190,105,273)
{
Mask="C0"
link(onFString,15531688:doConvert,[])
}
Add(Convertor,793395,161,329)
{
Mode=5
link(onResult,2739816:doConvert,[])
}
Add(Convertor,2739816,210,329)
{
Mode=4
link(onResult,13191828:doEvent1,[(254,335)(254,342)])
}
Add(Convertor,1646743,161,378)
{
Mode=5
link(onResult,419383:doConvert,[])
}
Add(Convertor,419383,210,378)
{
Mode=4
link(onResult,8446437:doEvent1,[(254,384)(254,391)])
}
Add(Convertor,9496535,161,427)
{
Mode=5
link(onResult,4602764:doConvert,[])
}
Add(Convertor,4602764,210,427)
{
Mode=4
link(onResult,11313918:doEvent1,[(254,433)(254,440)])
}
Add(Convertor,7153659,161,469)
{
Mode=5
link(onResult,7784345:doConvert,[])
}
Add(Convertor,7784345,210,469)
{
Mode=4
link(onResult,554767:doEvent1,[(258,475)(258,482)])
}
Add(Convertor,6929649,161,518)
{
Mode=5
link(onResult,1428479:doConvert,[])
}
Add(Convertor,1428479,210,518)
{
Mode=4
link(onResult,8205384:doEvent1,[])
}
Вот что то вро тего получилось если есть вариант уменьшить подскажите.