[建议]：有关快捷捕捉中的“两点中点”

dhcad

我在使用CTRL+右键（捕捉快捷）时发现理正多了一个“两点中点”（我相信是理正自有的，在纯CAD2002/2004中没有看到，在2006中有“两点之间的中点”也可用），但在使用时提示是：未知命令。我在2006上用了一下这个快捷捕捉，很实用。建议QUN，既然菜单上有了，就让这个实用的东西发挥作用。要是已经有了一个小插件更好。

Qun

这是ACAD本身的命令，有些低版本不支持。

dhcad

言外之意只有2006以上才能用了。郁闷。

Durain

下面的这段段代码是在论坛的其它板块找到的，可以达到楼主的要求，不过我试用的结果是时灵时不灵（不知道原因，不过我现在用R2005了，所以也不管了）
Qun老师看看可否修改之后加入理正中，可用于R2005以下的版本
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
;;========== 实用程序范例 (虚拟中点) ==========
;;
;;----- 程序简介 -----
;;
;;本程序主要作为通透指令使用,以选取两点间的中点
;;
;;----- 程序代码 -----
;;
(DEFUN C:TwoPointMid ()
  (SETQ        PT_TMP1        (GETPOINT
                  "\nSelect first
                        point : "
                )
        PT_TMP2        (GETPOINT PT_TMP1 "\nSelect second point : ")
        ANGE_1        (ANGLE PT_TMP1 PT_TMP2)
        DIST        (/ (DISTANCE PT_TMP1 PT_TMP2) 2)
  )
  (SETQ PT_MID (POLAR PT_TMP1 ANGE_1 DIST))
)                                        ;关闭DEFUN

;; ----- 程序说明 -----
;;
;;第1行 : 用GETPOINT函数取得第一选取点,存入变量PT_TMP1
;;第2行 : 用GETPOINT函数取得第二选取点,存入变量PT_TMP2
;;第3行 : 用ANGLE函数取得第一选取点(变量PT_TMP1)至第二选取点(变数PT_TMP2)的角度
;;第4行 :
;;用DISTANCE取得第一选取点(变量PT_TMP1)至第二选取点(变数PT_TMP2)的距离的一半,存入变数DIST
;;第5行 : 用POLAR取得新坐标点,存入变量PT_MID
;;从第一选取点(变数PT_TMP1)起,方向为变数ANGE_1,距离为变数DIST(两选取点距离的一半)

xmchy

理正试用版for 2002   2004也有这个右键菜单，但是不能使用，这个功能还是有点用的

dhcad

最初由 Durain 发布
[B]下面的这段段代码是在论坛的其它板块找到的，可以达到楼主的要求，不过我试用的结果是时灵时不灵（不知道原因，不过我现在用R2005了，所以也不管了）
Qun老师看看可否修改之后加入理正中，可用于R2005以下的版本
?.. [/B]

谢谢了，试了一下，能用。但要用透明命令使用，不爽。我把文件改成右键快捷的“_m2p”调用名也不行，不知何故。请教高手！

Durain

我说说我的看法（不知行不行）
我想你应该改动的还有一个地方：
那就是是菜单文件 在*.mnu （比如 Acad.mnu） 中
把“_m2p”改成 “'_m2p” ，多了一撇，这是透明命令所必须的！
楼主也提醒了我，我之前是把它放在命令按钮中，放在右键菜单中比较好。

dhcad

最初由 Durain 发布
[B]我说说我的看法（不知行不行）
我想你应该改动的还有一个地方：
那就是是菜单文件 在*.mnu （比如 Acad.mnu） 中
把“_m2p”改成 “'_m2p” ，多了一撇，这是透明命令所必须的！
楼主也提醒了我，我之前是把它放... [/B]

不行。理正菜单中有的，看样子是QUN做的，将2002，2004和2005，2006统一一个菜单了（QAR.MNU）。
QUN请你把上面那个中点程序加进你的QAR.MNU，方便一下大家。谢谢了！