[分享]：超级好用的“ACAD.PGP”程序

chenzl1234

以前自定义快捷键，每次都要更改PGP文件，再重新启动CAD后才能生效，觉得有点麻烦，就找朋友编了这个LISP。每次启动时直接加载即可，快捷命令如果与PGP文件有冲突，优先以此文件的设置为准，而且还可以将一个命令的几个步骤连续起来设为一个热键，免去了反复输入的烦恼，找了几个例子，大致设置如下：
A、单个命令修改：
1、(defun c:A () (command "MATCHPROP") (princ))     ～～～对象匹配，快键改为A
2、(defun c:F () (command "MOVE") (princ))                  ～～～移动，快键改为F
B、连续输入命令集成：
1、(defun c:zz () (command "zoom""extents") (princ))   ～～直接最大化屏幕，集成了先Z再E的输入
2、(defun c:SD1 () (command "MVIEW""L""ON") (princ))      ～～～布局空间视口锁定，不用每次都选择视口，再右键，再选择锁定，可支持筐选，很方便，将ON改为OFF就是视口解缩
3、(defun c:DA () (command "break"pause"f"pause"@") (princ)) ～～在指定点打断，比原来的要方便多了
4、(defun c:Z100 () (command "zoom""s""1/100xp") (princ))    ～～～布局空间中将视口比例设置为1：100，也可以设为1：50，20，10，甚至1000，随你喜好，在激活的视口内输命令。
5、(defun c:CSE () (command "UCS""E") (princ))               ～～～UCS+E设置，直接选择坐标系的方向，方便正交绘图。
有兴趣的朋友可以参见附件。要注意对于有对话框的命令，最好还是在PGP文件中改，在这里改不会显示对话框，只有命令栏，不方便。使用时加载该LISP文件即可。

madeinchina

这样也很麻烦的呀

chenzl1234

不麻烦啊～每次开机的时候自动加载就可以了～

2002zjp

空的

xgwl

1  更改PGP文件，无需再重新启动CAD！ 只要输入 reinit  选择pgp就可以了！

2  直接把语句加入到  support目录下的 acad200xdoc.lsp 下就可以了！

chenzl1234

重新上传了一下附件，第一次可能出了点问题～

fifaeric

谢谢楼主分享，思路不错值得借鉴

chenzl1234

为什么我上传附件的时候每次都是空的呢？
第二次我还解压缩了，不知大家都是怎样上传的～

lingduwx

哎
俺又没有钱钱了
下不了啊

jiangkaiyao

下载试下吧

XIAOYINGZI_CHEN

要把所有的都重新写一遍好麻烦啊

lcpower

好多谢

dabingrain

每个人都有一个习惯，我觉的还是使用默认比较好，换电脑不用设置就可以使用

amengsq

都是0kb，还都要钱，自己编辑一下帖子就好，何必要两次，而且都是空的

hfjhfj

好用吗？