我想实现框选，大神帮我看看那里出了问题啊，翻译不了。

黎明加油 · 发表于 2013-12-2 14:44

entity/box(1000)

l10:
ident/'选择要改变图层的对象',box,cnt(1..a),a,resp
jump/l10:,end:,,,resp

l20:
param/'输入新图层','图层号=',n,resp
jump/l10:,end:,,,resp

if/n<=0 or n>256,jump/pr:
&layer(box(1..a))=n
jump/l10:

pr:
messg/'图层输入错误,重新输入'
jump/l20:

end:
halt

黎明加油 · 发表于 2013-12-2 14:44

自己顶顶，别沉啊。

黎明加油 · 发表于 2013-12-2 22:48

entity/box(1000)

l10:
choose/'选择对象','片体','实体','曲线',resp
jump/l10:,end:,,,l20:,l30:,l40:,resp

l20:
ident/'选择片体',box,cnt,a,resp
jump/l20:,end:,,,resp
jump/l50:

l30:
ident/'选择实体',box,cnt,a,resp
jump/l30:,end:,,,resp
jump/l50:

l40:
ident/'选择曲线',box,cnt,a,resp
jump/l40:,end:,,,resp
jump/l50:

l50:
param/'输入新图层','图层号=',n,resp
jump/l10:,end:,,,resp

l60:
if/n<=0 or n>256,jump/pr:

l70:
&layer(box(a))=n
a=a-1
if/a==0,jump/l10:
jump/l70:

pr:
messg/'图层输入错误,重新输入'
jump/l10:

end:
halt

我找到了原因，并且做了一些提升，但是新问题是，我要怎么才能只选择面，或者实体，或者曲线。大神们，求教了。

-KASA- · 发表于 2013-12-3 09:09

在IDENT 函数前面一行加 mask/71 只选面

黎明加油 · 发表于 2013-12-4 11:55

-KASA- 发表于 2013-12-3 09:09
5 x. i0 S$ O% p5 b在IDENT 函数前面一行加 mask/71 只选面

谢谢了，大哥。
还有一个问题就是，我在加工模块的时候，想要有一个命令就是：

框选平面并改变其颜色，因为这样就可以一目了然知道哪些是平面了。

我不知道要怎么给这个面（71）加什么属性控制。

-KASA- · 发表于 2013-12-5 12:50

只选平面：MASK/22

黎明加油 · 发表于 2013-12-5 17:55

-KASA- 发表于 2013-12-5 12:50
1 E* k; e3 f4 {只选平面：MASK/22

因为我在数控编程的时候，face milling 选择的面看上去是平面，但实际在生成的时候

却提示，不是平面，又得一个一个的分析哪个是斜的，哪些是平的。

所以想自己做一个小工具，

框选平面，垂直于Z轴的面(就好比附图的哪个红色面)

（我要怎么来解释呢，我不知道您接触了数控编程没有，希望大哥您能理解我的意思。）

黎明加油 · 发表于 2013-12-5 17:58

-KASA- 发表于 2013-12-5 12:50
0 z9 Y8 k7 C o" J% o. S只选平面：MASK/22

所以想加个子程序在里面，或者有直接的mask/水平面
我不知道这个子程序要怎么写了。

大哥！

entity/pl1(10000)

l10:
MASK/22
IDENT/'选择平面',pl1,cnt,num,resp
JUMP/l10:,end:,,,resp
l20:
&color(pl1(num))=103
num=num-1
if/num==0,jump/l10:
jump/l20:
end:
halt

-KASA- · 发表于 2013-12-5 20:32

没有 MASK/水平面
检测平面法向，需要用到SNORF函数
具体研究一下这个函数就明白了

黎明加油 · 发表于 2013-12-26 18:04

-KASA- 发表于 2013-12-5 20:32
# d7 I8 t. Z$ W/ L- @没有 MASK/水平面
/ X9 ] ^& ^% e检测平面法向，需要用到SNORF函数
0 r' Q+ _' \) T+ B具体研究一下这个函数就明白了

谢谢了。

		自动登录	找回密码
密码			注册

[疑难] 我想实现框选，大神帮我看看那里出了问题啊，翻译不了。