Make(delphi)
ver(4.01 build 174)
Add(MainForm,2953706,14,14)
{
 Width=451
 Height=330
 Caption="Direct Connect"
 BorderStyle=4
}
Add(MultiElement,3100765,196,140)
{
 @Hint=#18:Соединение с хабом|
 link(onEvent1,10628862:doEvent1,[(238,146)(238,182)(111,182)(111,195)])
 link(Data1,11224338:Var2,[])
 link(Data2,5844186:Text,[(209,114)(244,114)])
}
BEGIN_SDK
  Add(EditMulti,5944253,21,21)
  {
   EventCount=1
   WorkCount=1
   DataCount=2
   Width=552
   Height=144
   link(doWork1,6774644:doEvent1,[(40,27)(40,63)])
  }
  Add(StrList,13174472,497,57)
  {
  }
  Add(FormatStr,14949373,175,71)
  {
   DataCount=1
   Mask="$ValidateNick %1|"
   link(onFString,11182886:doEvent3,[])
   link(Str1,8543922:Var2,[])
  }
  Add(FormatStr,15284124,392,99)
  {
   DataCount=1
   Mask="$MyINFO $ALL %1 <++ V:0.694,M:A,H:0/1/1,S:3>$ $5
$$0$|"
   link(onFString,11182886:doEvent7,[])
   link(Str1,8543922:Var3,[(398,37)])
  }
  Add(Hub,11182886,448,57)
  {
   InCount=7
   OutCount=1
   link(onEvent1,13174472:doAdd,[])
  }
  Add(ArrayEnum,6147307,511,113)
  {
   link(onItem,5944253:onEvent1,[(554,119)(554,27)])
   link(onEndEnum,13174472:doClear,[(555,126)(555,154)(487,154)(487,70)])
   link(Array,13174472:Array,[])
  }
  Add(Hub,6774644,49,57)
  {
   OutCount=8
   link(onEvent1,7668946:doData,[])
   link(onEvent2,15718250:doData,[])
   link(onEvent3,14949373:doString,[])
   link(onEvent4,5592572:doCompare,[])
   link(onEvent5,15683522:doData,[])
   link(onEvent6,4713666:doData,[])
   link(onEvent7,15284124:doString,[])
   link(onEvent8,6147307:doEnum,[(469,112)(469,119)])
  }
  Add(DoData,7668946,91,57)
  {
   Data=String($Supports UserIP2 |)
   link(onEventData,11182886:doEvent1,[])
  }
  Add(DoData,4713666,350,92)
  {
   Data=String($GetNickList|)
   link(onEventData,11182886:doEvent6,[])
  }
  Add(DoData,15718250,133,64)
  {
   Data=String($Key tСА° A С±±АА0rГb /%DCN096%/QqAqp!SrІРгг±р¤/%DCN000%/Аu‚sбp|)
   link(onEventData,11182886:doEvent2,[])
  }
  Add(DoData,15683522,308,85)
  {
   Data=String($Version 3.005|)
   link(onEventData,11182886:doEvent5,[])
  }
  Add(If_else,5592572,224,78)
  {
   Type=5
   Op2=String()
   link(onTrue,632685:doString,[])
  }
  Add(FormatStr,632685,266,78)
  {
   DataCount=1
   Mask="$MyPass %1|"
   link(onFString,11182886:doEvent4,[])
   link(Str1,5944253:Data2,[(272,50)(34,50)])
  }
  Add(GetDataEx,8543922,168,28)
  {
   Angle=3
   link(Data,5944253:Data1,[(27,37)])
  }
END_SDK
Add(Edit,9693546,63,56)
{
 Left=5
 Top=20
 Width=80
 Text="127.0.0.1"
}
Add(Edit,14426363,112,56)
{
 Left=90
 Top=20
 Width=40
 Text="411"
}
Add(Edit,12269299,196,56)
{
 Left=135
 Top=20
 Width=80
 Text="Nick"
}
Add(Button,10670544,14,133)
{
 Left=310
 Top=5
 Height=35
 Caption="Connect"
 link(onClick,13696267:doOpen,[])
}
Add(Button,729321,14,168)
{
 Left=370
 Top=5
 Width=70
 Height=35
 Caption="Disconnect"
 link(onClick,13696267:doClose,[(54,174)(54,146)])
}
Add(ListBox,7095369,378,133)
{
 Left=290
 Top=45
 Width=150
 Height=240
}
Add(Memo,7961758,378,217)
{
 Left=5
 Top=45
 Width=280
 Height=215
 ScrollBars=3
}
Add(Edit,16321420,14,245)
{
 Left=5
 Top=265
 Width=280
 Text=""
 link(onEnter,9148633:doString,[])
}
Add(TCP_Client,13696267,98,133)
{
 link(onRead,2145847:doEvent1,[])
 link(onConnect,3100765:doWork1,[])
 link(onDisconnect,7095369:doClear,[(321,153)(321,146)])
 link(IP,9693546:Text,[(104,104)(69,104)])
 link(Port,14426363:Text,[])
}
Add(Edit,5844186,238,56)
{
 @Hint=#32:Если пароля нет указывать ненадо|
 Left=220
 Top=20
 Width=85
 Hint="Если пароля нет, то указывать ненадо"
 Text=""
}
Add(Hub,10628862,126,189)
{
 InCount=2
 OutCount=1
 link(onEvent1,13696267:doSend,[(170,195)(170,174)(86,174)(86,153)])
}
Add(MultiElement,13775994,336,133)
{
 @Hint=#23:Получение списка юзеров|
 link(onEvent1,7095369:doAdd,[])
}
BEGIN_SDK
  Add(EditMulti,1010965,21,21)
  {
   EventCount=1
   WorkCount=1
   Width=139
   Height=74
   link(doWork1,6347336:doSearch,[(36,27)(36,52)])
  }
  Add(BlockFind,6347336,51,46)
  {
   IncludeBlock=1
   StartBlock="$MyINFO "
   EndBlock="|"
   link(onSearch,15804930:doSearch,[])
  }
  Add(BlockFind,15804930,93,46)
  {
   IncludeBlock=1
   StartBlock="$ALL "
   EndBlock=" "
   link(onSearch,1010965:onEvent1,[(140,52)(140,27)])
  }
END_SDK
Add(Hub,2145847,245,133)
{
 link(onEvent1,13775994:doWork1,[])
 link(onEvent2,8996995:doWork1,[(307,146)(307,223)])
}
Add(MultiElement,8996995,336,217)
{
 @Hint=#11:Чтение чата|
 link(onEvent1,7961758:doAdd,[])
 link(Data1,7095369:Array,[(342,197)(398,197)])
}
BEGIN_SDK
  Add(EditMulti,4306622,21,21)
  {
   EventCount=1
   WorkCount=1
   DataCount=1
   Width=349
   Height=221
   link(doWork1,15120540:doSearch,[(43,27)(43,75)])
  }
  Add(Replace,8096245,107,69)
  {
   SubStr="<"
   link(onReplace,145414:doReplace,[])
  }
  Add(BlockFind,15120540,65,69)
  {
   IncludeBlock=1
   StartBlock="<"
   EndBlock="|"
   link(onSearch,8096245:doReplace,[])
  }
  Add(Replace,145414,149,69)
  {
   SubStr="> "
   DestStr=";"
   link(onReplace,5644668:doReplace,[])
  }
  Add(Replace,5644668,191,69)
  {
   SubStr="|"
   link(onReplace,2897611:doEvent1,[(235,75)(235,108)(30,108)(30,124)])
  }
  Add(Hub,2897611,44,118)
  {
   link(onEvent1,1987800:doSplit,[])
   link(onEvent2,4718994:doEnum,[(88,131)(88,194)])
  }
  Add(Memory,7488055,198,132)
  {
   link(onData,743477:doValue,[])
  }
  Add(StrPart,1987800,100,118)
  {
   Char=";"
   link(onSplit,12787966:doValue,[(207,124)(207,131)])
   link(onPart,7488055:doValue,[(165,131)(165,138)])
  }
  Add(ArrayEnum,4718994,100,188)
  {
   link(onItem,12795674:doCompare,[])
   link(Array,4306622:Data1,[(106,101)(27,101)])
  }
  Add(If_else,12795674,191,188)
  {
   link(onTrue,13997378:doString,[])
   link(Op2,7488055:Value,[])
  }
  Add(Memory,743477,247,132)
  {
  }
  Add(Memory,12787966,296,125)
  {
  }
  Add(FormatStr,13997378,240,188)
  {
   DataCount=3
   Mask="[%1] <%2> %3"
   link(onFString,15949479:doEvent1,[])
   link(Str1,8836150:FormatTime,[])
   link(Str2,743477:Value,[])
   link(Str3,12787966:Value,[(260,166)(302,166)])
  }
  Add(Time,8836150,240,69)
  {
   Format="h:m:s"
  }
  Add(Hub,15949479,282,188)
  {
   OutCount=4
   link(onEvent1,4306622:onEvent1,[(351,194)(351,27)])
   link(onEvent2,7488055:doClear,[(329,201)(329,180)(184,180)(184,145)])
   link(onEvent3,743477:doClear,[(325,208)(325,172)(235,172)(235,145)])
   link(onEvent4,12787966:doClear,[(334,215)(334,175)(288,175)(288,138)])
  }
END_SDK
Add(FormatStr,9148633,63,252)
{
 @Hint=#24:Отправка сообщения в чат|
 Mask="<%1> %2|"
 link(onFString,10628862:doEvent2,[(107,258)(107,202)])
 link(Str1,11224338:Var1,[(69,114)])
 link(Str2,16321420:Text,[(76,239)(53,239)(53,289)(20,289)])
}
Add(GetDataEx,11224338,189,105)
{
 link(Data,12269299:Text,[])
}
Add(Label,702046,63,14)
{
 Left=5
 Top=5
 Width=73
 Transparent=0
 Caption="IP адрес хаба"
}
Add(Label,14649713,112,14)
{
 Left=90
 Top=5
 Width=29
 Caption="Порт"
}
Add(Label,3803058,196,14)
{
 Left=135
 Top=5
 Width=24
 Caption="Ник"
}
Add(Label,518507,238,14)
{
 Left=220
 Top=5
 Width=42
 Caption="Пароль"
}
Add(Label,12596811,280,14)
{
 Left=5
 Top=290
 Width=73
 Height=17
 Caption="Сделал Bublik"
}
Add(Label,11222019,153,13)
{
 Left=385
 Top=290
 Width=57
 Height=17
 Caption="HiAsm.com"
}