define dingmaogan
aa = 1
xx = -3.7
m1 = 2
m2 = 14
m3 = 15
m4 = 24
m5 = 1
loop while aa < 7
command
sel cable id aa beg xx 0.5 0.8 end xx 0.5 2.2 nseg 14内德滋
sel cable id aa beg xx 0.5 2.2 end xx 0.5 3.2 nseg 10
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 1 gr_k 1 gr_per 0.0785 range cid m1 m2;
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid m3 m4;
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid m5 m5;
直柄立铣刀sel cable id aa pretension 60e3 range cid m5 m2;
end_command
aa = aa +1
xx = xx + 0.7
m1 = m1 + 24
m2 = m2 + 24
m3 = m3 + 24
m4 = m4 + 24
m5 = m5 + 24
end_loop
end
dingmaogan
define youmaogan
aa = 7
zz = -2.7
m1 = 146
m3 = 159
m4 = 168
m5 = 145
loop while aa < 10
command
sel cable id aa beg 0.8 0.5 zz end 2.2 0.5 zz nseg 14
sel cable id aa beg 2.2 0.5 zz end 3.2 0.5 zz nseg 10
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 1 gr_k 1 gr_per 0.0785 range cid m1 m2;
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid m3 m4;
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid m5 m5;
sel cable id aa pretension 60e3 range cid m5 m2;
end_command
aa = aa +1
zz = zz + 0.9
m1 = m1 + 24
m2 = m2 + 24
m4 = m4 + 24
m5 = m5 + 24
end_loop
end
youmaogan
；安装左帮锚杆
define zuomaogan
aa = 10
zz = -2.7
m1 = 218
m2 = 230
m3 = 231
m4 = 240
m5 = 217
loop while aa < 13
command
sel cable id aa beg -4.6 0.5 zz end -6.0 0.5 zz nseg 14
sel cable id aa beg -6.0 0.5 zz end -7.0 0.5 zz nseg 10
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 1 gr_k 1 gr_per 0.0785 range cid m1 m2;
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid m3 m4;
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid m5 m5;
sel cable id aa pretension 60e3 range cid m5 m2;
end_command
aa = aa + 1
zz = zz + 0.9
m1 = m1 + 24
m2 = m2 + 24
m3 = m3 + 24
m4 = m4 + 24
m5 = m5 + 24
end_loop
end
zuomaogan
；巷道右侧斜锚杆安装由上而下
sel cable id 13 beg 0.6 0.5 0.6 end 1.6 0.5 1.6 nseg 14
sel cable id 13 beg 1.6 0.5 1.6 end 2.3 0.5 2.3 nseg 10
sel cable id 13 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 1 gr_k 1 gr_per 0.0785 range cid 290 302
sel cable id 13 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid 303 312
sel cable id 13 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid 289 289
sel cable id 13 pretension 60e3 range cid 289 302
sel cable id 14 beg 0.8 0.5 0.0 end 2.1
0.5 0.5 nseg 14
sel cable id 14 beg 2.1 0.5 0.5 end 3.0 0.5 0.8 nseg 10
sel cable id 14 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 1 gr_k 1 gr_per 0.0785 range cid 314 326
sel cable id 14 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid 327 336
sel cable id 14 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid 313 313
sel cable id 14 pretension 60e3 range cid 313 326
；巷道左侧斜锚杆安装由上而下
sel cable id 15 beg -4.4 0.5 0.6 end -5.4 0.5 1.6 nseg 14
sel cable id 15 beg -5.4 0.5 1.6 end -6.1 0.5 2.3 nseg 10
sel cable id 15 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 1 gr_k 1 gr_per 0.0785 range cid 338 350
sel cable id 15 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid 351 360
sel cable id 15 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid 337 337
sel cable id 15 pretension 60e3 range cid 337 350
防爆
鼠标sel cable id 16 beg -4.6 0.5 0.0 end -5.9 0.5 0.5 nseg 14 sel cable id 16 beg -5.9 0.5 0.5 end -6.8 0.5 0.8 nseg 10
sel cable id 16 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 1 gr_k 1 gr_per 0.0785 range cid 362 374
sel cable id 16 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid 375 384
sel cable id 16 prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid 361 361
sel cable id 16 pretension 20e3 range cid 361 374
；安装锚索
define maosuo
aa = 17
xx = -3.4
m2 = 414
m3 = 415
m4 = 426
m5 = 385
loop while aa < 20
command
sel cable id aa beg xx 0.5 0.8 end xx 0.5 6.8 nseg 30
sel cable id aa beg xx 0.5 6.8 end xx 0.5 8.0 nseg 12
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e5 gr_k 2e7 range cid m3 m4
sel cable id aa prop emod 2e10 ytension 310e3 xcarea 0.0004906 gr_coh 10e8 gr_k 2e10 range cid m5 m5
sel cable id aa pretension 60e3 range cid m5 m2
end_command
aa = aa + 1
xx = xx + 1.5
m3 = m3 + 42
m4 = m4 + 42
m5 = m5 + 42
珠光膜end_loop
end
maosuo
豫公网安备41160202000603
站长QQ:729038198
关于我们
投诉建议