Make(delphi)
ver(4.04 build 184)
Add(MainForm,68149,322,56)
{
 Left=21
 Top=105
 Width=341
 Height=275
 Font=[Arial,8,0,0,1]
 Caption="АТ Терминал"
 BorderStyle=1
 Position=1
 Point(onClose)
 link(onCreate,12226412:doWork1,[(388,76)(388,90)])
 link(onClose,4901:doClose,[(376,83)(376,167)])
}
Add(FormatStr,12648551,140,161)
{
 Mask="%1\r"
 link(onFString,96560:doEvent2,[])
 link(Str1,93647:Text,[])
}
Add(Menu,15822,35,49)
{
 Menu=#4:Файл|1:(|20:Отправить АТ команду|1:-|5:Выход|1:)|9:Настройки|1:(|4:Порт|1:)|6:Помощь|1:(|10:АТ команды|1:)|
 Point(onSelectNum)
 link(onSelectNum,1824143:doEvent,[])
}
Add(Button,68561,84,161)
{
 Left=10
 Top=185
 Width=80
 Font=[Arial,8,0,0,1]
 Caption="Отправить"
 link(onClick,12648551:doString,[])
}
Add(Edit,93647,140,112)
{
 Left=105
 Top=185
 Width=215
 Text="atz0"
}
Add(Hub,96560,203,154)
{
 InCount=2
 OutCount=3
 link(onEvent1,4901:doOpen,[])
 link(onEvent2,4901:doWrite,[(244,167)(244,181)])
 link(onEvent3,6032311:doEvent1,[(231,174)(231,286)])
}
Add(DoData,63129,322,238)
{
 Data=String(8)
 link(onEventData,12414700:doWork2,[])
 link(Data,4106459:Value,[])
}
Add(DoData,10850025,322,287)
{
 Data=Integer(255)
 link(onEventData,12414700:doWork3,[(375,293)])
}
Add(COM,4901,399,154)
{
 BaudRate=0
 link(onWrite,4106459:doValue,[(498,160)(498,230)(310,230)(310,195)])
 link(onRead,8085367:doAdd,[])
 link(Port,12226412:Var1,[])
 link(BaudRate,12226412:Var2,[])
}
Add(Sleep,5688535,280,287)
{
 Delay=100000
 link(onSleep,10850025:doData,[])
}
Add(RichEdit,8085367,455,161)
{
 Left=5
 Top=10
 Width=315
 Height=160
 ScrollBars=2
 InsertCRLF=1
}
Add(Hub,6032311,245,280)
{
 link(onEvent1,63129:doData,[(272,286)(272,244)])
 link(onEvent2,5688535:doSleepMks,[])
}
Add(HubEx,12414700,371,238)
{
 Angle=3
 link(onEvent,4901:doRead,[(375,188)])
}
Add(Memory,4106459,322,189)
{
}
Add(StatusBar,7090654,455,84)
{
 Panels=#10:Port: =100|13:Bitrate: =100|
}
Add(ChildForm,12226412,399,84)
{
 link(onEvent1,7090654:doText,[])
}
BEGIN_SDK
  Add(EditMulti,15810648,63,14)
  {
   EventCount=1
   WorkCount=2
   VarCount=2
   Width=426
   Height=277
   VOffset=10
   link(doWork1,6955960:doEvent1,[(220,30)(220,76)])
   link(doWork2,13267341:doShowModal,[(75,37)(75,69)])
   link(Var1,8132841:Value,[(69,196)(237,196)])
   link(Var2,8288448:Var1,[(76,229)])
  }
  Add(MainForm,13267341,182,35)
  {
   Left=35
   Top=105
   Width=342
   Height=178
   Visible=1
   Position=1
   Point(doShowModal)
  }
  Add(Registry,1881658,266,84)
  {
   HKey=2
   Key="HARDWARE\DEVICEMAP\SERIALCOMM"
   Point(doEnumValues)
   Point(onEnumValue)
   link(onRead,6110522:doAdd,[(308,90)(308,69)])
   link(Value,16596183:Value,[])
   link(onEnumValue,10850935:doEvent1,[])
  }
  Add(ComboBox,6110522,364,63)
  {
   Left=25
   Top=49
   Width=125
   Height=21
   DataType=1
   ReadOnly=0
   Point(doSelect)
   Point(EditText)
  }
  Add(Delete,9460134,182,147)
  {
   Count=3
   link(onDelete,8132841:doValue,[])
   link(Str,8561531:Var1,[(188,131)])
  }
  Add(Hub,10850935,315,91)
  {
   link(onEvent1,16596183:doValue,[(339,97)(339,20)(267,20)(267,34)])
   link(onEvent2,1881658:doRead,[(339,104)(339,122)(250,122)(250,90)])
  }
  Add(Memory,16596183,280,28)
  {
  }
  Add(Memory,8132841,231,147)
  {
   link(onData,10759629:doEvent1,[])
  }
  Add(ComboBox,282208,273,161)
  {
   Left=165
   Top=50
   Width=130
   Height=21
   Strings=#4:9600|5:14400|5:19200|6:115200|
   ReadOnly=0
   Point(doSelect)
   Point(Index)
   Point(EditText)
  }
  Add(Label,25757,269,238)
  {
   Left=170
   Top=29
   Width=84
   Height=17
   Caption="Скорость порта"
  }
  Add(Label,3743,414,59)
  {
   Left=25
   Top=29
   Width=89
   Height=17
   Caption="Свободный Порт"
  }
  Add(Button,6646612,182,77)
  {
   Left=25
   Top=90
   Caption="Рескан"
   Point(onKeyUp)
   Point(onMouseUp)
   link(onClick,6955960:doEvent2,[])
  }
  Add(Button,10742335,84,140)
  {
   Left=170
   Top=90
   Caption="Ok"
   link(onClick,13344311:doEvent1,[])
  }
  Add(Hub,6955960,231,70)
  {
   InCount=2
   link(onEvent1,6110522:doClear,[])
   link(onEvent2,1881658:doEnumValues,[(258,83)(258,104)])
  }
  Add(MT_Add,14065630,420,245)
  {
   Data=Integer(0)
   link(onAdd,6151379:doWork3,[(475,251)])
  }
  Add(MT_Add,5706108,420,147)
  {
   Data=Integer(1)
   link(onAdd,6151379:doWork2,[])
  }
  Add(StrCat,10849745,371,245)
  {
   Str1="Bitrate: "
   link(onStrCat,14065630:doAdd,[])
   link(Str2,8288448:Var3,[(384,229)])
  }
  Add(StrCat,8575142,371,147)
  {
   Str1="Port: "
   link(onStrCat,5706108:doAdd,[])
   link(Str2,8561531:Var2,[])
  }
  Add(Hub,10759629,315,147)
  {
   InCount=2
   link(onEvent1,8575142:doStrCat,[])
   link(onEvent2,10849745:doStrCat,[(338,160)(338,251)])
  }
  Add(GetDataEx,8288448,294,224)
  {
   link(Data,282208:EditText,[])
  }
  Add(HubEx,6151379,471,147)
  {
   Angle=3
   link(onEvent,15810648:onEvent1,[(475,30)])
  }
  Add(GetDataEx,8561531,378,126)
  {
   link(Data,6110522:EditText,[])
  }
  Add(Hub,13344311,133,140)
  {
   link(onEvent1,13267341:doClose,[(167,146)(167,62)])
   link(onEvent2,9460134:doDelete,[])
  }
END_SDK
Add(ChildForm,14195151,140,63)
{
 link(onEvent1,96560:doEvent1,[(188,69)(188,160)])
}
BEGIN_SDK
  Add(EditMulti,9499377,21,21)
  {
   EventCount=1
   WorkCount=1
   Width=216
   Height=137
   link(doWork1,7900643:doShowModal,[(38,27)(38,139)])
  }
  Add(MainForm,7900643,182,105)
  {
   Left=35
   Top=105
   Width=263
   Height=111
   Visible=1
   Caption="АТ команды"
   Position=1
   Point(doShowModal)
  }
  Add(ComboBox,4833137,91,35)
  {
   Left=100
   Top=20
   Width=130
   Height=21
   Strings=#7:at+cimi|7:at+cgmi|6:at+csq|
   ReadOnly=0
  }
  Add(Button,1973678,49,91)
  {
   Left=15
   Top=20
   Width=75
   Caption="Отправить"
   link(onClick,9400134:doString,[])
  }
  Add(FormatStr,9400134,98,91)
  {
   Mask="%1\r\n"
   link(onFString,8059695:doEvent1,[])
   link(Str1,4833137:String,[])
  }
  Add(Hub,8059695,140,91)
  {
   link(onEvent1,9499377:onEvent1,[(167,97)(167,27)])
   link(onEvent2,7900643:doClose,[(168,104)(168,132)])
  }
END_SDK
Add(IndexToChanel,1824143,84,56)
{
 Count=8
 link(onEvent2,14195151:doWork1,[])
 link(onEvent4,68149:doClose,[])
 link(onEvent6,12226412:doWork2,[])
}