<?xml version="1.0" encoding="ISO-8859-1"?>

<OcadScript>
  <File.New>
    <File>C:\Program Files\OCAD\OCAD 2018 Mapping Solution\Symbol\Orienteering Map ISOM 2017 10 000.ocd</File>
  </File.New>

  <File.SaveAs>
    <File>C:\data\orientering\GeoNorge\2024\SOSI32\32N4601_Bergen\32N4601_Bergen_fkb.ocd</File>
  </File.SaveAs> 

   <File.Import.Dxf>
    <Directory>C:\data\orientering\GeoNorge\2024\SOSI32\32N4601_Bergen</Directory>
    <NewOffset>true</NewOffset>
    <Angle>0.0</Angle>
  </File.Import.Dxf>

  <Map.ConvertLayer>
    <CrtFile>C:\data\orientering\GeoNorge\2024\fkb_2017_mapant.crt</CrtFile>
  </Map.ConvertLayer>

  <Map.OptimizeRepair>
    <Enabled>true</Enabled>
  </Map.OptimizeRepair>
  
  <Map.ScaleAndCoordinateSystem>
	<CoordinateSystem>2032</CoordinateSystem>
  </Map.ScaleAndCoordinateSystem>

  <View.MoveTo>
	<X>302000</X>
	<Y>6696500</Y>
  </View.MoveTo>
  
  <View.Zoom>1</View.Zoom>
  
  <View.Mode>normalMode</View.Mode>
  
  <!-- Merge single power lines -->
  <Object.MergeObjectsBySymbol>
        <SymbolNumber>510.000</SymbolNumber>
  </Object.MergeObjectsBySymbol>

  <!-- Merge double power lines -->
  <Object.MergeObjectsBySymbol>
        <SymbolNumber>511.000</SymbolNumber>
  </Object.MergeObjectsBySymbol>

  <!-- Merge railroad lines -->
  <Object.MergeObjectsBySymbol>
        <SymbolNumber>509.000</SymbolNumber>
  </Object.MergeObjectsBySymbol>

  <!-- Merge tracks -->
  <Object.MergeObjectsBySymbol>
        <SymbolNumber>504.000</SymbolNumber>
  </Object.MergeObjectsBySymbol>

  <!-- Merge paths -->
  <Object.MergeObjectsBySymbol>
        <SymbolNumber>505.000</SymbolNumber>
  </Object.MergeObjectsBySymbol>

  <!-- Select all power lines -->
  <Select.ObjectsBySymbol>
		<SymbolNumber>510.000</SymbolNumber>
		<SymbolNumber>511.000</SymbolNumber>
  </Select.ObjectsBySymbol>
	
  <Object.ChangeVertexTypesTo>
		<Type>CornerVertex</Type>
  </Object.ChangeVertexTypesTo>	
	
  <!-- Select all railroads, fill background with impassable area symbol -->
  <Select.ObjectsBySymbol>
		<SymbolNumber>509.000</SymbolNumber>
  </Select.ObjectsBySymbol>	
	
	<Object.Fill>		
		<SymbolNumber>509.001</SymbolNumber>
	</Object.Fill>	
	
  <!-- create 415 boundary around 412 Cultivated land -->
  <Select.ObjectsBySymbol>
		<SymbolNumber>412.000</SymbolNumber>
  </Select.ObjectsBySymbol>	
	
	<Object.Fill>		
		<SymbolNumber>415.000</SymbolNumber>
	</Object.Fill>	
	
	<!-- clear selection -->
	<Select.ObjectsBySymbol>
    </Select.ObjectsBySymbol>	
  
  <File.Save>
    <Enabled>true</Enabled>
  </File.Save>
  <File.Save>
    <Enabled>false</Enabled>
  </File.Save>
  
   <File.Close>
    <Enabled>true</Enabled>
  </File.Close>
  <File.Exit>
	<Enabled>true</Enabled>
  </File.Exit>
</OcadScript>