[编程申请]：叫空壳的老大，有天正3.61的,求你也给我进来！

pipi002004

大家好，我本来是学给排水的，最近改行做建筑了，同学都要我学习操天正3，所谓工预善其事必先利其器，我可不习惯天正3的点啊点的，老同志刚学还可以，久了怎么能行呢,于是我就改了acad.pgp文件，谁知道不行，我晕死，第一个反映是上网查看有没相关的帖子找到http://www.xdcad.net/forum/showt ... y=&pagenumber=1
看到教我的，里面有关上面的如下编写：

;######### 页面切换 ###########

(defun C:PZX ()平面轴线
(menucmd"s=axis_")
)
;######### 平面-轴线 ###########

(defun C:XX () ;直线轴网
(_@Ld"Axis")
(C:desaxis)
(princ "\n快捷键,让我有飞一般的感觉,我喜欢!")
(princ)
)

(defun C:XH () ;弧线轴网
(_@Ld"caxis")
(C:caxis)
)

我也觉得自己能写了
可是遇到窗户这里出了问题
;-----------------------------------------

(defun C:w1 () ;顺序插窗
(menucmd"s=window_")  ;(哈哈!自动翻页,比你先进吧,偶自己想到的!)
(_@Ld"Window0")
(Progn(Setq _wdins 1)(Princ))
(c:wdin)
(princ "\n帮主，开这样的窗？太没有品位了吧！")
(princ)
)
(defun C:w2 () ;中心插窗
(menucmd"s=window_")
(_@Ld"Window0")
(Progn(Setq _wdins 1)(Princ))
(c:wdinc)
(princ "\n帮主，开这样的窗？太没有品位了吧！")
(princ)
)
(defun C:w3 () ;垛宽插窗
(menucmd"s=window_")
(_@Ld"Window0")
(Progn(Setq _wdins 1)(Princ))
(c:wdinb)
(princ "\n帮主，开这样的窗？太没有品位了吧！")
(princ)
)
(defun C:g1 () ;顺序插门
(menucmd"s=window_")
(_@Ld"Window0")
(Progn(Setq _wdins 2)(Princ))
(c:wdin)
(princ "\n帮主，喜欢这么开门？太没有品位了吧！")
(princ)
)
(defun C:g2 () ;中心插门
(menucmd"s=window_")
(_@Ld"Window0")
(Progn(Setq _wdins 2)(Princ))
(c:wdinc)
(princ "\n帮主，喜欢这么开门？太没有品位了吧！")
(princ)
)

(defun C:g3 () ;垛宽插门
(menucmd"s=window_")
(_@Ld"Window0")
(Progn(Setq _wdins 2)(Princ))
(c:wdinb)
(princ "\n帮主，喜欢这么开门？太没有品位了吧！")
(princ)
)
(defun C:w11 () ;换平面窗
(menucmd"s=window_")
(_@Ld"Wdtool")
(C:wcha)
(princ "\n帮主，小的为你准备的窗你满意不? ")
(princ)
)
(defun C:g11 () ;换平面门
(menucmd"s=window_")
(_@Ld"Wdtool")
(C:dcha)
(princ "\n帮主，小的为你准备的门你满意不?")
(princ)
)
(defun C:g4 () ;左右翻转
(menucmd"s=wdtool_")
(_@Ld"Wdtool")
(C:wdrevx)
(princ "\n小样,怎么开方向都搞错了啊!")
(princ)
)
(defun C:g5 () ;内外翻转
(menucmd"s=wdtool_")
(_@Ld"Wdtool")
(C:wdrevy)
(princ "\n小样,你可要考虑好啊!")
(princ)  
)
按我这样控制要9个命令才能完成全部的插门，窗户，和高窗，问题，可是
[o  窗  o]^P^C^C(wdmnu1) ^P
这个命令要如何写啊，
如何写一个命令控制这个值的轮流变化，请高手指点，这样我只要1个命令控制这个值
其他3个命令控制顺序，中心，剁宽的插入 门，窗户，和高窗

叫空壳的大哥，请把你的Mark.lsp
payea@etang.com给我或上传,这里，小弟先感激你了
别把我带入这个万劫不复的深渊啊，我都想了好几天这个问题了！！
—————————————————————————————————————————
力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。力求速度第一。
-------------------------------------------------------------------------
是我的原则

不好意思发贴子赚钱了,只好一个帖子改到底了,大家有天正3.61的,能不能传个给我啊,或者大家上传到http://co.163.com/index_jz.htm
网易建筑上来,这里文件能放大的,大概8M/个
先谢谢了

dxl029

楼主如果找特定的人求助，最好发悄悄话，这样快点。