######################################################################
#
# Macro Name    : c:/users/public/gemcom/surpac/64_beta_2/demo_data/tutorials/geological_database/05d_rerecorded.tcl
#
# Version       : Surpac 6.4 beta 2
#
# Creation Date : Wed Jan 16 15:47:31 2013
#
# 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"

set status [ SclFunction "EXIT GRAPHICS" {} ]

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

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

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

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

set status [ SclFunction "CHECK DATABASE CONNECTED" {
  databasesession="GeologyDatabase"
  databasepurpose="drillholes"
  databasehandle="GEOLOGY"
}]

set status [ SclFunction "GET DATABASE HANDLE" {
  sessionType="GeologyDatabase"
  DatabaseHandle="GEOLOGY"
  DatabaseType="drillholes"
  DatabaseName="surpac_training"
  result=1
}]

set status [ SclFunction "DRILLHOLE ATTRIBUTES" {
  trace_colour="forest green"
  trace_thickness="1"
  table=""
  field=""
  tick_mark_weight="1"
  rescale="true"
  add_constraint="true"
  cylinder_style="no cylinders"
  cylinder_radius="1.000"
  cylinder_maximum="50.0"
  show_collars="true"
  frm00012={
    {
      cons={
        {
          field=""
          operator="="
          value=""
        }
      }
    }
  }
}]

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

set status [ SclFunction "DRILLHOLE GEOLOGY" {
  tbl={
    "geology"
  }
  fld={
    "lithology"
  }
  position={
    "right"
  }
  size={
    "1.0"
  }
  offset={
    "0.0"
  }
  num_rows="1"
}]

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

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

set status [ SclFunction "DRILLHOLE DEPTH MARKERS" {
  position="left"
  offset="5.0"
  decimals="2"
  use_styles="false"
  colour=""
  font_style="Default"
  font_size="1.000"
  font_units="oru"
  alignment="right"
  major="10.0"
  minor="0.0"
  display="false"
  major_length="3.0"
  minor_length="1.0"
}]

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

set status [ SclFunction "SECTION" {} ]

set status [ SclFunction "ACTIVATE PLANE" {
  type="Vertical sections"
  group="crossSections"
  plane="7320N"
}]

set status [ SclFunction "AUTOPLOT" {
  frm01120={
    {
      _action=display
      outputPrefix="multi_section"
      fit="Manual Scale"
      autogroup="Yes"
      minscale="3497.06"
      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"
      section_ref_corner_source="Relative"
      image_plot="No"
      legendElements=table { include_legend legend_name x_position y_position nrows } {
        { "no" "surpac_training\\geology\\lithology" null null null }
        { "no" "surpac_training\\sample\\gold" null null null }
        { "no" "ore1.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_training\\geology\\lithology" null null null }
        { "no" "surpac_training\\sample\\gold" null null null }
        { "no" "ore1.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=table { plot_plane } {
        { null }
        { "yes" }
        { "yes" }
        { "yes" }
        { "no" }
        { "no" }
        { "no" }
        { "no" }
        { "no" }
        { "no" }
        { "no" }
        { "no" }
        { "no" }
      }
    }
  }
  frm00232={
    {
      _action=display
      line1=""
      line2="Northing Section"
      line3=""
    }
  }
  world_drag=table { snap_mode snap_projection objectx objecty objectz dx dy dz function } {
    { "off" "on" "1821.195" "7392.447" "225.680" "18.919" "0.000" "-1.032" "drag" }
    { "off" "on" "1481.006" "7392.447" "209.170" "46.436" "0.000" "-19.950" "drag" }
    { "off" "on" "1524.691" "7392.447" "192.659" "2.064" "0.000" "35.773" "drag" }
    { "off" "on" "1527.443" "7392.447" "226.368" "0.688" "0.000" "-10.663" "drag" }
    { "off" "on" "0.000" "0.000" "0.000" "0.000" "0.000" "0.000" "complete" }
  }
  frm00219={
    {
      _action=display
      ygli="50"
      yline="F"
      xgli="100"
      xline="F"
    }
  }
}]

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

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

SclPause 1

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

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

SclPause 1

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

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

SclPause 1

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

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

SclPause 1

set status [ SclFunction "PLOT PREVIEW CLEAR PLOT" {} ]

set status [ SclFunction "PLOT PREVIEW CLEAR PLOT" {} ]

set status [ SclFunction "PLOT PREVIEW CLEAR PLOT" {} ]

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 05d_autoplot_multiple_sections.tcl completed."
puts  ""