Posts

Showing posts from November, 2021

Howto create HyperView tcl script

Image
 Hello my friends, today, in this post i will show you the code to get normal vector of one element in HyperView by using tcl command. ------------------ procedure code-------------------- proc getNormalEle { windowid elementid} { hwi OpenStack set t [clock clicks] hwi GetSessionHandle mySession$t   mySession$t GetProjectHandle myProject$t      set pageIndex [myProject$t GetActivePage]      myProject$t GetPageHandle myPage$t $pageIndex        myPage$t GetWindowHandle myWindow$t $windowid           myWindow$t GetClientHandle myPost$t             set modelIndex [myPost$t GetActiveModel]                myPost$t GetModelHandle myModel$t $modelIndex              set normallist [myModel$t GetEntityInfo element normal  $elementid] myModel$t ReleaseHandle myPost$t ReleaseHandle myWindow$t ReleaseHandle ...