设为首页收藏本站 CAD论坛 CAD教程 CAD下载明经币充值

切换到宽版

明经CAD社区»社区 › 开发篇 › AutoLISP/Visual LISP 编程技术 › 1币求一个小功能，画方

12 / 2 页

发新帖

楼主: 664571221

[提问] 1币求一个小功能，画方

发表于 2016-4-9 18:06:33 | 显示全部楼层

(defun c:rece (/ dz)
(command "RECTANG" pause pause)
(setq dz (entlast))
(command"CHANGE"dz"""P""C" "211" "lw" 60 ""))

回复

使用道具举报

发表于 2016-4-9 18:08:18 | 显示全部楼层

(defun c:ZFX (/ dz)
(command "RECTANG" pause pause)
(setq dz (entlast))
(command"CHANGE"dz"""P""C" "211" "lw" 60 ""))

回复

使用道具举报

12 / 2 页

发新帖

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

GMT+8, 2024-12-23 21:18 , Processed in 0.149137 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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