аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ   ;-: !"ўџџџ$%&'()*+,./0123456789<Bўџџџ=>?@ACўџџџDEўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ РFђАры|Х иNœpШРPWorkbookџџџџџџџџ` _VBA_PROJECT_CUR" gї–н|Хe—н|ХVBAџџџџџџџџ gї–н|Х06Y—н|Х  !"#$%&'()*+,-./012345ўџџџ789:;<=>?@ABCDEFGHўџџџJKLMўџџџOўџџџQRSTUVWXYZ[\]^_`aўџџџcdeўџџџgўџџџijklmnopqrstuvwxyўџџџ{|}ўџџџўџџџ ь0ЭЩ@‡сАСт\pNewstead BАaР=гК ThisWorkbookœЏМ=xKLJr3<X@"Зк1ШџArial1ШџArial1ШџArial1ШџArial""kr"\ #,##0_);\("kr"\ #,##0\)'""kr"\ #,##0_);[Red]\("kr"\ #,##0\)(#"kr"\ #,##0.00_);\("kr"\ #,##0.00\)-("kr"\ #,##0.00_);[Red]\("kr"\ #,##0.00\)@*;_("kr"\ * #,##0_);_("kr"\ * \(#,##0\);_("kr"\ * "-"_);_(@_).))_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)H,C_("kr"\ * #,##0.00_);_("kr"\ * \(#,##0.00\);_("kr"\ * "-"??_);_(@_)6+1_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_)Є0.0 Ѕ0.000 І0.0000 Ї0.00000 Ј0.000000Љ 0.0000000Њ 0.00000000Ћ 0.000000000Ќ 0.0000000000­ 0.00000000000Ў0.000000000000Џ0.0000000000000А0.00000000000000Б0.000000000000000В0.0000000000000000Г0.00000000000000000Д0.000000000000000000Е0.0000000000000000000Ж0.00000000000000000000З0.000000000000000000000И0.0000000000000000000000Й0.00000000000000000000000К0.000000000000000000000000 Л0.0000000000000000000000000!М0.00000000000000000000000000"Н0.000000000000000000000000000#О0.0000000000000000000000000000$П0.00000000000000000000000000000%Р 0.000000000000000000000000000000&С!0.0000000000000000000000000000000'Т"0.00000000000000000000000000000000рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р,ѕџ јР р*ѕџ јР р ѕџ јР рЋ Р “€џ“€џ“€џ“€џ“€џ“€џ`…Љ Sheet1…8 Sheet2…L Sheet3Œ-Ў!DistSphericLocatorСС`iќJO64GXjo65Frџ … ь0ЭЩ@ e ъ  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U} Ж џ§ § )Љ<фT@рќ#$Р$РBџз]>Ж@я7К Sheet1 ь0ЭЩ@ №  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U>Ж@я7К Sheet2 ь0ЭЩ@   dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U>Ж@я7К Sheet3 <фjxЬ>Œ­ џџ#ˆЖџџџџџџџџ<џџŠ}3пзtOПнР–чУFРFThisWorkbookџџџџџџџџ6†__SRP_4џџџџџџџџџџџџI__SRP_5 џџџџNBSheet1џџџџџџџџP~šпн-ооЏJ‚АьuЁџџџџџџџџџџџџxšпн-ооЏJ‚АьuЁŠ}3пзtOПнР–чУFџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020819-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@˜˜џџџџџџџџџџџџџџџџџџџџџџ0ћ$)D$*\Rffff*0A43fcd4d2пџџџџ4ўЪџџџџџџџџxџџџџААAttribute VB_Name = "ThisWorkbook" ŒBasŒ0{00020P819-0C$0046} |GlobalаSpac’False dCreatablPredeclaIdБTru BExposeTemplateDeriv’BustomizD2rU€€€ H 9 a џџџџщ4‰ ББ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџŸ`rU€€€ џџџџџџџџ@n<фjxЬ>Œtыџџ#ˆЖџџџџџџџџ<џџ ђWЖЁйЧD эJCЬЙЁ РFо–Сю`іEЎСьmыТgџџџџџџџџџџџџxо–Сю`іEЎСьmыТg ђWЖЁйЧD эJCЬЙЁџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@џџџџџџџџџџџџџџџџџџџџџџ0ћ$)D$*\Rffff*0B43fcd4d2пџџџџ4ўЪџџџџџџџџxџџџџЈАAttribute VB_Name = "She@et1" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2rU€€€ x A i џџџџё 4‘ бЙ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€`rU€€€ џџџџџџџџ@n__SRP_6џџџџџџџџџџџџbр__SRP_7 џџџџfBSheet2 џџџџh~__SRP_8џџџџџџџџџџџџzр<фjxЬ>Œџџ#ˆЖџџџџџџџџ<џџиЫ†eП"MЬchn€, РF№Фuœ|‘‡K‡Eœњ9{bџџџџџџџџџџџџx№Фuœ|‘‡K‡Eœњ9{bиЫ†eП"MЬchn€,џџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@џџџџџџџџџџџџџџџџџџџџџџ0ћ$)D$*\Rffff*0C43fcd4d2пџџџџ4ўЪџџџџџџџџxџџџџЈАAttribute VB_Name = "She@et2" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2rU€€€ Јй A  џџџџё 4‘ бЙ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€`rU€€€ џџџџџџџџ@n__SRP_9 џџџџ~BSheet3џџџџџџџџџџџџ€~__SRP_aџџџџџџџџџџџџ’р__SRP_bџџџџ–B‚ƒ„…†‡ˆ‰Š‹ŒŽ‘ўџџџ“”•ўџџџ—ўџџџ™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИЙКЛМНОПРўџџџТУФХўџџџЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя№ёђѓєѕіїјљњћќ§ўџўџџџ<фjxЬ>Œ­}џџ#ˆЖџџџџџџџџ<џџ—l/8еЫN@ЅЋЈ4xЬ РFY,<ѕЙGЊюеJЩёџџџџџџџџџџџџxY,<ѕЙGЊюеJЩё—l/8еЫN@ЅЋЈ4xЬџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@џџџџџџџџџџџџџџџџџџџџџџ0ћ$)D$*\Rffff*0D43fcd4d2пџџџџ4ўЪџџџџџџџџxџџџџЈАAttribute VB_Name = "She@et3" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2rU€€€ и) A Q џџџџё 4‘ бЙ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€`rU€€€ џџџџџџџџ@nModule1 џџџџ#ь"__SRP_3џџџџ˜ __SRP_2џџџџџџџџџџџџС:_VBA_PROJECTџџџџџџџџџџџџЦYР(H 8  ` p x € ˆ H JЈ€ џџџџB8$€ЈШир( P ˜шџџџџ˜ –]ђ`ђxђ]ђ№ђђ "ъЌKT "ЌЌ$њ$0Ќ0 '(Љ "ЌЌ$њ$0ЌA 'Єt LibrЌЌ0'.-0 Ќ ЌZ ( ЄЌ . '2FormЌKT "ЌЌ$њ$0Ќ0 '(ј Ќ ЌZ ( Др? '2ЌKT Ќ ЌZ Ќ '28ЌKT "ЌЌ$њ$0Ќ0 '(џџџџ "ЌЌ$њ$0ЌA 'Є" "ЌЌ$њ$0Ќ0 Ќ№ЌЌр '. Ќ ЌZ ( ЄЌ . '20SџџРЌ'2nџџА 2' iџџ – ]ђ€ђ˜ђАђџџ]ђШђр "ЌЌ$њ$0ЌA '$ "ъЌKT "ЌЌ$њ$0Ќ0 '& "ЌЌ$њ$0ЌA '*ЌЌ', $ЌЌД &Ќ *Ќ  , '4ЌKT "ЌЌ$њ$0Ќ0 '& $ЌЌД &Ќ Ќ '4ЌKT $ЌЌД Ќ '4ЌKT "ЌЌ$њ$0Ќ0 '& "ЌЌ$њ$0ЌA '* "ЌЌ$њ$0Ќ0 ЌxЌЌ№ ', $ЌЌД &Ќ *Ќ  , '4nџџP 4'6iџџ@–@ : : :Ќ $>$<ЌЌ$< '8џџiџџ№– B$P$N'B D$P$N'D B$  RЌД'F B$6 RЌД'H * Cos D$  RЌД'J) * Si D$6 RЌД'L'HiџџшџџџџрџџџџА Д-DTћ! @'R *џџџџX џџџџИ џџџџи "ЌЌ$њ$0ЌA 'OLa) +џџџџа џџџџџџџџШ]ђ ђИђађшђДЭЬЬЬЬЬ[@ЌД R L H $T J$T F$T J$V F$V $8'@џџџџРД-DTћ! @'Ral B$  RЌД'FLat,Fg B Dœ]ђађађшђђђрђјt)*c B$P$N'B;co J$V ˆ$T F$V  ˆ$V F$T'~FgnLatЌh ~$8ЌД R '~ H L $VЌ œџџЌh ~ '˜dџџ ~'˜i B Dœ–8 B$6 RЌД'H D$  RЌД'J D$6 RЌД'LЌ'@dџџ`kџџXџџџџPdЌ'˜kџџј џџџџx L H $T J$T F$T J$V F$V $8'ˆblic FџџџџР D$P$N'Dџџџџp џџџџ(kџџ€ џџџџи H Lœdџџ kџџ џџџџ F J œP ЌД'˜dџџ@ Ќ'˜kџџ0 џџџџ( џџџџ+ДAttribute VB_Name = "Module1" @ PrivaxFunction LocatorToLa(,) As Double\Dim B, D, F0Int@eger .HP, La \BмA@sc(MidL, 2, 1)) - 65 Select Case Le.nr6 JD E4E48!FE !6 g H€1 / …€T= B * 10€F90 +3+€j/ 2к4H,B41Bй)0.u‚%2ƒ%Ї‡iEz(( `8‡NТ)€C240)@;CFъ0V'DРF‚ ‡FшEls@… B4Т№End uAH“`pLa С› oBƒK”šA, C,Ќ E  G o‹ ЖA@Ъ?1 †# CMV3GQУLEM5Ы , G@Y2Ф“LoK  2 18A CK@XE€Z12GпABŽD _"й1Ц Q§1Т8‚DQŸпСЭLQ7‡(AQ12FQ Rэ! €‘Ÿ$ ‚$еNLoпN Arccаos(X ž ФЁ tn(-X3Sqbr* X4™+” 2р6Aр1) @Їic цЋDistSpherico„cЁ\РR 2ŠA]O€La, OLoр­e!F!Pii\$c 1UA6(TriZm )`b2n29cIfНAA TјhenЃ.O@ƒ{~€= 3.14159265358ј979У`р` щШЬ1)`$€/ @]хяƒ3хЭТ}№F‚‹ь @%ќ* ы €#ът №ва111.С8(Р€<дPiс(„BCCЁ ю-A1aE ЁЈ№Sin(€ЁAЁs#-SIfoCРяЎCrŸCAёC, DiўrADџD",бАу""oc2z"Ь рїo"o"хaът†я!zo"ѓo"A Сo"=џ‘/ф)o"ѓр1€7 ‘ Ч1 ‚a > 7‰Šiі. џїr1s€ЛАтС%#gВV7stp)LюoЁ))(‚)CSЫ‚ P(,- ‘&џQж,12…Aиuќ361mе3pA—5’IЏ тq-рo Ёј< 0(&^ѓpџх V  ЩŠб8Ђ Ж?:oрP№TдАџџџџЗЗ>Œ“1џџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџџџџџ> џџџџџџш +  `џџџџџџџџЄўk@џџџџŒIƒ"џџџџ џџ џџџџџџ€џџџџ@„.џџџџ@џџџ џџ`„2џџџџ8џџџџџ1+@8`џџџџџџџџЈ Фўkјџџџџ=Œ@„ˆџџџџdџџџ џџџџџџ8@„џџџџdџџџ џџј@„(џџџџTџџџ џџMi+6@`џџџџџџџџ„ўk`џџџџŒIƒ"џџџџ џџ џџџџџџ€cent@„$џџџџdџџџ џџR@„&џџџџTџџџ џџ`„*џџџџRџџџџџ8@„,џџџџ@џџџ џџy `„4`8џџџџџLNIƒBџџџџ џџ џџ€(IƒDџџџџџџ џџџџџџ€ џџ˜+8`џџџџџџџџАЬўk€џџџџ9ŒIƒ:џџџџ џџ џџџџџџ€@„Fџџџџdџџџ џџџџџџ@„HH Tџџџ џџ@„JџџџџDџџџ џџV@„Lџџџџ4џџџ џџ џџ`„R,џџџџџ џџ8 џџџџ@џџџџџџџџ+˜џџџџ`џџџџџџџџџџџџtџJxџџџџNŒIƒBџџџџ џџ џџ0€ џџƒџџџџџџШџџџџџџџџџџџџџџ %@„~џџџџTџџџ џџџџџџ@„FџџџџDџџџ џџџџџџ@„Hџџџџ4џџџ џџџџџџ@„Jа$џџџ џџџџџџIƒDџџџџџџ џџџџџџ€р` џџџџtџџџџџш xPџџџџџџаџџџџџџџџџџџџџџњ0џџџџџџџџџџџџџџ@ўџр(џџџ џџ џџџџ@ўџАџџџ џџ Pџџџџјџџџџ@„Lџџџџџџџ џџ `„R0 џџџџџ@џџџџxџџџџPџџџџџџџџџџџџџџџџ№џџџџџџџџџџџџ`џџџџШџџџџИџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџPˆh@ўџ0џџџ џџ џџ@ўџџџџџџџџџџ @ўџHєўџџ џџ @ўџџџџџфўџџ џџ p `„ЄџџџџRџџџџџ˜@ўџ`дўџџ џџ џџџџ@ўџџџџџФўџџ џџ џџџџ@ўџxДўџџ џџ џџџџ@ўџџџџџЄўџџ џџ џџџџрџџџџ0џџџџџџџџџџџџџџџџџџџџ€џџџџ˜џџџџАџџџџШџџџџџџџџШџџџџ˜џџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0hH`6џџџџtџџџџџ`X0џџџџџџџџџџџџњ0(@ўџр(џџџ џџ @ўџАџџџ џџ @ўџ8џџџ џџ џџ@ўџџџџџџџџџџ @ўџ єўџџ џџ џџ@ўџџџџџфўџџ џџ џџџџџџјџџ џџ@ўџhдўџџ џџ џџ@ўџPФўџџ џџ @ўџ€Дўџџ џџ @ўџџџџџЄўџџ џџ @ўџ˜”ўџџ џџ ˜@ўџџџџџ„ўџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP џџџџ€џџџџџџџџџџџџ  џџџџˆ џџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP H h `8џџџџtџџџџџ€x P џџџџџџџџџџџџџџџџџџџџ@ўџИ dџџџ џџ џџџџ@ўџа Tџџџ џџ џџџџ@ўџш Dџџџ џџ @ўџ 4џџџ џџ @ўџ $џџџ џџ џџ@ўџ0 џџџ џџ џџ@ўџ` џџџ џџ џџ@ўџx єўџџ џџ џџџџџџ><4џџџ џџ џџ@ўџџџџџфўџџ џџ џџ@ўџџџџџдўџџ џџ џџ@ўџџџџџЬўџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшИа џџџџџџџџјџџџџџџџџџџџџџџџџ˜ џџџџШ џџџџџџџџј џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџH € ` `@џџџџtџџџџџџџџџp H џџџџџџџџџџџџџџџџџџџџџџџџPN 6TV8џџ@ўџА џџџ џџ џџџџ@ўџџџџџ џџџ џџ (@ўџр ќўџџ џџ џџ@ўџџџџџьўџџ џџ џџџџ@ўџ фўџџџџ џџџџ@ўџ( мўџџџџ џџ@ўџ@ дўџџџџ А@ўџX Ьўџџџџ џџ@ўџџџџџФўџџџџ џџџџџџxtџџџџџ џџ˜ џџџџџџА @ 6TV8  (ќўџџ џџ @ўџьўџџ џџ џџџџџџџџ№ џџџџј џџџџ џџџџ џџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџћ$)D$*\Rffff*0N44292515*\R0*#15*\R0*#f*\R0*#fпўЪm€ џџџџB € џџџџ€€€ џџџџ"7р€ џџџџ08"7@"3h,B а"7и&9('0P"7X"3€8GЈ,Bр (0€ џџџџB 8€ џџџџ€@€X€ џџџџ"7h€ џџџџ˜"7 "3Ш№2K8"7@&;h'˜И"7Р"3ш8F2KH€ˆ€ џџџџB ˜<Y р€ џџџџB ш€ !№! №hpИ @`€f@x € џџџџ€ џџџџB  €,№! !  рˆАrU€€€€~|  yy IЙЉ)™бPє7(џѕl џ џ§ўџ єA­Dєўќіdџ/џ6џџ§ (џћыџќіфўфў((џ]ћ37(џѕl џ џ§ўџ є0­DєўќіTџ/џ6џџ3(џѕl џ џ§ўџ єA­pRџ/џ6џџєыє0ыЖ§k(џќі@џBdџ((џ ћДџ(єўZћœџTџћ”дўkRџыєыЖ§kФўћ”Дў@џћ”ЄўBt8џ6дўДўЄўцфў((џ]ћ3œ7(џѕl џ џ§ўџ є0­DєўќіTџ/џ6џџ9dџ((џ ћДџ(єўZћœџTџћ”дўўФФўр?ћ”ДўBt8џ6дўДўцфў((џ]ћ3ж'dџ((џ ћДџ(єўZћœџ(Фўћ”дўBt8џ5дўцфў((џ]ћ3м7(џѕl џ џ§ўџ є0­DєўќіTџ/џ6џџ3(џѕl џ џ§ўџ єA­pRџ/џ6џџG(џѕl џ џ§ўџ є0­ыѓ№ыЖєыѓрыЖЋ§kєўќі@џ/џ6џџBdџ((џ ћДџ(єўZћœџTџћ”дўkRџыєыЖ§kФўћ”Дў@џћ”ЄўBt8џ6дўДўЄўцєыt8џo8џttџиє4XфўdџTџ@џ$џџџдўДўЄў­\ќ7(џѕl џ џ§ўџ єA­Dєўќіdџ/џ6џџ§ (џћыџќіфўфў((џ]ћ3"7(џѕl џ џ§ўџ є0­DєўќіTџ/џ6џџ3(џѕl џ џ§ўџ єA­pRџ/џ6џџєыєыЖ§k(џќі@џKdџ((џћДџ(єўДћœџTџ(дўћДФўћ”ДўkRџыє ыЖ§kЄўћ””ў@џћ”„ўBt8џ6Дў”ў„ўьфў((џ]ћ3Ї7(џѕl џ џ§ўџ є0­DєўќіTџ/џ6џџ;dџ((џћДџ(єўДћœџTџ(дўћДФўћ”Дў(Єўћ””ўBt8џ6Дў”ўьфў((џ]ћ3с'dџ((џћДџ(єўДћœџ(дў ћ”ФўBt8џ5Фўьфў((џ]ћ3ь7(џѕl џ џ§ўџ є0­DєўќіTџ/џ6џџ3(џѕl џ џ§ўџ єA­pRџ/џ6џџF(џѕl џ џ§ўџ є0­ыєxыЖєыѓ№ыЖЋ§kєўќі@џ/џ6џџKdџ((џћДџ(єўДћœџTџ(дўћДФўћ”ДўkRџыє ыЖ§kЄўћ””ў@џћ”„ўBt8џ6Дў”ў„ўo8џttџ$јќ4\фўdџTџ@џ(џџџФўДў”ў„ўГЄ`Yєы9 tЬў§ dџћЬTџ§ DџћЬ4џ§ $џћДџ(џћ”єўB9 §kфўћМдўB9 єыoЬўГЋttџ5єў\А`$ Tџ4џџєўдўЌd!l џ џ џ  џb 5џ!lџ џ џ  џb5џ§ ќў§ьўћ3bєыttџ]њ-DTћ! @t,џl o,џГѓДыЖ§kќўќіdџl o,џГѓДыЖ§kќўќіTџl o,џГѓДыЖ§kќўќіDџl o,џГѓДыЖ§kќўќі4џDџB9 tфўdџB9 tмўDџB9 tдўdџB9 tЬў4џTџћœџB9 oфўГoмўГoдўoЬўГЋ§k џ tФўњЭЬЬЬЬЬ[@ѓДыo,џЖГoФўГttџ5 џ Иd44џTџDџdџџ џ0 ќЦ8  WrU€€€ џџџџџџџџ(`ќџџџџџџџџџџџa /(Љ`ќџџџџџџџџџџџa /(б`ќџџџџџџџџџџџq /,љ`§џџџџџџџџџџџ™ //,!`§џџџџџџџџџџџ™ //nЬamџ фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications *\G{00020813-0000-0000-C000-000000000046}#1.3#0#C:\Program Files\Microsoft Office\Office\EXCEL9.OLB#Microsoft Excel 9.0 Object LibraryМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.1#0#C:\Program Files\Microsoft Office\Office\MSO9.DLL#Microsoft Office 9.0 Object Library џџџџџџћ$)Dџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ>ŒThisWorkbook0A43fcd4d2џџThisWorkbookџџ­ вџџ Sheet10B43fcd4d2џџ Sheet1џџtывџџ Sheet20C43fcd4d2џџ Sheet2џџ0вџџ Sheet30D43fcd4d2џџ Sheet3џџ­}HвџџModule10N44292515џџModule1џџ“1`Нџџx€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџpдМыDЅ6їХўOџџџџњ2bбœJЎŽжwnяџџџџSъщXж;NЃТWЧs_нuџџџџW)ыƒAЊЯIфH Žџџџџ­ZВЕ8Ю@ОYšŸЅА%џџџџџџџџ€PZџ0/ €џAs B>„ џDirD€џelseE€џelseifH€џendifQF_€џifВ€џthen Excel€+ VBAїтWin16С~Win32MacГВVBA6­#Project1  stdole“` VBAProjectОП Officeu ThisWorkbook|у €џ_Evaluateй Sheet1ш Sheet2щ Sheet3ъ Module1b LocatorToLa4ŠLoc`ЏAXCZD[E\G^H_Asc!uLa^Lo ^ LocatorToLoBŠArccosŸXoAtnQuSqr(еЌ(DistSphericLocatorивLoc1ЭАLoc2ЮАOLaњОOLoПFLaйŽFLoчŽUCase5 Trim@я„џPiЎ^CosOSinќг WorksheetСўWorkbookk _B_var_TrimmT _B_var_UCaseaЮ €џџџ_B_var_PiVѓ _B_var_Midэp €џџџ_B_var_LaКђ €џџџ_B_var_LoШђLo2OЏLo1NЏLa2I­La1H­€џAcos7є €џџџ_B_var_AcosdYreal €џџџ_B_var_DoubleBˆarcsinЪѓ €џџџ_B_var_arcsin4n€џџџ3J ProcedureЋœWWLDistDirCalcѓOwnLatьаOwnLong(€џVarутDistМeFgnLatњwFgnLongg†beginрWWLConvЁWWLцхQRB‹ЪQTFйЪЌ(DirSphericLocatorЊ €џџџ_B_var_IfPђRtD0аRoundЌ €џџџ_B_var_beginЄџџxџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџ  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Zdirџџџџџџџџџџџџ;__SRP_0џџџџџџџџџџџџ џ__SRP_1џџџџ)вPROJECTwmџџџџџџџџџџџџ-€ўџџџ     !"#$%&'(ўџџџ*+,ўџџџ.ўџџџ01234567ўџџџ9:;ўџџџ=>?@ўџџџBўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ7В€0* pH‚dф VBAProjeˆct4@j = r ћ$)D” J< r€stdole>stdo€le h%^*\G{00€020430-C 0046}#2.0#0#C:\WINDOWS\syst em32\e2.tlb#OLE Automation`ƒEOffDic„EOf€iдc‚E€…€E2DF8D04C-5BFA-10€1B-BDE5€EдAA€C4€2ˆE€˜gram Files\Micro soft 6\MSO9.DLL#  9.0 ObК Libra,ry€CЭ"‚>ŒЁThisWorkbo okG€TЄ isWЌrЈkb€o€ŽŠ2к РHB‚1‚tвBE,Т!­ "B+B‚xSheetT1GТS@#e€Ttа1H2NуTtыд2Э2Щ2IЭ2уд3UЭ3Щ3Э3ф­ }ЫРUModu4leT€sdЮuТЬT2O9DНЏ8“1!@ Ѓ8b“K*mџџџџrU€€€~~~~~~~~~~~~~~~~~~~~~~~( щЅe.WѓНGЋKNAM&Бц фџџџџƒŠe б џџџџџџ ƒŠe б џџџџџџ1ƒŠe б џџџџџџIƒŠe б џџџџџџaA  џџџџЈџџџџЁСйy џџy19!)Project1 VBAProject ThisWorkbookSheet1Sheet2Sheet3Module1яРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA ‘џџџџ Й!0РF 3C:\Program Files\Microsoft Office\Office\EXCEL9.OLBExcel ‰џџџџБ!@0РF C:\WINDOWS\system32\stdole2.tlbstdole ‘џџџџЙ PLај-њ[НхЊDоR 1C:\Program Files\Microsoft Office\Office\MSO9.DLLOffice yџџџџЁ` LocatorToLa LocatorToLoArccosDistSphericLocator VBE6.DLL )џџџџ ˆ )џџџџ Ј )џџџџG Ш )џџџџF ш )џџџџx  )џџџџ (кРFŠ}3пзtOПнР–чУFРFšпн-ооЏJ‚АьuЁDРFWorkbook @иРF ђWЖЁйЧD эJCЬЙЁ РFо–Сю`іEЎСьmыТgDРF WorksheetиЫ†eП"MЬchn€,№Фuœ|‘‡K‡Eœњ9{b—l/8еЫN@ЅЋЈ4xЬY,<ѕЙGЊюеJЩё )џџџџI  )џџџџf (DirSphericLocatorkrU€€€€~~{ џџџџџџџџџџџџ   LocXLoc1Loc2 9‰  9‘ bThisWorkbookThisWorkbookSheet1Sheet1Sheet2Sheet2Sheet3Sheet3Module1Module1ID="{33A91886-77A3-4FE8-BDEE-DBE8A0187208}" Document=ThisWorkboPROJECTџџџџ/7SummaryInformation(џџџџџџџџ8ШDocumentSummaryInformation8џџџџџџџџџџџџ<CompObjџџџџџџџџџџџџAfok/&H00000000 Document=Sheet1/&H00000000 Document=Sheet2/&H00000000 Document=Sheet3/&H00000000 Module=Module1 Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="FAF8001FE923E923E923E923" DPB="E7E51D32E7F2D5F3D5F3D5" GC="D4D62E3DF62BF72BF7D4" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C Sheet2=0, 0, 0, 0, C Sheet3=0, 0, 0, 0, C Module1=66, 66, 400, 700, Z ўџр…ŸђљOhЋ‘+'Гй0˜@HT` x „фXsXsMicrosoft Excel@€VG'bХ@€Вг–н|ХўџеЭеœ.“—+,љЎ0и PXd lt|„ Œ ЕфY3 Sheet1Sheet2Sheet3  Worksheetsўџ џџџџ РFMicrosoft Excel WorksheetBiff8Excel.Sheet.8є9Вq