beam.lgw

一个isight调用ansys接口的例子

/BATCH  
! /COM,ANSYS RELEASE  8.0    UP20030930       14:45:03    10/08/2004              
/FILNAME,beam,0 
/AUX15  
IOPTN,IGES,NODEFEAT 
!*  
IOPTN,MERGE,YES 
IOPTN,SOLID,YES 
IOPTN,SMALL,YES 
IOPTN,GTOLER, DEFA  
IGESIN,'Beam','igs','D:\beam\'  
! VPLOT   
!*  
FINISH  
/PREP7  
!*  
ET,1,SOLID45
!*  
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,2e9
MPDATA,PRXY,1,,0.3  
CM,_Y,VOLU  
VSEL, , , ,       1 
CM,_Y1,VOLU 
CHKMSH,'VOLU'   
CMSEL,S,_Y  
!*  
VSWEEP,_Y1  
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
FINISH  
/SOL
FLST,2,1,5,ORDE,1   
FITEM,2,28  
!*  
/GO 
DA,P51X,ALL,
FLST,2,1,5,ORDE,1   
FITEM,2,16  
/GO 
!*  
SFA,P51X,1,PRES,100000  
! /STATUS,SOLU
SOLVE   
FINISH  
/POST1  
SET,LAST
AVPRIN,0,0,
NSORT,S,EQV,0,0, ,0 
*GET,SEQMAX,SORT,,MAX
/ EXIT,ALL
! SAVE, beam,db,
! LGWRITE,beam,lgw,D:\beam\,COMMENT