LISP函数库之创建直线

小龙龙

1. static int ads_createline(void)
   
2. {
   
3.   //----- Remove the following line if you do not expect any argument for this ADS function
   
4.   struct resbuf *rb =acedGetArgs () ;
   
5.   // TODO: add your code here
   
6.   if (rb == NULL)
   
7.   {acdbFail(_T("参数太少"));
   
8.   acedRetVoid();
   
9.    return RTERROR;
   
10.   }
    
11.   ads_point pt1;
    
12.   AcGePoint3d p1;
    
13.   if (rb->restype == RTPOINT || rb->restype == RT3DPOINT)
    
14.   {
    
15.    ads_point_set(rb->resval.rpoint,pt1);
    
16.    p1.x = pt1[X];p1.y = pt1[Y];p1.z = pt1[Z];
    
17.   }
    
18.   else
    
19.   {
    
20.    acdbFail(_T("参数错误"));
    
21.    acedRetVoid();
    
22.    return RTERROR;
    
23.   }
    
24.   rb = rb->rbnext;
    
25.   if (rb == NULL)
    
26.   {
    
27.    acdbFail(_T("参数太少"));
    
28.    acedRetVoid();
    
29.    return RTERROR;
    
30.   }
    
31.   ads_point pt2;
    
32.   AcGePoint3d p2;
    
33.   if (rb->restype == RTPOINT || rb->restype == RT3DPOINT)
    
34.   {
    
35.    ads_point_set(rb->resval.rpoint,pt2);
    
36.    p2.x = pt2[X];p2.y = pt2[Y];p2.z = pt2[Z];
    
37.   }
    
38.   else
    
39.   {acdbFail(_T("参数错误"));
    
40.   acedRetVoid();
    
41.    return RTERROR;
    
42.   }
    
43. 
    
44.   if (rb->rbnext !=NULL)
    
45.   {
    
46.    acdbFail(_T("参数太多"));
    
47.    acedRetVoid();
    
48.    return RTERROR;
    
49.   }
    
50.   AcDbLine *pLine = new AcDbLine(p1,p2);
    
51.   AcDbBlockTable *pBlkTbl;
    
52.   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pBlkTbl,AcDb::kForRead);
    
53.   AcDbBlockTableRecord *pBlkTblRcd;
    
54.   pBlkTbl->getAt(ACDB_MODEL_SPACE,pBlkTblRcd,AcDb::kForWrite);
    
55.   pBlkTbl->close();
    
56.   AcDbObjectId entId;
    
57.   pBlkTblRcd->appendAcDbEntity(entId,pLine);
    
58.   pBlkTblRcd->close();
    
59.   pLine->close();
    
60.   acedRetVoid();
    
61.   return RTNORM;
    
62.   // TODO: Replace the following line by your returned value if any
    
63.   acedRetVoid () ;
    
64. 
    
65.   return (RSRSLT) ;
    
66. }
    

static int ads_createline(void)<br /> {<br />   //----- Remove the following line if you do not expect any argument for this ADS function<br />   struct resbuf *rb =acedGetArgs () ;<br />   // TODO: add your code here<br />   if (rb == NULL)<br />   {acdbFail(_T("参数太少"));<br />   acedRetVoid();<br />    return RTERROR;<br />   }<br />   ads_point pt1;<br />   AcGePoint3d p1;<br />   if (rb->restype == RTPOINT || rb->restype == RT3DPOINT)<br />   {<br />    ads_point_set(rb->resval.rpoint,pt1);<br />    p1.x = pt1[X];p1.y = pt1[Y];p1.z = pt1[Z];<br />   }<br />   else<br />   {<br />    acdbFail(_T("参数错误"));<br />    acedRetVoid();<br />    return RTERROR;<br />   }<br />   rb = rb->rbnext;<br />   if (rb == NULL)<br />   {<br />    acdbFail(_T("参数太少"));<br />    acedRetVoid();<br />    return RTERROR;<br />   }<br />   ads_point pt2;<br />   AcGePoint3d p2;<br />   if (rb->restype == RTPOINT || rb->restype == RT3DPOINT)<br />   {<br />    ads_point_set(rb->resval.rpoint,pt2);<br />    p2.x = pt2[X];p2.y = pt2[Y];p2.z = pt2[Z];<br />   }<br />   else <br />   {acdbFail(_T("参数错误"));<br />   acedRetVoid();<br />    return RTERROR;<br />   }<br /> <br />   if (rb->rbnext !=NULL)<br />   {<br />    acdbFail(_T("参数太多"));<br />    acedRetVoid();<br />    return RTERROR;<br />   } <br />   AcDbLine *pLine = new AcDbLine(p1,p2);<br />   AcDbBlockTable *pBlkTbl;<br />   acdbHostApplicationServices()->workingDatabase()->getSymbolTable(pBlkTbl,AcDb::kForRead);<br />   AcDbBlockTableRecord *pBlkTblRcd;<br />   pBlkTbl->getAt(ACDB_MODEL_SPACE,pBlkTblRcd,AcDb::kForWrite);<br />   pBlkTbl->close();<br />   AcDbObjectId entId;<br />   pBlkTblRcd->appendAcDbEntity(entId,pLine);<br />   pBlkTblRcd->close();<br />   pLine->close();<br />   acedRetVoid();<br />   return RTNORM;<br />   // TODO: Replace the following line by your returned value if any<br />   acedRetVoid () ;<br /> <br />   return (RSRSLT) ;<br /> }<br />

Nico-2009

:lol   :):):):):):)  排个第一

炫翔

:funk:果然很长

小龙龙

速度很快

st788796

判断很长会有影响的就如xdrx_line_make来自: Android客户端

st788796

小龙龙 发表于 前天&nbsp;18:34

                               
登录/注册后可看大图

速度很快

难不成龙版主要做个开源的arx库？！来自: Android客户端

小龙龙

st788796 发表于 2013-8-4 22:41
难不成龙版主要做个开源的arx库？！

有这个想法