|
我刚学会一点点的ARX. 先来一个改lisp涵数的涵数GETPOINT的名为USERPOINT源码.
// This is command 'USERPOINT'
int USERPOINT()
{
// TODO: Implement the command
resbuf *pArg =acedGetArgs () ;
if( pArg == NULL)
{
acedRetNil();
return RTERROR;
}
else
{
CString strin;
resbuf *tb;
ads_point PT1;
tb= pArg;
strin = tb->resval.rstring;
acedGetPoint(NULL,strin,PT1);
//acedGetSym("PT1",PT1);
acedRetPoint(PT1);
}
return (RTNORM) ;
}
跟随上面的方式, 我想再改进改进. 但不太会, 请大侠指点指点啊!
我想改把这个涵数改成 (USERPOINT [变量名] [提示]); 这样用的
意思是想把这个USERPOINT涵数是得出的点做成一个变量, 这个变量就是在涵数输入的第一个参数 [变量名], 还望多多指教, 谢谢!!!!
|
|