❶ CAD同心圆
最简单此备的方法：
随便画一个圆，然后点如空选窗口下方“对象捕捉”，你再画圆时就会在已画好的圆内显森橡毁示圆心，直接点击此圆心画圆，这两圆就是同心圆！
❷ 哪位英雄会编CAD的LSP,帮忙做一个框选圆孔，不同孔径并用不同孔径符给出表示。同心圆只选最小的VLX.拜谢
(defun c:cr()
(princ "\n选择要进行统计的圆对象")
(If (setq ssa (ssget '((0 . "circle"梁源))))
(progn
(command "_undo" "be") ;设置放弃操作的起点
;取得选集中所有图元
(setq tymbent (vl-remove-if 'listp (mapcar 'cadr (ssnamex ssa))))
;取得所有图元的圆心、半径雀虚
(setq tymsjb (mapcar '(lambda(ent)
(setq dxf (entget ent))
(list (cdr (assoc 10 dxf)) ;圆顷渣燃心
(cdr (assoc 40 dxf)) ;半径
)
)
tymbent
)
)
;删除同圆心中半径最小之外圆的数据
(setq jgb (list (car tymsjb)))
(mapcar '(lambda(sjb)
(setq cxjg (car (vl-remove-if-not '(lambda(a)(equal (car sjb) (car a) 1e-6)) jgb)))
(if (= cxjg nil)
(setq jgb (cons sjb jgb))
(if (< (cadr sjb) (cadr cxjg))
(setq jgb (subst sjb cxjg jgb)) ;取同心圆中半径最小的
)
)
)
(cdr tymsjb)
)
;按半径分类统计
(setq fhz (list (car jgb)))
(mapcar '(lambda(sjb)
(setq cxjg (car (vl-remove-if-not '(lambda(a)(equal (last sjb) (last a) 1e-10)) fhz)))
(if (= cxjg nil)
(setq fhz (cons sjb fhz))
(setq fhz (subst (cons (car sjb) cxjg) cxjg fhz))
)
)
(cdr jgb)
)
;按半径由小到大排序
(setq fhz (vl-sort fhz '(lambda(a b)(< (last a) (last b)))))
;在图中写出统计结果
(If (setq pt0 (getpoint "\n选择输出基点:"))
(progn
(setq i 0)
(foreach sjb fhz
(setq bh (chr (+ 65 i)))
(setq r (last sjb))
(setq sjb (vl-remove r sjb))
(mapcar '(lambda(pt)
(setq ptt (polar pt (/ pi 4) (+ r 1)))
(entmake (list '(0 . "text")
(cons 1 bh)
(cons 10 ptt)
(cons 11 ptt)
(cons 40 3)
(cons 50 0)
(cons 62 6)
)
)
)
sjb
)
(setq ptt (mapcar '+ pt0 (list 0 (* i -5))))
(entmake (list '(0 . "text")
(cons 1 (strcat bh ":" (itoa (length sjb)) "-" "-%%C" (rtos r 2 2)))
(cons 10 ptt)
(cons 11 ptt)
(cons 40 4)
(cons 50 0)
(cons 62 6)
)
)
(setq i (1+ i))
)
)
)
(command "_undo" "e") ;设置放弃操作的止点
)
)
(princ "\n统计完成!")
(princ)
)
❸ 在cad中创建一个圆与已知圆同心可以使用哪个修改命令
偏移
使用偏移命令创建旁困悄同心圆：
第一步，在系统中找到CAD软件打开
第二步，绘制一个圆形
第三步，输入偏移命令的快捷键
第四步运渣，选择圆心
第五步，确定第二个尺液点
第六步，输入偏移距离，按空格键完成
❹ cad同心圆怎么画CAD怎么画同心圆
1、首先要设置对陪颤耐象捕捉，捕捉圆心。在左下角的对象捕捉上点右键，设置，在弹出的设置框中选择圆心，如图所示：
2、然后画第一个圆，在输入命令 C，鼠标移到第一个圆的圆弧上任意一点就出现了圆心点，然后以这个芦春点为圆心就可以画出同心圆了。
3、 也可以使用偏移命令，先画第一个圆，选中它，输入命令 O，然后在输入偏移的距离，这个距离就是两个圆半径之差，鼠标移到你要偏移的位置，点击就洞坦可以画出同心圆了。
❺ 在cad中创建一个圆与已知圆同心可以使用哪个修改命令
命核伏令O(偏移)。在CAD界面袜此中直接输入命令O（偏移），换行输入同心圆的半径差，捕捉已知圆，向外就是新创建的大同心圆，向内就是新创建的小同心圆。改好携即可达到创建一个圆与已知圆同心的修改目的。