函数库之自定义一个ENTSEL

小龙龙

1. // ----- ads_zfentsel symbol (do not rename)
   
2. static int ads_zfentsel(void)
   
3. {
   
4.   //----- Remove the following line if you do not expect any argument for this ADS function
   
5.   struct resbuf *rb =acedGetArgs () ;
   
6.   ads_name s1;ads_point pt;
   
7.   struct resbuf *lis;
   
8.   // TODO: add your code here
   
9.   if (rb== NULL)
   
10.   {
    
11.    if (acedEntSel(NULL,s1,pt)!=RTNORM)
    
12.    {
    
13.     return RTERROR;
    
14.    }
    
15.          
    
16.     lis = acutBuildList(RTENAME,s1,RT3DPOINT,pt,0);
    
17.   }
    
18.   else
    
19.   {
    
20.    if (rb->restype == RTSTR)
    
21.    {
    
22.                 if (acedEntSel(rb->resval.rstring,s1,pt)!=RTNORM)
    
23.                 {
    
24.      return RTERROR;
    
25.                 }
    
26.      lis = acutBuildList(RTENAME,s1,RT3DPOINT,pt,0);
    
27.    }
    
28.    else
    
29.    {
    
30.     acdbFail(_T("参数错误"));
    
31.     return RTERROR;
    
32.    }
    
33.   }
    
34.    rb = rb->rbnext;
    
35.    if (rb!=NULL)
    
36.    {
    
37.     acdbFail(_T("参数太多"));
    
38.     return RTERROR;
    
39.    }
    
40.   
    
41.   // TODO: Replace the following line by your returned value if any
    
42.      acedRetList( lis);
    
43.        acutRelRb(lis);
    
44.   return (RSRSLT) ;
    
45. }

// ----- ads_zfentsel symbol (do not rename)<br /> static int ads_zfentsel(void)<br /> {<br />   //----- Remove the following line if you do not expect any argument for this ADS function<br />   struct resbuf *rb =acedGetArgs () ;<br />   ads_name s1;ads_point pt;<br />   struct resbuf *lis;<br />   // TODO: add your code here<br />   if (rb== NULL)<br />   {<br />    if (acedEntSel(NULL,s1,pt)!=RTNORM)<br />    {<br />     return RTERROR;<br />    }<br />          <br />     lis = acutBuildList(RTENAME,s1,RT3DPOINT,pt,0);<br />   }<br />   else<br />   {<br />    if (rb->restype == RTSTR)<br />    {<br />                 if (acedEntSel(rb->resval.rstring,s1,pt)!=RTNORM)<br />                 {<br />      return RTERROR;<br />                 }<br />      lis = acutBuildList(RTENAME,s1,RT3DPOINT,pt,0); <br />    }<br />    else <br />    {<br />     acdbFail(_T("参数错误"));<br />     return RTERROR;<br />    }<br />   }<br />    rb = rb->rbnext;<br />    if (rb!=NULL)<br />    {<br />     acdbFail(_T("参数太多"));<br />     return RTERROR;<br />    }<br />   <br />   // TODO: Replace the following line by your returned value if any<br />      acedRetList( lis);<br />        acutRelRb(lis);<br />   return (RSRSLT) ;<br /> }