[编程交流] 减

sanjeeve · 发表于 2022-7-5 21:05:04

大家好，任何人都可以帮我写一个lisp，我必须在绘图中选择数字，减去我用键盘输入的数字，然后它必须在屏幕上显示值。

paulmcz · 发表于 2022-7-5 21:47:27

你在哪里卡住了？到目前为止你有什么？你具体需要什么帮助？这应该很容易。

BIGAL · 发表于 2022-7-5 22:30:57

试试这个


(setq en1 (entget (car (entsel "\nSelect first text number:" ))))
(setq val1 (atof (cdr (assoc 1 en1))))
(setq val2 (getreal "\nEnter value"))
(alert (strcat "Answer is " (rtos (- val1 val2) 2 3)))

[编程交流] 减

发表回复

精选推荐