调整“RTOS”的输出。

Bill_Myron · 发表于 2022-7-5 20:17:26

在这里使用Lee Mac的总面积lisp。

它工作得很好，但我想知道是否可以在“rtos”显示后添加单位，如平方米或公顷？

同样，我们所有的绘图都是以米为单位的，所以我们所有的面积都是平方米。可以在区域中添加一个因子来读取Ha吗？（乘以0.0001）？

谢谢

Tharwat · 发表于 2022-7-5 20:36:01

可以使用strcat函数将任何字符串添加到字符串中。

Bill_Myron · 发表于 2022-7-5 20:47:32

繁荣这很容易。

这就是我所拥有的，它是有效的。发现你可以在记事本上加几个上标。

(prompt (strcat "\nTotal Area = " (rtos a 2) " m²"))

显示：总面积=0.20 m²

Tharwat · 发表于 2022-7-5 20:54:56

很好。

Bill_Myron · 发表于 2022-7-5 21:11:17

我也明白了另一部分。

添加另一个setq并相应地调整strcat。

(setq b (* a 0.0001))
(prompt (strcat "\nTotal Area = " (rtos a 2) " m² " "/ " (rtos b 2) " Ha"))

显示：总面积=151081.15 m²/15.11 Ha

再次感谢李的原创节目。

Lee Mac · 发表于 2022-7-5 21:20:39

不客气，我很高兴你发现它很有用！

[编程交流] 调整“RTOS”的输出。