Add(MainForm,2953706,91,126)
{
 Width=342
 Height=123
 Position=1
}
Add(Edit,6314885,259,126)
{
 Left=10
 Top=10
 Width=260
 Font=[Verdana,10,1,0,204]
 Text="02000004FFFF"
}
Add(Edit,16511036,350,329)
{
 Left=10
 Top=35
 Width=260
 Font=[Verdana,10,1,0,204]
 Text=""
}
Add(Edit,7408337,616,259)
{
 Left=275
 Top=10
 Width=45
 Font=[Verdana,10,1,0,204]
 Text=""
}
Add(Button,4234959,91,182)
{
 Left=140
 Top=60
 TabOrder=-1
 Caption="CRC"
 link(onClick,13352919:doEvent1,[])
}
Add(For,6679924,189,189)
{
 Start=1
 End=13
 Step=2
 IncludeEnd=1
 link(onEvent,14007063:doCopy,[])
}
Add(Copy,14007063,259,189)
{
 Count=2
 link(onCopy,16381042:doConvert,[])
 link(Str,3628615:Var2,[])
}
Add(Convertor,16381042,315,189)
{
 Mode=5
 link(onResult,10389261:doOperation,[])
}
Add(Math,10389261,378,189)
{
 ResultType=0
 Point(doClear)
 link(Op1,5709474:Var1,[(384,177)(372,177)(372,233)])
}
Add(Hub,13352919,140,182)
{
 OutCount=4
 link(onEvent1,10389261:doClear,[(360,188)(360,202)])
 link(onEvent2,6679924:doFor,[])
 link(onEvent3,6000855:doOperation,[(176,202)(176,265)])
 link(onEvent4,3472694:doStrCat,[(167,209)(167,335)])
}
Add(GetDataEx,5709474,378,228)
{
 link(Data,10389261:Result,[])
}
Add(Math,6000855,371,259)
{
 OpType=1
 Op1=1
 ResultType=0
 link(onResult,12120833:doOperation,[])
 link(Op2,5709474:Var2,[])
}
Add(Math,12120833,420,259)
{
 OpType=1
 Op2=2
 ResultType=0
 link(onResult,13825976:doOperation,[])
}
Add(Math,13825976,469,259)
{
 OpType=4
 Op2=255
 ResultType=0
 link(onResult,15704333:doOperation,[])
}
Add(Convertor,51853,567,259)
{
 Mode=6
 link(onResult,7408337:doText,[])
}
Add(Math,15704333,518,259)
{
 Op2=1
 ResultType=0
 link(onResult,51853:doConvert,[])
}
Add(StrCat,3472694,301,329)
{
 link(onStrCat,16511036:doText,[])
 link(Str1,3628615:Var3,[(307,173)])
 link(Str2,7408337:Text,[(314,310)(622,310)])
}
Add(GetDataEx,3628615,259,168)
{
 link(Data,6314885:Text,[])
}

If Odd(Length(s)) then s:='0'+ s;