UID418845主题帖子精华0积分1350阅读权限40通道币60 个威望0 明经币16 个金钱0 个贡献19 激情1182 注册时间最后登录在线时间102 小时分享
高级会员, 积分 1350, 距离下一级还需 650 积分
帖子精华0通道币60 个明经币16 个
测试了下，还是可以的。。。
UID282351主题帖子精华2积分22552阅读权限80通道币0 个威望1 明经币820 个金钱7791 个贡献930 激情8362 注册时间最后登录在线时间1199 小时分享
帖子精华2通道币0 个明经币820 个
支持！！！！！
('((x)(vl-list-&string x))('((x)(mapcar'+ '(199 201 180 178) x))(apply''((x)(mapcar'1+ x))'((6 8 10 12)))))
UID418294主题帖子精华0积分4070阅读权限50通道币8 个威望0 明经币9 个金钱45 个贡献308 激情3307 注册时间最后登录在线时间235 小时分享
金牌会员, 积分 4070, 距离下一级还需 930 积分
帖子精华0通道币8 个明经币9 个
好东西，顶一下！！
UID202795主题帖子精华0积分23195阅读权限80通道币0 个威望0 明经币585 个金钱7333 个贡献623 激情10861 注册时间最后登录在线时间913 小时分享
帖子精华0通道币0 个明经币585 个
上边一段源码对SPLINE无效
UID398533主题帖子精华0积分6996阅读权限60通道币0 个威望0 明经币11 个金钱548 个贡献158 激情5751 注册时间最后登录在线时间423 小时分享
钻石会员, 积分 6996, 距离下一级还需 8004 积分
帖子精华0通道币0 个明经币11 个
7楼的是钮广春整理
UID7299961主题帖子精华0积分169阅读权限20通道币0 个威望0 明经币0 个金钱20 个贡献0 激情131 注册时间最后登录在线时间10 小时分享
注册会员, 积分 169, 距离下一级还需 331 积分
帖子精华0通道币0 个明经币0 个
没啥用，白白浪费了我的明币呀
UID403268主题帖子精华0积分7318阅读权限60通道币0 个威望0 明经币64 个金钱103 个贡献202 激情6252 注册时间最后登录在线时间398 小时分享
钻石会员, 积分 7318, 距离下一级还需 7682 积分
帖子精华0通道币0 个明经币64 个
缺点:点太密!后期处理不方便.期待修改.
UID405838主题帖子精华0积分14818阅读权限60通道币0 个威望0 明经币1 个金钱5 个贡献1278 激情12265 注册时间最后登录在线时间2173 小时分享
钻石会员, 积分 14818, 距离下一级还需 182 积分
帖子精华0通道币0 个明经币1 个
选择对象: 指定对角点: 找到 4 个
开始循环SPLINE
开始分类……
分类完成ss1对象数=1ss2对象数=0LINE
开始分类……
分类完成ss1对象数=1ss2对象数=1LWPOLYLINE
开始分类……
分类完成ss1对象数=1ss2对象数=2ARC
开始分类……
分类完成ss1对象数=1ss2对象数=3_pedit 选择多段线或 [多条(M)]: m
选择对象:& &找到 4 个
[闭合(C)/打开(O)/合并(J)/宽度(W)/拟合(F)/样条曲线(S)/非曲线化(D)/线型生成(L)/放
弃(U)]: 99
无效的选项关键字。
; 错误: 函数被取消
UID354608主题帖子精华0积分900阅读权限30通道币0 个威望0 明经币0 个金钱95 个贡献100 激情650 注册时间最后登录在线时间50 小时分享
中级会员, 积分 900, 距离下一级还需 100 积分
帖子精华0通道币0 个明经币0 个
顶一下，很好
UID402137主题帖子精华0积分922阅读权限30通道币0 个威望0 明经币0 个金钱20 个贡献17 激情861 注册时间最后登录在线时间109 小时分享
中级会员, 积分 922, 距离下一级还需 78 积分
帖子精华0通道币0 个明经币0 个
(defun c:ccc ()
&&(setq pp3 (getpoint &\n输入AA区的左上角点：&))
&&(setq pp4 (getcorner pp3&\n输入AA区的右下角点：&))
&&(setq tx (getint &输入tx:&))
&&(setq rx (getint &输入rx:&))
&&(setq aa (getint &输入正面ITO的出线位置&&1.左边；2.右边&))
&&(if (= aa 1)
& && &(setq bb 0.4)
& && &(setq bb 0)
&&(setq ll (- (car pp4) (car pp3)))
&&(setq ww (- (cadr pp3) (cadr pp4)))
&&(setq px (/ ll tx))
&&(setq py (/ ww rx))
& &&&(setq a1 (list (+ (car pp3) 0.2) (cadr pp3)))
& &&&(setq a2 (list (+ (car pp3) 0.2) (cadr pp4)))
& &&&(setq a3 (list (+ (car pp3) (- px 0.2)) (cadr pp4)))
& &&&(setq a4 (list (+ (car pp3) (- px 0.2)) (cadr pp3)))
& &&&(setq a5 (list (+ (car pp3) (+ (/ px 2) 2)) (cadr pp4)))
& &&&(setq a6 (list (+ (car pp3) (+ (/ px 2) 2)) (- (cadr pp4) 0.4)))
& &&&(setq a7 (list (+ (car pp3) (- (/ px 2) 2)) (- (cadr pp4) 0.4)))
& &&&(setq a8 (list (+ (car pp3) (- (/ px 2) 2)) (cadr pp4)))
& &&&(setq oldmode (getvar &osmode&))
& &&&(setvar &OsMode& 0)
& &&&(command &pline& &0,0& &w& 0.0 0.0 &&)
& &&&(command &-layer& &m& &bmk& &&)
& &&&(command &-layer& &lw& &0& &bmk& &&)
& &&&(command &pline& a1 a2 a8 a7 a6 a5 a3 a4 &c&)
& &&&(setq cc1 (entlast))
& &&&(command &array& cc1 && &r& 1 tx px)
& &&&(setvar &osmode& oldmode)
& &&&(setq recl1 (/ (- px 0.9) 4))
& &&&(setq recl2 (/ (- px 1.5) 3))
& &&&(setq recw1 (/ (- py 2.1) 3))
& &&&(setq recw2 (/ (+ py 1.5) 3))
& &&&(setq recw3 (/ (- py 1.5) 3))
& &&&(setq b1 (list (car pp3) (- (cadr pp3) 0.15)))
& &&&(setq b2 (polar b1 (* pi 1.5) recw1))
& &&&(setq b4 (polar b1 0 recl1))
& &&&(setq b3 (polar b4 (* pi 1.5) recw1))
& &&&(setq b5 (polar b1 0 (+ recl1 0.3)))
& &&&(setq b6 (polar b5 0 (+ recl1 0.3)))
&&;changgezi
& &&&(setq b7 (polar b6 0 (+ recl1 0.3)))
& &&&(setq b8 (polar b7 (* pi 1.5) recw1))
& &&&(setq b10 (polar b7 0 (* recl1 2)))
& &&&(setq b9 (polar b10 (* pi 1.5) recw1))
& &&&(setq b11 (polar b10 0 0.3))
&&;dierhang
& &&&(setq c1 (list (- (car b2) bb) (- (cadr b2) 0.3)))
& &&&(setq c2 (polar c1 (* pi 1.5) recw2))
& &&&(setq c4 (polar c1 0 (+ ll 0.4)))
& &&&(setq c3 (polar c4 (* pi 1.5) recw2))
&&;zhongjian
& &&&(setq d1 (list (+ (car b1) 0.3) (- (cadr c1) 0.5)))
& &&&(setq d2 (polar d1 (* pi 1.5) recw3))
& &&&(setq d4 (polar d1 0 (* recl1 2)))
& &&&(setq d3 (polar d4 (* pi 1.5) recw3))
& &&&(setq d5 (polar d4 0 0.3))
& &&&(setq d6 (polar d5 (* pi 1.5) recw3))
& &&&(setq d8 (polar d5 0 (- px 0.3)))
& &&&(setq d7 (polar d8 (* pi 1.5) recw3))
&&;zuizhongjian
& &&&(setq e1 (list (+ (car d1) 0.3) (- (cadr d1) 0.3)))
& &&&(setq e2 (polar e1 (* pi 1.5) (- recw3 0.6)))
& &&&(setq e4 (polar e1 0 (- (* recl1 2) 0.6)))
& &&&(setq e3 (polar e4 (* pi 1.5) (- recw3 0.6)))
& &&&(setq e5 (polar e4 0 0.9))
& &&&(setq e6 (polar e5 (* pi 1.5) (- recw3 0.6)))
& &&&(setq e8 (polar e5 0 recl2))
& &&&(setq e7 (polar e8 (* pi 1.5) (- recw3 0.6)))
& &&&(setq e9 (polar e5 0 (+ recl2 0.3)))
& &&&(setq e10 (polar e9 0 (+ recl2 0.3)))
& &&&(setq f1 (list (car b2) (- (cadr c2) 0.3)))
& &&&(setq f2 (- ll (+ (* recl1 2) 0.3)))
& &&&(setq f3 (- 0 py))
& &&&(setq f4 (- ll (* recl1 2) 0.6))
& &&&(setq f5 (- tx 1))
& &&&(setvar &OsMode& 0)
& &&&(command &-layer& &m& &umk& &&)
& &&&(command &-layer& &lw& &0& &umk& &&)
& &&&(command &pline& b1 b2 b3 b4 &c&)
& &&&(setq cc2 (entlast))
& &&&(command &copy& cc2 && b1 b5)
& &&&(setq cc3 (entlast))
& &&&(command &copy& cc2 && b1 f1)
& &&&(setq cc4 (entlast))
& &&&(command &copy& cc3 && b1 f1)
& &&&(setq cc5 (entlast))
& &&&(command &array& cc2 cc3 cc4 cc5 && &r& rx 2 f3 f2)
& &&&(command &pline& c1 c2 c3 c4 &c&)
& &&&(setq cc6 (entlast))
& &&&(command &array& cc6 && &r& rx 1 f3)
& &&&(command &pline& d1 d2 d3 d4 &c&)
& &&&(setq cc7 (entlast))
& &&&(command &pline& e1 e2 e3 e4 &c&)
& &&&(setq cc8 (entlast))
& &&&(command &array& cc7 cc8 && &r& rx 2 f3 f4)
& &&&(command &copy& cc2 && b1 b6)
& &&&(setq cc9 (entlast))
& &&&(command &copy& cc2 && b1 b11)
& &&&(setq cc10 (entlast))
& &&&(command &pline& b7 b8 b9 b10 &c&)
& &&&(setq cc11 (entlast))
& &&&(command &pline& d5 d6 d7 d8 &c&)
& &&&(setq cc12 (entlast))
& &&&(command &pline& e5 e6 e7 e8 &c&)
& &&&(setq cc13 (entlast))
& &&&(command &copy& cc13 && e5 e9)
& &&&(setq cc14 (entlast))
& &&&(command &copy& cc13 && e5 e10)
& &&&(setq cc15 (entlast))
& &&&(command &copy& cc9 && b1 f1)
& &&&(setq cc16 (entlast))
& &&&(command &copy& cc10 && b1 f1)
& &&&(setq cc17 (entlast))
& &&&(command &copy& cc11 && b1 f1)
& &&&(setq cc18 (entlast))
& &&&(command &array& cc9 cc10 cc11 cc12 cc13 cc14 cc15 cc16 cc17 cc18 && &r& rx f5 f3 px)
& &&&(setvar &osmode& oldmode)
& &&&(command &-layer& &m& &0& &&)
&&(princ&完成&)
求高手帮忙修改程序
& 明经通道 版权所有 本站代码，在未取得本站及作者授权的情况下，不得用于商业用途
Powered byCAD样条曲线快速变成直线或多._百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
CAD样条曲线快速变成直线或多.
上传于||文档简介
&&大​家​知​道​,​直​线​和​多​段​线​是​绘​制​C​A​D​图​形​的​基​础​,​但​不​是​所​有​的​图​形​都​是​由​直​线​和​多​断​线​组​成​。​例​如​,​有​些​连​接​需​要​曲​线​绘​制​,​有​些​技​术​要​求​需​要​曲​率​等​。​为​了​符​合​使​用​习​惯​,​我​们​常​常​会​将​不​同​曲​线​转​为​直​线​或​多​段​线​。​下​面​,​我​们​就​讲​解​一​下​如​何​利​用​浩​辰​C​A​D​的​相​关​功​能​将​样​条​曲​线​转​为​直​线​、​多​段​线​。
阅读已结束，如果下载本文需要使用
想免费下载本文？
你可能喜欢CAD里怎么把样条曲线图形转成圆弧的说明 - CAD之家
您的位置：>>>
CAD里怎么把样条曲线图形转成圆弧的说明
样条曲线转化为多线段就可以了
1、如何把样条曲线转换成多段线？
命令行键入命令：flatten，按提示选择你要转换的样条曲线即可。
注意：flatten命令是Express扩展工具包中的命令，使用前先确认你已经安装了这个扩展工具。
2、把样条曲线转换成多段线另类方法
方法1：将要转换的样条曲线复制在一新图中，用&另存为&命令将图纸保存为&AutoCAD R12/L12 DXF (*.dxf)&格式，再&打开&命令选择打开刚才保存的&DXF (*.dxf)&格式文件即可。
方法2：用WMFOUT命令选择要要转换的样条后，将所选对象保存为&图元文件 (*.wmf)&格式文件，再用WMFIN命令打开刚才保存的&图元文件 (*.wmf)&文件，按提示输入相应参数后炸开图形，就得到了所要转换的多段线了。CAD专业教程
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
CAD2004版里,能不能让文字绕弧形或任意曲线排列
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口查看: 6789|回复: 14
在线时间72 小时性别保密最后登录注册时间主题帖子精华0积分400阅读权限30UID1127152
中级会员, 积分 400, 距离下一级还需 100 积分
钻石0 颗热心度1 威望0 金币295 枚
本帖最后由 zibofengji 于
16:16 编辑
附件: 你需要才可以下载或查看附件。没有帐号？
总评分:&金币 + 2&
热心度 + 1&
在线时间26270 小时性别男MSN 最后登录注册时间主题帖子精华6积分144591阅读权限60UID200714
钻石0 颗热心度1496 威望45 金币35508 枚
楼主英语基础不错，赞一个。我是用简体中文的。
附件: 你需要才可以下载或查看附件。没有帐号？
在线时间12 小时性别保密MSN最后登录注册时间主题帖子精华0积分150阅读权限15UID217867
普通会员, 积分 150, 距离下一级还需 50 积分
钻石0 颗热心度0 威望0 金币105 枚
在线时间72 小时性别保密最后登录注册时间主题帖子精华0积分400阅读权限30UID1127152
中级会员, 积分 400, 距离下一级还需 100 积分
钻石0 颗热心度1 威望0 金币295 枚
newdhj 发表于
楼主英语基础不错，赞一个。我是用简体中文的。
向版主学习，我的安装到CAD是简体中文，但是装上的扩展工具却是英文的，不知道是不是安装时错误
在线时间259 小时性别保密最后登录注册时间主题帖子精华0积分1549阅读权限50UID1216466
支柱会员, 积分 1549, 距离下一级还需 1451 积分
钻石0 颗热心度8 威望0 金币783 枚
zibofengji 发表于
向版主学习，我的安装到CAD是简体中文，但是装上的扩展工具却是英文的，不知道是不是安装时错误
这一个扩展我的也是英文的。
在线时间151 小时性别保密最后登录注册时间主题帖子精华0积分2573阅读权限50UID1257577
支柱会员, 积分 2573, 距离下一级还需 427 积分
钻石0 颗热心度0 威望0 金币6249 枚
值得学习一下，谢了。
在线时间9575 小时性别保密MSN 最后登录注册时间主题帖子精华4积分53481阅读权限60UID467433
铂金长老, 积分 53481, 距离下一级还需 46519 积分
钻石2 颗热心度930 威望19 金币17057 枚
zibofengji 发表于
向版主学习，我的安装到CAD是简体中文，但是装上的扩展工具却是英文的，不知道是不是安装时错误
&沿弧线排列文字&是ET的扩展工具中的一个功能（或命令），大概在六、七年前ET扩展工具是随AutoCAD正版赠送的，以后改为正版的自带程序，但是无论是英文版还是中文版自带的ET扩展工具都是英文的，需要找有关的汉化ET的程序予以汉化，方能见到中文的ET界面。
ET的汉化软件需要对口相应的版本，这可在本论坛搜索下载安装即可。
在线时间72 小时性别保密最后登录注册时间主题帖子精华0积分400阅读权限30UID1127152
中级会员, 积分 400, 距离下一级还需 100 积分
钻石0 颗热心度1 威望0 金币295 枚
dengdinghui 发表于
&沿弧线排列文字&是ET的扩展工具中的一个功能（或命令），大概在六、七年前ET扩展工具是随AutoCAD正版赠送 ...
哈哈，谢谢长老，看到您的指教后，我的也汉化了，谢谢
在线时间72 小时性别保密最后登录注册时间主题帖子精华0积分400阅读权限30UID1127152
中级会员, 积分 400, 距离下一级还需 100 积分
钻石0 颗热心度1 威望0 金币295 枚
力翱数控 发表于
值得学习一下，谢了。
请看7楼回复，我的汉化了
真实姓名王小刚在线时间732 小时性别男居住地 江北最后登录注册时间主题帖子精华0积分5154阅读权限60UID766186
青铜长老, 积分 5154, 距离下一级还需 2846 积分
钻石0 颗热心度114 威望0 金币5864 枚
看来正版的CAD与翻版的就是不一样哈
在线时间72 小时性别保密最后登录注册时间主题帖子精华0积分400阅读权限30UID1127152
中级会员, 积分 400, 距离下一级还需 100 积分
钻石0 颗热心度1 威望0 金币295 枚
郝儿 发表于
看来正版的CAD与翻版的就是不一样哈
估计咱们论坛用正版的不超3个，现在有破解版谁还用正版啊
真实姓名王小刚在线时间732 小时性别男居住地 江北最后登录注册时间主题帖子精华0积分5154阅读权限60UID766186
青铜长老, 积分 5154, 距离下一级还需 2846 积分
钻石0 颗热心度114 威望0 金币5864 枚
zibofengji 发表于
估计咱们论坛用正版的不超3个，现在有破解版谁还用正版啊
我的CAD怎么没有这个功能？要另外安装ET吗？
附件: 你需要才可以下载或查看附件。没有帐号？
在线时间72 小时性别保密最后登录注册时间主题帖子精华0积分400阅读权限30UID1127152
中级会员, 积分 400, 距离下一级还需 100 积分
钻石0 颗热心度1 威望0 金币295 枚
郝儿 发表于
我的CAD怎么没有这个功能？要另外安装ET吗？
到这里去看看，有方法
在线时间151 小时性别保密最后登录注册时间主题帖子精华0积分2573阅读权限50UID1257577
支柱会员, 积分 2573, 距离下一级还需 427 积分
钻石0 颗热心度0 威望0 金币6249 枚
zibofengji 发表于
到这里去看看，有方法/forum.php?mod=viewthread&tid=245044
不错的文件，先谢了。
在线时间0 小时性别保密最后登录注册时间主题帖子精华0积分2阅读权限10UID1369741
新手上路, 积分 2, 距离下一级还需 98 积分
钻石0 颗热心度0 威望0 金币34 枚
部分带宽支持： |