/3.0 (Extension.1 Name: "GeoLink" FirstRootClassName: "List" Roots: 2 Roots: 3 Roots: 52 Roots: 88 Roots: 89 Roots: 90 Roots: 91 Roots: 92 Roots: 93 Roots: 94 Roots: 95 Roots: 96 Roots: 97 Roots: 98 Version: 30 About: "Used for linking Views together for synchronized zooming in either a Roam Overview or Sibling mode" InstallScript: 99 UninstallScript: 100 ExtVersion: 1 ) (List.2 ) (List.3 Child: 4 Child: 12 Child: 20 Child: 28 Child: 36 Child: 44 ) (List.4 Child: 5 Child: 9 Child: 11 ) (List.5 Child: 6 Child: 7 Child: 8 ) (AVStr.6 S: "View" ) (AVStr.7 S: "ToolBar" ) (AVStr.8 S: "GeoLink.Zoom" ) (Tool.9 Help: "GeoLink Zoom Tool. When you Drag a box in the Parent Window a zoom takes place to the specified coordinates in the Child Window(s)" Icon: 10 Cursor: "Cursors.Default" Apply: "GeoLink.Zoom" ) (AVIcon.10 Name: "Z" Res: "Icons.Z" ) (Numb.11 N: 40.00000000000000 ) (List.12 Child: 13 Child: 17 Child: 19 ) (List.13 Child: 14 Child: 15 Child: 16 ) (AVStr.14 S: "View" ) (AVStr.15 S: "ButtonBar" ) (AVStr.16 S: "GeoLink.Kill" ) (Butn.17 Disabled: 1 Help: "Allows you to Kill active links to Parent Windows" Icon: 18 Click: "GeoLink.Kill" ) (AVIcon.18 Name: "Bug" Res: "Icons.Bug" ) (Numb.19 N: 25.00000000000000 ) (List.20 Child: 21 Child: 25 Child: 27 ) (List.21 Child: 22 Child: 23 Child: 24 ) (AVStr.22 S: "View" ) (AVStr.23 S: "ButtonBar" ) (AVStr.24 S: "GeoLink.ZoomExtents" ) (Butn.25 Help: "Zoom to Extents for Linked Windows" Icon: 26 Click: "GeoLink.ZoomExtents" ) (AVIcon.26 Name: "E" Res: "Icons.E" ) (Numb.27 N: 22.00000000000000 ) (List.28 Child: 29 Child: 33 Child: 35 ) (List.29 Child: 30 Child: 31 Child: 32 ) (AVStr.30 S: "View" ) (AVStr.31 S: "ButtonBar" ) (AVStr.32 S: "GeoLink.ZoomTheme" ) (Butn.33 Help: "Zoom To Theme for Linked Views" Icon: 34 Click: "GeoLink.ZoomTheme" ) (AVIcon.34 Name: "T" Res: "Icons.T" ) (Numb.35 N: 23.00000000000000 ) (List.36 Child: 37 Child: 41 Child: 43 ) (List.37 Child: 38 Child: 39 Child: 40 ) (AVStr.38 S: "View" ) (AVStr.39 S: "ButtonBar" ) (AVStr.40 S: "GeoLink.ZoomSelected" ) (Butn.41 Help: "Zoom to Selected for Linked Views" Icon: 42 Click: "GeoLink.ZoomSelected" ) (AVIcon.42 Name: "S" Res: "Icons.S" ) (Numb.43 N: 24.00000000000000 ) (List.44 Child: 45 Child: 49 Child: 51 ) (List.45 Child: 46 Child: 47 Child: 48 ) (AVStr.46 S: "View" ) (AVStr.47 S: "ToolBar" ) (AVStr.48 S: "GeoLink.Pan" ) (Tool.49 Help: "GeoLink Pan Tool Used for Sibling Link Panning" Icon: 50 Cursor: "Cursors.Default" Apply: "GeoLink.Pan" ) (AVIcon.50 Name: "P" Res: "Icons.P" ) (Numb.51 N: 39.00000000000000 ) (List.52 Child: 53 Child: 60 Child: 67 Child: 74 Child: 81 ) (List.53 Child: 54 Child: 58 Child: 59 ) (List.54 Child: 55 Child: 56 Child: 57 ) (AVStr.55 S: "View" ) (AVStr.56 S: "GeoLink" ) (AVStr.57 S: "GeoLink.RoamMake" ) (Choice.58 Help: "Create a new view and make it a child in a Roam Link with the currently selected Parent View" Label: "Create New Roam Child" Click: "GeoLink.RoamMake" Shortcut: "Keys.None" ) (Numb.59 N: 1.00000000000000 ) (List.60 Child: 61 Child: 65 Child: 66 ) (List.61 Child: 62 Child: 63 Child: 64 ) (AVStr.62 S: "View" ) (AVStr.63 S: "GeoLink" ) (AVStr.64 S: "GeoLink.RoamMakeExisting" ) (Choice.65 Help: "Use to create a Roam Parent/Child Link from views that already exist in the project." Label: "Create Roam Link From Existing Views" Click: "GeoLink.RoamMakeExisting" Shortcut: "Keys.None" ) (Numb.66 N: 2.00000000000000 ) (List.67 Child: 68 Child: 72 Child: 73 ) (List.68 Child: 69 Child: 70 Child: 71 ) (AVStr.69 S: "View" ) (AVStr.70 S: "GeoLink" ) (AVStr.71 S: "GeoLink.MakeSibling" ) (Choice.72 Help: "Use to create a new view and link it as a Sibling to another view." Label: "Create New Sibling And Link It" Click: "GeoLink.MakeSibling" Shortcut: "Keys.None" ) (Numb.73 N: 4.00000000000000 ) (List.74 Child: 75 Child: 79 Child: 80 ) (List.75 Child: 76 Child: 77 Child: 78 ) (AVStr.76 S: "View" ) (AVStr.77 S: "GeoLink" ) (AVStr.78 S: "GeoLink.MakeSiblingExisting" ) (Choice.79 Help: "Use to link multiple views into a Sibling Link" Label: "Create Sibling Links From Existing Views" Click: "GeoLink.MakeSiblingExisting" Shortcut: "Keys.None" ) (Numb.80 N: 5.00000000000000 ) (List.81 Child: 82 Child: 86 Child: 87 ) (List.82 Child: 83 Child: 84 Child: 85 ) (AVStr.83 S: "View" ) (AVStr.84 S: "GeoLink" ) (AVStr.85 S: "GeoLink.Kill" ) (Choice.86 Help: "Use to Kill Window Links for both Roam and Siblings types." Label: "Kill Selected Links" Click: "GeoLink.Kill" Shortcut: "Keys.None" ) (Numb.87 N: 7.00000000000000 ) (List.88 ) (EnScript.89 Name: "GeoLink.Zoom" SourceCode: "y`dXba|B`x'CjlF[skoaIghsj^Jfej<\"mdjNn]v0@ayFfed CjgQamm>tyBDzmaskngm0?es\\-FghHnfp( KkfeQarv9%?jgKkggJpy&FgmLw]k]qgg_jk3?dv!UYw]mvnwg`%5%^`nlakgq\"^]h`%H`t^jynfTh]rDnks fFfed\"6UYw]mv'Cjl-((0@ayFfed n^-YMcfa%5%lggG]r].sj^j%RZnjfy>nwg`%5%lqw^%%At^]p%dp]%UYqggpUgx<\"I]w]slOql06dp]XaanbjlHtk?,KnZkkgcKgzfc\"6kYqkd kgwdc\\d%HqYxR^j%asRk[hnflDhum%kgq\"^]h`%:qqmdjj%am\"IhfqU]m %fF`o^B Gjnvaaw&L]sPZij%\"bb% fF`o^By`dPZij!\"%lm]m %%\"LegdnffHhqs\\%5vkqj%\"%Gjdcd%%dp]%jfc n^% Rk[hnfl>nwg`%5%lqw^%%vaas%\"GjjYj %jdrg%%Ub^qas_OqlBXaanbjlHtk--%]mfas\\ k_-HfjdpmBtms\\?pwmj!vaas%OckaslIarr9%lm]Uk^s3?jlCkllqY~\"ZNj[y<\"I]w]slCkll3JjlttgQx]wJdem%UYqggp%5%s| UYw]mv9%JtYlNboy&L]s*I]w]slOql%%^ntaf[mh\"bj%Hfjdpm%%hh$n&L]sPZijA6vaaSYr](\"mdjf\"%;makf=exh%5k'CjlIarre]~%\"n^% `T^_y&NkMweh.y`dp%%\"?maq\\Ckll3RtglKg$6*:! \"% %Eaeq\\Iarr'LffYg'Eaeq\\Iarr'NjlzjmWlawHtamv\"%%\"^hx]\"%%;gke`Iaxh-\\hkrLtJdem$fJj[s+%%gg`%gg`%]mfas\\ k_-KnZkkgcKgzfc\"6yjz]( y`jf \"%Knksgk@nku<\"mdjNn]v0@aynwg`%5%^`nla.!vaas%\"mdjty&L]sRkak]w]me^o3?jl'$I]w]slBjbhi.Rk[hnflDhumBL]nNbjp=}l-I^pUjj^dt^jh]x&Fgm$'KnZkkgcx.`neRn]|k?]{&L]sRkko]hl-I^pIghkVkmdLMN `x'CjlUjnl^_y&Kamf@QN 'Nhgp.!Gk`djky<\")Mal`Kklp%5%s| \\jyB/ _kwjYbjLf[n^hgknf%Khdees_Qarv%h%5RZ_n^n]q0@ay 5!-I^pSYr] \"kk^x]s\"6u&NfcgqKk '\"),%%h?l3Dj^s*hbkkjl/-.&Yjho%h%5r'Nn_ml'r'?tmsl/1.&Yjho%@n_gNboy&F\\c*i*FkSmld^n.%bpmBhfs\"$6jfc Ael`Qarv'NjetndFnlqahYsgl MafjGqrB/ _kwjYbj][ajokgfdqNhgpo%ae\"!$fNn]v0@ayFfed0Eakl-,(\"6'Nn]v$\"ffi'cOejo3?dvG]r]3Jhiap-).&HuGqrZjj(+%%lggg%%\"easB`Xba|&L]sPZij&Hgtpm%%\"qB-YUk^s3?jlMcfa3Jn_gv!hjf%%6\"%39xFto[aw%\"n^% z:%@n_gPni.%\"%y`dp%%\"%MafjGqrBw %%dp]%jfc ^jiNhgpLth%5JbcmFze \\`n[gMbjiBz$KKFE'$!UB>QAS?!Nn]vINE%5%Yu0?es\\LMH*Rn]|( OejoGmsvhjGYw<\"OejoLMH0@ay:zlsqg>fj Dnpygs;nwgp%5%( hhn%]f[g\"Z>zlygm\"bj%Nn]vDnpygs:`t%:zlsqg?tmsl?>zlygmEhqsl%#3as\\ DnpygszlygmDZn%ae\"!]Gmylnp'ex Xh`e^%3Ftl(\"mdjf\"Gmylnp=ehl39cf!]Gmylnp'CjlHdhed(f:zlsqg%%]mfas\\Chne>zlygm\"6Gmylnp=ehl3?dv!L]tDhpd*Paqd!+lggDes\\%5OlcGg}&KklpFkXlqkgc-OmabjDes\\1Ok\\g%lm]vrljt^nbjp~gt\"p]sl%ln\"deqd3+$EESC%LXR>.n^*mdjCnfc\"6saq!vaasjphvas\\hh$y`jChp]B'KHDEES?'! \"pm]s\"%R^jHgzfs\"6Xagdhp`Hnky&Bqnjy%\"bb% U]mEhqsl%52\"%%\"mdjf\"%%Eri;k}&Nfeq!Y`jjd\"ZnjsgUb^qas_Nbjpk%ln\"Deqd'$!\\>NTXAANBJLQAMML. %\"%jphv%%]mf%%\"y`j?qqnl%5%Eri;k}&Qarv:oXlwami!Dn_mDhum('Hn[j\"mdjLjnwiyg%Chne1UABMCWGZH!+%%ae\"!pm]LjnwiBsak+pm]sdzbp%]s\\ \"%HjfSqKarg{]?OnZqamiEexl3?dv!Dn_mDhum*Kas\\'vaaLjtmo+\"%%eqkjYh`Eaeq\\%am\"IasLtJdohrj%\"\\`n[gEaeq\\%5Eaeq\\3?dvG]r]\"%Nn]vRhl%5%NhgpLth%#3%%Eaeq\\3KdvG]r]-Uk^s'0Uk^sUgu&`uLpwas_( %jfc %XaanbjlDnks0Karg{]'JbcmDnks0?es\\-lgg@ntmu!( %L]nNbjp=}l-I^pUjj^dt^jh]x&Rgm$'KnZkkgcx1Khdees_Qarv\"%%hh$-KnZkkgcQaxl-Ehqsl%52\"ffi'Th]rDnks0tjgZ_mH`hn]nf%H`t^jy%\"n^% Bjbhi&L]sPZijA6vaaX]q]bvbks&L]sPZij!%lggg%%\"H`ndcNboy&F\\c*tp3EtnmeQaxl'Eaeq\\Qarv%Uahcvaa%Dnfjg]\\as\\nyl~gzvcgp%ltJkeh31Kkgg%Cndk$\"%%hh!]sk|]q\"6Saq!vaasjphvas\\\"ek-Ymupaw&NkDoip~!\"%lm]m %%\"Fol:tp-Kgbt 'Qnwizkyrgeahl%YEaeq\\%ln\"Deqd%gq\"injkxBcg_jd3Mq?maq\\yZo%Cndkg]Jpnlhp`Paqd!.ES>T( % %\"^tnl\"as\\\"%% \"%ak'cgo|]w&BqnjyBBjbhiDnks0ty&L]sRkak]w]me^o3Kjl'$I]w] slBjbhi1JncfHnky! \"%%k_- Wg`oEexl3;nwgp%5%((\"Zji-Khdees_Qarv'?tmsl?,.!%lggg%%\"PaqdAwmptf3Kdv>jfZq]c*_]qkj! \"%%]mf%%geoj%\"%yeoNboyBKklp3Efcd %%\"Zr3?jlOthfj[y&RgmIt\\n^hg]$yjz]( %%\"_kwjYbjaqnfcgo|]w\"%%\"?maq\\Mcfa%5%]k0@ayFfed %%\"kgwdc\\d%Hjjrqgnf%H`t^jy%\"%%\"bb% U]quhj3?jlMcfa%4CBjbhiFfed+pm]s\"%%\"%yeoNboy&F\\c*Iawktf( %%\"%jdrg%%\"%%Xba|Hth?Rn]|Hnr'%)\"%%\"%]q&RgmJfej !Xba|%#Xba|Hth-clOyjnff+%%\"% %]mf%%\"%]s\\ \"%%gg`%\"%JtYlNboy&X]s*mdjHtk+vflQaxl( %%\"@atDnfjGqp3?jlOt^bjjjfbgl*X]y !RZnjfy;gke`'$Wg`oEexl.\"jfidp]% %\"%% \"%%\"" ) (EnScript.91 Name: "GeoLink.ZoomExtents" SourceCode: "y`dXba|B`x'CjlF[skoaIghsj^Jfej<\"mdjNn]v0@ayFfed n%5%lggOejo3Jdvnns=}ldpm?jgKkggJpy<\">ty]skhqg*Kas\\'$@atDnfj$\"WgfeKklp%5%?dqEescJps0@ayHw]egkas[jk-I^p-UYqggpH`ndc$\"Xagdhp`Hnky<\"@atDnfjGqp3?jlOt^bjjjfbgl*L]y !Ub^qas_r$\"UYqggpUgx<\")UYw]mv?kzfi<\"_]qkj hhn%]f[g\"I]w]slkgWgfeKklp%YMcfa%5%H`t^jy&L]s*)%3?jlMcfa%ae*ZJfej<\"mdjFfed+pm]s\"UYw]mv?kzfi<\"mnz]\">w]fc \"as\\RZnjfyHnu9%HfjdpmLtk%#3as\\ Ub^qas_OqlB5Rk[hnfl>nwg`%5%^`nla^ntaf[mOnZuU]shpOnZqamiEexlhhn%]f[g\";ntl m]q\"bj%HqYxR^j%cG]r]%5Dkky`jj-I^pSYr] \"%ak'cG]r]%5vaaSYr]( %%sj^j%\"%KnZkkgcKgzfc\"6yjz] \"%%Dkafc\"as\\gg`%ae\"!OnZqami?kzfi<\"mnz].\"y`jf \"%%:qgZg%geoj%\"Xagdhp`Ltk%5Ub^qas_Oql06\"^jijfc n^% OckaslKgtp]Byjtg\"%y`dp%%D`EZofBQqZiQaxl-I^p-HfjdpmLtk.\"kgwdc\\d%Hjjrqgnf%D`EZof%\"n^% q0BoJeulx+pm]s\"%%qgmqwf%fhn%%geojak'\"k*W]ymqpLe]%5*)<5!%!vaas%\"%n^*Iawktf-I^pSYr]>7y`jF`o^%%lm]m %%\"U]wknp'CjlIarre]~&UYmVh$w&W]swkjTj n_hp\"%%\"jfi\"%jdrg%%\"ek-Hdtlks&L]sPZijA6vaaSYr](\"mdjf\"%%R^nxgs&Fgm@nkud`{'OjlJpsggp-j3Kbcea-)3)(+%%\"%Y{&FgmLwgo]bv'OjlRgck_ej\\-lqw^%%\"%]s\\ \"%%]mf%gg`]s\\ bb% Xaanbjl>tmmf9%lwmd+%lm]m %Ud`{IasBRk[hnflDhum*L]y Rk[hnflHnu\"%%eqkjYh`Eaeq\\%am\"IhfqU]m %%hh$w&NkDoip~!%lggg%%\"w]ymqpjnd\"%]qkdk_-w&QgmqwfXayg9% 58/+%%lm]m %%\"nwg`%5%^`nla.ffc\"!OnZqami?kzfi<\"?]qkj!( y`jf \"%ak't'Ex=rhs{\"y`jf \"%%t^pzjsmke%%\"^hx]n^*n3JjlttgOnrj<\"!,E(.(\"mdjf\"%%lggOejo3?dv=exhqYx0I]sLt q0KaymwfNtbcnf.\"%jdrg%%\"pm][ady'CjlIarre]~&X]sGqpjfy q0L_fdj 00*%.%\"%fn-I^pUjtbdem*X]yEnfbbn]i stna.%\"^jijfc" ) (EnScript.92 Name: "GeoLink.ZoomTheme" SourceCode: "fn-I^pUjtbdem*X]yEnfbbn]i stna.y`dXba|B`x'CjlF[skoaIghsj^Jfej<\"mdjNn]v0@ayFfed mdjLm]lglBy`dXba|&L]sC\\pnnjLggfaxFghHnfp=wv9%=}ldpletf3>hp]$'?jgKkgg'!JncfHnky<\"@atDnfjGqp3?jlOt^bjjjfbgl*L]y !RZnjfy;gke`'!Khdees_Qarv9%?jgKkggJpy&FgmLw]k]qgg_jk3?dv!Xagdhp`o'! RZnjfyHnu9%(H`t^jy>tmmf9%^fdrgkgwdc\\d%Hfjdpmnf%JncfHnky\"ZJfej<\"I]w]sl-I^p-(.&FgmJfej\"bb-YSYlg9%lm]Mcfa.y`dp%%H`t^jy>tmmf9%lwmd %Gjdcd%jfc UYw]mvIkxBOckaslUgr\"$6jfc Xagdhp`Ltk%52OnZqami?kzfi<\"_]qkj _kw jYbjLqY~HdpesXaanbjlDnks kgwdc\\d%:wgsj^n%asOnZuU]s\"fFfed\"6Gjtlggk*L]yF`o^%%hh$fFfed\"6y`jF`o^%%\"pm]s\"%%Rk[hnfl>nwg`%5%lqw^%%\"GjjYj %jfc jfi\"bb% Xaanbjl>tmmf9%lwmd+%%lggg%%\";njYp\"jdx] \"%%Khdees_Ugr\"6Xagdhp`Ltk%#3%]s\\ gg` ek-H`t^jy>tmmf9%lwmd+%lm]m %QYBcl]%5%JncfHnky&Fgm$UYw]mvIkx!\"n%5%Jdem*RYp]Doip~%\"_kwjYbjp%assj^Pm]r]r %%q\"6w&ZfhqgSnlm s0KaymwfDzmasl.\"jfi\"n^% q0BoJeulx+pm]s\"%w]swkj%fnd \"%]qkdk_-w&Qgmqwf Xayg9% 58/+%%lm]m %%eqkjYh`R^nxgshpHf;fk` %%\"bb% U]quhj3?jlMcfa%4Csj^Jfej!vaas%\"%%Ogkotf3?dv=exhqYx0I]sLt q0KaymwfNtbcnf.\"%%dp]%%\"^ji%\"^hx]\"%^tjgZ_mU]quhj%asKc<]xY\"%%ae\"!Ljjxgm0@ayFfed\"5:%lm]Mcfa.y`dp%%\"%Hjjrqg*L]yty]sl't'OhYq]'3'-.!\"%%]mf%%gg`%gg`]s\\ bb% Xaanbjl>tmmf9%lwmd+%lm]m %Ud`{IasBRk[hnflDhum*L]y Rk[hnflHnu\"%%q\"6W]hl-OZgj=rhs{%%^ntaf[ms\"bj%lm]Sj^ijk\"%j%5t'QsatfVkmd-l3Jdvnns=}ldpm%%gg` %k_-j3ArGflyq.sj^j%\"njlzjm\"geq%\"^hx]n^*n3JjlttgOnrj<\"!,E(.(\"mdjf\"%^tjgZ_mH`hn]nf%HkcrLjf\"%%;gke`3?jlCkllqY~&OcgPt w&QgmqwfTjhibj.%\"jfi\"jdx] \"%%^ntaf[mBjbhinfRe]~Hjf \"%%Eaeq\\3?dv=exhqYx0Lay=}ldpm$w&X[`n^$6&6!( %%dp]%%dp]jfi ek- OckaslKgtp]BKYku^%%Ys\\*LegdnffHhqs\\%5HZhx].! \"pm]s\"wBQg\\p3EfcdGflyq\"btj%]`eaynfvaaY`jedu%%t9%j3Mmkhj\\ay`'v'NjlzjmGqpjfy! \"%]s\\ \"%ak't'Ex=rhs{\"y`jf \"%%jdvnnssak %jdrgbb% %j-T^pzjsKh|^B -(?2\".y`dp%%vaa[ajo-I^pIaxhkcr*UYsLn*k*W]ymqpHnn_nf( %jdrg%%vaa[ajo-I^pIaxhkcr*X]y=wv^jy w&ReZhj 6&0+\"%%dp]jfi " ) (EnScript.93 Name: "GeoLink.ZoomSelected" SourceCode: "fn-I^pUjtbdem*X]yEnfbbn]i stna.y`dXba|B`x'CjlF[skoaIghsj^Jfej<\"mdjNn]v0@ayFfed CjgQamm>tyBDzmaskngm0?es\\-FghHnfp( KkfeQarv9%?jgKkggJpy&FgmLw]k]qgg_jk3?dv!UYw]mvtmmf9%^fdrg^tjgZ_mUd`{IasnfUb^qas_Kklp%^ntaf[ mAthpm]whpLqY~Hdp%%YMcfa%5%:qqmdjj3?dvG]r]\"ek-YMcfa%5%lggG]r].\"%y`dp%%\"OnZqami?kzfi<\"mnz]\"%%:qgZg%gg`%]mf%ak'Ub^qas_EqnjiBstna.%\"mdjf\"%:w]`m%%]ku^%%\"LegdnffRho%5%Khdees_Ugr\"$6%dp]jfi n^*I]w]slEqnjiBstna.%sj^j%NZ?fkf<\"KkfeQarv'Cjl-H`t^jyHtk( %\"n%5%Jdem*RYp]Doip~%\"_kwjYbjp%assj^Rn]|&Fgm=hlnndVaar]x\"%n^*m*HYsKdn^_y!%lggg%%\"wBq0NjngsOhva$y&L]sU^hj[y]cGqpjfy! \"%%]mf%%]mf%%\"n^% q0BoJeulx+pm]s\"% w]swkj%fnd \"%]qkdk_-w&QgmqwfXayg9% 58/+%%lm]m %%eqkjYh`R^nxgshpHf;fk` %%\"bb% U]quhj3?jlMcfa%4Csj^Jfej!vaas%\"%%Ogkotf3?dv=exhqYx0I]sLt q0KaymwfNtbcnf.\"%%dp]%%\"^ji%\"jdx] \"%%^ntaf[mOgkotf%am\"E]HYxY \"%%k_-Hjjrqg*L]yF`o^A6%lggG]r].sj^j%\"%%Hdtlks&L]sFboudfq-U^pJpy]mv!n3KhYkg!-3).! \"%%gg`%\"as\\\"as\\]mf%% bb% Xaanbjl>tmmf9%lwmd+%lm]m %Ud`{IasBRk[hnflDhum*L]y Rk[hnflHnu\"%%q\"6W]hl-OZgj=rhs{%%^ntaf[ms\"bj%lm]Uk^s3?jl@eme{] Y`do^o%\"ek-l-EZjX]q]bv\"y`jf \"%%t9%j3Mmkhj\\ay`'v'CjlX]kg\\pj\\Jpsggp.%\"jfi\"jfi \"%ak't'Ex=rhs{\"y`jf \"%%jdvnnssak %jdrgbb% %j-T^pzjsKh|^B-(?2\".y`dp%%hhn%]f[g\"tmmf9%>fdrg\"ffi'Ub^qas_EqnjiBEceoj!.\"mdjf\"n%5%Jdem*RYp]Doip~%\"_kwjYbjp%assj^Rn]|&Fgm=hlnndVaar] x\"%n^*m*HYsKdn^_y!%lggg%%\"wBq0NjngsOhva$y&L]sU^hj[y]cGqpjfy! \"%%]mf%%]mf%%ae\"!n3Ax=lrmu.y`dp%%t^pzjsmke%%dnlan^% t'NjlzjmUbvjB'29,..sj^j%\"pm][ady'CjlIarre]~&UYmVh$w&W]swkjTjn_hp\"%%dnla%\"pm][ady'CjlIarre]~&X]sGqpjfy q0L_fdj 00*%.%\"^jijfc " ) (EnScript.94 Name: "GeoLink.Pan" SourceCode: "fn-I^pUjtbdem*X]yEnfbbn]i stna.y`dXba|B`x'CjlF[skoaIghsj^Jfej<\"mdjNn]v0@ayFfed @atDnfjGqp%5%=wv^jxatf-Hbji '?dqEesc'! LegdnffNboyBFghHnfp=wv'CjlUjdh^njfh]r0@ay 'Khdees_x( XaanbjlHtk?,KnZkkgcKgzfc\"6kYqkd kgwdc\\d%HqYxR^j%asRk[hnflDhum%kgq\"^]h`%:qqmdjj%am\"IhfqU]m %fF`o^BGjnvaaw&L]sPZij%\"bb% fF`o^By`dPZij!\"%lm]m %%\"LegdnffHhqs\\%5vkqj%\"%Gjdcd%%dp]%jfc n^% Rk[hnfl>nwg`%5%lqw^%%vaas%\"GjjYj %jdrg%%Ub^qas_OqlBXaanbjlHtk--%]mfas\\ ek -Khdees_Kgtp]Byjtg\"%y`dp%%HkcrLjf%5Ub^qas_Kklp3?jl'Ub^qas_Oql%%vaa[ajo-I^pIaxhkcr*UYs\"wBsj^Rn]|&Fgm@nkud`{'NjlzjmXboJpy]mv%%^ntaf[mBjbhinfRe]~Hjf \"%%;gke`3?jlCkllqY~&YqhiYgW]bv!n.%\"^jijfc ek-Khdees_Kgtp]BKYku^%%lggg%%sj^Rn]|&Fgm@nkud`{'Lff]mf" ) (EnScript.95 Name: "GeoLink.RoamMake" SourceCode: "L]nNbjp=}l?A}ljfrkhj3>nfc*CjgQamm%JtYlNboyBFghHnfp=wv'CjlUjdh^njfh]r0@ay 'H`t^jy;makf%KnZkkgcQaxl?CjgQamm>ty&L]sRkak]w]me^o3?jl'$Legdnffu%HMwfHxl%5zbtj%]`eaQYHYrcesWg`oEexlvfl%5%D`EZof&L]s*)%3?jlMcfa3:fkheMnne-Ockasl%+$NT9RKKGG'!RGqrDxl-C]`-lrh-clJzeg]q+as\\FdzmLfjjfs\"65kgq\"^]h`%fkgUFzeKum%n^*gCS]wvI]w]sl( %y`dp%%P^tyHfjdpmBs\"^jijfc Ga}lUYqggp%5%FdzmLfjjfs\"$6lggOejo%5co*L]y9bvbrj75!%lggg%kgq\"^]h`%H`t^jynfTh]rDnks %fF`o^BUYqggp3?jl'2\"*L]yF`o^%%hh$fFfed\"6y`jF`o^%%lm]m %%eqnjiBstna%\">w]fc \"%]s\\ \"%lm]OqlBy`dRho%# %) \"as\\% \"%k_-^tmmf9%lwmd+pm]s \"%HfjdpmBWg`oEexl3?dv!pm]Ugr+%%FdyOejo3KdvG]r]-Ockasl%-$y`jHnu'6.&@ulpwas_-%;makf%#%H`t^jy&Hgtpm*fkXlqkgc.%\"bb% ffry^n%5%lqw^%%lm]m %%eqkjYh`uesX]kg\\pj\\\"%%k-U^pF[yaug!pwmj! \"%%)Ga|Nn]v0:`iLm]lg!o.,\"%(( \"%%]mf%%vaa[ajo-Ehl~Lm]lgl%%\"Zr3?jlOthfj[y&RgmIt\\n^hg]$yjz]( %%MgpRn]|&Oclpj%\"kgwdc\\d%l%am\"Ga|Nn]v0@aylm]lgl%%\"y&X]sXbonZq]'vkqj!\"%%l-U^pF[yaug!bfdx]( %%dp]%%dp]%%Ockasl39cf!Jjo [ady\"%Th]rDnks0Lay y`dRho1Hfjdpm%%% %L]nNbjp=}l-I^pUjj^dt^jh]x&Rgm$'Hfjdpm?maq\\!.KkfeQarv\"%%sj^Snfigv0Hljfgeoj%\"mdjNn]v0LayFfed*Lfjjfs\"0S]wvI]w]sl-clOyjnff\"$'WG@OHNFP( %S]vXba|&X]sPZij 'H`t^jy'*\"Ga}lUYqggp3YxKstbjl0!\"nfcINE-[ady%Nn]vDnpygs:`t9%Nn]vINE3?jlAwmptfGYq >zlygmEhqsl%52btj%]`eaf:zlsqgnf%Nhgp>zlygmDZn%:tvmks;tmmv9%:zlsqg?tmsl--] s\\ ;qyltfCk\\p%5%zlygm+%]s\\ gg`CndkVhkqBAwmptfIabv'Cjl-FghHnfp&Jkeh'!ChnePtgq&RgmAsYgddf!pwmj! " ) (EnScript.96 Name: "GeoLink.RoamMakeExisting" SourceCode: "L]nNbjp=}l?A}ljfrkhj3>nfc*CjgQamm%JtYlNboyBFghHnfp=wv'CjlUjdh^njfh]r0@ay 'H`t^jy;makf%KnZkkgcQaxl?CjgQamm>ty&L]sRkak]w]me^o3?jl'$Legdnffu%UFtoEoyBs| _kwjYbjHf;fk`\"bj%JtYlNboy%soiBQYBcl]3?jl'2\"*L]yF`o^*GYxabVker 'H`t^jy'$!\"KKFE%DHPD.%OPniQky&@f]$yeu&`uGqrZjj( ^jiS]wvI]w]sl?,^tjgZ_mshpLSmrDrv%ak'p:%FjpsRZnjfy! \"%lm]m %%MgqpUYw]mv9%fgg`]s\\ P^tyHfjdpmBS]wvI]w]sl--[ady@QNB`x'Bnfi?TK![ajo!+Rn]|DhumBfn-I^pUjtbdem*L]ytp3EtnmeQaxl'vflQaxl1.Ln[pSj^H`ndc\"Pes\\tor\"Mk%Dnfj$%UahcEaeq\\%Ohp]k|.hh$H`ndct^j%5%Fhn\"% y`dp%%]wkmjfi LfjjfsPZijBOckasl3?dvG]r]eqnjiBeceojy`dRho%5%( vaaHgzfs\"6WgfeKklp3;tmmvek-lggnfcINE-[ady%%Xba|:zlsqg>fj%5Xba|?ZA-I^pGmylnp;]w\">zlygmEhqsl%52%%^ntaf[m`DnpygshpRn]|:tvmks:fj \"%%:tvmks;tmmv9%:zlsqg?tmsl--%gg`%\";qyltfCk\\p%5%ty]skhqg*Kas\\'$@atDnfj$\"WgfeKklp%5%?dqEescJps0@ayHw]egkas[jk-I^p-UYqggpH`ndc$\"Xagdhp`Hnky<\"@atDnfjGqp3?jlOt^bjjjfbgl*L]y !Ub^qas_r$\"@n_gglp%5%( JbcmDnks\"6€u^ntaf[mOc\\ekajjkgXagdhp`Hnky\"iBUYbk_ejj3?dv!,.&L]sPZij%nh_ojl%5r'Es\\jpNh!/\"/( uBo0Eakl-gehlay20+'Pwar\"iBu&Qk`dy u&Bqnjy24+'Pwar\"Ael`Qarv'=i\\-h-ClJzeg]q+as\\eqkjYh`kesMafjEexlk_-a%6Jbcm]xl( %y`dp%%Jbcm]xl?e%]mfas\\ Ael`jks\"6Mal`dum06 mdjNn]v\"6fn3?dv:_ya{]Cq\\nlxLggka%5%^`nla^ tjgZ_mQYBcl]%asQqZiQaxl \"ek-Kc<]xY3>hp]$y`jNhgp%%4C,3\"%%sj^j%\"eykY`dt^Byjtg%%Dkafcgg`]s\\ k_-aykSj^njBstna.%sj^j%OlcGg}&Hp_k-Y`huRn]|hu]qjjYc{esfQqZi%Dnfj0?ffsgs\"nojnl-$%[ajoKgQasc!+%%]wkmjfi cgo|]w<\"Fol:tp-[^oSg-Vqnhi~gt\"eep]%ln\"Z`iffx\"hb%lm]ennw]slvaar]xsqpm]%dhpd|as\\ny81F\\c\"Mdjejk!.mnz].hh$ffxodt9%lwmd+pm]s\"mdjLm]lglBy`dXba|&L]sVaar]x\"Laq]hldf9%Ex_Aqq*RmqlhNboy y`dVaar]x$!U^hj[ysj^y`jeduutm%onwe`%dncd\"mk%Yi\\vhy`jKkgg%Onfcqp1 WG@O%%ae\"!Ojdj[sg]BSak+pm]sdzbp%]s\\ gg`y`dVaar]x<\"mdjNn]v0@ayLm]lglkgwdc\\d%l%am\"mdjLm]lgl%y&Rgm=hlnnd*_]qkj! gg`[adyG]r]%5vaa[ajo-I^pSYr] P^s[ajo?Rn]|&Lcdalm]Vkg`to%5P^s[ajo-I^p\\as Hhqs\\XaanbjlBeceojy`dRho%5%( vaaHgzfs\"6Xagdhp`Hnky&Bqnjyn^*mdj;tmmv8C5! \"pm]s\"kgwdc\\d%HqYxR^j%asRk[hnflDhum%%\"_kwjYbj>wgy`dtesUd`{Ias%\"%n^*;ntlm]q0@ayFfed\"6[ajoMcfa.%\"%%sj^j%\"%%Hhqs\\XaanbjlBstna%\"%%Dkafc\"%%]mf%%gg`%\"ek-EqnjiKnZkkgc%5 %lqw^%%\"%lm]m %%\"GjjYj %%\"^hx]\"%%vaaUgx<\"mdjHtk--%\"as\\\"as\\\"%%hh$KgzfcUb^qas_?pwmj! \"%%lggg%%\"UdfqOggBXaanbjlDnks0@ay y`dRho.%\"%S]vXba|&X]sPZij '?qqnl%%#'vaaUgx*\"*%3Yxkstbjl0!\"#&/XAANBJLQAMM%#% OnZuU]s&Bqnjy00+']xkyjhp`%%\"%ak'cgo|]w<\"mnz].\"%%\"mdjf\"%%\"btj%]`eaxnfU^hj[y]c %%\"%%r0Lay9hlhx^$yjz]( %%\"%jfc %%\"%y`dXba|&Hgo{Mdjejk \"%%\"%Y{&FgmLwgo]bv'OjlRgck_ej\\-lqw^%%\"%%P^s[a jo-RZoy]\"%%\"btj%]`eaynfP^s[ajo-I^pY`jedu%%\"%%v'Ojl[ark[hj yjtg\"%%\"%%\"m*X]y9bvbrj kYku^%%\"%%gg`%\"%]s\\ \"%%Re]~Hjf-C]`-FjoUk^s.%\"%XaanbjlDnks0Lay y`dRho1HqYxR^j.%\"%L]nNbjp=}l-I^pUjj^dt^jh]x&Rgm$'KnZkkgcx1Khdees_Qarv\"%%\"y`jOhp]k|&Thdp%%\"n%5%lggOejo3?dv=exhqYx0KaymwfUklA}ljfs %%\"_kwjYbj?maq\\kgUdfqOgg%%\"%H`hn]*L]yQAS?NBJP6( %%hh$ffxodt9%lwmd+%%\"%lm]m %%\"%kgq\"^]h`%kkgX]q]bv^`%\"%%\"o3Kjl@eme{]-lqw^%%\"%%gg`%\"%%vaa[ajo-Ehl~Lm]lgl% %\"%%`x'CjlUjnl^_y&X]sOh`n^n]c*mnz].\"%%\"S]|Nhgp*UYxld %%\"%kgq\"^]h`%lkgS]|Nhgp*L]yLggfax%\"%%\"y&X]sXbonZq]'vkqj!\"%%\"%l3Kdv:_ya{]'hZhx].\"%%\"jfi\"%jfc %%OnZuU]s<\"ty%\"LqY~Hdp'=i\\-LggOejo.\"%Ud`{Ias&F\\c*Ga|Nn]v+%%Ub^qas_Kklp39i\\'Re]~Hjf( %%FghHnfp=wv'CjlUjdh^njfh]r0Lay 'Khdees_x+Ub^qas_Kklp.%\"y`jOhp]k|&Thdp%%P^s[ajo-I^pIaxhkcr*_gtesqKahl-lggOejo3?dv=exhqYx0KaymwfUklA}ljfs+jfi Xba|?ZA?]{&Kamf@QN 'Nhgp.[ady;qyltfAckB [ady@QN&L]sDnpygs:`tGmylnpzlygmFb_yBCk\\pngsYq{'Ifcj AwmptfHgtpm%^tjgZ_mf:tvmksnfXba|:zlsqg>fjk_-YGmsvhj3ax RrZ_j!3Fnv\"%%sj^j%\">zlygmFb_y&F\\c*Z>zlygm0@ay;qabm%]Gmylnp\"%jfc ^jiPakn;qyltf?>zlygmFb_y&L]s*CjgQamm'Gndq( DeqdGmsvhj3KjlDpZ^q]i stna." ) (EnScript.98 Name: "GeoLink.MakeSiblingExisting" SourceCode: "L]nNbjp=}l?A}ljfrkhj3>nfc*CjgQamm%JtYlNboyBFghHnfp=wv'CjlUjdh^njfh]r0@ay 'H`t^jy;makf%KnZkkgcQaxl?CjgQamm>ty&L]sRkak]w]me^o3?jl'$Legdnffu%NhgpCZA%5co*Kas\\FWB$'Nn]v$\"[ajoKklp%5%Yu0@ayHwgig\\p3?jlCq\\o\\ay`Fthqu?ZA*OejoLMH+@n_gglp%5%( JbcmDnks\"6€u^ntaf[mOc\\ekajjkgXagdhp`Hnky\"iBUYbk_ejj3?dv!,.&L]sPZij%nh_ojl%5r'Es\\jpNh!/\"/( uBo0Eakl-gehlay20+'Pwar\"iBu&Qk`dy u&Bqnjy24+'Pwar\"Ael`Qarv'=i\\-h-ClJzeg]q+as\\eqkjYh`kesMafjEexlk_-a%6Jbcm]xl( %y`dp%%Jbcm] xl?e%]mfas\\ Ael`jks\"6Mal`dum06 (\"\"\\dj[psqoj]%ae\"hjjt^vaa%nn]vuexfockasl%am\"Zwgfenbjpn^{^o%lm]m\"\\]sytu^nl%\"%hgtpmB5eqkjYh`cOejo%am\"OejoQarv%^tjgZ_mUYqggpQaxlkgWgfeKklp%p9%HfjdpmHnky&Ekg`-Y[ady\"%%hh$sC,3%%\"pm]s\"%%Uk^sQaxl-U^p-[tmmv%jnd.\"jfi\"^ji%bqnjyBbqnjy00 ^jillrEexl%5}vkgwdc\\d%Y[adyes[adyEexlk_-Y[ady8Csak+%%lggg%%\"miuDnks0:`i fNhgp%%]mfas\\ bb% yeoNboy&NkDoip~!%lggg%RkfDht3As^n*Pm]w]Cka%FtKkggfZ q]Xba|k%Am\"Mdnk%Hqqcahl3Bcgjtl%;qgZpjQamm'1SGXBA\\K'! \"a}aydp]ak'vflQaxl-Ehqsl%43\"%lggg%%Lu`>tp3Amhh$'Lm]qg]w]%fnvasgz_g\"ZrfdnZkgsn\\tor\"mk%dnfj$%\\as\\nylA6( %jphvas\\ekkoyBLu`>tp3Dhum$yeuDhum('Hn[j\"mdjkaqum\\as\\nyptQamm('Hn[j\"Pes\\to!+ek-^htlp%5%fhn\"y`jfgqeyjfc prhQarv'NjetndQ[f-^njrv\"%ae\"_ewky`nkaf\\~gclfxaanbjly`dpnjetnd\"legdnff\"_nte%dhum[ajoKklp%5%s| _kwjYbj][ajokgyeuDhum%[adyEexl39cf!][ajo( ^jikgq\"^]h`%YUk^s%asUk^sQaxl \"btj%]`eaUdfqOggnf%Khdees_ Qarv%%ae\"!$UdfqOgg*Kas\\'cOejo.;@)6!%Ymf$UdfqOgg*Kas\\'hbnxl.;@)6!.\"%y`dp%%\"prhQarv'NjetndQ[f-Y[ady\"%%dp]%%]mfas\\ k_-lrhKklp3;tmmv8%). \"pm]s\"Rkl:nz'Es^t !Vaaw]%Yqgjtl%]mqncmfn`nb^q]%ohfhsxygnbjp1Vkg`tox;\"*.%\"^tnl]mfx]hgmf9%Ex_Aqq*Qaxl'vflQaxl+$Iehc%lggoj[tfc\"Pes\\tovhQasc!.Ln[pVkg`to'! #x]jhhbnjxlklfdw]`frfxaanbjlr]ld^ny`dRho%5%( HbnxlNkLgf^jj%5hZhx]^ntaf[mOnZuU]shpOnZqamiEexlk_-HqYxR^j3>nfc*_ewky!>72).\"y`jf \"%%>htlpNkR]ld^n%5 %lqw^%%\";njYp\"jdx] \"%%lggIkxBsj^Ltk%#3%]s\\ gg`%\"pm]Ugr49%(KdeBoR]rZdt9%^fdrgbtj%]`eaUdfqOggnf%Khdees_Qarv%ak'Re]~Hjf-Hbji x]bqg`.A6/*%%vaas%\"X]hArO^ig]w<\"mnz]\"%:w]`m%%]ku^%%\"mdjHtk1\"6y`jHnu+06\"^jijfc ek- EkkoyAxEdo[awBeceoj!%Ymf$X]hArO^ig]w<\"_]qkj!( y`jf \"%HqYxR^j%5%s| %y`dIkkzhx<\"LegdnffNboy&Hgtpm%%hh$y`j?qqnlxB/+%%vaas%\"%kaqum*X]yF`o^$'?wgtr-%\"/\"UB>QAS?NBJP6( %%\"lahgs\\-U^pSYr]'$@ntmu0\"#&/XAANBJLQAMM.'! \"%]qkd %%\"_ewky&RgmJfej !Ikkzh%-Dn_m]rv']xKyjhp`0'),#XAGDHP@QASC3.%\"%x]bqg`3KjlMcfa-Ljnwi'0Gk`djky&`uLpwas_-%\"/\"UB>QAS?NBJP7( %jfc %Ud`{Ias&F\\c*_ewky! \"%HqYxR^j39i\\'u^_tfi! \"%KnZkkgcQaxl-C]`-HqYxR^j.%\"@atDnfjGqp3?jlOt^bjjjfbgl*X]y !Ub^qas_r$%OnZqamiEexl.\"x]hgmf'CjlIarre]~&_gnoMkW]hl'hbnxl3?dv=exhqYx0KaymwfUklA}ljfs+as\\hh$->njrvBoR]rZdt9%lwmd+]s\\% Rg\\ExEjeagkBkYku^%.%sj^j%Re]~Hjf?OnZqamiEexl3?dv!pm]Ugr+%%kdehji&X]sPZij '?qqnl%%#*mdjH tk--.&fkRvkes_%#$&/\"%KHDEES?%DHPD'0'Re]~Hjf-Ehqsl%#0+']xKyjhp`%%Re]~Hjf-C]`-kj[np]%%Ub^qas_Kklp3Kjl'vaaUgx$OnZuU]s! \"%?jgKkggJpy&FgmLw]k]qgg_jk3Kdv!Xagdhp`o'$XaanbjlDnks+%%kdehji&L]sFboudfq-\\hkrLtJdem$kawks0@aynjrvBoR]rZdt9%lwmd+]s\\% Rg\\ExEjeagkByjtg\"%%lggg%\"JjoU]mNboyBz%%HdplBXaanbjlDnks0fj%5Xba|?ZA-I^pGmylnp;]w:tvmks;tmmv9%(^ntaf[m`DnpygshpRn]|:tvmks:fj \">zlygmEhqsl%5Dnpygs;nwgp%#%) gg`GmsvhjIahl?@n[yanpZn~&RYjg!>zlygmEhqsl.eqkjYh`c;qyltfkg[ajoAwmptfGYq n^% `Dnpygs&hu!OuYh](0Gky!\"pm]s\"%GmsvhjIahl-C]`-YGmsvhj3?jlBnb_p$f:tvmks!gg`]s\\ MbhqLtgk\"6Gmylnp=ehl3?dv!L]tDhpd*Paqd!+GndqLnqe*X]y=mc[hj\\-lqw^%%\"" ) (Script.99 Name: "My Extension Install" SourceCode: "'DO NOT EDIT!!!\n\nif (av.getproject=nil) then return(nil) end\n\n\ntheDocs = SELF.get(0)\ntheControlList = SELF.get(1)\ntheMenuList = SELF.get(2)\ntheToolMenuList=SELF.Get(3)\ntheProject=Av.getproject\n\n\n'Add the Docs\n'\nfor each adoc in theDocs\n theProject.addDoc(adoc)\nend\n\n'Add the Controls\n'\nfor each totalControl in theControlList\n 'The Control list\n acontrol=totalControl.get(0)\n \n 'The physical control\n theControl = totalControl.get(1)\n \n 'The control Index\n theCindex=totalControl.get(2)\n\n 'Find the DocGUI\n theControlDoc=av.getproject.findGUI(aControl.get(0))\n if (theControlDoc=NIL) then \n MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n return(nil)\n end\n \n 'This finds the control set \n thecommand=\"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n thescript1=Script.Make(thecommand)\n thecontrolset=thescript1.doit(\"\")\n \n 'Add the control to the control set\n theControlSet.Add(theControl,theCindex )\nend\n\n\n'Add the menus\nfor each totalcontrol in theMenuList\n \n 'The Control list\n acontrol=totalControl.get(0)\n mDoc=acontrol.get(0)\n mMenu=acontrol.get(1)\n mMenuItem=acontrol.get(2)\n\n 'The physical control\n theControl = totalControl.get(1)\n \n 'The control Index\n theCindex=totalControl.get(2)\n\n 'Find the DocGUI\n theControlDoc=av.getproject.findGUI(aControl.get(0))\n if (theControlDoc=NIL) then \n MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the c urrent project.\",\"Script Eror\")\n return(nil)\n end\n \n theMbar=av.getproject.findGUI(mDoc).GetMenuBar\n themenu=theMbar.findbylabel(mMenu)\n if (themenu=NiL) then\n themenu=menu.make\n themenu.setlabel(mMenu)\n theMbar.add(themenu,999)\n end\n \n themenu.add(thecontrol, theCindex)\nend\n \n \n'Add the Tool Menus\n\nfor each totalControl in theToolMenuList\n 'The Control list\n acontrol=totalControl.get(0)\n \n 'The physical control\n theControl = totalControl.get(1)\n \n 'The con trol Index\n theCindex=totalControl.get(2)\n\n 'Find the DocGUI\n theControlDoc=av.getproject.findGUI(aControl.get(0))\n if (theControlDoc=NIL) then \n MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n return(nil)\n end\n \n 'This finds the control set \n thecommand=\"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n thescript1=Script.Make(thecommand)\n thecontrolset=av.getproject.findGUI(aControl.get(0)).GetToolBa r\n \n 'Add the control to the control set\n theControlSet.Add(theControl,theCindex)\nend\n\nGeoLinkExt = Extension.Find(\"GeoLink\")\nGeoLinkExt.GetPreferences.Add(\"ParentChild\",{})\nGeoLinkExt.GetPreferences.Add(\"Siblings\",{})\n\nav.getproject.setmodified(true)\n\n\n'And the scripts add themselves\n" ) (Script.100 Name: "My Extension Uninstall" SourceCode: "'DO NOT EDIT!!!\n\n'The SELF is the Extension\n\ntheDocs = SELF.get(0)\ntheControlList = SELF.get(1)\ntheMenuList = SELF.get(2)\ntheToolMenuList=SELF.get(3)\ntheProject=Av.getproject\n\n\n'Add the Docs\n'\nfor each adoc in theDocs\n If (theProject.finddoc(adoc.getname)<>NIL) then \n theAnswer=msgbox.yesno(\"Remove the Document \"+adoc.getname+\"?\",\"Remove Document?\",TRUE)\n if (theAnswer=TRUE) then theProject.RemoveDoc(adoc) end\n end\nend\n\n'Removethe Controls\n'\nfor each totalControl in theControlList\n 'Get the control list from the Ext\n acontrol=totalControl.get(0)\n \n 'Get the physical Control\n theControl = totalControl.get(1)\n \n 'Get the Controls Index\n theCindex=totalControl.get(2)\n\n 'Find the DocGUI for the Control\n theControlDoc=av.getproject.findGUI(aControl.get(0))\n if (theControlDoc=NIL) then \n MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n return(nil)\n end\n \n 'This sequence finds the appropiate control set\n thecommand= \"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n thescript1=Script.Make(thecommand)\n thecontrolset=thescript1.doit(\"\")\n\n 'See if the control is in the set , if so remove it\n if (theControlSet.GetControls.find(theControl)<>NIL) then\n theControlSet.remove(theControl)\n if (thecontrol = \"ToolBar\") then\n theControlSet.selectdefault\n end\n end\nend\n\n\n'Remove the Menus\n'\nfor each totalcontrol in theMenuList\n \n 'The Control list\n acontrol=totalControl.get(0 )\n mDoc=acontrol.get(0)\n mMenu=acontrol.get(1)\n mMenuItem=acontrol.get(2)\n\n 'The physical control\n theControl = totalControl.get(1)\n \n 'The control Index\n theCindex=totalControl.get(2)\n\n 'Find the DocGUI\n theControlDoc=av.getproject.findGUI(aControl.get(0))\n if (theControlDoc=NIL) then \n MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n return(nil)\n end\n \n theMbar=av.getproject.findGUI(mDoc).GetMenuBar\n themenu=theMbar.findbylabel(mMenu)\n if (themenu=NiL) then\n MsgBox.Warning(\"The menu named \"+mMenu+\" is not here.\",\"Script Eror\")\n 'return(nil)\n else\n \n thething=themenu.getcontrols.find(thecontrol)\n if (thething<>NIL) then \n themenu.remove(thecontrol) \n end\n 'msgbox.info(themenu.GetControls.count.asstring,\"\")\n if (themenu.GetControls.count<1) then\n theMbar.remove(themenu)\n end\n end\nend\n \nfor each totalControl in theToolMenuList\n 'Get the control list from the Ext\n acontrol=totalControl.get(0)\n \n 'Get the physical Control\n theControl = totalControl.get(1)\n \n 'Get the Controls Index\n theCindex=totalControl.get(2)\n\n 'Find the DocGUI for the Control\n theControlDoc=av.getproject.findGUI(aControl.get(0))\n if (theControlDoc=NIL) then \n MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n return(nil)\n end\n \n 'This sequence finds the appropiate control set\n thecontrolset=av.getp roject.findGUI(aControl.get(0)).GetToolBar\n\n \n 'See if the control is in the set , if so remove it\n if (theControlSet.GetControls.find(theControl)<>NIL) then\n \n theControlSet.remove(theControl)\n theControlSet.selectdefault\n end\n\nend\n \n\n'And the scripts delete themselves\n\n\nav.getproject.setmodified(true)\n" )