######################################################################
#
# Macro Name    : c:/documents and settings/all users/gemcom/surpac/611/demo_data/tutorials/introduction/_.tcl
#
# Version       : Surpac 6.1.1
#
# Creation Date : Mon Nov 03 10:18:14 2008
#
# Description   : 
#
######################################################################

set status [ SclFunction "CREATE POINT" {
  frm00474={
    {
      istr="1"
      ynew="0"
      xnew="0"
      znew="0"
      desc=""
    }
  }
}]

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

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

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

set status [ SclFunction "TOOL SELECTION TOGGLE" {
  set="small"
  context="graphics"
  isAction="false"
  invokedBy="Menu"
}]

set status [ SclFunction "IDENTIFY POINT" {
  select_point=table { winx winy objectx objecty objectz snap_projection } {
    { "0.081" "-0.482" "8297.715" "8977.045" "1663.441" "off" }
    { "0.056" "0.104" "8294.763" "9018.067" "1662.349" "off" }
    { "0.398" "0.185" "8340.980" "9023.284" "1663.181" "off" }
    { "0.411" "-0.353" "8342.397" "8985.606" "1664.278" "off" }
  }
}]

puts ""
puts ""
puts "Macro 02b_view_point_properties.tcl completed"
puts ""
