fini
/clear,all
/filname,ganggou
/prep7
/title,xiangliang
!建立箱梁的顶层并划分网格
k,1
k,2,4
k,3,10
k,4,16
k,5,20
k,6,24
k,7,30
k,8,36
k,8,36
k,9,40
k,10,4,-1.8
k,11,10,-1.8
k,12,16,-1.8
k,13,24,-1.8
k,14,30,-1.8
k,15,36,-1.8
save
kgen,2,1,15,1,,,-16
kgen,2,1,15,1,,,-85
kgen,2,1,15,1,,,-154
kgen,2,1,15,1,,,-170
save
k,101,,,-36
k,102,4,,-36
k,103,10,,-36
k,104,16,,-36
k,105,20,,-36
k,106,24,,-36
k,107,30,,-36
k,108,36,,-36
k,109,40,,-36
kgen,2,102,104,1,,-3,,8
kgen,2,106,108,1,,-3,,7
save
kgen,2,101,115,1,,,-12,15
kgen,2,116,130,1,,,-12,15
kgen,2,131,145,1,,,-50,15
kgen,2,146,160,1,,,-12,15
kgen,2,161,175,1,,,-12,15
save
*do,i,1,8,1
a,i,i+15,i+16,i+1
*enddo
*do,i,16,23,1
a,i,i+85,i+86,i+1
*enddo
*do,i,101,108,1
a,i,i+15,i+16,i+1
*enddo
*do,i,116,123,1
a,i,i+15,i+16,i+1
*enddo
*do,i,31,38,1
a,i,i+100,i+101,i+1
*enddo
*do,i,31,38,1
a,i,i+115,i+116,i+1
*enddo
*do,i,146,153,1
a,i,i+15,i+16,i+1
*enddo
*do,i,161,168,1
a,i,i+15,i+16,i+1
*enddo
*do,i,46,53,1
a,i,i+130,i+131,i+1
*enddo
*do,i,46,53,1
a,i,i+15,i+16,i+1
*enddo
save
lesize,all,4
aatt,1,1,1
|