Add(MainForm,13302918,154,126)
{
 Width=706
 Height=678
}
Add(TCP_Client,10132356,455,238)
{
 Port=80
 link(onRead,7740039:doCharset,[])
}
Add(HTTP_FileUpload,9943678,252,245)
{
 URL="http://www.radikal.ru/action.aspx"
 Name="attach"
 VarsList=#6:upload|12:GEO_POINT_ID|1:O|1:M|0:|
 Point(VarsValue)
 Point(Host)
 link(onBuild,11726978:doEvent1,[])
 link(VarsValue,765973:GetData,[])
 link(Host,15429254:Var1,[(279,201)])
}
Add(Hub,11726978,343,245)
{
 link(onEvent1,820334:doIPByHost,[(375,251)(375,230)])
 link(onEvent2,10132356:doSend,[])
}
Add(Button,5706670,154,245)
{
 Left=115
 Top=55
 link(onClick,15167720:doExecute,[])
}
Add(Host,820334,392,217)
{
 link(onIPByHost,10132356:doOpen,[(440,230)(440,244)])
 link(HostName,15429254:Var2,[])
}
Add(Memory,2183037,399,154)
{
 Default=String(radikal.ru)
}
Add(ODialog,15167720,203,245)
{
 link(onExecute,9943678:doBuild,[])
}
Add(Charset,7740039,504,238)
{
 Type=7
 link(onCharset,5170041:doSearch,[])
}
Add(EventFromData,765973,266,126)
{
 link(onEvent,8054435:doGetIndex,[])
}
Add(StrList,8054435,315,84)
{
 Strings=#6:upload|12:GEO_POINT_ID|1:O|1:M|
 Point(doGetIndex)
 Point(onGetIndex)
 link(onGetIndex,11911447:doGetString,[(373,97)(373,132)])
}
Add(StrList,11911447,399,84)
{
 Strings=#3:yes|0:|3:yes|3:500|0:|
 Point(doGetString)
 Point(onGetString)
 link(onGetString,765973:doData,[(449,97)(449,64)(254,64)(254,132)])
}
Add(BlockFind,5170041,553,238)
{
 IncludeBlock=1
 StartBlock="input id="input_link_1" value=""
 EndBlock="""
 link(onSearch,12155821:doText,[])
}
Add(Edit,12155821,602,238)
{
 Left=175
 Top=55
 Width=465
}
Add(GetDataEx,15429254,399,196)
{
 link(Data,2183037:Value,[])
}

Add(MainForm,9452082,161,301)
{
 Width=865
 Height=159
}
Add(HTTP_FileUpload,3277775,357,476)
{
 URL="/files"
 Host="muon.rghost.ru"
 Name="file"
 Point(VarsValue)
 Point(doVarsList)
 link(onBuild,5415745:doEvent1,[])
 link(FileName,15537032:Text,[])
}
Add(Edit,1471851,560,280)
{
 Left=35
 Top=15
 Width=315
 Text="Title of file"
}
Add(Edit,2082879,609,280)
{
 Left=35
 Top=40
 Width=315
 Text="user name"
}
Add(Edit,15537032,357,336)
{
 Left=35
 Top=65
 Width=315
 Text=""
}
Add(Button,7306664,245,336)
{
 Left=355
 Top=65
 Width=25
 Caption="..."
 link(onClick,8510228:doExecute,[])
}
Add(Button,12327116,182,476)
{
 Left=140
 Top=95
 Width=125
 Height=25
 Caption="Send"
 link(onClick,5988017:doEvent1,[])
}
Add(ODialog,8510228,301,336)
{
 link(onExecute,15537032:doText,[])
}
Add(EventFromData,1260066,413,336)
{
 link(onEvent,9081596:doCompare,[])
}
Add(If_else,9081596,462,336)
{
 Op2=String(id)
 link(onTrue,12053862:doData,[])
 link(onFalse,6300632:doCompare,[(502,349)(502,391)])
}
Add(DoData,12053862,511,336)
{
 Data=Integer(12)
 link(onEventData,1224693:doWork2,[])
}
Add(If_else,6300632,511,385)
{
 Op2=String(title30ins)
 link(onTrue,10512379:doData,[])
 link(onFalse,112990:doCompare,[(551,398)(551,440)])
}
Add(HubEx,1224693,651,336)
{
 Angle=3
 link(onEvent,1260066:doData,[(655,329)(407,329)(407,342)])
}
Add(DoData,10512379,560,385)
{
 link(onEventData,12980371:doWork2,[])
 link(Data,1471851:Text,[])
}
Add(If_else,112990,560,434)
{
 Op2=String(user30ins)
 link(onTrue,10419873:doData,[])
}
Add(DoData,10419873,609,434)
{
 link(onEventData,12980371:doWork3,[(655,440)])
 link(Data,2082879:Text,[])
}
Add(HubEx,12980371,651,385)
{
 Angle=3
 link(onEvent,1224693:doWork3,[])
}
Add(Memo,12685441,469,399)
{
 Left=385
 Top=5
 Width=460
 Height=120
 ScrollBars=3
}
Add(Label,1482537,259,245)
{
 Left=14
 Top=17
 Width=20
 Height=17
 Caption="title"
}
Add(Label,12043141,252,266)
{
 Top=42
 Width=34
 Height=17
 Caption="author"
}
Add(Label,4919481,245,287)
{
 Left=17
 Top=67
 Width=17
 Height=17
 Caption="file"
}
Add(TCP_Client,8329135,574,539)
{
 Port=80
 link(onRead,1211923:doMessage,[])
}
Add(Hub,5415745,413,476)
{
 link(onEvent1,12685441:doText,[(448,482)(448,426)])
 link(onEvent2,4030595:doEvent1,[(434,489)(434,545)])
}
Add(Hub,4030595,441,539)
{
 link(onEvent1,820334:doHostByIP,[(469,545)(469,524)])
 link(onEvent2,8329135:doSend,[(478,552)(478,559)])
}
Add(Message,1211923,630,539)
{
}
Add(Hub,5988017,238,476)
{
 link(onEvent1,10541436:doData,[(266,482)(266,510)])
 link(onEvent2,3277775:doBuild,[(304,489)(304,482)])
}
Add(StrList,2804538,273,413)
{
 Strings=#1:s|
}
Add(DoData,10541436,273,504)
{
 link(Data,2804538:Text,[])
}
Add(Host,820334,483,518)
{
 link(onIPByHost,8329135:doOpen,[(545,531)(545,545)])
 link(HostName,2183037:Value,[])
}
Add(Memory,2183037,490,462)
{
 Default=String(muon.rghost.ru)
}