[請益] ansys 外力位置改變迴圈

作者: tgozero (tgozero)   2014-05-05 21:45:05
第一次發文問問題
我在ansys workbench 內想寫個command
希望外力能夠在do 迴圈下 然後每一次得到一個不同的轉角變位
程式碼如下
但是我希望每一次do迴圈都只有一組新的力量
所以上一次的外力在算完結果之後要清掉
想請問大家該怎麼做會比較好
*DIM,knopen,ARRAY,16,1
*set,knopen(1),node (0.073,1.499,0.075)
*set,knopen(2),node (0.565,1.499,0.075)
*set,knopen(3),node (1.057,1.499,0.075)
*set,knopen(4),node (1.549,1.499,0.075)
*set,knopen(5),node (0.073,1.007,0.075)
*set,knopen(6),node (0.565,1.007,0.075)
*set,knopen(7),node (1.057,1.007,0.075)
*set,knopen(8),node (1.549,1.007,0.075)
*set,knopen(9),node (0.073,0.515,0.075)
*set,knopen(10),node (0.565,0.515,0.075)
*set,knopen(11),node (1.057,0.515,0.075)
*set,knopen(12),node (1.549,0.515,0.075)
*set,knopen(13),node (0.073,0.023,0.075)
*set,knopen(14),node (0.565,0.023,0.075)
*set,knopen(15),node (1.057,0.023,0.075)
*set,knopen(16),node (1.549,0.023,0.075)
*DO,ii,3,3
/SOL
f,knopen(ii),MX,1
f,knopen(ii+1),MX,1
f,knopen(ii+4),MX,-1
f,knopen(ii+5),MX,-1
f,knopen(ii),MY,1
f,knopen(ii+1),MY,-1
f,knopen(ii+4),MY,1
f,knopen(ii+5),MY,-1
SOLVE
SAVE
/POST1
*DIM,disprx%ii%,ARRAY,4,1
*DIM,dispry%ii%,ARRAY,4,1
*GET,disprx%ii%(1),node,knopen(ii),rot,x
*GET,disprx%ii%(2),node,knopen(ii+1),rot,x
*GET,disprx%ii%(3),node,knopen(ii+4),rot,x
*GET,disprx%ii%(4),node,knopen(ii+5),rot,x
*GET,dispry%ii%(1),node,knopen(ii),rot,y
*GET,dispry%ii%(2),node,knopen(ii+1),rot,y
*GET,dispry%ii%(3),node,knopen(ii+4),rot,y
*GET,dispry%ii%(4),node,knopen(ii+5),rot,y
*cfopen,disprx%ii%rotx,txt
*vwrite,disprx%ii%(1)
(E26.16)
*cfclose
*cfopen,dispry%ii%roty,txt
*vwrite,dispry%ii%(1)
(E26.16)
*cfclose
*enddo
作者: fgj (們的)   2014-05-14 05:55:00
讀模型檔可行否?

Links booklink

Contact Us: admin [ a t ] ucptt.com