楼主写的非常精彩 但是当用于循环时,常出现“* *link已经存在”的情况,十分不解,楼主能否解释一下,十分感谢呀。
new
ge zo b p0 -10 -1 0 p1 add 10 0 0 p2 add 0 3 0 p3 add 0 0 5 size 10 4 10
mo mo
pro bu 2.2e9 she 1.3e9 fric 30 coh 1.3e6 ten 1.5e5
ini dens 2000
fix x range x -.1 .1
fix y range y -1.1 -0.9
fix y range y 1.9 2.1
fix z range z -.1 .1
fix z range z 4.9 5.1
plot surface
def ax
hn=1
zz=3
hm=1000
loop s(0,3)
command
sel cable id zz begin -2.19726281 s 0.29532827 end -8.19726281 s 0.29532827 nseg=6
sel cable id zz pro xcarea 2.715786e-4 emod 2e10 ytension 310e3 &
gr_coh 1 gr_k 1 gr_per 0.08792 range x -6.19726281 -2.19726281
sel cable id zz pro emod 2e10 ytension 310e3 xcarea 2.715786e-4 &
gr_coh 10e5 gr_k 2e7 gr_fric 35 gr_per=0.08792 range x -8.19726281 -6.19726281
sel delete link range id hn
sel link id hm hn target zone
sel link attach xdir=rigid ydir=rigid zdir=rigid xrdir=rigid yrdir=rigid zrdir=rigid range id hm
sel cable id zz pretension 60e3 range x -6.19726281 -2.19726281
plot add sel geo id on link on scale 0.04
endcommand
hn=hn+7
zz=zz+1
hm=hm+10000
endloop
end
ax