set status [ SclFunction "EXIT GRAPHICS" {
  frm00108={
    {
      exit_mode="E"
    }
  }
}]

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

set status [ SclFunction "GRAPHICS CREATE DTM" {
  frm01311={
    {
      _action="display"
      breaktest="Y"
      interpolate_new_points="N"
    }
  }
}]

set status [ SclFunction "SAVE FILE AS" {
  _action="display"
  output_file="lev1665.dtm"
  output_type="Surpac DTM Files"
  output_filenames="lev1665.dtm,lev1665.str"
  Surpac={
    Purpose=""
    range=""
    FileFormat="text"
    ForceValidation="true"
    ForceCompatibility="true"
  }
  frmSaveMultipleFiles={
    {
      _action="apply"
    }
  }
}]

set status [ SclFunction "GRAPHICS DTM CLIP" {
  select_point={
    {
      winx="-0.202"
      winy="0.370"
      objectx="8262.073"
      objecty="9036.992"
      objectz="1662.039"
    }
  }
  frm01318={
    {
      _action="display"
      inout="INSIDE"
      new_bdy_layer=""
    }
  }
}]

set status [ SclFunction "FILE SAVE" {
  frmsaveFileAs={
    {
      AutoCAD={
        version="Autocad 18"
      }
      output_file="surpac2dtm:lev1665"
      outputExt=".dtm"
      Surpac={
        FileFormat="text"
        ForceValidation="true"
        Purpose=""
        ForceCompatibility="true"
        range=""
      }
      output_type="Surpac DTM Files"
    }
  }
  frmSaveMultipleFiles={
    {
      _action="apply"
    }
  }
}]



puts ""
puts ""
puts ""
puts ""
puts "Macro _06b_clip_dtm_graphics_based.tcl completed."
puts ""
puts ""
