#pas
Add(MainForm,3182787,56,63)
{
 Left=100
 Top=100
 Width=521
 Height=143
 Point(onClose)
}
Add(Hub,15719913,126,119)
{
 InCount=2
 OutCount=4
 link(onEvent1,15074373:doOperation,[(206,125)(206,76)])
 link(onEvent2,14644621:doOperation,[])
}
Add(Math,14644621,224,126)
{
 OpType=7
 Op2=256
 ResultType=0
 link(onResult,14827653:doText,[])
}
Add(Math,15074373,224,70)
{
 OpType=8
 Op2=256
 ResultType=0
 link(onResult,5455257:doText,[])
}
Add(Edit,14827653,287,126)
{
 Left=130
 Top=45
 Width=100
 Text="HiByte"
}
Add(Edit,5455257,287,70)
{
 Left=250
 Top=45
 Width=95
 Text="LoByte"
}
Add(Edit,5387998,63,119)
{
 Left=15
 Top=45
 Width=90
 DataType=1
 link(onChange,15719913:doEvent1,[])
}
Add(Label,12109442,126,49)
{
 Left=30
 Top=20
 Width=54
 Height=20
 Caption="Decimal"
}
Add(Label,4505963,133,56)
{
 Left=150
 Top=20
 Width=44
 Height=20
 Caption="Byte 2 "
}
Add(Label,12872929,143,63)
{
 Left=270
 Top=20
 Width=41
 Height=20
 Caption="Byte 1"
}
Add(Label,9551904,154,77)
{
 Left=400
 Top=20
 Width=41
 Height=20
 Caption="Byte 0"
}
Add(Edit,9615799,287,189)
{
 Left=375
 Top=45
 Width=95
}

#pas
Add(MainForm,2953706,245,105)
{
 Width=953
 Height=544
}
Add(COM,918822,525,273)
{
 link(onWrite,10235871:doMessage,[])
 link(Port,2022022:Text,[(531,225)(503,225)])
 link(BaudRate,2731037:Text,[(538,225)(608,225)])
}
Add(EnumCOM,4350098,406,133)
{
 link(onEnumPorts,2022022:doAdd,[])
}
Add(Button,210468,315,105)
{
 Left=225
 Top=20
 Width=60
 Height=45
 WinStyle=4
 Caption="порт ?"
 link(onClick,7833892:doEvent1,[])
}
Add(Hub,7833892,364,105)
{
 OutCount=3
 link(onEvent1,2022022:doClear,[(465,111)(465,146)])
 link(onEvent2,4350098:doEnumPorts,[(392,118)(392,139)])
}
Add(ListBox,2731037,602,133)
{
 Left=300
 Top=70
 Width=65
 Height=85
 Enabled=1
 Strings=#3:600|4:1200|4:2400|4:4800|4:9600|
 DataType=1
 Point(doSelect)
 Point(doEnabled)
 link(onClick,918822:doOpen,[(646,146)(646,213)(489,213)(489,279)])
}
Add(Edit,15712307,406,294)
{
 Left=360
 Top=270
 link(onChange,918822:doWrite,[])
}
Add(Message,10235871,588,273)
{
}
Add(Button,13738540,329,294)
{
 Left=290
 Top=270
 link(onClick,15712307:doText,[])
}
Add(ListBox,2022022,497,133)
{
 Left=225
 Top=70
 Width=60
 Height=85
 DataType=1
 Point(doEnabled)
 link(onClick,2731037:doEnabled,[(565,146)(565,188)])
}