#sha
Add(DataToFile,4026351,497,371)
{
 Type=7
 link(Stream,12431515:Stream,[])
}
Add(FileStream,12431515,497,245)
{
 FileName="TEST.TXT"
 Mode=1
 Point(doPosition)
}
Add(Button,5947432,294,245)
{
 Left=95
 Top=50
 Caption="Открыть"
 link(onClick,19635:doEvent1,[])
}
Add(Button,11039198,420,252)
{
 Left=95
 Top=90
 Caption="Закрыть"
 link(onClick,12431515:doClose,[])
}
Add(Button,10947059,364,371)
{
 Left=95
 Top=125
 Caption="Записать"
 Data=String(10)
 link(onClick,4026351:doPut,[])
}
Add(Hub,19635,343,245)
{
 link(onEvent1,12431515:doOpen,[])
 link(onEvent2,4316367:doData,[(401,258)(401,307)])
}
Add(DoData,4316367,427,301)
{
 link(onEventData,12431515:doPosition,[(478,307)(478,265)])
 link(Data,12431515:Size,[(433,289)(510,289)])
}