明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1724|回复: 4

有谁知道相对坐标的输入lisp语言怎么写?

[复制链接]
发表于 2008-11-28 23:06 | 显示全部楼层 |阅读模式
有谁知道相对坐标的输入lisp语言怎么写?
发表于 2008-11-28 23:15 | 显示全部楼层

VIEWCTR 存储当前视口中视图的中心点。该值用 UCS 坐标表示。

VIEWSIZE 按图形单位存储当前视口的高度。

VSMAX 存储当前视口虚屏的右上角。该值用 UCS 坐标表示。
VSMIN 存储当前视口虚屏的左下角。该值用 UCS 坐标表示。

类似的变量可以计算出相对坐标值 再和绝对坐标进行转行即可

发表于 2008-11-30 06:53 | 显示全部楼层
看下POLAR函数。
发表于 2008-11-30 09:09 | 显示全部楼层

或者将坐标与向量相加

(defun @ (pt cec) (mapcar '+ pt cec))

;;(@ (getvar "lastpoint") '(4 5 0))

;;红色是坐标,蓝色是向量

 楼主| 发表于 2008-12-1 09:09 | 显示全部楼层
谢谢两位版主的帮忙!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-6-2 01:19 , Processed in 0.233095 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表