######################################################################
#
# Macro Name    : plotting/_01d_autoplit_multiple_sections.tcl
#
# Version       : Surpac 6.4
#
# Creation Date : Fri Dec 28 11:50:39 2012
#
# Description   : 
#
######################################################################

set plot_ed [SclSystemOption get {plot_editor}]
puts "plot editor setting was initially $plot_ed and is now surpac"
SclSystemOption set "plot_editor" "surpac"

catch {set status [ SclFunction "EXECUTE OS COMMAND" {
  frm00462={
    {
      os_cmd="del multi_section*.dwf"
    }
  }
}]}


catch {set status [ SclFunction "EXECUTE OS COMMAND" {
  frm00462={
    {
      os_cmd="del multi_section*.cf"
    }
  }
}]}

set status [ SclFunction "EXIT GRAPHICS" {} ]

set status [ SclFunction "GEOLOGY DATABASE DISCONNECT" {} ]

set status [ SclFunction "RECALL ANY FILE" {
  file="surpac.ddb"
  mode="openInNewLayer"
}]

set status [ SclFunction "DRILLHOLE ATTRIBUTES" {
  trace_colour="forest green"
  trace_thickness="1"
  table=""
  field=""
  tick_mark_weight="1"
  show_collars="true"
  cylinder_style="no cylinders"
  cylinder_radius="1"
  cylinder_maximum="50"
}]

set status [ SclFunction "DRILLHOLE COLLARS" {
  show_collars="true"
  collar_marker="(+)"
  collar_marker_size="0.5"
  position="along path"
  num_rows="0"
}]

set status [ SclFunction "DRILLHOLE GEOLOGY" {
  num_rows="1"
  tbl={
    "geology"
  }
  fld={
    "rock"
  }
  position={
    "left"
  }
  size={
    "1"
  }
  offset={
    "0"
  }
}]

set status [ SclFunction "DRILLHOLE LABELS" {
  tick_length="1"
  num_rows="2"
  tbl={
    "sample"
    "geology"
  }
  fld={
    "gold"
    "rock"
  }
  position={
    "right"
    "left"
  }
  alignment={
    "left"
    "right"
  }
  offset={
    "1"
    "2"
  }
  decimals={
    "2"
    "-1"
  }
  use_styles={
    "true"
    "true"
  }
  colour={
    ""
    ""
  }
  combine={
    "true"
    "true"
  }
  font_style={
    "Default"
    "Default"
  }
  font_size={
    "1"
    "1"
  }
  font_units={
    "oru"
    "oru"
  }
}]

set status [ SclFunction "DRILLHOLE GRAPHS" {
  num_rows="0"
}]

set status [ SclFunction "DRILLHOLE DEPTH MARKERS" {
  position="left"
  alignment="right"
  use_styles="true"
  colour=""
  font_style="Default"
  font_units="oru"
  font_size="1"
  major="10"
  minor="0"
  major_length="3"
  minor_length="1"
  offset="5"
  decimals="2"
  display="false"
}]

set status [ SclFunction "DRILLHOLE APPARENT DIP MARKERS" {
  num_rows="0"
}]

set status [ SclFunction "RECALL ANY FILE" {
  file="section_7320_north.swa"
  mode="openInNewLayer"
}]

set status [ SclFunction "AUTOPLOT" {
  frm01120={
    {
      _action=display
      outputPrefix="multi_section"
      fit="Manual Scale"
      autogroup="Yes"
      minscale="1015.998"
      uniform_scale="Yes"
      xscale="1000"
      sheet="A3"
      orient="Landscape"
      drawsp="DEFAULT"
      grid="ZXA3"
      border_id="BORD"
      title="NMA3"
      unit="M"
      xref=""
      yref=""
      include_plan_strip="Yes"
      plan_draw="DEFAULT_PLAN"
      plan_position="top"
      display_section_line="No"
      plan_grid="YXA3"
      plan_xgli="100"
      plan_ygli="100"
      plan_xline="F"
      plan_yline="F"
      include_note="No"
      note_corner="UL"
      create_batched_sections="Yes"
      extra_section_count="3"
      reverse_section_direction="No"
      section_ref_corner_source="Relative"
      image_plot="No"
      legendElements=table { include_legend legend_name x_position y_position nrows } {
        { "no" "surpac\\geology\\rock" null null null }
        { "no" "surpac\\sample\\gold" null null null }
        { "no" "ore_solid1.str\\Strings" null null null }
        { "no" "topo1.str\\Strings" null null null }
      }
      legendElementsImg=table { include_legendImg legend_nameImg x_positionImg y_positionImg nrowsImg } {
        { "no" "surpac\\geology\\rock" null null null }
        { "no" "surpac\\sample\\gold" null null null }
        { "no" "ore_solid1.str\\Strings" null null null }
        { "no" "topo1.str\\Strings" null null null }
      }
      font="Default"
      bold_font="N"
      italic_font="N"
      underline_font="N"
      height="0.18"
      legend_item_height="1"
      legend_margin="0.25"
      planesToPlot={
        {
          plot_plane=null
        }
      }
    }
  }
  frm00232={
    {
      _action=dsiplay
      line1=""
      line2="Northing Section"
      line3=""
    }
  }
  world_drag={
    {
      snap_mode="off"
      snap_projection="off"
      objectx="0.000"
      objecty="0.000"
      objectz="0.000"
      dx="0.000"
      dy="0.000"
      dz="0.000"
      function="complete"
    }
  }
  frm00219={
    {
      _action=display
      ygli="50"
      yline="F"
      xgli="100"
      xline="F"
    }
  }
}]

set status [ SclFunction "RECALL ANY FILE" {
  file="multi_section.dwf"
  mode="openInNewLayer"
}]

SclPause 3

set status [ SclFunction "TOOL MODE TRADITIONAL" {} ]

set status [ SclFunction "RECALL ANY FILE" {
  file="multi_section_01.dwf"
  mode="openInNewLayer"
}]

SclPause 3

set status [ SclFunction "TOOL MODE TRADITIONAL" {} ]

set status [ SclFunction "RECALL ANY FILE" {
  file="multi_section_02.dwf"
  mode="openInNewLayer"
}]

SclPause 3

set status [ SclFunction "TOOL MODE TRADITIONAL" {} ]

set status [ SclFunction "RECALL ANY FILE" {
  file="multi_section_03.dwf"
  mode="openInNewLayer"
}]

SclPause 3

set status [ SclFunction "TOOL MODE TRADITIONAL" {} ]

set status [ SclFunction "EXIT PLOT_PREVIEW" {} ]

puts ""
SclSystemOption set plot_editor $plot_ed
puts "plot editor setting is now reset to $plot_ed"
puts ""
puts ""
puts "macro _01d_Autoplot_multiple_sections.tcl  completed."
puts ""