如何取得打印范围？谢谢【已解决】

cam0668 · 发表于 2019-12-8 16:24:56

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

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

×

本帖最后由 cam0668 于 2019-12-10 22:22 编辑

(defun c:ppll()
(setq p1 (getpoint "\n 请选择打印范围的第一点:"))
(setq p2 (getcorner p1 "\n 请选择打印范围的第二点:"))
(setq l1 (abs (- (car p2) (car p1))))
(setq l2 (abs (- (cadr p2) (cadr p1))))
(command "-plot" "y" "" "在 SERVER 上自动 AGFA-AccuSet v52.3" "" "A4" "m" "l" "n" "w" p1 p2 "f" "5,5" "y" "monochrome.ctb" "n" "w" "n" "y" "y")
)

参考了论坛的程序但不成功
这个打印范围坐标怎么取得？谢谢

yangjian001 · 发表于 2019-12-9 07:55:08

做一个热心并受欢迎的人

yuren008 · 发表于 2019-12-9 10:00:48

做个对论坛有益的人。

chrive · 发表于 2019-12-9 23:17:11

CAD 可以设置吧不需要插件就可以完成

cam0668 · 发表于 2019-12-10 10:08:15

已经解决了，居中打印原来是设置问题
(defun c:PLO()
(setq dyj "在 SERVER 上自动 AGFA-AccuSet v52.3")
(setq pt5 (getpoint "\n指定第一个角点:") pt6 (getcorner pt5 "\n指定对角点:"))
(command "-plot" "Y" "模型" dyj "A4" "m" "L" "N" "W" pt5 pt6 "Fit" "居中打印" "Y" "monochrome.ctb" "N" "W" "N" "" "" ) ;横向打印
)

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

[已解决] 如何取得打印范围？谢谢【已解决】

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