gangguanhunningtuqiaoliang-.txt

关于ansys的命令流

r,6
real,6
mat,9
sectype,70,beam,rect,dizuo
secdata,1.4,4
secnum,70
e,30001,30003,90001
e,40001,40003,90002
e,30000,30002,90001
e,30000,40002,90002
cm,gzdz,elem
esel,none


ngen,2,2000,1,16,1,0,-2.025,0
ngen,2,100,1801,1816,1,0,2.025,0
type,7
mat,7
r,7
real,7
sectype,60,beam,rect,gail
secdata,4,1.6


!!!!!!!!!!*****************************以上已经校核过!

secnum,60
n,90005,0,0,20
n,90006,0,125,20
e,1901,	1902, 90006
e,1902,	1903, 90006
e,1903,	1904, 90006
e,1904,	1905, 90006
e,1905,	1906, 90006
e,1906,	1907, 90006
e,1907,	1908, 90006
e,1908,	1909, 90006
e,1909,	1910, 90006
e,1910,	1911, 90006
e,1911,	1912, 90006
e,1912,	1913, 90006
e,1913,	1914, 90006
e,1914,	1915, 90006
e,1915,	1916, 90006
e,2001,	2002, 90005
e,2002,	2003, 90005
e,2003,	2004, 90005
e,2004,	2005, 90005
e,2005,	2006, 90005
e,2006,	2007, 90005
e,2007,	2008, 90005
e,2008,	2009, 90005
e,2009,	2010, 90005
e,2010,	2011, 90005
e,2011,	2012, 90005
e,2012,	2013, 90005
e,2013,	2014, 90005
e,2014,	2015, 90005
e,2015,	2016, 90005
cm,gailiang,elem
esel,none

n,90003,14.5,0,0
n,90004,-14,5,0,0
type,8
r,8
real,8
sectype,50,beam,hrec,dun
secdata,3,4,0.8,0.8,0.8,0.8
ngen,2,10000,2004,2014,10,0,0,-10
ngen,2,10000,1904,1914,10,0,0,-10

secnum,50
e,2004,12004,90003
e,2014,12014,90004
e,1904,11904,90003
e,1914,11914,90004
cm,dunzhu,elem
esel,none

type,11
mat,11
r,1
sectype,40,beam,rect,chengtai
secdata,12.7,9
r,11
real,11
secnum,40
ngen,2,20000,2004,2014,10,0,0,-11.5
ngen,2,20000,1904,1914,10,0,0,-11.5
ngen,2,30000,2004,2014,10,0,0,-13
ngen,2,30000,1904,1914,10,0,0,-13  

e,12004,22004,90003
e,11904,21904,90003
e,12014,22014,90004
e,11904,21904,90004

e,22004,32004,90003
e,21904,31904,90003
e,22014,32014,90004
e,21904,31904,90004
cm,chtai,elem
esel,none

type,9
mat,9
r,9
real,9
n,90007,12.5,0,10
n,90008,-12.5,0,10
cm,hxl,elem
esel,none


n,50000,6.15+1.85,2.7,-13
n,50001,6.15+1.85,-2.7,-13
n,50002,6.15+1.85+4.5,2.7,-13
n,50003,6.15+1.85+4.5,-2.7,-13
n,50004,6.15+1.27-1.85,2.7,-13
n,50005,6.15+1.27-1.85,-2.7,-13
nsel,s,,,50000,50005,1
nsym,x,10,50000,50005,1
allsel
ngen,2,100,50000,50015,1,0,125,-2.5
ngen,10,1000,50000,50015,1,0,0,-2.5
esel,none
type,11
mat,11
r,11
real,11
sectype,20,beam,csolid,pier
secdata,0.9
secnum,20
*do,i,0,8,1
*do,k,0,5,1
e,50000+k+i*1000,50000+k+(i+1)*1000,90003
e,50000+k+10+i*1000,50000+k+10+(i+1)*1000,90003
e,50000+k+100+i*1000,50000+k+100+(i+1)*1000,90003
e,50000+k+110+i*1000,50000+k+110+(i+1)*1000,90003
*enddo
*enddo
cm,zhuang,elem
esel,none

d=1.8
kf=0.9
k0=1+1/d
b1=0.6

L1=3.6
h1=3*(d+1)

k=b1+(1-b1)/0.6*L1/h1
B=Kf*k0*k*d


*dim,m,array,5
m(1)=8
m(2)=15
m(3)=20
m(4)=25
m(5)=4000
*dim,h,array,5
h(1)=5
h(2)=5
h(3)=5
h(4)=5
h(5)=10
*dim,c,array,4
c(1)=m(1)*h(1)
c(2)=m(2)*(h(1)+h(2))
c(3)=m(3)*(h(1)+h(2)+h(3))
c(4)=m(4)*(h(1)+h(2)+h(3)+h(4))
*dim,e,array,4
e(1)=0.5*c(1)*h(1)*B*1e6
*do,i,2,4,1
e(i)=0.5*(c(i-1)+c(i))*h(1)*B*1e6
*enddo
et,20,combin14
r,20,e(1)
r,30,e(2)
r,40,e(3)
r,50,e(4)
r,60,m(5)*3.1415926*B*B/4*1e6

ngen,2,10000,51000,51115,1,1,0,0
ngen,2,20000,51000,51115,1,0,1,0
ngen,2,30000,51000,51115,1,0,0,1
type,20
real,20
*do,i,0,5,1
e,51000+i,51000+i+10000
e,51000+i+10,51000+i+10+10000
e,51100+i,51100+i+10000
e,51100+i+10,51100+i+10+10000
e,51000+i,51000+i+20000
e,51000+i+10,51000+i+10+20000
e,51100+i,51100+i+20000
e,51100+i+10,51100+i+10+20000
*enddo
cm,spring1,elem
esel,none

ngen,2,10000,53000,53115,1,1,0,0
ngen,2,20000,53000,53115,1,0,1,0
ngen,2,30000,53000,53115,1,0,0,1

type,20
real,30
*do,i,0,5,1
e,53000+i,53000+i+10000
e,53000+i+10,53000+i+10+10000
e,53100+i,53100+i+10000
e,53100+i+10,53100+i+10+10000
e,53000+i,53000+i+20000
e,53000+i+10,53000+i+10+20000
e,53100+i,53100+i+20000
e,53100+i+10,53100+i+10+20000
*enddo
cm,spring2,elem
esel,none 


ngen,2,10000,55000,55115,1,1,0,0  
ngen,2,20000,55000,55115,1,0,1,0  
                                 
type,20                           
real,40                           
*do,i,0,5,1                       
e,55000+i,55000+i+10000           
e,55000+i+10,55000+i+10+10000     
e,55100+i,55100+i+10000           
e,55100+i+10,55100+i+10+10000     
e,55000+i,55000+i+20000           
e,55000+i+10,55000+i+10+20000     
e,55100+i,55100+i+20000           
e,55100+i+10,55100+i+10+20000     
*enddo                            
cm,spring3,elem                   
esel,none                         

ngen,2,10000,57000,57115,1,1,0,0     
ngen,2,20000,57000,57115,1,0,1,0     
                                     
type,20                              
real,50                              
*do,i,0,5,1                          
e,57000+i,57000+i+10000              
e,57000+i+10,57000+i+10+10000        
e,57100+i,57100+i+10000              
e,57100+i+10,57100+i+10+10000        
e,57000+i,57000+i+20000              
e,57000+i+10,57000+i+10+20000        
e,57100+i,57100+i+20000              
e,57100+i+10,57100+i+10+20000        
*enddo                               
cm,spring4,elem                      
esel,none 

ngen,2,10000,58000,58115,1,1,0,0                                
ngen,2,20000,58000,58115,1,0,1,0     
                                     
type,20                              
real,60                              
*do,i,0,5,1                          
e,58000+i,58000+i+10000              
e,58000+i+10,58000+i+10+10000        
e,58100+i,58100+i+10000              
e,58100+i+10,58100+i+10+10000        
e,58000+i,58000+i+20000              
e,58000+i+10,58000+i+10+20000        
e,58100+i,58100+i+20000              
e,58100+i+10,58100+i+10+20000        
*enddo                               
cm,spring5,elem                      
esel,none

ngen,2,10000,59000,59115,1,1,0,0                                 
ngen,2,10000,59000,59115,1,1,0,0
ngen,2,20000,59000,59115,1,0,1,0
ngen,2,20000,59000,59115,1,0,1,0
ngen,2,30000,59000,59115,1,0,0,-1
ngen,2,30000,59000,59115,1,0,0,-1
   
                                     
type,20                              
real,60                              
*do,i,0,5,1                          
e,59000+i,59000+i+10000              
e,59000+i+10,59000+i+10+10000        
e,59100+i,59100+i+10000              
e,59100+i+10,59100+i+10+10000        
e,59000+i,59000+i+20000              
e,59000+i+10,59000+i+10+20000        
e,59100+i,59100+i+20000              
e,59100+i+10,59100+i+10+20000
e,59000+i,59000+i+30000      
e,59000+i+10,59000+i+10+30000
e,59100+i,59100+i+30000     
e,59100+i+10,59100+i+10+30000
       
*enddo                               
cm,spring6,elem                      
allsel 


allsel
nsel,s,loc,z,-50,-0.01
nsel,r,loc,y,-10,10
cm,zdnode,node
esln,s,,all

cm,zdelem,elem
allsel
nsel,u,,,zdnode
nsym,y,100000,all
allsel
esel,u,,,zdelem
esym,,100000,all
allsel


xgarea=8*27*7*3.1415926*0.25*0.005*0.005
exg=1.95e11
*dim,fxg,array,2
*dim,Llast,array,2
*dim,Listrn,array,2
*dim,detL,array,2
xgyl=0.3*1860*1e6
xgl=xgyl*xgarea
fxg(1)=xgl
fxg(2)=xgl
Lzero=250
*do,i,1,2,1
detL(i)=Lzero*Fxg(i)/(exg*xgarea)
Llast(i)=Lzero+detL(i)
Listrn(i)=detl(i)/Llast(i)
r,i+100,xgarea,Listrn(i)
*enddo
type,10
mat,10
real,101
e,30001,130001
real,102
e,40001,140001
cm,xigan,elem
esel,none
allesl

cp,	1,	ux	,2004	,30000 
cp,	1,	uy	,2004	,30000                     
cp,	next,	uz	,2004	,30000 
cp,	next,	roty	,2004	,30000 
cp,	next,	rotz	,2004	,30000 
cp,	next,	ux	,1904	,30001 
cp,	next,	uy	,1904	,30001 
cp,	next,	uz	,1904	,30001 
cp,	next,	roty	,1904	,30001 
cp,	next,	rotz	,1904	,30001 
cp,	next,	ux	,2014	,40000 
cp,	next,	uy	,2014	,40000 
cp,	next,	uz	,2014	,40000 
cp,	next,	roty	,2014	,40000 
cp,	next,	rotz	,2014	,40000 
cp,	next,	ux	,1914	,40001 
cp,	next,	uy	,1914	,40001 
cp,	next,	uz	,1914	,40001 
cp,	next,	roty	,1914	,40001 
cp,	next,	rotz	,1914	,40001 
cp,	next,	ux	,101914	,140001
cp,	next,	uy	,101914	,140001
cp,	next,	uz	,101914	,140001
cp,	next,	roty	,101914	,140001
cp,	next,	rotz	,101914	,140001
cp,	next,	ux	,101904	,130001
cp,	next,	uy	,101904	,130001
cp,	next,	uz	,101904	,130001
cp,	next,	roty	,101904	,130001
cp,	next,	rotz	,101904	,130001
allsel
nsel,s,,,30000,130000,100000
nsel,a,,,40000,140000,100000
nummrg,node
allsel

*do,i,1,3,1
cp,next,all,1800+i,1900+i
*enddo
allsel
*do,i,5,6,1
cp,next,all,1800+i,1900+i
*enddo
allsel
*do,i,1,2,1              
cp,next,all,1800+i+11,1900+i+11
cp,next,all,i+11,2000+i+11,i+100000+11
*enddo                   
allsel 
*do,i,4,5,1                                                
cp,next,all,1800+i+11,1900+i+11          
cp,next,all,i+11,2000+i+11,i+100000+11   
*enddo                                   
allsel   
*do,i,1,3,1                                                              
cp,next,all,i,2000+i,100000+i 
*enddo                                   
allsel  
*do,i,5,6,1                                                              
cp,next,all,i,2000+i,100000+i 
*enddo                                   
allsel 
*do,i,1,3,1                                                              
cp,next,all,101800+i,101900+i 
*enddo                                   
allsel   
*do,i,5,6,1                                                              
cp,next,all,101800+i,101900+i 
*enddo                                   
allsel 
*do,i,1,2,1                                                              
cp,next,all,101800+i+11,101900+i+11 
*enddo                                   
allsel 
*do,i,4,5,1                                                              
cp,next,all,101800+i+11,101900+i+11 
*enddo                                   
allsel 

nsel,s,loc,z,-13
nsel,r,loc,y,-3,3
nsel,r,loc,x,8,20
cp,next,all,all
allsel    
nsel,s,loc,z,-13
nsel,r,loc,y,-3,3
nsel,r,loc,x,-8,-20
cp,next,all,all
allsel 
nsel,s,loc,z,-13
nsel,r,loc,y,122,128
nsel,r,loc,x,-8,-20
cp,next,all,all
allsel 
nsel,s,loc,z,-13
nsel,r,loc,y,122,128
nsel,r,loc,x,8,20
cp,next,all,all
allsel 
nsel,s,loc,z,-13
nsel,r,loc,y,-122,-128
nsel,r,loc,x,8,20
cp,next,all,all
allsel 
nsel,s,loc,z,-13
nsel,r,loc,y,-122,-128
nsel,r,loc,x,-8,-20
cp,next,all,all
allsel   

*do,i,1,17,1
cp,	next,	ux,	i*100+4	                ,i*100+4+3000
cp,	next,	ux,	i*100+4+6000	        ,i*100+4+10000
cp,	next,	uy,	i*100+4	                ,i*100+4+3000
cp,	next,	uy,	i*100+4+6000	        ,i*100+4+10000
cp,	next,	uz,	i*100+4	                , i*100+4+3000
cp,	next,	uz,	i*100+4+6000	        ,i*100+4+10000
cp,	next,	ux,	i*100+4+10	        ,i*100+4+3000+10
cp,	next,	ux,	i*100+4+6000+10	        ,i*100+4+10000+10
cp,	next,	uy,	i*100+4+10	        ,i*100+4+3000+10
cp,	next,	uy,	i*100+4+6000+10	        ,i*100+4+10000+10
cp,	next,	uz,	i*100+4+10	        ,i*100+4+3000+10
cp,	next,	uz,	i*100+4+6000+10	        ,i*100+4+10000+10
cp,	next,	ux,	i*100+4+100000	        ,i*100+4+3000+100000
cp,	next,	ux,	i*100+4+6000+100000	,i*100+4+10000+100000
cp,	next,	uy,	i*100+4+100000	        , i*100+4+3000+100000
cp,	next,	uy,	i*100+4+6000+100000	,i*100+4+10000+100000
cp,	next,	uz,	i*100+4+100000	        ,i*100+4+3000+100000
cp,	next,	uz,	i*100+4+6000+100000	,i*100+4+10000+100000
cp,	next,	ux,	i*100+4+100000+10	,i*100+4+3000+100000+10
cp,	next,	ux,	i*100+4+6000+100000	,i*100+4+10000+100000+10
cp,	next,	uy,	i*100+4+100000+10	,i*100+4+3000+100000+10
cp,	next,	uy,	i*100+4+6000+100000	,i*100+4+10000+100000+10
cp,	next,	uz,	i*100+4+100000+10	,i*100+4+3000+100000+10
cp,	next,	uz,	i*100+4+6000+100000	,i*100+4+10000+100000+10
*enddo
allsel

allsel
nsel,u,,,erase
nsel,s,loc,x,13.5
nsel,a,loc,x,9
nsel,a,loc,x,18
nsel,a,loc,x,-11.5
nsel,a,loc,x,-7
nsel,a,loc,x,-16
nsel,a,loc,y,3.7
nsel,a,loc,y,-1.7
nsel,a,loc,y,128.7
nsel,a,loc,y,123.3
nsel,a,loc,y,-128.7
nsel,a,loc,y,-123.3
nsel,a,loc,z,-40,-13
d,all,all
allsel
nsel,s,loc,z,-36,5
d,all,all
/color,pbak,off
/replot
allsel
nsel,s,loc,y,0
nsel,r,loc,z,0
nummrg,node,all
esel,none
allsel

/solu
allsel
mpdele,dens,all
mp,dens,3,2600
mp,dens,4,2600
acel,,,9.8
pstres,on
solve
save


/solu
allsel
mpdele,dens,3,11,1
mp,dens,1,7800
mp,dens,2,2600
*do,i,1,17,1
r,1000+i,dgarea,0
*enddo
r,101,xgarea,0
r,102,xgarea,0
acel,,,9.8
solve

/solu
allsel
*do,i,1,17,1
r,1000+1,dgarea,0
*enddo
r,101,xgarea,0
r,102,xgarea,0
r,101,xgarea,0
r,102,xgarea,0
qmb=(250/1.5)*32/6.8*5*1000*9.8
acel,,,9.8
mpdele,dens,3,4,1
mp,dens,1,7800
mp,dens,2,2600
mp,dens,3,4167.7
mp,dens,4,4167.7

mp,dens,5,7800
mp,dens,6,7800
mp,dens,7,2600
mp,dens,8,2600
mp,dens,9,2600
mp,dens,10,7800
mp,dens,11,2600
solve

/solu
allsel
acel,,,9.8
r,101,xgarea,Listrn(1)*1.3
r,102,xgarea,Listrn(2)*1.3
pstres,on
solve


/solu
allsel
r,	1001,	dgarea,1.6787e-03+7.64e-05
r,	1002,	dgarea,1.7538e-03+8.48e-07
r,	1003,	dgarea,1.7547e-03+1.03e-06
r,	1004,	dgarea,1.7400e-03+2.71e-06
r,	1005,	dgarea,1.7292e-03+6.17e-06
r,	1006,	dgarea,1.7303e-03+6.37e-06
r,	1007,	dgarea,1.7267e-03+6.47e-06
r,	1008,	dgarea,1.7279e-03+7.69e-06
r,	1009,	dgarea,1.7365e-03+7.91e-06
r,	1010,	dgarea,1.7277e-03+7.81e-06
r,	1011,	dgarea,1.7263e-03+6.56e-06
r,	1012,	dgarea,1.7299e-03+6.24e-06
r,	1013,	dgarea,1.7290e-03+5.53e-06
r,	1014,	dgarea,1.7412e-03+2.03e-06
r,	1015,	dgarea,1.7504e-03+3.03e-06
r,	1016,	dgarea,1.7587e-03+1.28e-05
r,	1017,	dgarea,1.6143e-03+4.90e-05
pstres,on
solve
finish

/solu
antype,buckle
bucopt,subsp,4
outpr,nsol,all
save
solve
finish
/solu
expass,on
mxpand,4,,,
outpr,all
outres
solve
finish

save
finish