[ARX]我愛學習ARX剛剛起步, 多多指教啊
我刚学会一点点的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涵数是得出的点做成一个变量, 这个变量就是在涵数输入的第一个参数 [变量名], 还望多多指教, 谢谢!!!!
要学习ARX，就要抛开LISP的编程习惯，不要再费劲去改成LISP的格式了吧。 呵呵. 不能一下就抛开的. 因为我不能一下就放下工作马上改用arx, 因为没有人能接手我手上的工作嘛. 只能一边在开发VLISP的同时学会ARX, 等会了才可以慢慢的转变的啊.,虽然过程有点慢,
页:
[1]