[求助]：[0516]如何制作尺寸标注两线中心程序呢?
<P>[求助]：如何制作尺寸标注两线中心程序呢?<BR>请问各位高手,<BR>该怎样使程序,<BR>以两线的中心为标注起点,<BR>来做为标注呢?</P><P>想运用在室内设计中标注墙与墙中心尺寸.</P> <P class=MsoNormal align=left><FONT face=华文行楷 size=5>语法 </FONT></P>
<P class=MsoNormal style="MARGIN-LEFT: 62.6pt; TEXT-INDENT: -62.6pt; TEXT-ALIGN: left" align=left><FONT size=3> (<FONT style="BACKGROUND-COLOR: #316ac5" color=#ffffff>osnap</FONT> pt mode-string)</FONT></P>
<P class=MsoNormal style="TEXT-ALIGN: left" align=left><FONT face=华文行楷 size=5>功能及参数</FONT></P>
<P class=MsoFooter style="LAYOUT-GRID-MODE: both"> <FONT size=3>这个函数将返回一个</FONT><FONT size=3> 3D </FONT><FONT size=3>的点</FONT><FONT size=3>, </FONT><FONT size=3>这个点是将</FONT><FONT size=3> mode-string</FONT><FONT size=3>所描述的图形捕捉模式应用到点</FONT><FONT size=3> pt </FONT><FONT size=3>的结果。</FONT><FONT size=3>mode-srting</FONT><FONT size=3>这个字符串包含了一个或多个有效的图形捕捉识别字</FONT><FONT size=3>, </FONT><FONT size=3>如：</FONT><FONT size=3>midpoint, center </FONT><FONT size=3>等</FONT><FONT size=3>, </FONT><FONT size=3>其中它们是以逗号分开的</FONT><FONT size=3>。</FONT></P>
<P class=MsoFooter style="LAYOUT-GRID-MODE: both"><FONT face=华文行楷 size=5>范例</FONT></P>
<P class=MsoFooter style="LAYOUT-GRID-MODE: both"><FONT face=华文行楷 size=5> </FONT><FONT size=3>(setq pt2 (<FONT style="BACKGROUND-COLOR: #316ac5" color=#ffffff>osnap</FONT> pt1 "midp"))</FONT><FONT size=3></P>
<P class=MsoNormal style="TEXT-ALIGN: left" align=left> (setq pt2 (<FONT style="BACKGROUND-COLOR: #316ac5" color=#ffffff>osnap</FONT> pt1 "midp, endp, center"))</P>
<P class=MsoNormal style="TEXT-INDENT: 21pt; TEXT-ALIGN: left" align=left> <FONT style="BACKGROUND-COLOR: #316ac5" color=#ffffff>osnap</FONT> 函数所返回的点是依据目前的3D视面以及在APERTURE系统变量中的设定来决定的。</P>
<P class=MsoNormal style="MARGIN-LEFT: 62.6pt; TEXT-INDENT: -62.6pt; TEXT-ALIGN: left" align=left> 常数名称：π</P>
<P class=MsoNormal style="MARGIN-LEFT: 62.6pt; TEXT-INDENT: -62.6pt; TEXT-ALIGN: left" align=left> 常数语法：</FONT><FONT size=3>(pi)</FONT></P>
<P class=MsoFooter style="MARGIN-LEFT: 62.6pt; LAYOUT-GRID-MODE: both; TEXT-INDENT: -62.6pt"><FONT size=3> </FONT><FONT size=3>功能：</FONT><FONT size=3>Pi(</FONT><FONT size=3>π</FONT><FONT size=3>)</FONT><FONT size=3>并非函数</FONT><FONT size=3>, </FONT><FONT size=3>而是一常数值。此值大约为</FONT><FONT size=3> 3.1415926</FONT><FONT size=3>。</FONT></P> <P><FONT face=Simsun size=2>如何用程序写出这样标注方法呢?如图.</FONT></P>
<P></P>
<P> </P> <P>不知有人可以回答一下吗?</P>
<P> </P> 程序：（不过要选四点)
(DEFUN C:CDIM ()
(SETVAR "CMDECHO" 0)
(SETQ OLDOS (GETVAR "OSMODE"))
(SETVAR "OSMODE" 513)
(SETQ PT1 (GETPOINT "\n第一点 :"))
(SETVAR "OSMODE" 128)
(SETQ PT2 (GETPOINT PT1 "\n第二点 :")
PT1 (POLAR PT1 (ANGLE PT1 PT2) (/ (DISTANCE PT1 PT2) 2))
PT2 (GETPOINT PT1 "\n第三点 :")
PT3 (GETPOINT PT2 "\n第四点 :")
PT2 (POLAR PT2 (ANGLE PT2 PT3) (/ (DISTANCE PT2 PT3) 2)))
(SETVAR "OSMODE" 0)
(COMMAND "DIMLINEAR" PT1 PT2 PAUSE)
(WHILE (> (GETVAR "CMDACTIVE") 0) (COMMAND PAUSE))
(SETVAR "OSMODE" OLDOS)
(SETVAR "CMDECHO" 1)
(PRINC)
)
<P>有更方便的吗？</P> 不错，这个可以用的到！
页:
[1]