######################################################################
#
# Macro Name    : c:/users/public/gemcom/surpac/63/demo_data/tutorials/dtm_surfaces/_transform_dtm.tcl
#
# Version       : Surpac 6.3
#
# Creation Date : Wed Apr 04 16:12:49 2012
#
# Description   : 
#
######################################################################

set status [ SclFunction "EXIT GRAPHICS" {} ]

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

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

set status [ SclFunction "ZOOM ALL" {} ]

set status [ SclFunction "2D TRANSFORM DTM" {
  frm2dtransformdtm={
    {
      _action="display"
      xm1="1708.881"
      xd2="2600"
      trnax="Y"
      xd1="2600"
      rl_correct="-800"
      rltyp="A"
      ym2="7189.210"
      ym1="7613.474"
      yd2="6600"
      yd1="7200"
      lrange="2"
      oloc="transformed_pit"
      rl="Y"
      locn="pit"
      xm2="1284.617"
    }
  }
  frm00285={
    {
      _action="display"      
      accept="Y"
    }
  }
  frm00121={
    {
      _action=""
    }
  }
}]

puts ""
puts ""
puts "Macro _04_transform_DTM.tcl completed."
puts ""
