[LISP程序]：矩形自动编号

longer1000

各位高手能否编写一个cad自动编写矩形编号的程序，设想方法如下：
选择批量的矩形，再向矩形中心方向偏移相同的数值，删除原选择的矩形，最后在偏移的矩形内填写相应的长度*宽度。这样会省去大量的时间。