英制到公制计算器

theluck19 · 发表于 2010-5-24 01:07:10

有人有计算毫米到英寸的程序吗？反之亦然

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

theluck19 · 发表于 2010-5-24 06:30:44

您是在寻找一个从命令行工作的例程，还是只是在寻找一个比快速计算更有效的独立计算器？我可以想到一些不同的实现，但这只取决于您的使用情况。

ronjonp · 发表于 2010-5-24 08:25:30

正如您所说，独立将更加有效。您知道我在哪里可以得到一个。命令行的另一个问题是，它将输出显示为12.25，而不是12'-3“。

theluck19 · 发表于 2010-5-24 18:45:39

我不知道有什么现成的东西，但我可以很快地把一些东西拼在一起。今晚下班回家后我会看看它。

theluck19 · 发表于 2010-5-24 18:59:30

你想要这样的东西吗

copy

(defun c:xx (/ n)
  (and (setq n (getdist "\Enter distance: "))
       (princ (strcat "\nMM " (rtos (* n 25.4) 2 1) " Inches " (rtos (/ n 25.4) 3 1)))
  )
  (princ)
)

Atwist · 发表于 2010-5-25 00:59:47

谢谢Dan&Ron...我想的更像...
c： ddd
请输入您需要转换为英尺和英寸的距离（mm）：
命令行输入：300（mm）
输出：1'-0"警报为对话框或命令行，（精度1/4"）-正面舍入。
我写了一些类似于Ron的东西，使用initget而不是getdist，但我无法控制精度和正面舍入。
你认为下一步是什么，因为你可以清楚地看到我在口齿不清方面是个蹒跚学步的孩子...