求一段LISP代码

fhcd88

恳求高手帮小弟编写一段L ISP代码（CAD2004），实现功能如下：
第一步：将当前选定对象之外的所有元素显示顺序改为后置；
第二步：将名为“线段1”的图层内所有多线段的全局宽度设置为1.0,颜色设置为红色；
第三步：将名为“块参照1”的图层内所有名为“块1”的块参照改为X、Y、Z比例均为0.5，颜色设置为黄色；
第四步：将名为“圆圈1”的图层内所有圆改为直径2.5；
第五步：将名为“注记1”的图层内所有文字的高度设置为10，颜色设置为红色；

不胜感激！！！！