（2019.03.28日更新）晓东工具箱（For ACAD2004-2020）提供下载

XDSoft

晓东工具箱2019正式发布测试，集成了旧版工具箱和论坛每日插件中的上百个程序。如果遇到问题请到本论坛发帖。

“每日插件”论坛里面发布的插件都可以运行在晓东工具箱平台下。


2008:


2015:



2016:



2018:





2019



2020



更新内容：

论坛每日插件更新到2019.4月之前，增加支持ACAD 2017-2020，菜单新增了多重引线、表格、统计等上百个工具。

时间关系，“每日插件”论坛里面的几百个插件很多都还没整理到工具箱中，朋友们可以去那下载代码加载到工具箱环境中，所有的插件都可以运行到晓东工具箱平台下。

晓东工具箱2019.03.28

==============================================




晓东工具箱2019.03.28下载地址(2019.03.28日更新)：

下载地址一（百度云）

请点击此处下载

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:晓东工具箱2019-03-28（提取码：58sq） 
下载次数:13912  文件大小:1 Bytes  售价:10D豆 [记录]
下载权限: 不限 以上  [免费赚D豆]

下载地址二（蓝奏云）

请点击此处下载

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:晓东工具箱2019-03-28（蓝奏云） 
下载次数:669  文件大小:1 Bytes  售价:10D豆 [记录]
下载权限: 不限 以上  [免费赚D豆]

晓东工具箱安装注意事项：

1、如果安装过2017.0212以前版本的晓东工具箱，先卸载后（或者执行安装程序两次）再进行安装。
2、如果是WIN7,WIN10系统，以管理员权限、关闭安全软件对注册表的保护、装到C盘以外的其他盘上。
3、如果你用2008，特性对话框里面有英文的那种，请下载2008纯中文版64位。

请点击此处下载

查看状态：需购买或无权限

您的用户组是：游客

文件名称:2008中文版（32/64位）带SP1（提取码：8ae8） 
下载次数:2701  文件大小:1 Bytes 
下载权限: 不限 以上  [免费赚D豆]

     或者、 你有2008纯中文32位安装盘，下载安装补丁，覆盖到2008安装目录，重新安装2008.

请点击此处下载

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:AUTOCAD2008-纯中文64位安装补丁.rar 
下载次数:473  文件大小:1.18 MB  售价:1D豆 [记录]
下载权限: 不限 以上  [免费赚D豆]

4、安装2008纯中文版后，下载SP1，更新2008.
5、2007同上。

请点击此处下载

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:ACAD 2008 SP1升级补丁（提取码：gb4u） 
下载次数:225  文件大小:1 Bytes  售价:1D豆 [记录]
下载权限: 不限 以上  [免费赚D豆]

6、安装2019的朋友，请到下面链接下载2019.1.11更新包：http://bbs.xdcad.net/thread-717855-1-1.html

重要的事情说三遍，重要的事情说三遍，重要的事情说三遍，


1、任何时候，不要安装完API后，再安装晓东工具箱，
2、正确的顺序是先安装晓东工具箱，如果XDRX API在晓东工具箱之后有更新（更新日期比工具箱新），再安装XDRX API，同一天更新的，不用再安装XDRX API。

XDRX API下载地址：http://bbs.xdcad.net/thread-668896-1-1.html

如果安装后，启动CAD，晓东工具箱菜单没出现，


执行OPTIONS命令，检查支持文件目录里面是否有工具箱目录的SYS,LISP,BIN三个子目录，没有的话，手工加入。

=================================================================================

如果启动CAD，没有工具箱菜单出现，请单独发帖，要求：

1、说明操作系统版本，位数
2、ACAD版本
3、启动CAD后，F2文本屏幕截图贴到论坛。


==============================================

问题一： 什么是晓东工具箱？....晓东工具箱是用LISP语言开发的插件集，带屏幕菜单供大家使用。是一个通用的工具集（模糊专业）。


问题二： XDRX API是什么？....XDRX API是用C++ ARX写的一些函数库，可以供LISP调用。充分发挥ARX操作底层核心的高效率和同时充分利用LISP语言的便捷，让LISP代码更高效，代码更结构化，更易读易懂，功能更强大。通常用API写的LISP代码，要比同功能的普通LISP的代码要短的多。

问题三： 晓东通用LISP函数是什么？....晓东通用LISP函数库是用LISP+XDRX API写的LISP函数库，介于API和通用LISP之间，利用XDRX API的强大核心函数和LISP/VLISP写的通用函数，供LISP开发人员使用。论坛提供单独下载，版本可能比API安装程序打包带的通用函数库版本更新。下载链接：http://bbs.xdcad.net/thread-669133-1-1.html ，下载注意不要下载版本号低于API自带的通用函数库版本。

问题四： 下载了晓东工具箱，还需要下载XDRX API吗？....看需要，因为XDRX API 要比晓东工具箱更新的更频繁，在晓东工具箱更新日期之后新出的“每日插件”论坛里面的插件，可能需要更新的API函数支持，所以如果不更新API，可能造成新的插件运行不了。如果XDRX API的版本号（更新日期）比晓东工具箱要新，就需要更新API，下载链接：http://bbs.xdcad.net/thread-668896-1-1.html

问题五： 哪有晓东工具箱的教程？....工具箱带右侧屏幕菜单，通俗易懂，如果某个插件不明白如何用，请到每日插件论坛搜索相应插件观看动画教学。或者单独在晓东工具箱、编程申请论坛发帖求助。


问题六： 安装工具箱后，启动CAD提示无效的ARX？....去下面链接，下载微软常用运行库，安装。下载链接：http://bbs.xdcad.net/thread-715219-1-1.html

newer

杨张张 发表于 2018-11-16 14:30
安装工具后没有找到工具
系统win7 专业版
cad 2018 64位

启动CAD后，F2文本屏幕截图贴到论坛

newer

shchwy 发表于 2018-11-3 08:25
我发现好像是图的问题 我新建空白图 能够使用 图形切割要用的图用不了 请大神帮我看下 还有这个图能够处理 ...

把这个代码拷贝回去加载

1. (defun c:XDTB_DWGCUT (/ dynpt e lastpnt myerr olderr pts ss ss1 tf)
   
2.   (defun _callback (dynpt)
   
3.     (xdrx_entity_move ss lastpnt dynpt)
   
4.     (setq lastpnt dynpt)
   
5.   )
   
6.   (defun _move (ss)
   
7.     (setq lastpnt (xd::geom:get9pt ss 5))
   
8.     (xdrx_pointmonitor "_callback" ss)
   
9.     (initget 1)
   
10.     (getpoint "\n插入点:")
    
11.     (xdrx_pointmonitor)
    
12.   )
    
13.   (defun myerr (msg)
    
14.     (princ "\n*cancel")
    
15.     (xdrx_end)
    
16.     (vl-cmdf ".undo" 1)
    
17.     (setq *error* olderr)
    
18.     (princ)
    
19.   )
    
20.   (xdrx_begin)
    
21.   (setq olderr *error*)
    
22.   (setq *error* myerr)
    
23.   (setq pts nil)
    
24.   (if (setq e (car (xdrx_entsel
    
25.                      "\n请拾取裁剪边界<退出>:"
    
26.                      '((0 . "lwpolyline,circle,ellipse,spline"))
    
27.                    )
    
28.               )
    
29.       )
    
30.     (progn (setq tf (XD::DOC:SafeZoom e))
    
31.            (setq pts (xdrx_getsamplept e)
    
32.                  ss  (ssget "cp" pts)
    
33.            )
    
34.            (if (setq ss1 (xdrx_geom_clipboundary ss e t t))
    
35.              (progn (if tf
    
36.                       (xdrx_document_zoomprevious)
    
37.                     )
    
38.                     (ssadd e ss1)
    
39.                     (_move ss1)
    
40.              )
    
41.            )
    
42.     )
    
43.   )
    
44.   (setq *error* olderr)
    
45.   (xdrx_end)
    
46.   (princ)
    
47. )
    
48. 
    

(defun c:XDTB_DWGCUT (/ dynpt e lastpnt myerr olderr pts ss ss1 tf)<br />   (defun _callback (dynpt)<br />     (xdrx_entity_move ss lastpnt dynpt)<br />     (setq lastpnt dynpt)<br />   )<br />   (defun _move (ss)<br />     (setq lastpnt (xd::geom:get9pt ss 5))<br />     (xdrx_pointmonitor "_callback" ss)<br />     (initget 1)<br />     (getpoint "\n插入点:")<br />     (xdrx_pointmonitor)<br />   )<br />   (defun myerr (msg)<br />     (princ "\n*cancel")<br />     (xdrx_end)<br />     (vl-cmdf ".undo" 1)<br />     (setq *error* olderr)<br />     (princ)<br />   )<br />   (xdrx_begin)<br />   (setq olderr *error*)<br />   (setq *error* myerr)<br />   (setq pts nil)<br />   (if (setq e (car (xdrx_entsel<br />                      "\n请拾取裁剪边界<退出>:"<br />                      '((0 . "lwpolyline,circle,ellipse,spline"))<br />                    )<br />               )<br />       )<br />     (progn (setq tf (XD::DOC:SafeZoom e))<br />            (setq pts (xdrx_getsamplept e)<br />                  ss  (ssget "cp" pts)<br />            )<br />            (if (setq ss1 (xdrx_geom_clipboundary ss e t t))<br />              (progn (if tf<br />                       (xdrx_document_zoomprevious)<br />                     )<br />                     (ssadd e ss1)<br />                     (_move ss1)<br />              )<br />            )<br />     )<br />   )<br />   (setq *error* olderr)<br />   (xdrx_end)<br />   (princ)<br /> )<br /> <br />

XDSoft

shchwy 发表于 2018-10-23 13:18
我这 所有层开 命令不起作用了 9月份版本都用的好好的 10月份的都不行

http://bbs.xdcad.net/thread-669133-1-1.html

去下载更新下 通用LISP函数库，把文件拷贝到工具箱SYS目录下覆盖原文件，然后重启CAD

newer

yjf247606 发表于 2016-4-7 16:34
谢谢楼主了，辛苦。

347个命令，还发现好多隐藏福利

newer

ChampionMario 发表于 2018-3-29 00:18

是的啊，正如你贴图显示的，等OPENDCL更新支持2019，就加入到API安装包里面。

XDSoft

display18 发表于 2016-4-8 12:10
使用出现错误

什么版本的CAD？ 执行哪个命令出的错？

iLisp

地址不对吧

XDSoft

iLisp 发表于 2016-4-7 13:32
地址不对吧

百度网盘，地址测试了，可以

display18

这个必须支持，画图人的福音！      

Tony1943

集合这么多:lol

yjf247606

谢谢楼主了，辛苦。

display18

newer 发表于 2016-4-7 16:38
347个命令，还发现好多隐藏福利

在哪里啊！

zuicai

NICE！试用一下，不过这些年基本不画图了，只能当做 爱好玩玩。

tooo

多谢分享，下载了！

newer

display18 发表于 2016-4-7 18:04
在哪里啊！

你点下常用命令下面的 ”设置“ 就看到了。

liuyj

屏幕菜单不能展开，而且只能设10个命令，太少了，不好用

XDSoft

liuyj 发表于 2016-4-7 22:10
屏幕菜单不能展开，而且只能设10个命令，太少了，不好用

那个只是“常用命令”而已，设多少算够呢？ 主要常用的都是下面那个“最近命令”，能减少重复的点菜单找工具。实践证明我们每天都只是常用那几个工具在重复工作。
屏幕菜单不能展开是哪个CAD版本下？ 手工看看OPTIONS里面屏幕菜单开开没？

display18

XDSoft 发表于 2016-4-8 12:16
什么版本的CAD？ 执行哪个命令出的错？

cad2007，在执行【快速选择】、【**矩形】时均出现，第一次打开命令正常，在此打开出现，然后cad无法继续，报错。