Snownut 发表于 2022-7-6 11:03:38

我很感激你的评论，让我在这里解释一下，当用户启动设计例程时，所有层、线型和其他默认值都已设置。为了使任何实用程序都能正常工作，需要这样做。我有30多个不同的函数，其中这个函数最小。有几个打印出来的超过5页长。所有较小的文件（我称之为子文件）都加载到一个大的lisp文件中，然后根据需要单独调用，这个大的lisp文件（我称之为母亲文件）包含16个不同的子文件。它们最终都将在每个设计系统的设计过程中运行。所有这些孩子都被我开发的下拉菜单系统调用。整个系统的目的是帮助设计化粪池系统。我目前有lisp来设计8种不同的系统类型，每种类型都可能有两种不同的配置。
 
目前，我的代码中没有太多错误捕捉（无），我一直专注于开发代码以完成每个特定任务，需要考虑很多变量，以确保输出满足州规定，并且足够灵活，以满足所有遇到的条件。我感谢您在这里的投入，并感谢您可能提出的任何建议。正如我所说，我不是一个程序员，通过任何其他方式，然后我拼凑起来开发这段代码。然而，我已经设计了近1000个化粪池系统，对如何做到这一点以及以最有效的方式做到这一点应该遵循的顺序有着相当复杂的知识。我知道我的代码编写效率不是很高，可能相当复杂，但我已经设法使其工作。自从1990年我开始这项工作以来，我花了无数个小时。
 
 
干杯

The Buzzard 发表于 2022-7-6 11:09:07

 
 
哇！1990年以来？
 
我只是想知道你应该有什么样的输出。
这是我输入图层和字体样式，然后运行程序后得到的结果：
[附件]24794
 
在我看来，这里出了点问题，所以除非我们知道自己的方向，否则很难提供帮助。
根据你告诉我的，我应该期待不同的结果。请理解我为什么问这些问题。
页: 1 [2]
查看完整版本: 我想把这个Lisp程序