Add(MainForm,12656576,161,154)
{
 Width=147
 Height=98
 Caption="Пример использования WinFTP"
 link(onCreate,7587478:doOpen,[(223,174)(223,251)])
}
Add(WinFTP,7587478,301,245)
{
 Host="hitest.moy.su"
 Username="7hitest"
 Password=""
 Directory="./"
 RemoteName="file.txt"
 Point(onConnect)
 Point(onWrite)
 Point(onReadProgress)
 link(LocalName,1990812:Stream,[])
 link(onConnect,11194804:doEvent1,[(345,265)(345,195)(247,195)(247,160)])
}
Add(FileStream,1990812,301,147)
{
 FileName="d:\wert.txt"
 Mode=2
}
Add(GetDataEx,981750,336,133)
{
}
Add(Hub,11194804,259,154)
{
 OutCount=3
 link(onEvent1,1990812:doOpen,[(287,160)(287,153)])
 link(onEvent3,3236383:doTimer,[(285,174)(285,244)(30,244)(30,314)])
}
Add(Switch,14806913,133,252)
{
 DataOn=String(On)
 DataOff=String(Off)
 Point(State)
 Point(onOff)
 Point(doOn)
 Point(DataOn)
 Point(DataOff)
 Point(onOn)
 link(onOff,16566750:doEvent1,[(184,265)(184,258)])
 link(onOn,10021481:doEvent1,[(181,272)(181,286)])
}
Add(Counter,12408533,112,315)
{
 Max=1
 link(onNext,14806913:doSwitch,[(156,321)(156,289)(121,289)(121,258)])
}
Add(Timer,3236383,35,308)
{
 Interval=5000
 Enable=1
 Point(onStop)
 link(onTimer,9725729:doEvent1,[(72,314)(72,307)])
}
Add(LED,5332472,308,301)
{
 Left=10
 Top=10
}
Add(Hub,16566750,203,252)
{
 link(onEvent1,7587478:doReadFile,[(259,258)(259,265)])
 link(onEvent2,5332472:doOff,[(263,265)(263,314)])
}
Add(Hub,10021481,196,280)
{
 link(onEvent1,7587478:doWriteFile,[(256,286)(256,272)])
 link(onEvent2,5332472:doOn,[(259,293)(259,321)])
}
Add(LED,5097957,315,357)
{
 Left=50
 Top=10
 ColorOn=65280
 ColorOff=32768
}
Add(Hub,9725729,77,301)
{
 link(onEvent1,12408533:doNext,[(101,307)(101,321)])
 link(onEvent2,5097957:doChangeValue,[(203,314)(203,363)])
}