一个计算小问题（在线求助）

为你而醉 · 发表于 2011-7-19 11:08:55

本帖最后由为你而醉于 2011-7-19 11:17 编辑

代码如下：
(defun c:mj()
  (setvar "cmdecho" 0)
  (setq fn 50)
  (setq wn (/ 1 fn))
  (prin1)
)
问题：为啥用以上代码计算wn后，它的值会是零？
请大侠指点，在线等待您的解答，谢谢！

Andyhon · 发表于 2011-7-19 11:18:41

(setq fn 50)
(setq wn (/ 1 fn))
===>
(setq fn 50)
(setq wn (/ 1.0 fn))
---------------
(setq fn 50.0)
(setq wn (/ 1 fn))

为你而醉 · 发表于 2011-7-19 11:24:17

回复 Andyhon 的帖子

解决，非常感谢您的指点，谢谢谢谢！太感动了！

为你而醉 · 发表于 2011-7-19 11:29:00

回复为你而醉的帖子

长老，能再请教您一个问题不
就是如何用AutoLISP语言控制cad中阵列命令中的阵列角度呢？默认情况下阵列角度是0度，但我想阵列其他的角度，我该如何设置呢？谢谢！

zhynt · 发表于 2011-7-19 12:20:33

旋转坐标，将其转到你要的角度。

Andyhon · 发表于 2011-7-19 12:21:32

阵列完了再旋转
or
改用 ucs 座标系

为你而醉 · 发表于 2011-7-19 13:07:33

回复 Andyhon 的帖子

不能在命令中就设置吗
比如：(command "array" 对象 "" 行数列数行偏列偏阵列角度 "")
能这样加进去不？或者应该怎么设置呢？谢谢

Andyhon · 发表于 2011-7-19 13:31:58

...比如：(command "array" 对象 "" 行数列数行偏列偏阵列角度 "")...
这个得问 AutoDesk 改
--------------
山不转路转
得找现行框架下的可行方案

为你而醉 · 发表于 2011-7-19 13:57:57

回复 Andyhon 的帖子

因为我只需要对某些对象进行旋转，有些是不需要旋转的，如果旋转坐标的话，那就整个旋转了

Andyhon · 发表于 2011-7-19 14:06:40

未能理解您所描述的实际状况
或许您可搜寻院长有关矩阵的帖子

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

[讨论] 一个计算小问题（在线求助）

浏览过的版块