Jump to content
Sathish

Tcl script - standard view for local coordinate system

Recommended Posts

Hi,

Not sure why you need it. but please try:

*createmarkpanel systs 1 "Pick a local system:"

if {[hm_marklength systs 1]==1} {

     set SystID [hm_getmark systs 1]

     lassign [hm_getvalue systs id=1 dataname=axis] xx xy xz yx yy yz zx zy zz

     eval  *viewset $xx $yx $zx 0 $xy $yy $zy 0 $xz $yz $zz 0 0 0 0 1 [lrange [hm_winfo viewmatrix end-3 end]]

    *window

}

 

 

Share this post


Link to post
Share on other sites

×
×
  • Create New...