[LISP函数]：有没有直接将一个十进制的数直接转换为英制的程序？

lgw · 发表于 2003-3-21 12:22:30

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

有没有直接将一个十进制的数直接转换为英制的程序？

snsj · 发表于 2003-3-21 21:24:32

;毫米转化英尺
;uz.lsp
(defun c:uz ()
  (graphscr)
  (setq a (getreal "输入要转化的数(mm):"))
  (if a
(progn
  (setq b  (cvunit a "mm" "inch"))
  (princ a)
  (princ "mm相当于")
  (princ b)
  (princ "英尺")
  (princ)
  )
  (princ "\n请输入数据!")
  )
  (princ)
  )
试试这个～

lsjjm · 发表于 2003-3-24 11:32:37

该数是m,cm还是mm? 转换成英制的小数/分数形式?

lgw · 发表于 2003-3-24 11:36:27

我想直接点击dim上的文字，然后，自动变为英制。

lsjjm · 发表于 2003-3-26 07:42:49

见我的新帖子

账号		自动登录	找回密码
密码			立即注册

[LISP函数]：有没有直接将一个十进制的数直接转换为英制的程序？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

该数是m,cm还是mm? 转换成英制的小数/分数形式?

浏览过的版块