欧姆'；s定律计算器

The Buzzard · 发表于 2022-7-6 10:44:33

大家好，

我终于完成了这个欧姆定律计算器，我似乎对结果很满意，但程序的大小让我感到困扰。当在更复杂的实体（如圆和文本）上使用矢量图像时，它会创建比预期大得多的列表。我试图用MSLIDE复制图像，但我无法通过这种方式控制图像大小，无法复制与矢量图像相同的结果。

无论如何，我张贴它只是为了反馈相同。

有关加载说明，请参阅以下链接：http://www.cadtutor.net/forum/showthread.php?1390-如何在此存档中使用LISP例程

修订列表：

copy


                                   *Revisions*
 Date      Change                                              Program     By
 06/12/09  Reduce program size by vector_image modification    OLCv2.lsp   AMB
 06/13/09  Add Divide by zero error function                   OLCv3.lsp   AMB
 06/13/09  Program now calculates remaining two values         OLCv3.lsp   AMB
 06/13/09  Remove Mode Tile Function                           OLCv3.lsp   AMB
 06/14/09  Add Imaginary Number calcs to square root           OLCv4.lsp   LM
 06/14/09  Program remembers last formula selection            OLCv4.lsp   AMB
 06/16/09  Remove OLC_DCO Output Function                      OLCv5.lsp   CAB
 06/16/09  Consolidate OLC_CAI & OLC_DCO functions             OLCv5.lsp   CAB
 06/16/09  Remove all redundant programming                    OLCv5.lsp   CAB
 06/16/09  Improved variable localization                      OLCv5.lsp   CAB
 06/16/09  Improved programming for input errors               OLCv5.lsp   CAB
 06/16/09  Added OLC_T2N Error Function                        OLCv5.lsp   CAB
 06/16/09  Modified OLC_RAC Reset Function                     OLCv5.lsp   CAB

版本2发布于2009年6月12日
版本3发布于2009年6月13日
版本4发布于2009年6月14日
版本5发布于2009年6月16日

我要对以下个人的帮助和建议表示感谢。非常感谢李·麦克、卡布、肖特、大卫·贝瑟尔。
通过他们对这个线程的贡献，我能够完成这个程序。我对这些优秀的人说得太多了，他们总是准备好、愿意并且能够付出时间。我希望其他人会从实际目的或作为学习模式中发现这个程序有用。

请欣赏这个节目，
秃鹰
OLCv5.zip

Lee Mac · 发表于 2022-7-6 10:48:24

哇。。。我还没有试过代码，只是看看LISP：这么多数字。。。。你肯定喜欢你的矢量图像。

如果贴出的图片有什么依据，那就把秃鹰画得很棒

李

The Buzzard · 发表于 2022-7-6 10:52:22

谢谢李，

我很喜欢这样一个事实，当涉及到矢量图像时，我不必处理幻灯片。与放入图像相比，不使用它的程序的大小几乎为零。这似乎不值得。从另一个意义上讲，MSLIDE是一种真正的痛苦。

无论如何，该程序运行良好。

CAB · 发表于 2022-7-6 10:56:10

你的DCL很漂亮！

我将以不同的方式处理lisp和向量编码，但它完成了这项工作。

The Buzzard · 发表于 2022-7-6 11:00:24

谢谢CAB，

对于不同的方法，你有什么建议？

CAB · 发表于 2022-7-6 11:02:32

对于向量，我将把圆/背景分割成一个列表，并制作每个单元格
放入单独的列表中。通过这种方式，您可以将列表馈送到每个组的vector_图像
只需更改要使用红色的组的颜色。

对于用户输入的操作，我将有一个清除按钮，该按钮将覆盖所有4个编辑框。
然后动作将对ENTER键作出反应。如果只输入了一个值，则不执行任何操作。
如果输入了两个值，将解决两个缺失值。
这只是我的方法。你的没问题。

PS您可以将两个公式变为红色以匹配结果。