快速Lisp程序问题

acadstudent · 发表于 2022-7-5 23:53:07

如何强制用户输入大于设定值的值。

例如：

当用户输入宽度、深度和高度时，高度必须大于0.25。我该如何强迫这一切发生？如果用户没有输入大于的值。25我只想将值设置为1？

MSasu · 发表于 2022-7-6 00:27:17

答案是WHILE函数-重复GETREAL交互操作，直到满足条件。
一个提示是，只需构建和测试小块代码，以便于设计它们，并确保其按预期工作，并且只有在将它们构建到主功能中之后。
另一方面，请尝试为线程使用一个更相关的名称，这个名称将用几句话概括您的问题。它将帮助您获得以前类似线程的建议（见下文），但也将有利于其他具有相同问题的线程。

Tharwat · 发表于 2022-7-6 01:13:22

一

copy


(while (not (> (setq v (getdist "\n Specify value greater than 0.25 :")) 0.25))
 (princ "\n Wrong inout . Try again <!>"))

[编程交流] 快速Lisp程序问题

发表回复

精选推荐