Add(MainForm,2953706,70,126)
{
 Width=256
 Height=100
}
Add(FileSearch,7079922,161,266)
{
 Ext="*."
 FullName=1
 link(onSearch,26773:doValue,[])
 link(onEndSearch,6052256:doCompare,[(204,279)(204,321)])
 link(Ext,1697677:GetData,[])
 link(Dir,13532093:CurrentDir,[])
}
Add(Dir,13532093,168,217)
{
}
Add(Button,1751853,70,266)
{
 Left=10
 Top=30
 Font=[MS Sans Serif,8,1,0,1]
 Caption="SAVE"
 link(onClick,7079922:doSearch,[])
}
Add(Memory,26773,266,266)
{
}
Add(Time,6988693,217,126)
{
 Format="YMD"
}
Add(EventFromData,1697677,161,182)
{
 link(onEvent,12547900:doStrCatDlm,[])
}
Add(StrCatDelim,12547900,217,182)
{
 Delimiter="-*.sha"
 link(onStrCatDlm,1697677:doData,[(261,188)(261,113)(146,113)(146,188)])
 link(Str1,1858626:Var2,[])
}
Add(FilePartElm,9334716,266,322)
{
 Mode=2
 link(onPart,14653243:doSplit,[])
 link(FileName,26773:Value,[])
}
Add(StrPart,14653243,315,322)
{
 Char="-"
 Point(Left)
 link(onSplit,16740460:doWork2,[])
}
Add(Math,3360619,364,322)
{
 Op2=1
 ResultType=0
 link(onResult,8304305:doConvert,[])
}
Add(If_else,6052256,217,315)
{
 Op2=Integer(0)
 link(onTrue,16740460:doWork1,[(354,321)])
 link(onFalse,9334716:doPart,[])
}
Add(FormatStr,4683535,448,322)
{
 Mask="%1-%2.sha"
 link(onFString,2712404:doText,[])
 link(Str1,1858626:Var3,[(454,166)])
}
Add(HubEx,16740460,350,322)
{
 link(onEvent,3360619:doOperation,[])
}
Add(GetDataEx,1858626,217,161)
{
 link(Data,6988693:FormatTime,[])
}
Add(Edit,2712404,490,322)
{
 Left=80
 Top=30
 Width=150
}
Add(Convertor,8304305,406,322)
{
 Digits=6
 SymbolFill="0"
 link(onResult,4683535:doString,[])
}