Hallo forum!
als aufgabe muss ich verschiedene rbe3 elemente in einen rotorblatt einfuegen. Um das schneller zu machen, habe ich ein do loop erstellt die zum erst waehlt die slave nodes und dann erstellt ein master node:
! script creates boundary conditions and mpc elements
! to be implemented:
! - make this script being a macro with arrays as input
! - make mpc generation as loop
/prep7
!-------------------------------------!Boundary conditions - Fixed support-----!
nsel, ,loc,z,0
D,all, ,0, , , , , ,ux,uy,uz,rotx,roty,rotz
!-------------------------------------!RBE3 elements----------------------------!
!generate loop for rbe3 elements
!CREATE ARRAY WITH THE DIFFERENT PARAMETERS
!EPS=0.05
*DIM,DTAB,ARRAY,6,5 ! dimension 4 x 3 numeric array
*VFILL,DTAB(1,1),DATA,31,39,49,59,69,74 ! MPC_Z
*VFILL,DTAB(1,2),DATA,-0.59474+EPS,-0.51053+EPS,-0.40526+EPS,-0.3+EPS,-0.19474+EPS,-0.14211+EPS !MPC_YMIN
*VFILL,DTAB(1,3),DATA,0.63289-EPS,0.55921-EPS,0.46711-EPS,0.375-EPS,0.28289-EPS,0.23684-EPS !MPC_YMAX
*VFILL,DTAB(1,4),DATA,31-EPS,39-EPS,49-EPS,59-EPS,69-EPS,74-EPS ! MPC_ZMin
*VFILL,DTAB(1,5),DATA,31+EPS,39+EPS,49+EPS,59+EPS,69+EPS,74+EPS ! MPC_ZMax
!alternative to array is to read the file
!*DIM,DTAB,table,6,1,1,TIME,TEMP
!*TREAD,DTAB,tdata,txt,,2
!start a do loop
*do,x,1,6,1
!Slave nodes
nsel,,loc,z,DTAB(x,4),DTAB(x,5)
nsel,r,loc,y,DTAB(x,2),DTAB(x,3)
esln,s,0,all
nsle,s,all
/REPLOT
*get,NNUMMAX,node,,num,max
*dim,NODENUM,array,NNUMMAX
*vget,NODENUM(1),node,,nlist !make an array with all the nodes
!Create Master node
n,1000000+x,0,0,DTAB(x,1)
rbe3,1000000+x,all,NODENUM
*enddo
das problem ist das jedes mal macht neue rbe3 element und loescht die vorherige, dann am emde bleibt nur die rbe3 elemente von x=6. Fuer jede schritt oeffnet die volgende Fenster: Redimensioning parameter DTAB will erase all current values. Should the *dim command be excecuted? Was soll ich machen um die andere rbe3 elemente in position 1,...,5 nicht zu loeschen? danke fuer eure antworte!!
[Diese Nachricht wurde von pburitica am 14. Mrz. 2014 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP