30秒建立化工生产装置的讨论!

兰州人 · 发表于 2007-7-7 17:47:00

图1

图2
图２所示是用LISP编制的压力容器和工艺管道三维模型的演示程序。
我希望与大家共同探讨用VBA建立图示压力容器及工艺管道的工作方法，数学模型。

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

兰州人 · 发表于 2007-7-7 18:30:00

问题的提出：
图示程序采用的FoxPro管理数据库，按LISP的一定格式编制程序，输出程序的文件名是lsp。
图示30秒表演程序，从市场营销角度出发比较有吸引力。但从实际操作中有一个致命伤--差集运算。请各位大侠注意，法兰在开孔时，有些孔没有开。
原因(command "revolve" "l" "" "y" 360) ；；；法兰建成后的旋转
(command "subtract" (list 268 -1.5) "" "all" "") 执行差集运算时不容易捕捉到要进行差集运算的实体---也就是用点捕捉实体，用entlast也可以。这种方法完全是模仿人们在建立三维模型的工作方法。
采用VBA后，差集这个关键问题解决起来更简单，速度比LSP快的多。本文通过对比LSP编程方法，来阐述采用VBA方法工作效率更高，效果更好。
附件是图示运行的LSP原程序,请与VBA程序进行对比。

请点击此处下载

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

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