请教一下：怎么画内切、内切、半径的圆？
用相切、相切、半径平常只能画出来外切的圆，请问一下怎么画内切的圆啊？（我猜是不是需要改某个环境变量的值？）麻烦各位了！ 一般只能画外切的圆，内切？？？不太明白，给个示意图吧。 可以。很简单。需要从菜单栏上点：绘图——圆——选取“内切、内切、内切”就行了，然后点想要此圆内切的三条边（切点不用固定，只要点在切点所在的边上就行了），会自动生成圆。 (load "xyp_lib");加载通用函数
;|
如果已经下载xyp_lib并放到搜索路径下可以不再下载!
利用以下任何一种方式即可加载和运行通用函数内的所有子程序：
1.在acad.lsp中增加(load"xyp_lib")
2.在每个程序内增加(load"xyp_lib")
3.在command下，输入(load"xyp_lib")
4.在菜单.mnl中增加(load"xyp_lib")
通用函数下载地址:
① http://www.xdcad.net/forum/attachment.php?s=&postid=1606661
② http://www.mjtd.com/bbs/viewFile.asp?Boardid=3&ID=19043
|;(defun c:NQY ()
(cmdla0)
(jzhz)
(setvar "osmode" 256)
(mkla "内切圆"1)
(princ"\n选择物体 : ")
(command "circle" "3p" pause pause pause)
(setq s (entlast))
(setvar "osmode" 0)
(mkla "标注" 3)
(setqSa (vla-get-Area (obj-e s))
rad (dxf 40 (entget s))
pt-ci(dxf 10 (entget s))
txt-bz (strcat "R=" (rtos rad 2 3) " ; " "S=" (rtos Sa 2 3))
)
(command "text" "j" "mc" pt-ci (* sc 300) "0" txt-bz)
(cmdla1)
)
是下图的样子吗？绘图——圆——选取“内切、内切、半径”就行了，如图，第一切点在A点附近点一下，第二切点在B点附近点一下。然后给半径。半径要满足内切条件，要不然就会出现外切或一外一内的情况。命令为c－－t,捕捉切点，切点，半径。 lanogevo发表于2005-5-29 20:03:00static/image/common/back.gif回复：（lanogevo）请教一下：怎么画内切、内切、半径的圆？用相切、相切、半径平常只能画出来外切的圆，请问一下怎么画内切的圆啊？（我猜是不是需要改某个环境变量的值？）麻烦各位了！
<BR>看演示 谢谢各位前辈了。我知道该怎么做了，以前把切点点的太靠近外切圆的切点位置了。
PS：xyp1964师兄，但愿我能早一日看懂你的东西，目前对我来说有点困难。
鞠躬致礼！
页:
[1]