Add(MainForm,4188863,70,112)
{
 Left=20
 Top=105
 Width=617
}
Add(Edit,8135706,161,112)
{
 Left=15
 Top=5
 Width=585
 Text="$GPGGA,004241.47,5539.8667,N,03733.0555,E,1,04,2.0,-0015,M,,,,*31"
}
Add(Button,16450772,70,175)
{
 Left=15
 Top=35
 Caption=">>"
 link(onClick,7112153:doEvent1,[])
}
Add(StrMask,11534908,210,182)
{
 Mask="$GPGGA*"
 link(onTrue,7829789:doEvent1,[])
}
Add(Copy,13043222,161,182)
{
 Position=1
 Count=256
 link(onCopy,11534908:doCompare,[])
 link(Str,8135706:Text,[])
}
Add(FormatStr,5094779,217,112)
{
 DataCount=1
 Mask=",%1,"
 link(onFString,1316651:doSearch,[])
}
Add(BlockFind,1316651,266,112)
{
 IncludeBlock=1
 Delete=0
 ReplaceStr=","
 StartBlock=","
 EndBlock=","
 link(onSearch,12091166:doAdd,[])
}
Add(ListBox,12091166,322,112)
{
 Left=85
 Top=35
 Width=175
 Height=175
}
Add(Edit,4578416,658,196)
{
 Left=275
 Top=50
 Width=95
}
Add(Edit,8235757,658,112)
{
 Left=275
 Top=100
 Width=95
}
Add(Edit,14626515,658,287)
{
 Left=5
 Top=245
 Width=595
 link(onChange,15299783:doShellExec,[(698,293)(698,300)])
}
Add(Label,8584086,658,154)
{
 Left=295
 Top=30
 Width=45
 Height=17
 Caption="Широта"
}
Add(Label,666041,658,70)
{
 Left=295
 Top=80
 Width=47
 Height=17
 Caption="Долгота"
}
Add(Label,14043147,658,245)
{
 Left=140
 Top=225
 Width=87
 Height=17
 Caption="Запрос в Google"
}
Add(Hub,7112153,112,175)
{
 link(onEvent1,12091166:doClear,[(312,181)(312,125)])
 link(onEvent2,13043222:doCopy,[])
}
Add(Hub,7829789,259,189)
{
 link(onEvent1,5094779:doString,[(303,195)(303,157)(205,157)(205,118)])
 link(onEvent2,2518982:doSplit,[(307,202)(307,195)])
}
Add(StrPart,7077041,364,189)
{
 Char=","
 link(onSplit,4222585:doSplit,[])
}
Add(StrPart,9409415,448,189)
{
 Char=","
 link(onSplit,13914377:doSplit,[(487,195)(487,169)(394,169)(394,111)])
 link(onPart,368880:doCompare,[])
}
Add(StrPart,4222585,406,189)
{
 Char=","
 link(onSplit,9409415:doSplit,[])
 link(onPart,14774177:doValue,[(451,202)(451,160)])
}
Add(StrPart,13914377,406,105)
{
 Char=","
 link(onSplit,9824848:doSplit,[])
 link(onPart,9631331:doValue,[(450,118)(450,76)])
}
Add(Memory,1623252,560,112)
{
 Default=Integer(-1)
 link(onData,6666623:doCalc,[])
}
Add(Memory,9631331,609,70)
{
}
Add(Memory,14774177,609,154)
{
}
Add(Memory,7870079,553,105)
{
 Default=Integer(1)
 link(onData,1623252:doValue,[(597,111)(597,115)(548,115)(548,118)])
}
Add(StrPart,9824848,448,105)
{
 Char=","
 link(onSplit,6497561:doString,[(495,111)(495,293)])
 link(onPart,10289855:doCompare,[])
}
Add(StrPart,2518982,322,189)
{
 Char=","
 link(onSplit,7077041:doSplit,[])
}
Add(MathParse,3370161,609,196)
{
 MathStr="((%1 div 100) + (%1/100-(%1 div 100) )/0.6)*%2"
 link(onResult,4578416:doText,[])
 link(X1,14774177:Value,[])
}
Add(If_else,368880,504,196)
{
 Op2=String(N)
 link(onTrue,768091:doClear,[])
 link(onFalse,7372848:doClear,[])
}
Add(Memory,768091,553,189)
{
 Default=Integer(1)
 link(onData,7372848:doValue,[(597,195)(597,199)(548,199)(548,202)])
}
Add(Memory,7372848,560,196)
{
 Default=Integer(-1)
 link(onData,3370161:doCalc,[])
}
Add(MathParse,6666623,609,112)
{
 MathStr="((%1 div 100) + (%1/100-(%1 div 100) )/0.6)*%2"
 link(onResult,8235757:doText,[])
 link(X1,9631331:Value,[])
}
Add(If_else,10289855,504,112)
{
 Op2=String(E)
 link(onTrue,7870079:doClear,[])
 link(onFalse,1623252:doClear,[])
}
Add(FormatStr,6497561,595,287)
{
 Mask="http://maps.google.com/maps?f=l&hl=en&q=sandwiches&near=%2,%1&ie=UTF8&z=12&om=1"
 link(onFString,14626515:doText,[])
 link(Str1,6666623:Result,[(601,151)(615,151)])
 link(Str2,3370161:Result,[(608,257)(615,257)])
}
Add(WinExec,15299783,707,287)
{
}