######################################################################
#
# Macro Name    : c:/users/public/gemcom/surpac/64_beta_2/demo_data/tutorials/pit_design/_11_and_again.tcl
#
# Version       : Surpac 6.4 beta 2
#
# Creation Date : Tue Jan 15 14:05:42 2013
#
# Description   : 
#
######################################################################

set status [ SclFunction "BM EXIT" {} ]

set status [ SclFunction "EXIT GRAPHICS" {} ]

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

if { [catch {
  set status [ SclFunction "DEFINE NEW RAMP" {
  select_point=table { winx winy objectx objecty objectz snap_projection } {
    { "-0.056" "0.727" "204.288" "791.808" "910.031" "off" }
    { "0.004" "0.783" "215.004" "798.180" "910.031" "off" }
  }
  frm05011={
    {
      _action=display
      ramp_name="Ramp#1"
      ramp_string="101"
      ramp_type="anti-clockwise"
      ramp_width="15"
      ramp_gradient="10"
      ramp_grade_calc_method="inside edge"
      berm_crossing_method="exit at toe"
      berm_taper_distance="30"
      switchback_angle="180"
      switchback_inner_radius="2.5"
    }
  }
}]
}]}  {
puts "To correctly select points for the ramp in the DEFINE NEW RAMP function, you must first run the previous macros for the pit design tutorial (macros _01 to _10)."
}


puts ""
puts ""
puts " Macro _11_restart_pit_design.tcl completed"
puts ""
