英尺加英寸计算器

Wonder-Man · 发表于 2022-7-6 08:47:35

大家好

我正在寻找一个宏或lips来创建英尺-英寸计算器（特别是在英尺-英寸和其他数学运算中添加英尺-英寸）。从事建筑设计需要在许多场合进行加减英尺英寸计算

谢谢

digger · 发表于 2022-7-6 08:52:30

这是一个优秀的英尺/英寸计算器程序，但它不是免费的。
我敢打赌，李可以在午休时间做一个同样好的。

http://www.jobbercalculator.com/downloads.htm

Lee Mac · 发表于 2022-7-6 08:54:40

使用distof函数将所有内容转换为十进制，执行算术，然后使用rtos函数将其转换回英尺/英寸。

快速示例：

(defun c:add ( / _getnumber tot num )
   (defun _getnumber ( msg / str num )
       (while (not (or (eq "" (setq str (getstring t msg))) (setq num (distof str))))
           (princ "\nPlease enter a number.")
       )
       num
   )
   (if (setq tot (_getnumber "\nSpecify Amount: "))
       (while (setq num (_getnumber "\nSpecify Amount to Add <Exit>: "))
           (princ (strcat "Total: " (rtos (setq tot (+ num tot)))))
       )
   )
   (princ)
)

ReMark · 发表于 2022-7-6 08:57:58

或者买一个合适的计算器（因为你会经常做这个加法）。

ReMark · 发表于 2022-7-6 09:02:22

这里有免费赠品。。。。

http://www.calculatorsoup.com/calculators/construction/feetandinches.php

手持计算器。。。

http://www.amazon.com/Calculated-Industries-4020-Measurement-Conversion/dp/B0008F0YXK/ref=sr_1_1?ie=UTF8&qid=1318515980&sr=8-1