[LISP函数]：真正的高手帮个忙，本人感恩戴德！！

dreamsea

1楼楼主说：[编程申请]：编程高手进来帮忙啊！ 在线等   9pt 10pt 11pt 12pt 13pt 15pt  

1、 程序开始
2、 用鼠标在CAD窗口中选取一个矩形框，
3、 逻辑中将此矩形框沿中线分成四个框区，
4、 在第一个框区中按从右下至左上的方向划一个选取框，所得到的CAD选择集为S1
5、 加工选择集S1，使其中仅保留文字（包括多行文字或是单行文字，按选中部分只有一个文字考虑）
6、 读取文字中的内容记为W1，
7、 在其它三个框区中重复3、4、5步，取得的文字为W2，W3，W4
8、 生成一个单行四列的表格，将W1，W2，W3，W4分别放到第一到第四列内。
9 生成的表格基点定义在左上角，需要用鼠标放在合适的位置上。
10、 程序完成
编译完成后文件扩展名为：*.ARX ; *.LSP; *,DVB; *.DBX;*.VLX; *.FAS.均可。

哪位高人帮忙写一下这个功能的程序？谢谢了，在线等。最好在CAD2006版本上做，如果其它版本也可以接受。