/3.0 (ODB.1 Dependencies: "$AVEXT/prjctr.avx\n$AVEXT/datum.avx\n" FirstRootClassName: "Project" Roots: 2 Version: 30 ) (Project.2 Name: "datum.apr" CreationDate: "Thursday, July 18, 1996" GUIName: "Project" Win: 3 CSMgr: 4 VisGUIWidth: 70 Doc: 5 Doc: 8 Doc: 11 Doc: 14 Doc: 20 Doc: 23 Doc: 26 Doc: 29 Buttons: 32 Buttons: 33 Buttons: 34 Dependencies: 35 Dependencies: 36 Scripts: 37 GUI: 38 WorkDir: 805 WinX: 9 WinY: 5 WinW: 637 WinH: 509 SelColor: 806 GUINames: 807 GUINames: 808 GUINames: 809 GUINames: 810 GUINames: 811 GUINames: 812 GUINames: 813 ) (DocWin.3 Owner: 2 Open: 1 X: 5 Y: 6 W: 271 H: 317 ) (CSMgr.4 ) (SEd.5 Name: "Datum.ConvertPoint" CreationDate: "Thursday, July 18, 1996 06:03:27" GUIName: "Script" Win: 6 CSMgr: 7 Source: "' Name: Datum.ConvertPointDatum\n'\n' Title: Converts the specified point from input datum to output datum.\n'\n' Topics: \n'\n' Description: This script prompts for a point in decimal degrees, an input \n' datum, and an output datum, and converts the given point from the input \n' datum to the output datum. The formulas and parameters used are those of \n' the Standard Molodensky Datum Transformation as defined in DMA TR 8350.2. \n'\n' Requires: The following scripts: LoadDatumParameters, TransformDatums \n' Loa dDatumParameters requires the parameter file datum.par.\n'\n' Self: \n'\n' Returns: \n\n' Load datum parameter file and create parameter dictionary.\n\ndParams = av.Run(\"Datum.LoadParameters\",nil)\nif (dParams = Nil) then\n MsgBox.Error( \"Unable to load datum parameters.\", \"\" )\n return nil\nend\n\n\n' Get point from user.\n\ns = MsgBox.Input(\"Enter point:\"+NL+\"(Longitude Latitude)\" ,\n \"12.34567 12.34567\", \"Convert Point Datum\")\nif (s = Nil) then\n return nil\nend\n \nsx = s.Extract(0)\nsy = s.Extract(1)\nif ((sx.IsNumber.N ot) or (sy.IsNumber.Not)) then\n MsgBox.Error( \"Coordinate not valid.\", \"\" ) \n return nil\nend\n\npt = Point.Make(sx.AsNumber, sy.AsNumber)\n\n\n' Get input datum\n\ndescriptions = dParams.Get(\"DESCRIPTIONS\")\ninDatum = MsgBox.ListAsString( descriptions, \"Choose INPUT datum:\",\n \"Convert Point Datum\" ) \nif (inDatum = Nil) then\n return nil\nend\n\n\n' Get output datum\n\noutDatum = MsgBox.ListAsString( descriptions, \"Choose OUTPUT datum:\", \n \"Convert Point Datum\" )\nif (outDatum = Nil) then\n return nil\nend\n\n\n' Transfo rm point\n\nnewpt = av.Run(\"Datum.TransformDatums\", {inDatum,outDatum,pt,dParams})\n\n' Output result in message box \n\nMsgBox.Info(inDatum++\" \"++pt.AsString++nl++outDatum++\" \"++newpt.AsString,\n \"Convert Point Datum\")\n" SearchStr: "exit" ) (DocWin.6 Owner: 5 X: 18 Y: 2 W: 603 H: 385 ) (CSMgr.7 ) (SEd.8 Name: "Datum.ConvertThemeDatum" CreationDate: "Thursday, July 18, 1996 06:03:33" GUIName: "Script" Win: 9 CSMgr: 10 Source: "' Name: Datum.ConvertThemeDatum\n'\n' Title: Converts coordinates in active themes from one datum to another.\n'\n' Topics: Views\n'\n' Description: This script prompts for an input datum and an output datum, \n' and then converts the coordinates of all features in the active themes \n' from the input datum to the output datum. Only themes referencing writable \n' shapefiles will be converted. Coordinates in these themes should be in\n' decimal degrees. The formulas and parameters used are those of the\n' Stand ard Molodensky Datum Transformation as defined in DMA TR 8350.2.\n'\n' Note: This takes a while to run.\n'\n' Requires: a View must be the active document. Executes the scripts\n' LoadDatumParameters, TransformDatums.\n'\n' Self: \n'\n' Returns: \n\n\n\n' Load datum parameter file. This must be first\n\ndParams = av.Run(\"Datum.LoadParameters\",nil)\nif (dParams = Nil) then\n MsgBox.Error( \"Unable to load datum parameters.\", \"\" )\n return nil\nend\n\n\n' Get input datum\n \ndescriptions = dParams.Get(\"DESCRIPTIONS\")\ninDatum = MsgBox.ListAsString( descriptions, \"Choose INPUT datum:\",\n \"Convert Point Datum\" )\nif (inDatum = Nil) then\n return nil\nend\n \n \n' Get output datum\n \noutDatum = MsgBox.ListAsString( descriptions, \"Choose OUTPUT datum:\",\n \"Convert Point Datum\" )\nif (outDatum = Nil) then\n return nil\nend\n\n\n' View should be the Active Document\n\ntheView = av.GetActiveDoc\n\n\n' Loop through each active theme\n\nfor each t in theView.GetActiveThemes\n\n 'Skip themes that cannot be edited\n\n if (t.CanEdit.Not) then\n MsgBox.Warning (\"Theme \"\"\"++t.getname++\"\"\" cannot be edited.\",\n \"Convert Theme Datum\")\n continue\n end\n \n theFTab = t.GetFTab\n shapeField = theFTab.FindField( \"Shape\" )\n shapeType = shapeField.GetType\n numRecs = theFTab.GetNumRecords\n\n 'Make the FTab editable\n\n theFTab.SetEditable(TRUE)\n\n 'Show the progress bar and message\n\n av.ShowStopButton\n av.ShowMsg( \"Converting\"++t.GetName+\"...\" )\n\n 'Loop through each record in the FTab (i.e. each feature)\n\n for each recNum in theFTab\n\n 'Get the sha pe associated with the FTab record\n\n currentShape = theFTab.ReturnValue( shapeField, recNum )\n\n 'Disassemble shape into points based on which type of shape it is.\n 'Convert each point individually and then reassemble into new shape.\n 'Store new shape in FTab record\n\n if ( shapeType = #FIELD_SHAPEPOINT ) then\n\n newpt = av.Run(\"Datum.TransformDatums\",\n {indatum, outdatum, currentshape, dParams})\n\n theFTab.SetValue( shapeField, recNum, newpt )\n\n elseif (shapeType = #FIELD_SHA PEMULTIPOINT) then\n\n shapeList = currentShape.AsList\n newShapeList = List.Make\n for each xyPoint in shapeList\n newpt = av.run(\"Datum.TransformDatums\", {indatum,outdatum,xyPoint,dParams})\n newShapeList.Add(newpt)\n end\n theFTab.SetValue( shapeField, recNum, MultiPoint.Make(newShapeList) )\n\n elseif (shapeType = #FIELD_SHAPELINE) then\n\n shapeList = currentShape.AsList\n newShapeList = List.Make\n for each shapePart in shapeList\n newShapePart = List.M ake\n newShapeList.Add(newShapePart)\n for each xyPoint in shapePart\n newpt = av.run(\"Datum.TransformDatums\",{indatum,outdatum,xyPoint,dParams})\n newShapePart.Add(newpt)\n end\n end\n theFTab.SetValue( shapeField, recNum, PolyLine.Make(newShapeList) )\n\n elseif (shapeType = #FIELD_SHAPEPOLY) then\n\n shapeList = currentShape.AsList\n newShapeList = List.Make\n for each shapePart in shapeList\n newShapePart = List.Make\n newShapeList.Add(ne wShapePart)\n for each xyPoint in shapePart\n newpt = av.run(\"Datum.TransformDatums\",{indatum,outdatum,xyPoint,dParams})\n newShapePart.Add(newpt)\n end\n end\n theFTab.SetValue( shapeField, recNum, Polygon.Make(newShapeList) )\n \n end\n\n 'Update progress bar\n\n progress = (recNum / numRecs) * 100\n proceed = av.SetStatus( progress )\n if ( proceed.Not ) then\n av.ClearStatus\n av.ShowMsg( \"Stopped\" )\n return nil\n end\n\n end\n \n 'Finished! Flush the FTab changes to disk and set it to read-only\n\n theFTab.Flush\n theFTab.SetEditable(FALSE)\n \n av.ClearStatus\n av.ClearMsg\nend\n\n\n" SearchStr: "exit" ) (DocWin.9 Owner: 8 X: 99 Y: 15 W: 410 H: 296 ) (CSMgr.10 ) (SEd.11 Name: "Datum.LoadParameters" CreationDate: "Thursday, July 18, 1996 06:03:43" GUIName: "Script" Win: 12 CSMgr: 13 Source: "' Name: Datum.LoadParameters\n'\n' Title: Reads the datum parameters file and populates a dictionary.\n'\n' Topics: Views\n'\n' Description: This script reads the datum parameters file \"datum.par\" \n' and stores its contents in a dictionary which is returned to the calling \n' script. \n'\n' There is one entry in the dictionary for every datum defined in the \n' datum.par file. The key for the entry is the descriptive text for the \n' datum. The value for the entry is a list containing the parameter values \n' used by the Molodensky formulas to convert from the local datum to WGS 84. \n'\n' There is one additional entry in the dictionary: a list (in alphabetical \n' order) of all the datum descriptions. The key for this entry is the \n' string \"DESCRIPTIONS\". This is in the dictionary for reasons of \n' consolidation.\n'\n' Note that since a NameDictionary is being used, the object name is the key.\n'\n' Requires: Called from ConvertPointDatum or ConvertThemeDatum. Requires \n' the datum parameter file 'datum.par'. Modif y the code below for the \n' appropriate location of this file. \n'\n' Self: \n'\n' Returns: A Dictionary containing datum parameters. \n\ndescriptions = List.Make\ndescriptions.SetName(\"DESCRIPTIONS\")\n\n' Make the dictionary and add the list of descriptions to it. Set the\n' object tag of the project to point to the dictionary.\n\ndDatumParams = NameDictionary.Make(150)\ndDatumParams.Add(descriptions)\n\n' Open datum.par as a LineFile\n\nparamFile = LineFile.Make(\"C:\\esri\\datum.par\".asfilename, #FILE_PERM_READ)\nif (para mFile = nil) then\n MsgBox.Error(\"Unable to read datum.par\",\"\")\n return( Nil )\nend\n \n' Loop through each line in datum.par. (There is one datum per line.)\n\nwhile ( paramFile.IsAtEnd.not )\n\n ' Read and tokenize the line\n\n blah = paramFile.ReadElt\n tokens = blah.AsTokens(\" \"++tab)\n\n ' Extract the description out of the line and add it to the list of\n ' descriptions. The description is a quoted string.\n \n start = blah.IndexOf(\"\"\"\")+1\n desc = blah.Middle(start, blah.Count - start - 1)\n descriptions .Add(desc)\n\n ' Build the list of parameters from the tokens and store them in dictionary.\n ' Do not change the order of the parameters in this list! \n\n parameters = List.make\n parameters.SetName(desc)\n parameters.Add(tokens.Get(1).AsNumber)\n parameters.Add(1 / tokens.Get(2).AsNumber) \n parameters.Add(tokens.Get(3).AsNumber)\n parameters.Add(tokens.Get(4).AsNumber)\n parameters.Add(tokens.Get(5).AsNumber)\n parameters.Add(tokens.Get(0))\n dDatumParams.Add(parameters)\nend\n\n' Finished! Close the file.\n \nparamFile.Close\n\nreturn( dDatumParams)\n\n\n" SearchStr: "exit" ) (DocWin.12 Owner: 11 Y: 32 W: 631 H: 326 ) (CSMgr.13 ) (SEd.14 Name: "Datum.Parameters" CreationDate: "Thursday, July 18, 1996 06:06:24" GUIName: "Script" Win: 15 CSMgr: 16 Source: "' Name: Datum Parameters \n'\n' Title: Datum Parameters for Datum Extension\n'\n' Topics: Views\n'\n' Description: Place the uncommented portions of this script into \n' a text file called \"$HOME/datum.par\". \n'\n' Requires: \n'\n' Self: \n'\n' Returns: \n\nADI 6378249.145 293.465 -166 -15 204 0 0 0 0 \"ADINDAN\"\nADI_E 6378249.145 293.465 -118 -14 218 0 0 0 0 \"ADINDAN - Burkina Faso\"\nADI_F 6378249.145 293.465 -134 -2 210 0 0 0 0 \"ADINDAN - Cameroon\"\nADI_A 6378249.145 293.465 -165 -11 20 6 0 0 0 0 \"ADINDAN - Ethiopia\"\nADI_C 6378249.145 293.465 -123 -20 220 0 0 0 0 \"ADINDAN - Mali\"\nADI_M 6378249.145 293.465 -166 -15 204 0 0 0 0 \"ADINDAN - Mean Solution\"\nADI_D 6378249.145 293.465 -128 -18 224 0 0 0 0 \"ADINDAN - Senegal\"\nADI_B 6378249.145 293.465 -161 -14 205 0 0 0 0 \"ADINDAN - Sudan\"\nAFG 6378245 298.3 -43 -163 45 0 0 0 0 \"AFGOOYE\"\nAIN_A 6378388 297 -150 -250 -1 0 0 0 0 \"AIN EL ABD 1970 - Bahrain Islan\"\nAIN_B 6378388 297 -143 -236 7 0 0 0 0 \"AIN EL ABD 1970 - Saudi Arabia\"\nANO 6378160 298.25 -491 -22 435 0 0 0 0 \"ANNA 1 ASTRO 1965\"\nAIA 6378249.145 293.465 -270 13 62 0 0 0 0 \"ANTIGUA ISLAND ASTRO 1943\"\nARF 6378249.145 293.465 -144 -90 -294 0 0 0 0 \"ARC 1950\"\nARF_A 6378249.145 293.465 -138 -105 -289 0 0 0 0 \"ARC 1950 - Botswana\"\nARF_H 6378249.145 293.465 -153 -5 -292 0 0 0 0 \"ARC 1950 - Burundi\"\nARF_B 6378249.145 293.465 -125 -108 -295 0 0 0 0 \"ARC 1950 - Lesotho\"\nARF_C 6378249.145 293.465 -161 -73 -317 0 0 0 0 \"ARC 1950 - Malawi\"\nARF_M 6378249.145 293.465 -144 -90 -294 0 0 0 0 \"ARC 1950 - Mean Solution\"\nARF_D 6378249.145 293.465 -134 -105 -295 0 0 0 0 \"ARC 1950 - Swaziland\"\nARF_E 6378249.145 293.465 -169 -19 -278 0 0 0 0 \"ARC 1950 - Zaire\"\nARF_F 6378249.145 293.465 -147 -74 -283 0 0 0 0 \"ARC 1950 - Zambia\"\nARF_G 6378249.145 293.465 -142 -96 -293 0 0 0 0 \"ARC 1950 - Zimbabwe\"\nARS 6378249.145 293.465 -160 -6 -302 0 0 0 0 \"ARC 1960\"\nASC 6378388 297 -205 107 53 0 0 0 0 \"ASCENSION ISLAND 1958\"\nATF 6378388 297 145 75 -272 0 0 0 0 \"ASTRO BEACON E 1945\"\nSHB 6378388 297 -320 550 -494 0 0 0 0 \"ASTRO DOS 71/4\"\nTRN 6378388 297 114 -116 -333 0 0 0 0 \"ASTRO TERN ISLAND (FRIG) 1961\"\nASQ 6378388 297 124 -234 -25 0 0 0 0 \"ASTRONOMICAL STATION 1952\"\nAUA 6378160 298.25 -133 -48 148 0 0 0 0 \"AUSTRALIAN GEODETIC 1966\"\nAUG 6378160 298. 25 -134 -48 149 0 0 0 0 \"AUSTRALIAN GEODETIC 1984\"\nPHA 6378249.145 293.465 -79 -129 145 0 0 0 0 \"AYABELLE LIGHTHOUSE\"\nIBE 6378388 297 -127 -769 472 0 0 0 0 \"BELLEVUE (IGN)\"\nBER 6378206.4 294.9786982 -73 213 296 0 0 0 0 \"BERMUDA 1957\"\nBTS87 6378137 298.257223563 0.071 -0.509 -0.166 -0.0179 0.0005 0.0067 -0.017 \"BIH TERRESTRIAL SYSTEM\"\nBID 6378388 297 -173 253 27 0 0 0 0 \"BISSAU\"\nBOO 6378388 297 307 304 -318 0 0 0 0 \"BOGOTA OBSERVAT ORY\"\nCAI 6378388 297 -148 136 90 0 0 0 0 \"CAMPO INCHAUSPE\"\nCAO 6378388 297 298 -304 -375 0 0 0 0 \"CANTON ASTRO 1966\"\nCAC 6378206.4 294.9786982 -2 151 181 0 0 0 0 \"CAPE CANAVERAL\"\nCAP 6378249.145 293.465 -136 -108 -292 0 0 0 0 \"CAPE\"\nCGE 6378249.145 293.465 -263 6 431 0 0 0 0 \"CARTHAGE\"\nCHI 6378388 297 175 -38 113 0 0 0 0 \"CHATHAM ISLAND ASTRO 1971\"\nCHU 6378388 297 -134 229 -29 0 0 0 0 \"CHUA ASTRO\"\nCOA 6378388 297 -206 172 -6 0 0 0 0 \"CORREGO ALEGRE\"\nDAL 6378249.145 293.465 -83 37 124 0 0 0 0 \"DABOLA\"\nBAT 6377397.155 299.1528128 -377 681 -50 0 0 0 0 \"DJAKARTA (BATAVIA)\"\nGIZ 6378388 297 230 -199 -752 0 0 0 0 \"DOS 1968\"\nEAS 6378388 297 211 147 111 0 0 0 0 \"EASTER ISLAND 1967\"\nEUR 6378388 297 -87 -98 -121 0 0 0 0 \"EUROPEAN 1950\"\nEUR_E 6378388 297 -104 -101 -140 0 0 0 0 \"EUROPEAN 1950 - Cyprus\"\nEUR_F 6378388 297 -130 -117 -151 0 0 0 0 \"EUROPEAN 1950 - Egypt\"\nEUR_K 6378388 297 -86 -96 -120 0 0 0 0 \"EUROPEAN 1950 - England, Ireland, Scotland\"\nEUR_G 6378388 297 -86 -96 -120 0 0 0 0 \"EUROPEAN 1950 - England, Scotland\"\nEUR_B 6378388 297 -84 -95 -130 0 0 0 0 \"EUROPEAN 1950 - Greece\"\nEUR_H 6378388 297 -117 -132 -164 0 0 0 0 \"EUROPEAN 1950 - Iran\"\nEUR_L 6378388 297 -107 -88 -149 0 0 0 0 \"EUROPEAN 1950 - Malta\"\nEUR_M 6378388 297 -87 -98 -121 0 0 0 0 \"EUROPEAN 1950 - Mean Solution\"\nEUR_C 6378388 297 -87 -95 -120 0 0 0 0 \"EUROPEAN 1950 - Norway and Finland\"\nEUR_D 6378388 297 -84 -107 -120 0 0 0 0 \"EUROPEAN 1950 - Portugal and Spain\"\nEUR_I 6378388 297 -97 -103 -120 0 0 0 0 \"EUROPEAN 1950 - Sardinia\"\nEUR_J 6378388 297 -97 -88 -135 0 0 0 0 \"EUROPEAN 1950 - Sicily\"\nEUR_A 6378388 297 -87 -96 -120 0 0 0 0 \"EUROPEAN 1950 - Western Europe\"\nEUS 6378388 297 -86 -98 -119 0 0 0 0 \"EUROPEAN 1979\"\nFOT 6378249.145 293.465 -7 215 225 0 0 0 0 \"FORT THOMAS 1955\"\nGAA 6378388 297 -133 -321 50 0 0 0 0 \"GAN 1970\"\nGEO 6378388 297 84 -22 209 0 0 0 0 \"GEODETIC DATUM 1949\"\nGRA 6378388 297 -104 167 -38 0 0 0 0 \"GRACIOSA BASE SW 1948\"\nGUA 6378206.4 294.9786982 -100 -248 259 0 0 0 0 \"GUAM 1963\"\nDOB 6378388 297 252 -209 -751 0 0 0 0 \"GUX 1 ASTRO\"\nHJO 6378388 297 -73 46 -86 0 0 0 0 \"HJORSEY 1955\"\nHKD 6378388 297 -156 -271 -189 0 0 0 0 \"HONG KONG 1963\"\nHTN 6378388 297 -637 -549 -203 0 0 0 0 \"HU-TZU-SHAN\"\nIND_B 6377276.345 300.8017 282 726 254 0 0 0 0 \"INDIAN - Bangladesh\"\nIND_I 6377301.243 300.8017 295 736 257 0 0 0 0 \"INDIAN - India and Nepal\"\nINF_A 6377276.345 300.8017 218 816 297 0 0 0 0 \"INDIAN 1954 - Thailand and Vietnam\"\nINH_A 6377276.345 300.8017 209 818 290 0 0 0 0 \"INDIAN 1975 - Thailand\"\nIRL 6377340.189 299.3249646 506 -122 611 0 0 0 0 \"IRELAND 1965\"\nISG 6378388 297 -794 119 -298 0 0 0 0 \"ISTS 061 ASTRO 1968\"\nIST 6378388 297 208 -435 -229 0 0 0 0 \"ISTS 073 ASTRO 1969\"\nJOH 6378388 297 189 -79 -202 0 0 0 0 \"JOHNSTON ISLAND 1961\"\nKAN 6377276.345 300.8017 -97 787 86 0 0 0 0 \"KANDAWALA\"\nKEG 6378388 297 145 -187 103 0 0 0 0 \"KERGUELEN ISLAND 1949\"\nKEA 6377304.063 300.8017 -11 851 5 0 0 0 0 \"KERTAU 1948\"\nKUS 6378 388 297 647 1777 -1124 0 0 0 0 \"KUSAIE ASTRO 1951\"\nLCF 6378206.4 294.9786982 42 124 147 0 0 0 0 \"L.C. 5 ASTRO 1961\"\nLEH 6378249.145 293.465 -130 29 364 0 0 0 0 \"LEIGON\"\nLIB 6378249.145 293.465 -90 40 88 0 0 0 0 \"LIBERIA 1964\"\nLUZ_B 6378206.4 294.9786982 -133 -79 -72 0 0 0 0 \"LUZON - Mindinao\"\nLUZ_A 6378206.4 294.9786982 -133 -77 -51 0 0 0 0 \"LUZON - Philippines (excluding Mindinao)\"\nMPO 6378249.145 293.465 -74 -130 42 0 0 0 0 \"M'PORALOKO\"\nMIK 6378 249.145 293.465 41 -220 -134 0 0 0 0 \"MAHE 1971\"\nMAS 6377397.155 299.1528128 639 405 60 0 0 0 0 \"MASSAWA\"\nMER 6378249.145 293.465 31 146 47 0 0 0 0 \"MERCHICH\"\nMID 6378388 297 912 -58 1227 0 0 0 0 \"MIDWAY ASTRO 1961\"\nMIN_A 6378249.145 293.465 -81 -84 115 0 0 0 0 \"MINNA - Cameroon\"\nMIN_B 6378249.145 293.465 -92 -93 122 0 0 0 0 \"MINNA - Nigeria\"\nASM 6378249.145 293.465 174 359 365 0 0 0 0 \"MONTSERRAT ISLAND ASTRO 1958\"\nNAH_A 6378249.145 293.465 -247 -148 369 0 0 0 0 \"NAHRWAN - Masirah Island\"\nNAH_C 6378249.145 293.465 -243 -192 477 0 0 0 0 \"NAHRWAN - Saudi Arabia\"\nNAH_B 6378249.145 293.465 -249 -156 381 0 0 0 0 \"NAHRWAN - United Arab Emirates\"\nNAP 6378388 297 -10 375 165 0 0 0 0 \"NAPARIMA, BWI\"\nNWL9D 6378145 298.25 0 0 4.5 0 0 -0.814 -0.6 \"NAVAL WEAPONS LABORATORY (NWL9D)\"\nNAS 6378206.4 294.9786982 -8 160 176 0 0 0 0 \"NORTH AMERICAN 1927\"\nNAS_D 6378206.4 294.9786982 -5 135 172 0 0 0 0 \"NORTH AMERICAN 1927 - Alaska\"\nNAS_F 6378206.4 294.9786982 -7 162 188 0 0 0 0 \"NORTH AMERICAN 1927 - Alberta and British Columbia\"\nNAS_Q 6378206.4 294.9786982 -4 154 178 0 0 0 0 \"NORTH AMERICAN 1927 - Bahamas\"\nNAS_E 6378206.4 294.9786982 -10 158 187 0 0 0 0 \"NORTH AMERICAN 1927 - Canada (Mean Solution)\"\nNAS_O 6378206.4 294.9786982 0 125 201 0 0 0 0 \"NORTH AMERICAN 1927 - Canal Zone\"\nNAS_P 6378206.4 294.9786982 -3 142 183 0 0 0 0 \"NORTH AMERICAN 1927 - Caribbean\"\nNAS_N 6378206.4 29 4.9786982 0 125 194 0 0 0 0 \"NORTH AMERICAN 1927 - Central America\"\nNAS_C 6378206.4 294.9786982 -8 160 176 0 0 0 0 \"NORTH AMERICAN 1927 - CONUS\"\nNAS_T 6378206.4 294.9786982 -9 152 178 0 0 0 0 \"NORTH AMERICAN 1927 - Cuba\"\nNAS_G 6378206.4 294.9786982 -22 160 190 0 0 0 0 \"NORTH AMERICAN 1927 - Eastern Canada\"\nNAS_A 6378206.4 294.9786982 -9 161 179 0 0 0 0 \"NORTH AMERICAN 1927 - Eastern United States\"\nNAS_U 6378206.4 294.9786982 11 114 195 0 0 0 0 \"NORTH AMERICAN 1927 - Greenlan d\"\nNAS_H 6378206.4 294.9786982 -9 157 184 0 0 0 0 \"NORTH AMERICAN 1927 - Manitoba and Ontario\"\nNAS_L 6378206.4 294.9786982 -12 130 190 0 0 0 0 \"NORTH AMERICAN 1927 - Mexico\"\nNAS_I 6378206.4 294.9786982 4 159 188 0 0 0 0 \"NORTH AMERICAN 1927 - Northwest Territories and Saskatchewan\"\nNAS_R 6378206.4 294.9786982 1 140 165 0 0 0 0 \"NORTH AMERICAN 1927 - San Salvador Island\"\nNAS_B 6378206.4 294.9786982 -8 159 175 0 0 0 0 \"NORTH AMERICAN 1927 - Western United States\"\nNAS_J 6378206 .4 294.9786982 -7 139 181 0 0 0 0 \"NORTH AMERICAN 1927 - Yukon\"\nNAR 6378137 298.257222101 0 0 0 0 0 0 0 \"NORTH AMERICAN 1983\"\nNAR_A 6378137 298.257222101 0 0 0 0 0 0 0 \"NORTH AMERICAN 1983 - Alaska\"\nNAR_B 6378137 298.257222101 0 0 0 0 0 0 0 \"NORTH AMERICAN 1983 - Canada\"\nNAR_C 6378137 298.257222101 0 0 0 0 0 0 0 \"NORTH AMERICAN 1983 - CONUS\"\nNAR_D 6378137 298.257222101 0 0 0 0 0 0 0 \"NORTH AMERICAN 1983 - Mexico and Central America\"\nFLO 6378388 297 -425 -169 81 0 0 0 0 \"OBSERVATORIO METEOROLOGICO 1939\"\nOEG 6378200 297 -130 110 -13 0 0 0 0 \"OLD EGYPTIAN 1907\"\nOHA 6378206.4 294.9786982 61 -285 -181 0 0 0 0 \"OLD HAWAIIAN\"\nOHA_A 6378206.4 294.9786982 89 -279 -183 0 0 0 0 \"OLD HAWAIIAN - Hawaii\"\nOHA_B 6378206.4 294.9786982 45 -290 -172 0 0 0 0 \"OLD HAWAIIAN - Kauai\"\nOHA_C 6378206.4 294.9786982 65 -290 -190 0 0 0 0 \"OLD HAWAIIAN - Maui\"\nOHA_M 6378206.4 294.9786982 61 -285 -181 0 0 0 0 \"OLD HAWAIIAN - Mean Solution\"\nOHA_D 6 378206.4 294.9786982 58 -283 -182 0 0 0 0 \"OLD HAWAIIAN - Oahu\"\nFAH 6378249.145 293.465 -346 -1 224 0 0 0 0 \"OMAN\"\nOGB 6377563.396 299.3249646 375 -111 431 0 0 0 0 \"ORDNANCE SURVEY OF GREAT BRITAIN 1936\"\nOGB_A 6377563.396 299.3249646 371 -112 434 0 0 0 0 \"ORDNANCE SURVEY 1936 - England\"\nOGB_B 6377563.396 299.3249646 371 -111 434 0 0 0 0 \"ORDNANCE SURVEY 1936 - England, Isle of Man, Wales\"\nOGB_M 6377563.396 299.3249646 375 -111 431 0 0 0 0 \"ORDNANCE SURVEY 1936 - Mean Solution\"\nOGB _C 6377563.396 299.3249646 384 -111 425 0 0 0 0 \"ORDNANCE SURVEY 1936 - Scotland and Shetland Islands\"\nOGB_D 6377563.396 299.3249646 370 -108 434 0 0 0 0 \"ORDNANCE SURVEY 1936 - Wales\"\nPLN 6378388 297 -307 -92 127 0 0 0 0 \"PICO DE LAS NIEVES\"\nPIT 6378388 297 185 165 42 0 0 0 0 \"PITCAIRN ASTRO 1967\"\nPTB 6378249.145 293.465 -106 -129 165 0 0 0 0 \"POINT 58\"\nPTN 6378249.145 293.465 -148 51 -291 0 0 0 0 \"POINTE NOIRE 1948\"\nPOS 6378388 297 -499 -249 314 0 0 0 0 \"PORTO SANTO 1936\"\nPRP 6378388 297 -288 175 -376 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956\"\nPRP_A 6378388 297 -270 188 -388 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Bolivia\"\nPRP_D 6378388 297 -282 169 -371 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Colombia\"\nPRP_E 6378388 297 -278 171 -367 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Ecuador\"\nPRP_F 6378388 297 -298 159 -369 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Guyana\"\nPRP_M 6378388 297 -288 175 -376 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Mean Solution\"\nPRP_B 6378388 297 -270 183 -390 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Northern Chile\"\nPRP_G 6378388 297 -279 175 -379 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Peru\"\nPRP_C 6378388 297 -305 243 -442 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1956 - Southern Chile\"\nPRP_H 6378388 297 -295 173 -371 0 0 0 0 \"PROVISIONAL SOUTH AMERICAN 1 956 - Venezuela\"\nHIT 6378388 297 16 196 93 0 0 0 0 \"PROVISIONAL SOUTH CHILEAN 1963\"\nPUR 6378206.4 294.9786982 11 72 -101 0 0 0 0 \"PUERTO RICO\"\nQAT 6378388 297 -128 -283 22 0 0 0 0 \"QATAR NATIONAL\"\nQUO 6378388 297 164 138 -189 0 0 0 0 \"QORNOQ\"\nREU 6378388 297 94 -948 -1262 0 0 0 0 \"REUNION\"\nMOD 6378388 297 -225 -65 9 0 0 0 0 \"ROME 1940\"\nSAE 6378388 297 170 42 84 0 0 0 0 \"SANTO (DOS) 1965\"\nSAO 63783 88 297 -203 141 53 0 0 0 0 \"SAO BRAZ\"\nSAP 6378388 297 -355 21 72 0 0 0 0 \"SAPPER HILL 1943\"\nSCK 6377483.865 299.1528128 616 97 -251 0 0 0 0 \"SCHWARZECK\"\nSGM 6378388 297 -289 -124 60 0 0 0 0 \"SELVAGEM GRANDE 1938\"\nSAN 6378160 298.25 -57 1 -41 0 0 0 0 \"SOUTH AMERICAN 1969\"\nSAN_A 6378160 298.25 -62 -1 -37 0 0 0 0 \"SOUTH AMERICAN 1969 - Argentina\"\nSAN_J 6378160 298.25 -47 26 -42 0 0 0 0 \"SOUTH AMERICAN 1969 - Baltra, Gal apagos Islands\"\nSAN_B 6378160 298.25 -61 2 -48 0 0 0 0 \"SOUTH AMERICAN 1969 - Bolivia\"\nSAN_C 6378160 298.25 -60 -2 -41 0 0 0 0 \"SOUTH AMERICAN 1969 - Brazil\"\nSAN_D 6378160 298.25 -75 -1 -44 0 0 0 0 \"SOUTH AMERICAN 1969 - Chile\"\nSAN_E 6378160 298.25 -44 6 -36 0 0 0 0 \"SOUTH AMERICAN 1969 - Colombia\"\nSAN_F 6378160 298.25 -48 3 -44 0 0 0 0 \"SOUTH AMERICAN 1969 - Ecuador (excluding Galapagos)\"\nSAN_G 6378160 298.25 -53 3 -47 0 0 0 0 \"SOU TH AMERICAN 1969 - Guyana\"\nSAN_M 6378160 298.25 -57 1 -41 0 0 0 0 \"SOUTH AMERICAN 1969 - Mean Solution\"\nSAN_H 6378160 298.25 -61 2 -33 0 0 0 0 \"SOUTH AMERICAN 1969 - Paraguay\"\nSAN_I 6378160 298.25 -58 0 -44 0 0 0 0 \"SOUTH AMERICAN 1969 - Peru\"\nSAN_K 6378160 298.25 -45 12 -33 0 0 0 0 \"SOUTH AMERICAN 1969 - Trinidad and Tobago\"\nSAN_L 6378160 298.25 -45 8 -33 0 0 0 0 \"SOUTH AMERICAN 1969 - Venezuela\"\nSOA 6378155 298.3 7 -10 -26 0 0 0 0 \"SOUTH ASIA\"\nTIL 6377298.556 300.8017 -679 669 -48 0 0 0 0 \"TIMBALAI 1948\"\nTOY 6377397.155 299.1528128 -148 507 685 0 0 0 0 \"TOKYO\"\nTOY_A 6377397.155 299.1528128 -148 507 685 0 0 0 0 \"TOKYO - Japan\"\nTOY_B 6377397.155 299.1528128 -146 507 687 0 0 0 0 \"TOKYO - Korea\"\nTOY_M 6377397.155 299.1528128 -148 507 685 0 0 0 0 \"TOKYO - Mean Solution\"\nTOY_C 6377397.155 299.1528128 -158 507 676 0 0 0 0 \"TOKYO - Okinawa\"\nTDC 6378388 297 -632 438 -609 0 0 0 0 \"TRISTAN ASTRO 196 8\"\nMVS 6378249.145 293.465 51 391 -36 0 0 0 0 \"VITI LEVU 1916\"\nWAK 6378388 297 276 -57 149 0 0 0 0 \"WAKE ISLAND ASTRO 1952\"\nENW 6378270 297 102 52 -38 0 0 0 0 \"WAKE-ENIWETOK 1960\"\nWGS72 6378135 298.26 0 0 4.5 0 0 -0.554 0.227 \"WGS 72\"\nWGS84 6378137 298.257223563 0 0 0 0 0 0 0 \"WGS 84\"" ) (DocWin.15 Owner: 14 X: 24 Y: 28 W: 590 H: 321 ) (CSMgr.16 ) (SEd.20 Name: "Datum.TransformDatums" CreationDate: "Thursday, July 18, 1996 06:03:40" GUIName: "Script" Win: 21 CSMgr: 22 Source: "' Name: Datum.TransformDatums\n'\n' Title: Converts a single point from one datum to another.\n'\n' Topics: Views\n'\n' Description: Converts a Single point from one datum to another. The \n' formulas and parameters used are those of the Standard Molodensky Datum \n' Transformation as defined in DMA TR 8350.2. The basic strategy is \n' to first convert the point from the local datum to WGS 84, and then \n' convert the point from WGS 84 to other local datum. \n'\n' These formulas are not valid beyond 89 degrees latit ude (see footnote \n' at bottom of page 7-8 in DMA TR 8350.2). If a point north of 89 or \n' south of -89 is input, then it will be returned unchanged. \n'\n' Note: If you are converting from NAD 27 to NAD 83, and you desire high \n' levels of accuracy, then you need to be uSing NADCON. ARC/INFO provides \n' an implementation of NADCON. If you do not have ARC/INFO, the National \n' Geodetic Information Center at NOAA has an implementation of NADCON on \n' the PC for sale. \n' \n' Requires: Called from ConvertPointDa tum, requires datum parameter\n' dictionary, from and to datums, and point to transform.\n'\n' Self: A List containing:\n' \n'- fromDatum - the datum to convert from.\n'- toDatum - the datum to convert to.\n'- pt - the point to convert. \n'- dpDict - datum parameter dictionary.\n'\n' Returns: transformed Point\n\n\n' Get parameters and dictionary.\n\nfromDatum = Self.Get(0)\ntoDatum = Self.Get(1)\npt = Self.Get(2)\ndpdict = Self.Get(3)\n\nlatitude = pt.Gety\nlongitude = pt.Getx\n\nif ((latitude > 89) or (latitude < -89)) then\n return Point.Make(longitude, latitude)\nend\n\n\n' Transform point from local datum to WGS 84\n\nif (fromDatum <> \"WGS 84\") then \n\n ' Get datum parameters from dictionary\n\n fromParameters = dpdict.Get(fromDatum) \n if (fromParameters = Nil) then\n return point.makenull\n end\n\n a = fromParameters.Get(0)\n f = fromParameters.Get(1) \n dx = fromParameters.Get(2)\n dy = fromParameters.Get(3)\n dz = fromParameters.Get(4)\n \n ' Let's do some math!\n\n phi = latitude.AsRadians\n lambda = longitude.AsRadians\n Sinphi = phi.Sin\n Cosphi = phi.Cos\n Sinlambda = lambda.Sin\n Coslambda = lambda.Cos \n \n Sinsecond = (1/3600).AsRadians.Sin\n \n h = 0\n da = 6378137 - a\n df = (1 / 298.257223563) - f\n \n e2 = (2 * f) - (f * f)\n Rn = a / ((1 - (e2 * Sinphi * Sinphi)).sqrt)\n Rm = (a * (1 - e2)) / ((1 - (e2 * Sinphi * Sinphi)) ^ 1.5)\n \n deltaphi = \n ((-1 * dx * Sinphi * Coslambda) - (dy * Sinphi * Sinlambda) + (dz * Cosphi) +\n (da * (Rn * e2 * Sinphi * Cos phi) / a) + (df * ((Rm * (1 / (1 - f))) + (Rn * (1 - f))) * Sinphi * Cosphi)) /\n ((Rm + h) * Sinsecond)\n \n deltalambda = ((-1 * dx * Sinlambda) + (dy * Coslambda)) / ((Rn + h) * Cosphi * Sinsecond)\n\n longitude = longitude + (deltalambda / 3600)\n latitude = latitude + (deltaphi / 3600)\nend\n\n' Transform point from WGS 84 to local datum\n\nif (toDatum <> \"WGS 84\") then \n\n ' Get datum parameters from dictionary\n\n toParameters = dpdict.Get(toDatum)\n if (toParameters = Nil) then\n return Point.MakeNull \n end\n\n a = toParameters.Get(0)\n f = toParameters.Get(1) \n dx = toParameters.Get(2).Negate\n dy = toParameters.Get(3).Negate\n dz = toParameters.Get(4).Negate\n\n ' Let's do some more math!\n \n phi = latitude.AsRadians\n lambda = longitude.AsRadians\n Sinphi = phi.Sin\n Cosphi = phi.Cos\n Sinlambda = lambda.Sin\n Coslambda = lambda.Cos \n \n Sinsecond = (1/3600).AsRadians.Sin\n \n h = 0\n da = 6378137 - a\n df = (1 / 298.257223563) - f\n \n e2 = (2 * f) - (f * f)\n Rn = a / ((1 - (e2 * Sinphi * Sinphi)) .sqrt)\n Rm = (a * (1 - e2)) / ((1 - (e2 * Sinphi * Sinphi)) ^ 1.5)\n \n deltaphi = \n ((-1 * dx * Sinphi * Coslambda) - (dy * Sinphi * Sinlambda) + (dz * Cosphi) +\n (da * (Rn * e2 * Sinphi * Cosphi) / a) + (df * ((Rm * (1 / (1 - f))) + (Rn * (1 - f))) * Sinphi * Cosphi)) /\n ((Rm + h) * Sinsecond)\n \n deltalambda = ((-1 * dx * Sinlambda) + (dy * Coslambda)) / ((Rn + h) * Cosphi * Sinsecond)\n\n longitude = longitude + (deltalambda / 3600)\n latitude = latitude + (deltaphi / 3600)\nend\n\n' Make a poi nt and return it\n\nreturn Point.Make(longitude, latitude)\n\n" SearchStr: "exit" ) (DocWin.21 Owner: 20 X: -22 Y: 21 W: 631 H: 319 ) (CSMgr.22 ) (SEd.23 Name: "My Extension Install" CreationDate: "Wednesday, May 08, 1996 11:00:05" GUIName: "Script" Win: 24 CSMgr: 25 Source: "'DO NOT EDIT!!!\n\nif (av.getproject=nil) then exit 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 Do cGUI\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 exit\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 t he 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'msgbox.info(thecindex.asstring,\"\")\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)+\" ca nnot be found in the current project.\",\"Script Eror\")\n exit\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\n 'MsgBox.Warning(\"The menu named \"+mMenu+\" is not here.\",\"Script Eror\")\n 'exit\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 acon trol=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 exit\n end\n \n 'This finds the control set \n thecommand=\"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n t hescript1=Script.Make(thecommand)\n thecontrolset=av.getproject.findGUI(aControl.get(0)).GetToolBar\n \n 'Add the control to the control set\n theControlSet.Add(theControl,theCindex)\nend\n\n\nav.getproject.setmodified(true)\n\n\n'And the scripts add themselves\n" ) (DocWin.24 Owner: 23 X: 23 Y: 14 W: 414 H: 203 ) (CSMgr.25 ) (SEd.26 Name: "My Extension MAKE" CreationDate: "Wednesday, May 08, 1996 11:00:05" GUIName: "Script" Win: 27 CSMgr: 28 Source: "' Name: Extension Builder - Source Code\n'\n' Title: Extension Builder - Source Code\n'\n' Topics: \n'\n' Description: \n'\n' Requires: \n'\n' Self: \n'\n' Returns: \n\n\n'------------------------------\n 'the Filename of the extension\n '\ntheExtensionFile = \"c:\\av3\\samples\\ext\\datum.avx\"\n\n'------------------------------\n 'The Name of the extension to be displayed in the\n 'extension dialog\ntheExtensionName = \"Datum Conversion Sample Extension\"\n\n'------------------------------\n 'The description of the extension to be d isplayed\n ' in the extension dialog\n \ntheDescription = \"This extension contains scripts you can use to convert datums\"\n\n'------------------------------\n 'The version of the extension\ntheVersion = 3.01\n\n'------------------------------\n 'Install Script\n ' The Script to use to install the extension\n 'NOTE: \"My Extension Install\" is a pre-perpared script for this\nInScriptName=\"My Extension Install\"\n\n'------------------------------\n 'Uninstall Script\n ' The Script to use to uninstall the extension\n 'NOTE: \"My Ex tension Uninstall\" is a pre-perpared script for this\n\nUnScriptName=\"My Extension Uninstall\"\n\n'------------------------------\n 'Any document Names to include\n ' This is a list of any documents to include\n ' e.g. theDocs={\"View1\",\"Layout1\"}\ntheDocs={\"Datum.Parameters\"}\n\n'------------------------------\n 'Controls (Buttons and normal Tools) to include\n 'Controls {GUI name,ControlType,ScriptName}\n 'e.g. TheControlList={{\"View\",\"ButtonBar\",\"View.ZoomIn\"}, {\"View\",\"ToolBar\",\"View.Identify\"}}\nTheControllist={{\"View \",\"ButtonBar\",\"Datum.ConvertPoint\"},{\"View\",\"ButtonBar\",\"Datum.ConvertThemeDatum\"}}\n\n'------------------------------\n 'Tool menus to include\n ' This is a list of which tool menus to include. Tool menus are specified\n ' by giving a GUI name and a script name of one of the tools in the tool menu\n ' Using this to locate the tool menu ALL other tools inb that menu and \n ' their scripts will be extracted\n ' theToolMenu={{\"View\",\"View.PointTool\"}}\nTheToolMenuList={}\n\n\n'------------------------------\n 'The Menus to include (a list of menu items listing the doc, the top menu, and the script for the menu item)\n 'The MenuList {Doc name, Main Menu name , menu item Scriptname}\n ' e.g. The MenuList={{\"View1\", \"File\", \"View.Export\"}}\nTheMenuList={}\n\n'------------------------------\n 'The scripts to include, not in controls or menus\n 'e.g. theScripts={\"My.Script\",\"View.export\"}\ntheScripts={\"Datum.LoadParameters\",\"Datum.TransformDatums\"}\n\n\n'------------------------------\n 'The Dependencies\ntheDependencies={}\n\n'------------- -----------------\n' ATTENTION!!!!!!!!!!!!!!!\n' Do NOT alter the script after these lines, the remainer of this script\n' uses the lists you provided above to build the extension object.\n'_______________________________________________________________\n'_______________________________________________________________\n'_______________________________________________________________\n'_______________________________________________________________\n'_______________________________________________________________\n'_ ______________________________________________________________\n'_______________________________________________________________\n'_______________________________________________________________\n'_______________________________________________________________\n\n'Create a total list of the needed scripts\nTheNeeded={}\n\nfor each ControlScript in thecontrolList\n TheNeeded.add(ConTrolScript.get(2))\nend\n\nFor each MenuScript in theMenuList\n theNeeded.add(MenuScript.get(2))\nend\n \ntotalscripts=thescripts.merge(theNeede d)\nTotalScripts.removeduplicates\n \ntheInstall=av.GetProject.FindScript(InscriptName)\nif (theInstall=NIL) then \n Msgbox.Error(\"The install Script \"+InScriptName+\" was not found\",\"Script not found\")\n exit\nend\n\ntheUninstall=av.GetProject.FindScript(unscriptName)\nif (theUninstall=NIL) then \n Msgbox.Error(\"The install Script \"+UnScriptName+\" was not found\",\"Script not found\")\n exit\nend\n\n\n'Create the extension\n' Extension.Make(ExtensionFile, theExtensionName, InstallScript, UninstallScript, Dependancies_\n\nmyE xt = Extension.Make(theExtensionFile.asFilename, \n theExtensionName,\n theInstall,\n theUninstall, \n theDependencies)\n\n\n\nTheDocList={}\nTheTotalControls={}\nThetotalMenus={}\ntheTotalToolMenus={}\n\n' Process the Document List\nfor each aDoc in TheDocs\n if ((av.getproject.findDoc(aDoc)=\"Null\").NOT) then\n TheDocList.Add(av.GetProject.FindDoc(aDoc))\n else\n MsgBox.Warning(\"The Doc \"+adoc.asstring+\" cannot be found in the current project.\",\"Sc ript Error\")\n exit\n end\nend\n\n'Add the List of Documents\nMyExt.add(TheDocList)\n\n\n\n' Process the control List\n'__________________________________________\n\n'Controls {GUI,ControlType,Scriptname}\n'__________________________________________\n'__________________________________________\n'__________________________________________\n\nfor each aControl in TheControlList\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 Error\")\n exit\n end\n thecommand=\"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n 'msgbox.info(thecommand,\"\")\n thescript1=Script.Make(thecommand)\n thecontrolset=thescript1.doit(\"\")\n theFoundControl=TheControlSet.FindbyScript(aControl.get(2))\n if (theFoundControl=NIL) then \n MsgBox.Warning(\"No Control found with the script \"+aControl.get(2)+\" in \"+acontrol.get(1),\"Warning\")\n exit\n end\n if (theFoundControl.is(ToolM enu)) then \n MsgBox.Warning(\"The script \"+aControl.get(2)+\" in \"+acontrol.get(1)+\" is for a tool menu.\",\"Not Supported\")\n exit\n end\n \n TheTotalControls.Add({aControl,thefoundControl,theControlSet.getcontrols.find(thefoundcontrol)})\nend \n'Add to Ext\nMyExt.add(TheTotalControls)\n\n'__________________________________________\n\n'The MenuList {Doc, Menu, MenuScript}\n'__________________________________________\n'__________________________________________\n'_______________________________________ ___\n\nFor each aMenu in themenulist\n mDoc=aMenu.get(0)\n mMenu=aMenu.get(1)\n mScript=aMenu.get(2)\n \n themDoc=av.getproject.findGUI(mDoc)\n if (themDoc=NIL) then \n MsgBox.Warning(\"The GUI \"+mDoc+\" cannot be found in the current project.\",\"Script Error\")\n exit\n end\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 Error\")\n exit\n end\n \n themenucontrol=them enu.findbyScript(mScript)\n\n if (themenucontrol=NiL) then\n MsgBox.Warning(\"The script \"+mScript+\" not found.\",\"Warning\")\n exit\n end\n themenuitemidx=themenu.getcontrols.find(themenucontrol)\n thetotalmenus.add({amenu,theMenuControl,theMenuItemIdx})\n\nend\n\nmyext.add(thetotalmenus)\n \n'__________________________________________\n\n'Process the Tool Menu List\n'__________________________________________\n'__________________________________________\n'__________________________________________\n \nfor each aC ontrol in TheToolMenuList\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 Error\")\n exit\n end\n thecontrolset=theControlDoc.getToolbar\n theFoundControl=TheControlSet.FindbyScript(aControl.get(1))\n if (theFoundControl=NIL) then \n MsgBox.Warning(\"No Control found with the script \"+aControl.get(1)+\" in \"+acontrol.get(1),\"Warning\")\n exit\n end\n if (theFoundControl.is(ToolMenu).not) then \n MsgBox.Warning(\"The script \"+aControl.get(1)+\" is NOT for a tool menu.\",\"User Error\")\n exit\n end \n \n TheTotalToolMenus.Add({aControl,thefoundControl,theControlSet.getcontrols.find(thefoundcontrol)})\nend \n\nmyext.add(thetotalToolmenus)\n \n\n'__________________________________________\n\n' Process the Script list\n'__________________________________________\n'__________________________________________\n'__________________________________________\n\nfo r each ascript in TotalScripts\n if ((av.getproject.findscript(ascript)=\"Null\").NOT) then\n myExt.Add(av.GetProject.FindScript(ascript))\n else\n MsgBox.Warning(\"The script \"+ascript+\" cannot be found in the current project.\",\"Script Eror\")\n Exit\n end\nend\n \nmyExt.SetAbout(theDescription)\nmyExt.SetExtVersion(theVersion)\nmyExt.Commit" ) (DocWin.27 Owner: 26 X: 60 Y: 51 W: 518 H: 332 ) (CSMgr.28 ) (SEd.29 Name: "My Extension Uninstall" CreationDate: "Wednesday, May 08, 1996 11:00:05" GUIName: "Script" Win: 30 CSMgr: 31 Source: "'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 exit\n end\n \n 'This sequence finds the appropiate control set\n thecommand=\"av.get project.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 exit\n end\n \n theMbar=av.getproject.findGUI(mDoc).GetMenuBar\n themenu=theMb ar.findbylabel(mMenu)\n if (themenu=NiL) then\n MsgBox.Warning(\"The menu named \"+mMenu+\" is not here.\",\"Script Eror\")\n 'exit\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\n 'findbylabel(mMenuItem)\n 'if (themenuitemidx=NiL) then\n ' MsgBox.Warning(\"The menuitem \"+mMenuIte m+\" not found.\",\"Warning\")\n ' exit\n 'end\n 'themenucontrol=theMbar.getcontrols.get(themenu).getcontrols.get(themenuitemidx)\n \n 'theMenuControl is the control object\n 'theMenuItemIdx is the index of the control\n 'amenu has (doc,menu,menuitem)\n 'thetotalmenus.add({amenu,theMenuControl,theMenuItemIdx})\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 t he 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 exit\n end\n \n 'This sequence finds the appropiate control set\n thecontrolset=av.getproject.findGUI(aControl.get(0)).GetToolBar\n\n \n 'See if the control is in the set , if so remove it\n if (theControlSet.G etControls.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" ) (DocWin.30 Owner: 29 X: 17 Y: 3 W: 605 H: 378 ) (CSMgr.31 ) (LButn.32 HelpTopic: "New_button" Update: "Doc.NewUpdate" Label: "&New" Click: "View.New" ) (LButn.33 Disabled: 1 HelpTopic: "Open_button" Update: "Doc.OpenUpdate" Label: "&Open" Click: "Doc.Open" ) (LButn.34 Disabled: 1 HelpTopic: "Print_button" Update: "Doc.ActionUpdate" Label: "P&rint" Click: "Doc.Action" ) (FN.35 Path: "$AVEXT/prjctr.avx" ) (FN.36 Path: "$AVEXT/datum.avx" ) (NameDict.37 ) (DocGUI.38 Name: "View" Type: "View" Modified: 1 Visible: 1 MenuBar: 39 ButnBar: 146 Popups: 198 ToolBar: 217 NewScript: "View.New" OpenScript: "Doc.Open" ActionScript: "Doc.Action" NewUpdateScript: "Doc.NewUpdate" OpenUpdateScript: "Doc.OpenUpdate" ActionUpdateScript: "Doc.ActionUpdate" Title: "Views" Icon: 266 ) (MenuBar.39 Child: 40 Child: 52 Child: 72 Child: 93 Child: 115 Child: 129 Child: 141 ) (PMenu.40 InternalName: "File" Child: 41 Child: 42 Child: 43 Child: 44 Child: 45 Child: 46 Child: 47 Child: 48 Child: 49 Child: 50 Child: 51 Label: "&File" ) (Choice.41 Help: "Closes the active component" HelpTopic: "Close" Label: "&Close" Click: "Project.CloseDoc" Shortcut: "Keys.None" ) (Choice.42 Help: "Closes all components" HelpTopic: "Close_All" Label: "Close &All" Click: "Project.CloseAll" Shortcut: "Keys.None" ) (Space.43 ) (Choice.44 Help: "Allows you to specify the current working directory" HelpTopic: "Set_Working_Directory" Label: "Set &Working Directory..." Click: "Project.SetProjectWorkDir" Shortcut: "Keys.None" ) (Choice.45 Help: "Saves the current project" HelpTopic: "Save_Project" Label: "&Save Project" Click: "Project.Save" Shortcut: "Keys.Ctrl+S" ) (Space.46 ) (Choice.47 Help: "Prints the view" HelpTopic: "Print" Update: "Doc.PrintUpdate" Label: "&Print..." Click: "View.Print" Shortcut: "Keys.None" ) (Choice.48 Help: "Edits the printer and the printing options" HelpTopic: "Print_Setup" Label: "P&rint Setup..." Click: "Project.PrintSetup" Shortcut: "Keys.None" ) (Choice.49 Disabled: 1 Help: "Exports the view" HelpTopic: "Export" Update: "View.HasThemesUpdate" Label: "&Export..." Click: "View.ExportDisp" Shortcut: "Keys.None" ) (Space.50 ) (Choice.51 Help: "Exits ArcView" HelpTopic: "Exit" Label: "E&xit" Click: "Project.Exit" Shortcut: "Keys.None" ) (PMenu.52 InternalName: "Edit" Child: 53 Child: 54 Child: 55 Child: 56 Child: 57 Child: 58 Child: 59 Child: 60 Child: 61 Child: 62 Child: 63 Child: 64 Child: 65 Child: 66 Child: 67 Child: 68 Child: 69 Child: 70 Child: 71 Label: "&Edit" ) (Choice.53 Disabled: 1 Help: "Cuts the active themes to the clipboard" HelpTopic: "Cut_Themes" Update: "View.ActiveDeletableThemesUpdate" Label: "Cut T&hemes" Click: "View.CutThemes" Shortcut: "Keys.None" ) (Choice.54 Disabled: 1 Help: "Copies the active themes to the clipboard" HelpTopic: "Copy_Themes" Update: "View.ActiveThemesUpdate" Label: "Cop&y Themes" Click: "View.CopyThemes" Shortcut: "Keys.None" ) (Choice.55 Disabled: 1 Help: "Removes the active themes from the view" HelpTopic: "Delete_Themes" Update: "View.ActiveDeletableThemesUpdate" Label: "De&lete Themes" Click: "View.DeleteThemes" Shortcut: "Keys.None" ) (Space.56 ) (Choice.57 Disabled: 1 Help: "Undo the last edit to graphics on a view" HelpTopic: "Undo_Graphic_Edit_on_a_view" Update: "View.UndoEditUpdate" Label: "&Undo Graphic Edit" Click: "View.UndoEdit" Shortcut: "Keys.Ctrl+Z" ) (Choice.58 Disabled: 1 Invisible: 1 Help: "Redo the last edit operation on a theme that was undone" HelpTopic: "Redo_Edit_on_a_view" Update: "View.RedoEditUpdate" Label: "&Redo Feature Edit" Click: "View.RedoEdit" Shortcut: "Keys.Ctrl+Y" ) (Space.59 ) (Choice.60 Disabled: 1 Help: "Cuts the selected graphics to the clipboard" HelpTopic: "Cut_Graphics" Update: "View.CutUpdate" Label: "Cu&t Graphics" Click: "View.CutGraphics" Shortcut: "Keys.Ctrl+X" ) (Choice.61 Disabled: 1 Help: "Copies the selected graphics to the clipboard" HelpTopic: "Copy_Graphics" Update: "View.CopyUpdate" Label: "&Copy Graphics" Click: "View.CopyGraphics" Shortcut: "Keys.Ctrl+C" ) (Choice.62 Disabled: 1 Help: "Removes the selected graphics from the view" HelpTopic: "Delete_Graphics" Update: "View.DeleteUpdate" Label: "&Delete Graphics" Click: "View.DeleteGraphics" Shortcut: "Keys.Del" ) (Space.63 ) (Choice.64 Disabled: 1 Help: "Combines the selected polygons" HelpTopic: "Combine_Graphics" Update: "View.CombineUpdate" Label: "Com&bine Graphics" Click: "View.CombineGraphics" Shortcut: "Keys.None" ) (Choice.65 Disabled: 1 Help: "Unions the selected graphics to create a new graphic" HelpTopic: "Union_Graphics" Update: "View.UnionUpdate" Label: "U&nion Graphics" Click: "View.UnionGraphics" Shortcut: "Keys.None" ) (Choice.66 Disabled: 1 Help: "Subtracts one selected polygon from the other selected polygon" HelpTopic: "Subtract_Graphics" Update: "View.SubtractUpdate" Label: "&Subtract Graphics" Click: "View.SubtractGraphics" Shortcut: "Keys.None" ) (Choice.67 Disabled: 1 Help: "Creates a new polygon from the area of overlap between the selected polygons" HelpTopic: "Intersect_Graphics" Update: "View.IntersectUpdate" Label: "&Intersect Graphics" Click: "View.IntersectGraphics" Shortcut: "Keys.None" ) (Space.68 ) (Choice.69 Disabled: 1 Help: "Inserts the contents of the clipboard" HelpTopic: "Paste" Update: "View.PasteUpdate" Label: "&Paste" Click: "View.Paste" Shortcut: "Keys.Ctrl+V" ) (Space.70 ) (Choice.71 Disabled: 1 Help: "Selects all graphics in the view" HelpTopic: "Select_All_Graphics" Update: "View.HasGraphicsUpdate" Label: "Select &All Graphics" Click: "Graphic.SelectAll" Shortcut: "Keys.None" ) (PMenu.72 InternalName: "View" Child: 73 Child: 74 Child: 75 Child: 76 Child: 77 Child: 78 Child: 79 Child: 80 Child: 81 Child: 82 Child: 83 Child: 84 Child: 85 Child: 86 Child: 87 Child: 88 Child: 89 Child: 90 Child: 91 Child: 92 Label: "&View" ) (Choice.73 Help: "Displays the dialog box to edit properties of the view" HelpTopic: "View_Properties" Label: "&Properties..." Click: "View.Properties" Shortcut: "Keys.None" ) (Space.74 ) (Choice.75 Help: "Inserts themes into the view" HelpTopic: "Add_Theme" Label: "&Add Theme..." Click: "View.Add" Shortcut: "Keys.Ctrl+T" ) (Choice.76 Disabled: 1 Help: "Displays a dialog box to create a geocoded theme" HelpTopic: "Geocode_Addresses" Update: "View.GeocodeUpdate" Label: "&Geocode Addresses..." Click: "View.Geocode" Shortcut: "Keys.None" ) (Choice.77 Disabled: 1 Help: "Displays a dialog box to create an XY or dynamic segmentation event-based theme " HelpTopic: "Add_Event_Theme" Update: "View.AddEventUpdate" Label: "Add &Event Theme..." Click: "View.AddEvent" Shortcut: "Keys.None" ) (Choice.78 Help: "Creates a new theme" HelpTopic: "New_Theme" Label: "&New Theme..." Click: "View.NewTheme" Shortcut: "Keys.None" ) (Choice.79 Disabled: 1 Help: "Makes all themes visible" HelpTopic: "Themes_On_Themes_Off" Update: "View.HasThemesUpdate" Label: "&Themes On" Click: "View.ThemesOn" Shortcut: "Keys.None" ) (Choice.80 Disabled: 1 Help: "Makes all themes invisible" HelpTopic: "Themes_On_Themes_Off" Update: "View.HasThemesUpdate" Label: "T&hemes Off" Click: "View.ThemesOff" Shortcut: "Keys.Esc" ) (Space.81 ) (Choice.82 Disabled: 1 Help: "Create a Layout from the View" HelpTopic: "Layout_menu_choice" Update: "View.HasThemesUpdate" Label: "La&yout..." Click: "View.Layout" Shortcut: "Keys.None" ) (Space.83 ) (Choice.84 Disabled: 1 Help: "Zooms to the extent of all themes" HelpTopic: "Zoom_to_Full_Extent" Update: "View.HasDataUpdate" Label: "Full E&xtent" Click: "View.ZoomFullExtent" Shortcut: "Keys.None" ) (Choice.85 Disabled: 1 Help: "Zooms in on the center of the display" HelpTopic: "Zoom_In" Update: "View.HasDataUpdate" Label: "Zoom &In" Click: "View.ZoomIn" Shortcut: "Keys.None" ) (Choice.86 Disabled: 1 Help: "Zooms out from the center of the display" HelpTopic: "Zoom_Out" Update: "View.HasDataUpdate" Label: "Zoom &Out" Click: "View.ZoomOut" Shortcut: "Keys.None" ) (Choice.87 Disabled: 1 Help: "Zooms to the extent of active themes" HelpTopic: "Zoom_to_Active_Theme" Update: "View.ActiveThemesUpdate" Label: "&Zoom To Themes" Click: "View.ZoomToThemes" Shortcut: "Keys.None" ) (Choice.88 Disabled: 1 Help: "Zooms to the extent of the selected features" HelpTopic: "Zoom_to_Selected" Update: "View.SelectableThemesUpdate" Label: "Zoom To &Selected" Click: "View.ZoomToSelected" Shortcut: "Keys.None" ) (Choice.89 Disabled: 1 Help: "Goes back to the previous extent you were viewing" HelpTopic: "Zoom_Previous" Update: "View.UndoZoomUpdate" Label: "Zoom Pre&vious" Click: "View.UndoZoom" Shortcut: "Keys.None" ) (Space.90 ) (Choice.91 Disabled: 1 Help: "Finds features in the active themes using the text you enter" HelpTopic: "Find" Update: "View.TabularThemesUpdate" Label: "&Find..." Click: "View.Find" Shortcut: "Keys.Ctrl+F" ) (Choice.92 Disabled: 1 Help: "Locates an address in the active, matchable theme" HelpTopic: "Locate_Address" Update: "View.LocateUpdate" Label: "&Locate Address..." Click: "View.Locate" Shortcut: "Keys.None" ) (PMenu.93 InternalName: "Theme" Child: 94 Child: 95 Child: 96 Child: 97 Child: 98 Child: 99 Child: 100 Child: 101 Child: 102 Child: 103 Child: 104 Child: 105 Child: 106 Child: 107 Child: 108 Child: 109 Child: 110 Child: 111 Child: 112 Child: 113 Child: 114 Label: "&Theme" ) (Choice.94 Disabled: 1 Help: "Displays the dialog box to edit properties of the active theme" HelpTopic: "Theme_Properties" Update: "View.ActiveThemesUpdate" Label: "&Properties..." Click: "View.ThemeProperties" Shortcut: "Keys.None" ) (Space.95 ) (Choice.96 Disabled: 1 Help: "Starts or stops editing of shapefile" HelpTopic: "Start_Stop_Editing_in_a_view" Update: "View.ToggleEditingUpdate" Label: "Start &Editing" Click: "View.ToggleEditing" Shortcut: "Keys.None" ) (Choice.97 Disabled: 1 Help: "Save edits to the source shapefile" HelpTopic: "Save_edits_theme" Update: "View.SaveEditsUpdate" Label: "Save Ed&its" Click: "View.SaveEdits" Shortcut: "Keys.None" ) (Choice.98 Disabled: 1 Help: "Saves edits to a new shapefile" HelpTopic: "Save_edits_as_theme" Update: "View.SaveEditsUpdate" Label: "Save E&dits As..." Click: "View.SaveEditsAs" Shortcut: "Keys.None" ) (Choice.99 Disabled: 1 Help: "Converts a theme to a shapefile" HelpTopic: "Convert_to_Shapefile" Update: "View.ExportUpdate" Label: "Convert to &Shapefile..." Click: "View.Export" Shortcut: "Keys.None" ) (Space.100 ) (Choice.101 Disabled: 1 Help: "Displays the legends of the active themes" HelpTopic: "Edit_Legend" Update: "View.ActiveThemesUpdate" Label: "Edit &Legend..." Click: "View.EditLegendClick" Shortcut: "Keys.None" ) (Choice.102 Disabled: 1 Help: "Shows or hides the active themes' legends" HelpTopic: "Hide_show_Legend" Update: "View.ActiveThemesUpdate" Label: "&Hide/Show Legend" Click: "View.ToggleLegend" Shortcut: "Keys.None" ) (Space.103 ) (Choice.104 Disabled: 1 Help: "Displays the Re-match dialog for re-matching addresses" HelpTopic: "Re_match_Addresses" Update: "View.EditMatchUpdate" Label: "&Re-match Addresses..." Click: "View.EditMatch" Shortcut: "Keys.None" ) (Space.105 ) (Choice.106 Disabled: 1 Help: "Labels features in active, visible themes" HelpTopic: "Auto_label" Update: "View.LabelThemesUpdate" Label: "&Auto-label..." Click: "View.LabelThemes" Shortcut: "Keys.Ctrl+L" ) (Choice.107 Disabled: 1 Help: "Removes any labels from active themes" HelpTopic: "Remove_Labels" Update: "View.RemoveThemeLabelsUpdate" Label: "Rem&ove Labels" Click: "View.RemoveThemeLabels" Shortcut: "Keys.Ctrl+R" ) (Choice.108 Disabled: 1 Help: "Removes the overlapping labels from active themes, if they are still green." HelpTopic: "Remove_Overlapping_Labels" Update: "View.RemoveOverlapThemeLabelsUpdate" Label: "Remove Overlappi&ng Labels" Click: "View.RemoveOverlapThemeLabels" Shortcut: "Keys.None" ) (Choice.109 Disabled: 1 Help: "Converts selected overlapping labels to symbol of selected good label" HelpTopic: "Convert_Overlapping_Labels" Update: "View.ConvertOverlapLabelsUpdate" Label: "&Convert Overlapping Labels" Click: "View.ConvertOverlapLabels" Shortcut: "Keys.Ctrl+O" ) (Space.110 ) (Choice.111 Disabled: 1 Help: "Opens the tables of the active themes" HelpTopic: "Open_Theme_Table" Update: "View.TabularThemesUpdate" Label: "&Table..." Click: "View.ShowTable" Shortcut: "Keys.None" ) (Choice.112 Disabled: 1 Help: "Displays the Query Builder to select features with a logical expression" HelpTopic: "Query_Builder" Update: "View.AttributeThemesUpdate" Label: "&Query..." Click: "View.Query" Shortcut: "Keys.Ctrl+Q" ) (Choice.113 Disabled: 1 Help: "Selects features in the active themes using another theme's features" HelpTopic: "Select_By_Theme" Update: "View.SelectableThemesUpdate" Label: "Select &By Theme..." Click: "View.SelectByTheme" Shortcut: "Keys.None" ) (Choice.114 Disabled: 1 Help: "Unselects the selected features of all active themes" HelpTopic: "Clear_Selected_Features" Update: "View.AttributeThemesUpdate" Label: "Clear Selected &Features" Click: "View.ClearSelect" Shortcut: "Keys.None" ) (PMenu.115 InternalName: "Graphics" Child: 116 Child: 117 Child: 118 Child: 119 Child: 120 Child: 121 Child: 122 Child: 123 Child: 124 Child: 125 Child: 126 Child: 127 Child: 128 Label: "&Graphics" ) (Choice.116 Disabled: 1 Help: "Displays the property editor for the selected graphic" HelpTopic: "Graphic_Properties" Update: "Graphic.HasSelectionUpdate" Label: "&Properties..." Click: "Graphic.Edit" Shortcut: "Keys.None" ) (Space.117 ) (Choice.118 Disabled: 1 Help: "Displays a dialog box to adjust size and position of selected graphic" HelpTopic: "Size_and_Position" Update: "Graphic.SingleSelectionUpdate" Label: "&Size and Position..." Click: "Graphic.SizePos" Shortcut: "Keys.None" ) (Choice.119 Disabled: 1 Help: "Aligns the selected graphics" HelpTopic: "Align" Update: "Graphic.HasSelectionUpdate" Label: "&Align..." Click: "Graphic.Align" Shortcut: "Keys.Ctrl+A" ) (Space.120 ) (Choice.121 Disabled: 1 Help: "Moves selected graphics in front of other graphics" HelpTopic: "Bring_to_Front_on_a_view" Update: "Graphic.HasSelectionUpdate" Label: "Bring to &Front" Click: "Graphic.ToFront" Shortcut: "Keys.None" ) (Choice.122 Disabled: 1 Help: "Moves selected graphics behind other graphics" HelpTopic: "Send_to_Back_on_a_view" Update: "Graphic.HasSelectionUpdate" Label: "Send to &Back " Click: "Graphic.ToBack" Shortcut: "Keys.None" ) (Choice.123 Disabled: 1 Help: "Groups selected graphics" HelpTopic: "Group_on_a_view" Update: "Graphic.GroupUpdate" Label: "&Group" Click: "Graphic.Group" Shortcut: "Keys.Ctrl+G" ) (Choice.124 Disabled: 1 Help: "Ungroups selected graphics" HelpTopic: "Ungroup_on_a_view" Update: "Graphic.UngroupUpdate" Label: "&Ungroup" Click: "Graphic.Ungroup" Shortcut: "Keys.Ctrl+U" ) (Space.125 ) (Choice.126 Disabled: 1 Help: "Associates selected graphics with active themes" HelpTopic: "Attach_Graphics" Update: "View.AddGraphicsUpdate" Label: "A&ttach Graphics" Click: "View.AddGraphics" Shortcut: "Keys.None" ) (Choice.127 Disabled: 1 Help: "Removes association between graphics and active themes" HelpTopic: "Detach_Graphics" Update: "View.ClearGraphicsUpdate" Label: "&Detach Graphics" Click: "View.ClearGraphics" Shortcut: "Keys.None" ) (Space.128 ) (PMenu.129 InternalName: "Window" Child: 130 Child: 131 Child: 132 Child: 133 Child: 134 Child: 135 Child: 137 Child: 138 Child: 139 Child: 140 Label: "&Window" ) (Choice.130 Help: "Arranges windows as non-overlapping tiles" HelpTopic: "Tile" Label: "&Tile" Click: "Project.Tile" Shortcut: "Keys.None" ) (Choice.131 Help: "Arranges windows" HelpTopic: "Cascade" Label: "&Cascade" Click: "Project.Cascade" Shortcut: "Keys.None" ) (Choice.132 Help: "Arranges iconified windows" HelpTopic: "Arrange_Icons" Label: "&Arrange Icons" Click: "Project.ArrangeIcons" Shortcut: "Keys.None" ) (Space.133 ) (Choice.134 Help: "Shows the symbol window" HelpTopic: "Show_Symbol_Window" Label: "Show Symbol Window..." Click: "Project.ShowHideSymWin" Shortcut: "Keys.Ctrl+P" ) (Space.135 ObjectTag: 136 Update: "WindowMenuUpdate" ) (AVStr.136 S: "datum.apr My Extension MAKE My Extension Uninstall View1" ) (Choice.137 Help: "Activates datum.apr" Label: "&1 datum.apr" Click: "WindowActivate" Shortcut: "Keys.None" ) (Choice.138 Help: "Activates My Extension MAKE" Label: "&2 My Extension MAKE" Click: "WindowActivate" Shortcut: "Keys.None" ) (Choice.139 Help: "Activates My Extension Uninstall" Label: "&3 My Extension Uninstall" Click: "WindowActivate" Shortcut: "Keys.None" ) (Choice.140 Help: "Activates View1" Label: "&4 View1" Click: "WindowActivate" Shortcut: "Keys.None" ) (PMenu.141 InternalName: "Help" Child: 142 Child: 143 Child: 144 Child: 145 Label: "&Help" ) (Choice.142 Help: "Displays the dialog for browsing and searching ArcView's help system" HelpTopic: "Help_on_Help_Topics" Label: "Help &Topics..." Click: "Project.HelpTopics" Shortcut: "Keys.None" ) (Choice.143 Help: "Provides instructions for how to obtain help from ArcView" HelpTopic: "Help_on_How_to_Get_Help" Label: "&How to Get Help..." Click: "Project.HelpHelp" Shortcut: "Keys.None" ) (Space.144 ) (Choice.145 Help: "Provides information about ArcView" HelpTopic: "About" Label: "&About ArcView..." Click: "Project.About" Shortcut: "Keys.None" ) (ButnBar.146 Child: 147 Child: 149 Child: 150 Child: 152 Child: 153 Child: 155 Child: 157 Child: 159 Child: 160 Child: 162 Child: 164 Child: 166 Child: 167 Child: 169 Child: 171 Child: 173 Child: 175 Child: 177 Child: 179 Child: 180 Child: 182 Child: 184 Child: 185 Child: 191 Child: 193 Child: 194 ) (Butn.147 Help: "Save Project//Saves the current project" HelpTopic: "Save_Project" Icon: 148 Click: "Project.Save" ) (AVIcon.148 Name: "Save" Res: "Icons.Save" ) (Space.149 ) (Butn.150 Help: "Add Theme//Inserts themes into the view" HelpTopic: "Add_Theme" Icon: 151 Click: "View.Add" ) (AVIcon.151 Name: "AddTheme" Res: "Icons.AddTheme" ) (Space.152 ) (Butn.153 Disabled: 1 Help: "Theme Properties//Displays the dialog box to edit properties of the active theme" HelpTopic: "Theme_Properties" Update: "View.ActiveThemesUpdate" Icon: 154 Click: "View.ThemeProperties" ) (AVIcon.154 Name: "Props" Res: "Icons.Props" ) (Butn.155 Disabled: 1 Help: "Edit Legend//Displays the legends of the active themes" HelpTopic: "Edit_Legend" Update: "View.ActiveThemesUpdate" Icon: 156 Click: "View.EditLegendClick" ) (AVIcon.156 Name: "Legend" Res: "Icons.Legend" ) (Butn.157 Disabled: 1 Help: "Open Theme Table//Opens the tables of the active themes" HelpTopic: "Open_Theme_Table" Update: "View.TabularThemesUpdate" Icon: 158 Click: "View.ShowTable" ) (AVIcon.158 Name: "Table" Res: "Icons.Table" ) (Space.159 ) (Butn.160 Disabled: 1 Help: "Find//Finds features in the active themes using the text you enter" HelpTopic: "Find" Update: "View.TabularThemesUpdate" Icon: 161 Click: "View.Find" ) (AVIcon.161 Name: "Find" Res: "Icons.Find" ) (Butn.162 Disabled: 1 Help: "Locate Address//Locates an address in the active, matchable theme" HelpTopic: "Locate_Address" Update: "View.LocateUpdate" Icon: 163 Click: "View.Locate" ) (AVIcon.163 Name: "AddMatch" Res: "Icons.AddMatch" ) (Butn.164 Disabled: 1 Help: "Query Builder//Displays the Query Builder to select features with a logical expression" HelpTopic: "Query_Builder" Update: "View.AttributeThemesUpdate" Icon: 165 Click: "View.Query" ) (AVIcon.165 Name: "QueryBuilder" Res: "Icons.QueryBuilder" ) (Space.166 ) (Butn.167 Disabled: 1 Help: "Zoom to Full Extent//Zooms to the extent of all themes" HelpTopic: "Zoom_to_Full_Extent" Update: "View.HasDataUpdate" Icon: 168 Click: "View.ZoomFullExtent" ) (AVIcon.168 Name: "ZoomView" Res: "Icons.ZoomView" ) (Butn.169 Disabled: 1 Help: "Zoom to Active Theme(s)//Zooms to the extent of active themes" HelpTopic: "Zoom_to_Active_Theme" Update: "View.ActiveThemesUpdate" Icon: 170 Click: "View.ZoomToThemes" ) (AVIcon.170 Name: "ZoomTheme" Res: "Icons.ZoomTheme" ) (Butn.171 Disabled: 1 Help: "Zoom to Selected//Zooms to the extent of the selected features" HelpTopic: "Zoom_to_Selected" Update: "View.SelectableThemesUpdate" Icon: 172 Click: "View.ZoomToSelected" ) (AVIcon.172 Name: "ZoomToSelected" Res: "Icons.ZoomToSelected" ) (Butn.173 Disabled: 1 Help: "Zoom In//Zooms in on the center of the display" HelpTopic: "Zoom_In" Update: "View.HasDataUpdate" Icon: 174 Click: "View.ZoomIn" ) (AVIcon.174 Name: "ZoomIn" Res: "Icons.ZoomIn" ) (Butn.175 Disabled: 1 Help: "Zoom Out//Zooms out from the center of the display" HelpTopic: "Zoom_Out" Update: "View.HasDataUpdate" Icon: 176 Click: "View.ZoomOut" ) (AVIcon.176 Name: "ZoomOut" Res: "Icons.ZoomOut" ) (Butn.177 Disabled: 1 Help: "Zoom to Previous Extent//Goes back to the previous extent you were viewing" HelpTopic: "Zoom_Previous" Update: "View.UndoZoomUpdate" Icon: 178 Click: "View.UndoZoom" ) (AVIcon.178 Name: "ZoomPrevious" Res: "Icons.ZoomPrevious" ) (Space.179 ) (Butn.180 Disabled: 1 Help: "Select Features Using Graphic//Selects features in active themes using selected graphics" HelpTopic: "Select_Features_Using_Graphic" Update: "View.SpatialSelectUpdate" Icon: 181 Click: "View.SpatialSelect" ) (AVIcon.181 Name: "SpatialSelect" Res: "Icons.SpatialSelect" ) (Butn.182 Disabled: 1 Help: "Clear Selected Features//Unselects the selected features of all active themes" HelpTopic: "Clear_Selected_Features" Update: "View.AttributeThemesUpdate" Icon: 183 Click: "View.ClearSelect" ) (AVIcon.183 Name: "SelectNone" Res: "Icons.SelectNone" ) (Space.184 ) (Butn.185 Help: "Converts a point you enter from one datum to another" Icon: 186 Click: "Datum.ConvertPoint" ) (AVIcon.186 Name: "Point" Res: "Icons.Point" ) (Butn.191 Help: "Converts the shapes in the active themes from one datum to another" Icon: 192 Click: "Datum.ConvertThemeDatum" ) (AVIcon.192 Name: "FrameView2" Res: "Icons.FrameView2" ) (Space.193 ) (Butn.194 Help: "Help//Gets help about the next button, tool, or menu choice you click" HelpTopic: "Help_button" Icon: 195 Click: "Help.Tool" ) (AVIcon.195 Name: "HelpTool" Res: "Icons.HelpTool" ) (PopupSet.198 Child: 199 ) (Popup.199 Child: 200 Child: 201 Child: 202 Child: 203 Child: 204 Child: 205 Child: 206 Child: 207 Child: 208 Child: 209 Child: 210 Child: 211 Child: 212 Child: 213 Child: 214 Child: 215 Child: 216 Label: "Menu" ) (Choice.200 Disabled: 1 Invisible: 1 Help: "Deletes the last entered point on the line or polygon being drawn" Update: "View.DelLastPointUpdate" Label: "Delete Last Point" Click: "View.DeleteLastPoint" Shortcut: "Keys.None" ) (Choice.201 Help: "Undo the last edit to features in a theme" HelpTopic: "Undo_Feature_Edit_on_a_view" Update: "View.UndoEditUpdate" Label: "Undo Feature Edit" Click: "View.UndoEdit" Shortcut: "Keys.None" ) (Choice.202 Disabled: 1 Help: "Redo the last edit operation on a theme that was undone" Update: "View.RedoEditUpdate" Label: "Redo Feature Edit" Click: "View.RedoEdit" Shortcut: "Keys.None" ) (Space.203 ) (Choice.204 Help: "Turns general snapping on" Update: "View.ToggleGeneralSnapUpdate" Label: "Enable General Snapping" Click: "View.ToggleGeneralSnap" Shortcut: "Keys.None" ) (Choice.205 Help: "Turns interactive snapping on" Update: "View.ToggleInteractiveSnapUpdate" Label: "Enable Interactive Snapping" Click: "View.ToggleInteractiveSnap" Shortcut: "Keys.None" ) (Space.206 ) (Choice.207 Disabled: 1 Invisible: 1 Help: "Snaps the next entered point to the nearest vertex within the user tolerance" Update: "View.InteractiveSnapUpdate" Label: "Snap to Vertex" Click: "View.SnapToVertex" Shortcut: "Keys.None" ) (Choice.208 Disabled: 1 Invisible: 1 Help: "Snaps the next entered point to the nearest line segment" Update: "View.InteractiveSnapUpdate" Label: "Snap to Boundary" Click: "View.SnapToBoundary" Shortcut: "Keys.None" ) (Choice.209 Disabled: 1 Invisible: 1 Help: "Snaps the next entered point to the nearest node common to two or more features" Update: "View.InteractiveSnapUpdate" Label: "Snap to Intersection" Click: "View.SnapToIntersection" Shortcut: "Keys.None" ) (Choice.210 Disabled: 1 Invisible: 1 Help: "Snaps the next entered point to the nearest endpoint of an existing line" Update: "View.SnapToEndPointUpdate" Label: "Snap to Endpoint" Click: "View.SnapToEndPoint" Shortcut: "Keys.None" ) (Space.211 ) (Choice.212 Help: "Unselects the selected features in all active themes" Update: "View.AttributeThemesUpdate" Label: "Clear Selection" Click: "View.ClearSelect" Shortcut: "Keys.None" ) (Choice.213 Help: "Zooms in at point where you click to bring up popup menu" Update: "View.HasDataUpdate" Label: "Zoom In" Click: "View.PopupZoomIn" Shortcut: "Keys.None" ) (Choice.214 Help: "Zooms out from point where you click to bring up popup menu" Update: "View.HasDataUpdate" Label: "Zoom Out" Click: "View.PopupZoomOut" Shortcut: "Keys.None" ) (Choice.215 Help: "Zooms to the extent of the selected features" Update: "View.SelectableThemesUpdate" Label: "Zoom to Selected" Click: "View.ZoomToSelected" Shortcut: "Keys.None" ) (Choice.216 Help: "Centers display on point where you click to bring up popup" Update: "View.HasDataUpdate" Label: "Pan" Click: "View.PopupPan" Shortcut: "Keys.None" ) (ToolBar.217 Child: 218 Child: 220 Child: 222 Child: 224 Child: 226 Child: 228 Child: 230 Child: 232 Child: 234 Child: 236 Child: 238 Child: 240 Child: 242 Child: 261 ) (Tool.218 Disabled: 1 Help: "Identify//Provides information about a feature" HelpTopic: "Identify_tool" Update: "View.IdentifyUpdate" Icon: 219 Cursor: "Cursors.ID" Apply: "View.Identify" ) (AVIcon.219 Name: "ID" Res: "Icons.ID" ) (Tool.220 Disabled: 1 Help: "Pointer//Selects, moves, and resizes graphics" HelpTopic: "Pointer_tool" Update: "View.HasDataUpdate" Icon: 221 Cursor: "Cursors.Select" Apply: "View.Select" Click: "View.SelectTool" ) (AVIcon.221 Name: "Select" Res: "Icons.Select" ) (Tool.222 Disabled: 1 Help: "Vertex Edit//Adds, moves, and deletes vertices of features and graphics" HelpTopic: "Vertex_Edit_tool" Update: "View.SelectToEditUpdate" Icon: 223 Cursor: "Cursors.SelectEdit" Apply: "View.SelectToEdit" Click: "View.SelectToEditTool" ) (AVIcon.223 Name: "SelectEdit" Res: "Icons.SelectEdit" ) (Tool.224 Disabled: 1 Help: "Select Feature//Selects features in the active themes by pointing or dragging" HelpTopic: "Select_Feature_tool" Update: "View.SelectableThemesUpdate" Icon: 225 Cursor: "Cursors.Default" Apply: "View.SelectPoint" ) (AVIcon.225 Name: "FeatureSelect" Res: "Icons.FeatureSelect" ) (Tool.226 Disabled: 1 Help: "Zoom In//Zooms in at a point you click or zooms in on a rectangle you drag" HelpTopic: "Zoom_In_tool" Update: "View.HasDataUpdate" Icon: 227 Cursor: "Cursors.ZoomIn" Apply: "View.ZoomInTool" ) (AVIcon.227 Name: "ZoomInTool" Res: "Icons.ZoomInTool" ) (Tool.228 Disabled: 1 Help: "Zoom Out//Zooms out from a point you click or zooms out to include a rectangle you drag" HelpTopic: "Zoom_Out_tool" Update: "View.HasDataUpdate" Icon: 229 Cursor: "Cursors.ZoomOut" Apply: "View.ZoomOutTool" ) (AVIcon.229 Name: "ZoomOutTool" Res: "Icons.ZoomOutTool" ) (Tool.230 Disabled: 1 Help: "Pan//Drags the display in the direction you move the cursor" HelpTopic: "Pan_tool" Update: "View.HasDataUpdate" Icon: 231 Cursor: "Cursors.Pan" Apply: "View.Pan" ) (AVIcon.231 Name: "Pan" Res: "Icons.Pan" ) (Tool.232 Disabled: 1 Help: "Measure//Measures distance" HelpTopic: "Measure_tool" Update: "View.HasDataUpdate" Icon: 233 Cursor: "Cursors.Measure" Apply: "View.Measure" ) (AVIcon.233 Name: "Measure" Res: "Icons.Measure" ) (Tool.234 Disabled: 1 Help: "Hot Link//Follows a hot link in the active themes" HelpTopic: "Hot_Link_tool" Update: "View.HotLinkUpdate" Icon: 235 Cursor: "Cursors.Media" Apply: "View.HotLink" ) (AVIcon.235 Name: "Media" Res: "Icons.Media" ) (Tool.236 Disabled: 1 Help: "Area of Interest//Sets the view's Area Of Interest for library-based themes" HelpTopic: "Area_Of_Interest_tool" Update: "View.AOIToolUpdate" Icon: 237 Cursor: "Cursors.Default" Apply: "View.AOITool" ) (AVIcon.237 Name: "AOI" Res: "Icons.AOI" ) (Tool.238 Disabled: 1 Help: "Label//Labels a feature in the active theme with data from its table" HelpTopic: "Label_tool" Update: "View.LabelToolUpdate" Icon: 239 Cursor: "Cursors.Tag" Apply: "View.LabelTool" ) (AVIcon.239 Name: "Tag" Res: "Icons.Tag" ) (Tool.240 Help: "Text//Creates text on the display" HelpTopic: "Text_tool" Update: "View.GraphicToolUpdate" Icon: 241 Cursor: "Cursors.Text" Apply: "View.TextTool" Click: "SymWin.DisplayFontPanel" ) (AVIcon.241 Name: "Text" Res: "Icons.Text" ) (ToolMenu.242 Help: "Draw Point//Creates a point on the display" HelpTopic: "Draw_tool" Update: "View.PointToolUpdate" Icon: 243 Cursor: "Cursors.CrossHair" Apply: "View.PointTool" Click: "SymWin.DisplayMarkerPanel" Child: 244 Child: 245 Child: 247 Child: 249 Child: 251 Child: 253 Child: 255 Child: 257 Child: 259 ) (AVIcon.243 Name: "Point" Res: "Icons.Point" ) (Tool.244 Help: "Draw Point//Creates a point on the display" HelpTopic: "Draw_tool" Update: "View.PointToolUpdate" Icon: 243 Cursor: "Cursors.CrossHair" Apply: "View.PointTool" Click: "SymWin.DisplayMarkerPanel" ) (Tool.245 Help: "Draw Straight Line//Creates a line on the display" HelpTopic: "Draw_tool" Update: "View.GraphicToolUpdate" Icon: 246 Cursor: "Cursors.CrossHair" Apply: "View.LineTool" Click: "SymWin.DisplayPenPanel" ) (AVIcon.246 Name: "SelectLine" Res: "Icons.SelectLine" ) (Tool.247 Help: "Draw Line//Creates a line with two or more points on the display" HelpTopic: "Draw_tool" Update: "View.PolyLineToolUpdate" Icon: 248 Cursor: "Cursors.CrossHair" Apply: "View.PolyLineTool" Click: "SymWin.DisplayPenPanel" ) (AVIcon.248 Name: "Lines" Res: "Icons.Lines" ) (Tool.249 Help: "Draw Rectangle//Creates a rectangle on the display" HelpTopic: "Draw_tool" Update: "View.PolyToolUpdate" Icon: 250 Cursor: "Cursors.CrossHair" Apply: "View.RectTool" Click: "SymWin.DisplayFillPanel" ) (AVIcon.250 Name: "Rect" Res: "Icons.Rect" ) (Tool.251 Help: "Draw Circle//Creates a circle on the display" HelpTopic: "Draw_tool" Update: "View.PolyToolUpdate" Icon: 252 Cursor: "Cursors.CrossHair" Apply: "View.CircleTool" Click: "SymWin.DisplayFillPanel" ) (AVIcon.252 Name: "Disk" Res: "Icons.Disk" ) (Tool.253 Help: "Draw Polygon//Creates a polygon on the display" HelpTopic: "Draw_tool" Update: "View.PolyToolUpdate" Icon: 254 Cursor: "Cursors.CrossHair" Apply: "View.PolyTool" Click: "SymWin.DisplayFillPanel" ) (AVIcon.254 Name: "Poly" Res: "Icons.Poly" ) (Tool.255 Disabled: 1 Help: "Draw Line to Split Feature//Creates a line to split line features" HelpTopic: "Draw_tool" Update: "View.SplitLineToolUpdate" Icon: 256 Cursor: "Cursors.CrossHair" Apply: "View.SplitTool" ) (AVIcon.256 Name: "SplitLine" Res: "Icons.SplitLine" ) (Tool.257 Disabled: 1 Help: "Draw Line to Split Polygon//Creates a line to split polygon features" HelpTopic: "Draw_tool" Update: "View.SplitPolyToolUpdate" Icon: 258 Cursor: "Cursors.CrossHair" Apply: "View.SplitTool" ) (AVIcon.258 Name: "SplitPoly" Res: "Icons.SplitPoly" ) (Tool.259 Disabled: 1 Help: "Draw Line to Append Polygon//Appends a new polygon adjacent to other polygons" HelpTopic: "Draw_tool" Update: "View.AutoCompleteUpdate" Icon: 260 Cursor: "Cursors.CrossHair" Apply: "View.AutoCompleteTool" ) (AVIcon.260 Name: "AutoComplete" Res: "Icons.AutoComplete" ) (ToolMenu.261 Disabled: 1 Invisible: 1 Help: "Snap//Sets the general snapping tolerance for the editable theme" HelpTopic: "Snap_tools" Update: "View.SnapToolUpdate" Icon: 262 Cursor: "Cursors.Default" Apply: "View.SnapTool" Child: 263 Child: 264 ) (AVIcon.262 Name: "SnapTool" Res: "Icons.SnapTool" ) (Tool.263 Disabled: 1 Invisible: 1 Help: "Snap//Sets the general snapping tolerance for the editable theme" HelpTopic: "Snap_tools" Update: "View.SnapToolUpdate" Icon: 262 Cursor: "Cursors.Default" Apply: "View.SnapTool" ) (Tool.264 Disabled: 1 Invisible: 1 Help: "Snap//Sets the interactive snapping tolerance for the editable theme" HelpTopic: "Snap_tools" Update: "View.InteractiveSnapToolUpdate" Icon: 265 Cursor: "Cursors.Default" Apply: "View.InteractiveSnapTool" ) (AVIcon.265 Name: "SnapFeatureTool" Res: "Icons.SnapFeatureTool" ) (AVIcon.266 Name: "Icon" Res: "View.Icon" ) (FN.805 Path: "$HOME" ) (TClr.806 Red: 0xffff Green: 0xffff ) (AVStr.807 S: "View" ) (AVStr.808 S: "Table" ) (AVStr.809 S: "Chart" ) (AVStr.810 S: "Layout" ) (AVStr.811 S: "Script" ) (AVStr.812 S: "Project" ) (AVStr.813 S: "Appl" )