lisp+c#混合编程之--无边框超小界面计算器(阿甘计算器) 2021.2.24更新

print1985

对不起各位，因最近发现本人发的个别插件、源码被人挂网上贩卖，虽然没啥技术含量，但是也是花了时间做的。为了不被后面的二手贩子继续利用，忍心下架所有成品插件，敬请理解，确实需要本插件的朋友可以给我留言。

2021.2.24更新

2021.2.24更新

启动快捷键ag，可修改

放到CAD安装目录\Support\阿甘计算器

弄了个lisp+c#混合编程的计算器给大家玩玩
lisp负责运算，c#提供界面（和DCL对话框比较，最大的好处就是可以按回车键直接计算，不用点按钮了）
无边框非模态对话框，界面小巧，可以非常方便的放到命令栏，不碍眼，也可以关闭
计算结果自动复制到剪贴板，历史记录自动保存，可手动输入计算，也可选择文字自动计算

使用说明：
1、压缩包内文件放到：CAD安装目录\Support\阿甘计算器 （DLL文件和历史记录文件位置可在lisp里面修改，不会lisp的就不要改了，以免出错）
2、加载lsp文件（加载lsp后dll文件会自动加载）
3、启动命令：ag。其余计算快捷键见lsp文件内说明

使用技巧：
1、手动计算：在计算窗口内输入表达式，按回车键计算；
   结果以红字显示，如再输入数字结果自动清除，输入运算符号则结果保留（符合使用习惯）；
   回车键可直接清除红色结果；
   Del键清除计算框全部内容。
2、双击历史记录可重新计算。
3、自动计算：按+、-、×、÷按钮，然后选择CAD文字自动计算。

本人lisp、c#都是入门级，计算器没有过多的功能（实在写不出来），只为方便使用而已。部分代码来自论坛，感谢各位大神
有什么问题欢迎反馈，PS:测试前请做好图纸备份，以免致命错误。
2021.1.20更新说明：
1、精简为2个版本(CAD2009~2012版)(CAD2013~2021版)，理论上都支持，有问题请反馈；
2、启动快捷键ag或agg，ag可以修改，见lisp。

2021.2.24更新说明：
1、增加对CAD尺寸标注、属性字、CAD表格（只能点选，用的nentselp穿透）、图块内文字（只能点选，用的nentselp穿透）、天正文字等的支持
2、增加动态插入文字（A旋转）、增加插入算式快捷键（见lisp注释 命令DD、d2~d4）
3、DLL文件和历史记录文件位置可以在lisp里面修改（见lisp注释）
4、理论上支持CAD2007、2008(没测试)，有问题请反馈。

xk15c

挺好玩的，赞一个

kmliro_2017

谢谢分享！！！！

bai0371

2016有哪个版本啊？

xujinhua

这个厉害，有低版本的吗

ehcapa

咨询个问题，假如说数字中间同时带着字母x和*，这个判断了么，比如说12*3x5是判断为12x3x5,还是判断为123x5,还是判断为12x35

ps122

谢谢分享，厉害了

print1985

bai0371 发表于 2021-1-16 09:02
2016有哪个版本啊？

可以试试2014版。如果不行，你可以上传cad安装目录下的这几个文件（不一定全部都有，有几个传几个），我编译了你试试，我没2016测试不了。
其它版本的如果有需要，也可以发上来我试试，但是不一定保证能用。

print1985

xujinhua 发表于 2021-1-16 10:54
这个厉害，有低版本的吗

CAD2007、2008和2013可以试试这个，我没装，试不了，不知道能不能用。
2021.1.19增加一个CAD2017版
这几个版本能否使用请反馈

print1985

ehcapa 发表于 2021-1-16 11:26
咨询个问题，假如说数字中间同时带着字母x和*，这个判断了么，比如说12*3x5是判断为12x3x5,还是判断为123x5 ...

字母x会忽略，不会识别为*号
当然 如果你要用字母x代替*号，可以自行修改lsp里面的正则表达式部分
需要更多功能的都可以自行修改lsp内容

xujinhua

print1985 发表于 2021-1-16 16:25
CAD2007、2008和2013可以试试这个，我没装，试不了，不知道能不能用

谢谢你！！！

bai0371

print1985 发表于 2021-1-16 16:17
可以试试2014版。如果不行，你可以上传cad安装目录下的这几个文件（不一定全部都有，有几个传几个），我 ...

2016版的四个文件传不上去

print1985

bai0371 发表于 2021-1-20 12:13
2016版的四个文件传不上去

1楼已更新，(CAD2013~2021版)理论上支持2016

zero423

跟大神学习学习!

print1985

2021.2.24更新说明：
1、增加对CAD尺寸标注、属性字、CAD表格（只能点选，用的nentselp穿透）、图块内文字（只能点选，用的nentselp穿透）、天正文字等的支持
2、增加动态插入文字（A旋转）、增加插入算式快捷键（见lisp注释 命令DD、d2~d4）
3、DLL文件和历史记录文件位置可以在lisp里面修改（见lisp注释）
4、理论上支持CAD2007、2008(没测试)，有问题请反馈。