Jump to content

Roshan Shiveshwar

Members
  • Content Count

    62
  • Joined

  • Last visited

  • Days Won

    1

Roshan Shiveshwar last won the day on October 18 2018

Roshan Shiveshwar had the most liked content!

4 Followers

About Roshan Shiveshwar

  • Rank
    Advanced User

Profile Information

  • Country
    India
  • Are you University user?
    No

Recent Profile Visitors

827 profile views
  1. Hi, Is there a query command to identify elements attached to nodes in Hyperview? I can identify nodes attached to elements by using element.connectivity. There isn't such query available for nodes. Thanks, Roshan
  2. Hi, I am creating a script where I want to orient the model such that I can clearly view the interested node and capture a zoomed-in image. So far, I am able to set the desired orientation. But, I am unable to zoom exactly at the interested node. Is there any way I can achieve this? Thanks, Roshan
  3. Have you tried the following : exec cmd.exe /k "<vbs file path>"
  4. Solved : There was a small eeror in the code. One of the object was not destroyed properly set job_folder "C:\\Users\\xcxc\\Desktop\\test_ui\\test" set num_of_modes 15 #get the directory# set dirname [file dirname [info script]] set template_dirname "$dirname/Report_Template.pptx" #handle the files# file copy -force "$dirname/Report_Template.pptx" "$job_folder/Report/Report.pptx" #modify the PPts# package require twapi set ppt [::twapi::comobj PowerPoint.Application] $ppt DisplayAlerts [expr 0] set presents [$ppt Presentations] set active_presentation [$presents Open "$job_folder/Report/Report.pptx"]; #Open the Presnetation set slides [$active_presentation Slides]; #gte the slide list set slide_1 [$slides Item 1]; #get control on slide index 1 set object_list {} set mode_counter 1 while {$mode_counter <= $num_of_modes} { set slide_num [expr {$mode_counter + 1}] set slide_$slide_num [$slides Add $slide_num 12]; #add one more slide into the presentation set slide_$slide_num\_shapes [[set slide_$slide_num] Shapes] set slide_$slide_num\_video_1 [[set slide_$slide_num\_shapes] AddMediaObject2 [file nativename "$job_folder/Report/Mode_$mode_counter\_Iso_Front.avi"] -1 -1 20 100 650 300] set slide_$slide_num\_video_2 [[set slide_$slide_num\_shapes] AddMediaObject2 [file nativename "$job_folder/Modal_Analysis/Report/Mode_$mode_counter\_Iso_Back.avi"] -1 -1 500 100 650 300] lappend object_list "slide_$slide_num" lappend object_list "slide_$slide_num\_shapes" lappend object_list "slide_$slide_num\_video_1" lappend object_list "slide_$slide_num\_video_2" incr mode_counter 1 } $active_presentation Save foreach object $object_list { puts $object [set $object] -destroy } $slides -destroy $active_presentation -destroy $ppt Quit $ppt -destroy
  5. Does this script work in Interactive mode? Also, you may also try replacing "\#nastran\\nastran" with " [hm_info -appinfo SPECIFIEDPATH hm_feinput_readers]/nastran" .
  6. Hi, I have created a tcl script that is supposed to perform following activities: Open ppt object Add new slide Paste animation (.avi) files. Save the file Close the ppt Everything works fine, but at the end ppt does not close. Here is the code that I have written. Is there anything that I am missing out? set job_folder "C:\\Users\\xcxc\\Desktop\\test_ui\\test" set num_of_modes 15 #get the directory# set dirname [file dirname [info script]] set template_dirname "$dirname/Report_Template.pptx" #handle the files# file copy -force "$dirname/Report_Template.pptx" "$job_folder/Report/Report.pptx" #modify the PPts# package require twapi set ppt [::twapi::comobj PowerPoint.Application] $ppt DisplayAlerts [expr 0] set presents [$ppt Presentations] $presents Open "$job_folder/Report/Report.pptx"; #Open the Presnetation set active_presentation [$ppt ActivePresentation]; #get the cureently active presentaatin set slides [$active_presentation Slides]; #gte the slide list set slide_1 [$slides Item 1]; #get control on slide index 1 set object_list {} set mode_counter 1 while {$mode_counter <= $num_of_modes} { set slide_num [expr {$mode_counter + 1}] set slide_$slide_num [$slides Add $slide_num 12]; #add one more slide into the presentation set slide_$slide_num\_shapes [[set slide_$slide_num] Shapes] set slide_$slide_num\_video_1 [[set slide_$slide_num\_shapes] AddMediaObject2 [file nativename "$job_folder/Report/Mode_$mode_counter\_Iso_Front.avi"] -1 -1 20 100 650 300] set slide_$slide_num\_video_2 [[set slide_$slide_num\_shapes] AddMediaObject2 [file nativename "$job_folder/Modal_Analysis/Report/Mode_$mode_counter\_Iso_Back.avi"] -1 -1 500 100 650 300] lappend object_list "slide_$slide_num" lappend object_list "slide_$slide_num\_shapes" lappend object_list "slide_$slide_num\_video_1" lappend object_list "slide_$slide_num\_video_2" incr mode_counter 1 } $active_presentation Save foreach object $object_list { puts $object [set $object] -destroy } $slides -destroy $active_presentation -destroy $ppt Quit $ppt -destroy
  7. I am writing an automation script which requires me to export element groups from SimLab. Later, I will utilize them for rigid creation in Hypermesh. With Simlab Ansys setup I am not able to achieve this. Since I had trouble using component manager, I am assigning ET Type & card image from the Model tab. After assigning proper ET type, component manager does function as expected.
  8. Hi Pooja, I am not able to find the option that converts from Abaqus to Ansys. Is there anything that I am missing out somewhere? Thanks, Roshan
  9. Hi, I am facing an issue while opening Component Manger (Utility Tab for Ansys). Below is the screenshot of the error message. The FE modelling was done in SimLab 2018 and exported as Abaqus .inp file. I imported the model in Hypermesh with Abaqus user profile. Now, I have changed the user profile to Ansys so that I can proceed with Ansys. But, I am facing the issue with component manager. Is there any way to fix this ? Hypermesh version - HM 2017.2. Thanks, Roshan
  10. This was a code to get elements from set of nodes. I discovered now that the code fails for 2nd order elements because of the mid-side nodes. Hence, wanted to identify them and avoid them in the calculation.
  11. Hi, I am trying to create a simple Tcl script, where I should be able to identify the mid-side nodes from the model and put it in a list. Is there any API to achieve this? Thanks, Roshan
  12. Hi , Just discovered that in certain cases this method does not work.
  13. Thanks Tinh, This method is useful. I will try this on different types of surfaces and see if it works everywhere.
  14. I can get the coordinates on the surface boundaries. But, it will be much useful if I can get it inside surface boundaries.
×
×
  • Create New...