Add(MainForm,14022258,245,203)
{
}
Add(MathParse,1279666,462,210)
{
 DataCount=4
 MathStr="ArcCos(Sin(%1)*Sin(%3) + Cos(%1)*Cos(%3)*Cos(%2 - %4))*111.195"
 AngleMode=1
 link(onResult,10789273:doText,[])
 link(X1,16727637:Var2,[(468,194)(405,194)])
 link(X2,11125924:Text,[(475,187)(447,187)])
 link(X3,5942038:Text,[(482,187)(503,187)])
 link(X4,14247622:Text,[(489,194)(545,194)])
}
Add(Button,1612448,294,203)
{
 Left=40
 Top=110
 Width=105
 link(onClick,14284147:doCalc,[])
}
Add(Edit,10789273,525,210)
{
 Left=165
 Top=110
 Width=155
}
Add(InfoTip,5347390,294,35)
{
 Info=#67:  cos(d) = (sin(ША) ·sin(ШB) + cos(ША) ·cos(ШB))*cos(ДА  - ДB), где|33:  ША и ШB — широты данных пунктов|33:  ДА, ДB — долготы данных пунктов|43:  d — угол между пунктами по большому кругу|0:|
 HAlign=0
 Width=330
 Height=60
}
Add(Edit,5556894,399,105)
{
 Left=165
 Top=30
 Width=110
 Text="34.88922"
}
Add(Edit,11125924,441,105)
{
 Left=55
 Top=30
 Width=100
 Text="-72.04978"
}
Add(Edit,5942038,497,105)
{
 Left=165
 Top=60
 Width=110
 Text=""
}
Add(Edit,14247622,539,105)
{
 Left=55
 Top=60
 Width=100
 Text="-72.04978"
}
Add(Label,6604572,350,105)
{
 Left=110
 Top=10
 Width=103
 Height=17
 Caption="Долгота      Широта"
}
Add(MathParse,14284147,385,203)
{
 DataCount=4
 MathStr="%1 + 1 * SIN(90) / 111.195"
 AngleMode=1
 link(onResult,2561818:doEvent1,[])
 link(X1,16727637:Var1,[(391,166)])
}
Add(GetDataEx,16727637,399,161)
{
 link(Data,5556894:Text,[])
}
Add(Hub,2561818,427,203)
{
 link(onEvent1,5942038:doText,[(452,209)(452,181)(480,181)(480,111)])
 link(onEvent2,1279666:doCalc,[])
}