SclGraphicsUnSetModellingMatrix

Overview

Forget any translation, rotation and scaling settings in the currently open node of the graphics database that might have been set using SclGraphicsScaleObject, SclGraphicsTranslateObject or SclGraphicsRotateObject.

Synopsis

SclGraphicsUnSetModellingMatrix

Description

This command causes the currently open node of the graphics database to forget any scale, rotation or translation settings that might previously have been set.

Arguments

None.

Returns

Nothing.

Examples

#
# Create a node and insert a small polyline then translate, rotate and scale 
# it in an animation loop
#
SclGraphicsOpen mygraphicsnode
  # create the lists of coordinate values
  set xlist [list -.5 .5 -.5 .5 -.5]
  set ylist [list -1 1 1 -1 -1]
  set zlist [list 0 0 0 0 0]
  # insert the polyline and remember its key
  set key [SclGraphicsInsertPolyline $xlist $ylist $zlist ]
  # set the rendering attributes
  SclGraphicsSetColour "lines=pink"
  SclGraphicsSetVisibility "markers=off"
  SclGraphicsSetLineWeight 2
  SclGraphicsSetLinePattern "---"
  SclGraphicsSetHeuristics "quick moves=on"
  for {set i 0} {$i < 180} {incr i} {
    SclGraphicsRotateObject 0.0 0.0 2.0
    SclGraphicsScaleObject 0.95 0.95 0.0
    SclGraphicsTranslateObject 0.05 0.01 0.0
    SclGraphicsUpdateDisplay
  }
  # Now put the geometry back from where it came
  SclGraphicsUnSetModellingMatrix
  SclGraphicsUpdateDisplay
SclGraphicsClose