求助：如何用LISP程序实现如下标注操作

cwz050102

请高手帮忙，如何用LISP程序实现如下标注操作：

设计一个标注命令，该命令能实现自动标注一张CAD图纸中的不同圆孔信息（包括XY坐标，数量，深度，直径），并可以在图纸上列出清单，另外可以根据圆孔的不同颜色，列出该圆孔需要什么加工。举例：

模板上两个异型孔，异型孔内分别有直径为3的孔和直径为8的圆孔，颜色不同，（标注结果，在孔的位置显示A1,A2,B1,B2,而在模板外面的区域显示详细信息：

A  钻孔%%C3,线切割加工该异型孔，单边加0.01，数量1

A1  X  50.00   Y 60.00

B %%C8铣刀铣异形，深度10.00，数量1

B1  X 70.00    Y  80.00

不知道你们能不能听明白，请高手帮忙指点一下，如何能实现该操作，最好能写个程序，并加上批注，因为我是个初学者，在此，先谢谢了

hbllw

有一个类似的工具，是lisp源码的，叫cr-lisp

如果你懂LISP的话可以自己改改用

自己写更支持了