本帖最后由 xyp1964 于 2014-1-20 09:00 编辑

- ;; 需要e派工具箱(XCAD)的支持:[url]http://yunpan.cn/QXQKsW9gAPmpF[/url]
- ;; 普通按钮界面
- (defun c:tt ()
- (setq lst '("xyp-gjg(钢筋钩)" "lljx(另类镜像)" "~bjcl(板筋处理)" "dtbj(动态板筋)" "zjpb(注筋排版)"
- "zjzz(注筋左置)" "zjyw(注筋移位)" "gtcm(改图层名)" "zjct(桩基承台)" "~zjtj(桩基统计)"
- "()" "pbwj(平板网架)" "qxhj(曲线桁架)" "lkjd(梁宽校对)" "lzxj(梁柱修剪)" "xyp-jzl(井字梁)"))
- (xyp-Dcl-Fast0 '("XX工具" "V2014.1.19") lst)
- (princ)
- )
|