hm...aber kann ich das damit auch für jeden Substep? Ich dachte dafür müsste ich einen Post26 Befehl verwenden. Ich hätte gerne eine Ergebnisdatei, wo dann als erstes die aufgebrachte Last steht und darunter dann in Tabellenform Normalkraft, Moment, Querkraft usw. für diesen Substep und dann für den nächsten Substep das selbe da drunter. Ich hab das ganze mit zwei Schleifen probiert, aber irgendwie kommt da dann nichts Sinnvolles bei raus.
/Post26
NUMVAR,15
*DIM,TIME,ARRAY,SBSTNUM+1,1,0, , ,
*DIM,U1,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,U2,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,U3,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,UR1,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,UR2,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,UR3,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,WAR,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,SF1,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,SF2,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,SF3,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,SM1,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,SM2,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,SM3,ARRAY,SBSTNUM+1,101,0, , ,
*DIM,BIMOM,ARRAY,SBSTNUM+1,101,0, , ,
set,last
*get,aaa,active,0,set,sbst
set,first
*DO,j,1,aaa
set,1,j
*If,Einzellast,EQ,1,Then
*DO,i,1,AL
NSOL,2,2*i,U,X,
NSOL,3,2*i,U,Y,
NSOL,4,2*i,U,Z
NSOL,5,2*i,ROT,X,
NSOL,6,2*i,ROT,y,
NSOL,7,2*i,ROT,z,
NSOL,8,2*i,WARP
!
ESOL,9,i, ,SMISC,1,N
ESOL,10,i, ,SMISC,2,My
ESOL,11,i, ,SMISC,3,Mz
ESOL,12,i, ,SMISC,4,Mx
ESOL,13,i, ,SMISC,5,Vz
ESOL,14,i, ,SMISC,6,Vy
ESOL,15,i, ,SMISC,27,Mw
VGET,TIME,1,0,Belastung
VGET,U1(1),2,0,
VGET,U2(1),3,0,
VGET,U3(1),4,0,
!
VGET,UR1(1),5,0,
VGET,UR2(1),6,0,
VGET,UR3(1),7,0,
VGET,WAR(1),8,0,
!
VGET,SF1(1),9,0,
VGET,SF2(1),14,0,
VGET,SF3(1),13,0,
VGET,SM1(1),12,0,
VGET,SM2(1),10,0,
VGET,SM3(1),11,0,
VGET,BIMOM(1),15,0,
!
!Ausgabe in eine Ergebnisdatei als Makro
*CFOPEN,,'erg',' ',append
*VWRITE
('Last Fx Fy Fz My Mz Mx Mw u1 u2 u3 ur1 ur2 ur3 warp')
*GET,Belastung,ACTIVE,0,SET,TIME,
*VWRITE,Belastung
%F
*VWRITE,SF1(1),SF2(1),SF3(1),SM1(1),SM2(1),SM3(1),BIMOM(1),U1(1),U3(1),U2(1),UR1(1),UR3(1),UR2(1),WAR(1),
(F10.4,' ',F10.4,' ',F10.4,' ',F10.1,' ',F10.1,' ',F10.1,' ',F10.1,' ',F10.4,' ',F10.4,' ',F10.4,' ',F10.4,' ',F10.4,' ',F10.4,' ',F0.9)
*CFCLOS
*Enddo
*Enddo
Ich hoffe es hat noch jemand eine Idee!
[Diese Nachricht wurde von User2306 am 05. Mrz. 2012 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP