【源码分享】表达式计算器 for CAD2004

wowan1314 · 发表于 2014-5-13 21:32

本帖最后由 wowan1314 于 2014-5-13 21:35 编辑

            表达式计算器---CAD2006以上版本已经自带了，不过自己做的总有些地方比自带好用点。

1、命令WWCAL ,  表达式的要求同cal命令，计算后结果直接发至剪切板（方便粘贴）
2、程序记录历史计算过程，双击某个历史就会把其内容发至剪切板。
3、扩展性：我都快不会玩lsp了，做了个大概的框架，
               各位需要的自行修改扩展程序（希望扩展后也能来此贴分享，集思广益）
               我是想如果可以，应该扩展为可以自行增加表达式可计算的函数(目前程序可识别的函数同cal命令)。
               那就最好了，这样可以把专业公式列进去。

本程序由衷感谢 xshrimp 的分享。基本是在其“图纸便签” 程序基础上修改得来的。

yshf · 发表于 2019-1-10 09:03

本帖最后由 yshf 于 2019-1-10 09:05 编辑

对于AutoCAD 2013及更高的版本，只需要将源程序：

(if (member "geomcal.arx" (arx)) nil

(arxload "geomcal.arx" nil)

)

改为：

(if (< (atof (substr (getvar "acadver") 1 4)) 19)

(setq calwjm "geomcal.arx")

(setq calwjm "geomcal.crx")

)

(if (member calwjm (arx))

nil

(arxload calwjm nil)

)

即可

wayne_myles · 发表于 2019-1-10 17:46

yshf 发表于 2019-1-10 09:03
对于AutoCAD 2013及更高的版本，只需要将源程序： (if (member "geomcal.arx" (arx)) nil (arxload ...

谢谢大大指点!!!真的成功啦

wayne_myles · 发表于 2018-12-4 06:30

求大大更新我的2014无法使用谢谢大大！

lucas_3333 · 发表于 2014-5-13 21:59

感谢葛老上传源码，请问wowan3344这个号也是你吗？

434939575 · 发表于 2014-5-13 22:22

老大；回来了。

wowan1314 · 发表于 2014-5-13 22:27

886 待哥视钱财如粪土时再来相聚，可好！

hxl2854913857 · 发表于 2014-5-13 22:30

确实挺好用的

yoyoho · 发表于 2014-5-14 08:35

感谢 wowan1314 分享程序!

yiqisese · 发表于 2014-5-15 13:02

不错的东西

机械工程师 · 发表于 2014-5-16 08:31

支持分享。常来常聚。

feng83 · 发表于 2014-5-18 22:21

谢谢楼主分享，学习下

zcenc · 发表于 2014-12-5 18:15

会出错啊,怎么回事？

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

[源码] 【源码分享】表达式计算器 for CAD2004

本帖子中包含更多资源

评分

相关帖子

评分

评分

评分

[源码] 【源码分享】 表达式计算器 for CAD2004

本帖子中包含更多资源

评分

相关帖子

评分

评分

评分

[源码] 【源码分享】表达式计算器 for CAD2004