找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1945|回复: 7

[求助] 求助插件的出处 做好有下载地址 这个编号很好用

[复制链接]
发表于 2015-1-23 10:33:59 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
SMZS(~2.GIF
工作中需要用到请大神们帮助



论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!

已领礼包: 3198个

财富等级: 富可敌国

发表于 2015-1-23 12:13:07 | 显示全部楼层
看演示的风格应该是 E派的风格
这个类似
  1. ;;;  =================================================
  2. ;;;   动态引线标注 v2.0
  3. ;;;   带对话框,可设置参数,正交时自动对齐,基线随字长
  4. ;;;   作者:langjs      命令:yb         日期:2013年6月
  5. ;;;   增加线下文字功能  修改:孤帆       日期:2014年1月
  6. ;;;  =================================================
  7. (defun c:yb (/ #erryx001 $orr bb bi code data dcl_re dclname ent ent1 ent2 filen gr i lst n1 n2 n3 name1 name2 nent pt pt0
  8.                ptlst stream tempname tulst tulst1 tulst2 txlst txlst1 ty w x x0 x1 xunh y0 y1
  9.             )
  10.   (defun #erryx001 (s)
  11.     (entdel name1)
  12.     (entdel name2)
  13.     (command ".UNDO" "E")
  14.     (setq *error* $orr)
  15.   )                                       ; 按点表顺序更新多段线顶点,无须更换顶点用nil代替。by:langjs
  16.   (defun reent (ent ptlst / i nent x)
  17.     (setq i -1
  18.           nent '()
  19.     )
  20.     (foreach x ent
  21.       (setq nent (append
  22.                    nent
  23.                    (list (if (and
  24.                                (= (car x) 10)
  25.                                (/= (nth (setq i (1+ i))
  26.                                         ptlst
  27.                                    ) nil
  28.                                )
  29.                              )
  30.                            (cons 10 (nth i ptlst))
  31.                            x
  32.                          )
  33.                    )
  34.                  )
  35.       )
  36.     )
  37.   )
  38.   (defun relst (x i lst)               ; 替换表中第i个元素。
  39.     (if (= 0 i)
  40.       (cons x (cdr lst))
  41.       (cons (car lst) (relst x (1- i) (cdr lst)))
  42.     )
  43.   )
  44.   (defun getty (ty / lst x)               ; 图层列表
  45.     (setq x (tblnext ty t))
  46.     (while (/= x nil)
  47.       (setq lst (cons (cdr (assoc 2 x)) lst))
  48.       (setq x (tblnext ty))
  49.     )
  50.     (acad_strlsort lst)
  51.   )
  52.   (defun showlst (i lst)               ; 显示列表
  53.     (start_list i)
  54.     (mapcar
  55.       'add_list
  56.       lst
  57.     )
  58.     (end_list)
  59.   )
  60.   (defun show ()
  61.     (setq n1 (getvar "CLAYER")
  62.           n2 (getvar "CLAYER")
  63.           n3 (getvar "TEXTSTYLE")
  64.           tulst1 (cons n1 (vl-remove n1 tulst))
  65.           tulst2 (cons n2 (vl-remove n2 tulst))
  66.           txlst1 (cons n3 (vl-remove n3 txlst))
  67.           lstsz (relst n1 6 lstsz)
  68.           lstsz (relst n2 7 lstsz)
  69.           lstsz (relst n3 8 lstsz)
  70.           lstsz (relst '("开" "关") 9 lstsz)
  71.     )
  72.     (setvar "orthomode" 1)
  73.     (showlst "e07" '("开" "关"))
  74.     (showlst "e10" tulst1)
  75.     (showlst "e11" tulst2)
  76.     (showlst "e12" txlst1)
  77.     (showlst "e13" (nth 9 lstsz))
  78.   )
  79.   (defun ybgetdata ()
  80.       (setq txt (get_tile "e01"))
  81.       (if (= (get_tile "a3") "0") (setq kd3 0) (setq kd3 1))
  82.       (if (= kd3 1)(setq txt1 (get_tile "a2")))
  83.     )
  84.   (setvar "cmdecho" 0)
  85.   (setq $orr *error*)
  86.   (setq *error* #erryx001)
  87.   (command ".UNDO" "BE")
  88.   (if (null txt1) (setq txt1 ""))
  89.   (if (null txt ) (setq txt ""))
  90.   (while (/= bb 4)
  91.     (setq bi (getvar "DIMSCALE")
  92.           bb 3
  93.           xunh t
  94.     )
  95.     (if (null txt)
  96.       (setq txt "")
  97.     )
  98.     (if (null ptlast)
  99.       (setq ptlast '(0.0 0.0))
  100.     )
  101.     (if (null lstsz)
  102.       (setq lstsz (list (getvar "DIMTXT") (getvar "DIMCLRT") (getvar "DIMCLRD") (* 0.3 (getvar "DIMASZ")) (getvar "DIMEXO")
  103.                         (cdr (assoc 41 (tblsearch "style" (getvar "TEXTSTYLE")))) (getvar "CLAYER") (getvar "CLAYER")
  104.                         (getvar "TEXTSTYLE") '("开" "关") (* 0.1 (getvar "DIMASZ") )'("开" "关")'("箭头" "圆点")
  105.                   )
  106.       )
  107.     )
  108.     (setq tulst (getty "LAYER")
  109.           txlst (getty "style")
  110.           n1 (nth 6 lstsz)
  111.           n2 (nth 7 lstsz)
  112.           n3 (nth 8 lstsz)
  113.           tulst1 (cons n1 (vl-remove n1 tulst))
  114.           tulst2 (cons n2 (vl-remove n2 tulst))
  115.           txlst1 (cons n3 (vl-remove n3 txlst))
  116.     )
  117.     (while (= bb 3)
  118.       (setq dclname (cond
  119.                       ((setq tempname (vl-filename-mktemp "yx.dcl")
  120.                              filen (open tempname "w")
  121.                        )
  122.                         (foreach stream '("\n" "yx1:dialog {\n"
  123.                            "    label = \"引线标柱 2.0\" ;\n"
  124.                            " :edit_box {key = \"e01\"; label = \"线上文字:\"; width = 40 ;}\n "
  125.                            "  :toggle {key = \"a3\"; label = \"增加线下文字\";}\n"
  126.                            "  :edit_box {key = \"a2\"; label = \"线下文字:\"; width = 40;}\n"
  127.                            "    :row { :button { key = \"e02\" ; label = \"确认\" ;  is_default = true ;   }\n"
  128.                            "           :button { key = \"e04\" ; label = \"设置\" ; }  \n"
  129.                            "           :button { key = \"e03\" ; label = \"取消\" ; is_cancel = true ; } } }\n"
  130.                           )
  131.                           (princ stream filen)
  132.                         )
  133.                         (close filen)
  134.                         tempname
  135.                       )
  136.                     )
  137.       )
  138.       (setq dcl_re (load_dialog dclname))
  139.       (if (not (new_dialog "yx1" dcl_re))
  140.         (exit)
  141.       )
  142.       (set_tile "e01" txt)
  143.       (if (= kd3 1)
  144.         (progn
  145.           (set_tile "a3" "1")
  146.           (mode_tile "a2" 0)
  147.           (set_tile "a2" txt1)
  148.           )
  149.         (progn
  150.           (set_tile "a3" "0")
  151.           (mode_tile "a2" 1))
  152.         )
  153.       (action_tile "e02" "(ybgetdata)(done_dialog 1)")
  154.       (action_tile "e04" "(setq txt (get_tile \"e01\"))(done_dialog 2)")
  155.       (action_tile "e03" "(setq txt (get_tile \"e01\"))(done_dialog 4)")
  156.       (action_tile "a3" "(if (= (get_tile \"a3\") \"0\") (mode_tile \"a2\" 1) (progn (mode_tile \"a2\" 0)(set_tile \"a2\" txt1)))") ;点击时才起作用
  157.       (setq bb (start_dialog))
  158.       (unload_dialog dcl_re)
  159.       (vl-file-delete dclname)
  160.       (if (= bb 2)
  161.         (progn
  162.           (setq dclname (cond
  163.                           ((setq tempname (vl-filename-mktemp "yx.dcl")
  164.                                  filen (open tempname "w")
  165.                            )
  166.                             (foreach stream '("\n" "yx1:dialog {\n"
  167.                                "    label = \"引线标柱设置\" ;\n" "    :edit_box { label = \"文字高度\" ; key = \"e00\" ; }\n"
  168.                                "    :edit_box { label = \"宽度比例\" ; key = \"e08\" ; }\n"
  169.                                "    :edit_box { label = \"文字偏移\" ; key = \"e04\" ; }\n"
  170.                                "    :edit_box { label = \"文字颜色\" ; key = \"e01\" ; }\n"
  171.                                "    :edit_box { label = \"基线宽度\" ; key = \"e14\" ; }\n"
  172.                                "    :edit_box { label = \"箭头长度\" ; key = \"e03\" ; }\n"
  173.                                "    :edit_box { label = \"引线颜色\" ; key = \"e02\" ; }\n"
  174.                                "    :popup_list { label = \"线上递增\" ; key = \"e13\" ; }\n"
  175.                                "    :popup_list { label = \"线下递增\" ; key = \"e15\" ; }\n"
  176.                                "    :popup_list { label = \"正交对齐\" ; key = \"e07\" ; }\n"
  177.                                "    :popup_list { label = \"箭头形式\" ; key = \"e16\" ; }\n"
  178.                                "    :popup_list { label = \"文字样式\" ; key = \"e12\" ; }\n"
  179.                                "    :popup_list { label = \"文字图层\" ; key = \"e10\" ; }\n"
  180.                                "    :popup_list{ label = \"引线图层\" ; key = \"e11\" ; }\n"
  181.                                "    :row { :button { key = \"e05\" ; label = \"确认\" ;  is_default = true ;   }\n"
  182.                                "           :button { key = \"e09\" ; label = \"默认\" ; }  \n"
  183.                                "           :button { key = \"e06\" ; label = \"取消\" ; is_cancel = true ; } } }\n"
  184.                               )
  185.                               (princ stream filen)
  186.                             )
  187.                             (close filen)
  188.                             tempname
  189.                           )
  190.                         )
  191.           )
  192.           (setq dcl_re (load_dialog dclname))
  193.           (if (not (new_dialog "yx1" dcl_re))
  194.             (exit)
  195.           )
  196.           (set_tile "e00" (rtos (nth 0 lstsz) 2 2))
  197.           (set_tile "e01" (itoa (nth 1 lstsz)))
  198.           (set_tile "e02" (itoa (nth 2 lstsz)))
  199.           (set_tile "e03" (rtos (nth 3 lstsz) 2 2))
  200.           (set_tile "e04" (rtos (nth 4 lstsz) 2 2))
  201.           (set_tile "e08" (rtos (nth 5 lstsz) 2 2))
  202.           (set_tile "e14" (rtos (nth 10 lstsz) 2 2))
  203.           (showlst "e10" tulst1)
  204.           (showlst "e11" tulst2)
  205.           (showlst "e12" txlst1)
  206.           (showlst "e13" (nth 9 lstsz))
  207.           (showlst "e15" (nth 11 lstsz))
  208.           (showlst "e16" (nth 12 lstsz))
  209.           (if (= (getvar "ORTHOMODE") 0)
  210.             (showlst "e07" '("关" "开"))
  211.             (showlst "e07" '("开" "关"))
  212.           )
  213.           (action_tile "e01" "(if (/=(setq c (acad_colordlg (nth 1 lstsz))) nil) (set_tile \"e01\" (itoa c) ))")
  214.           (action_tile "e02" "(if (/=(setq c (acad_colordlg (nth 2 lstsz))) nil) (set_tile \"e02\" (itoa c) ))")
  215.           (action_tile "e05" "(setq  txlst1 (cons n3 (vl-remove n3 txlst))  tulst1 (cons n1 (vl-remove n1 tulst))  tulst2 (cons n2 (vl-remove n2 tulst))  
  216. lstsz (relst n1 6 lstsz)  lstsz (relst n2 7 lstsz)  lstsz (relst n3 8 lstsz)   lstsz (relst(atof(get_tile \"e14\"))10 lstsz)    lstsz (relst(atof(get_tile
  217. \"e00\"))0 lstsz) lstsz (relst (atoi(get_tile \"e01\"))1 lstsz ) lstsz (relst  (atoi (get_tile \"e02\")) 2 lstsz ) lstsz(relst(atof(get_tile \"e03\"))3
  218. lstsz) lstsz (relst(atof(get_tile \"e04\"))4 lstsz)lstsz (relst(atof(get_tile \"e08\"))5 lstsz) )(done_dialog 3)")
  219.           (action_tile "e09" "(show)(set_tile \"e14\" (rtos (* 0.1 (getvar \"DIMASZ\")) 2 2))(set_tile \"e00\" (rtos (getvar \"DIMTXT\") 2 2))(set_tile
  220. \"e01\" (itoa (getvar \"DIMCLRT\")))(set_tile \"e02\" (itoa (getvar \"DIMCLRD\")))(set_tile \"e03\" (rtos (getvar \"DIMASZ\") 2 2))(set_tile \"e04\" (rtos
  221. (getvar \"DIMEXO\") 2 2))(set_tile \"e08\" (rtos (cdr (assoc 41 (tblsearch \"style\" (getvar \"TEXTSTYLE\")))) 2 2))")
  222.           (action_tile "e06" "(done_dialog 3)")
  223.           (action_tile "e10" "(setq n1 (nth (atoi  $value ) tulst1)) ")
  224.           (action_tile "e11" "(setq n2 (nth (atoi  $value ) tulst2)) ")
  225.           (action_tile "e12" "(setq n3 (nth (atoi  $value ) txlst1)) ")
  226.           (action_tile "e07" "(setvar \"orthomode\" (rem (+ (getvar \"ORTHOMODE\") (atoi  $value ) ) 2 ) ) (if (= (getvar \"ORTHOMODE\") 0) (showlst \"e07\"
  227. '(\"关\" \"开\")) (showlst \"e07\" '(\"开\" \"关\")))")
  228.           (action_tile "e13" "(if (= (atoi $value) 1) (setq lstsz (relst (reverse (nth 9 lstsz)) 9 lstsz))) (showlst \"e13\" (nth 9 lstsz)) ")
  229.           (action_tile "e15" "(if (= (atoi $value) 1) (setq lstsz (relst (reverse (nth 11 lstsz)) 11 lstsz))) (showlst \"e15\" (nth 11 lstsz)) ")
  230.           (action_tile "e16" "(if (= (atoi $value) 1) (setq lstsz (relst (reverse (nth 12 lstsz)) 12 lstsz))) (showlst \"e16\" (nth 12 lstsz)) ")
  231.           (setq bb (start_dialog))
  232.           (unload_dialog dcl_re)
  233.           (vl-file-delete dclname)
  234.         )
  235.       )
  236.     )
  237.     (if (= bb 1)
  238.       (if (setq pt0 (getpoint "\n命令:_yb 指定第一点:"))
  239.         (progn
  240.           (princ (strcat "\n指定下一点:"))
  241.           (cond ((= (car (nth 12 lstsz))"圆点")
  242.           (entmake (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") (cons 8 (nth 7 lstsz)) (cons 62 (nth 2 lstsz)) '
  243.                          (100 . "AcDbPolyline") (cons 90 6) (cons 10 (list (- (car pt0) (* 0.25 bi (nth 3 lstsz))) (cadr pt0))) (cons 40 (* 0.5 bi (nth 3 lstsz))) (cons 41 (* 0.5 bi (nth 3 lstsz)))'(42 . 1.0)
  244.                          (cons 10 (list (+ (car pt0) (* 0.25 bi (nth 3 lstsz))) (cadr pt0))) (cons 40 (* 0.5 bi (nth 3 lstsz))) (cons 41 (* 0.5 bi (nth 3 lstsz)))'(42 . 1.0)
  245.                          (cons 10 (list (- (car pt0) (* 0.25 bi (nth 3 lstsz))) (cadr pt0))) '(40 . 0)'(41 . 0)'(42 . 0)(cons 10 pt0) '(40 . 0)'(41 . 0)'(42 . 0)(cons 10 pt0) (cons 40 (* bi (nth 10 lstsz))) (cons 41 (* bi (nth 10 lstsz)))
  246.                          (cons 10 pt0)
  247.                    )
  248.           )
  249.                  )
  250.                  ((= (car (nth 12 lstsz))"箭头")
  251.                    (entmake (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") (cons 8 (nth 7 lstsz)) (cons 62 (nth 2 lstsz)) '
  252.                          (100 . "AcDbPolyline") (cons 90 4) (cons 10 pt0) '(40 . 0.0) (cons 41 (* 0.3 bi (nth 3 lstsz)))
  253.                          (cons 10 pt0) (cons 10 pt0) (cons 40 (* bi (nth 10 lstsz))) (cons 41 (* bi (nth 10 lstsz)))
  254.                          (cons 10 pt0)
  255.                    )
  256.           )
  257.                    )
  258.                  )
  259.           (setq ent1 (entget (setq name1 (entlast))))
  260.           (entmake (list '(0 . "TEXT") (cons 8 (nth 6 lstsz)) (cons 62 (nth 1 lstsz)) (cons 1 txt) (cons 10 pt0)
  261.                          (cons 40 (* bi (nth 0 lstsz))) (cons 41 (nth 5 lstsz)) (cons 7 (nth 8 lstsz))
  262.                    )
  263.           )
  264.           (setq ent2 (entget (setq name2 (entlast)))
  265.                 w (caadr (textbox ent2))
  266.           )
  267.           (if (= kd3 1)
  268.             (progn
  269.           (entmake (list '(0 . "TEXT") (cons 8 (nth 6 lstsz)) (cons 62 (nth 1 lstsz)) (cons 1 txt1) (cons 10 (polar pt0 (* 1.5 pi)(* 1.5 (nth 0 lstsz) )))
  270.                          (cons 40 (* bi (nth 0 lstsz))) (cons 41 (nth 5 lstsz)) (cons 7 (nth 8 lstsz))
  271.                    )
  272.           )
  273.           (setq ent3 (entget (setq name3 (entlast)))
  274.                 w1 (caadr (textbox ent3))
  275.           )))
  276.           (while (progn
  277.                    (setq gr (grread t 15 0)
  278.                          code (car gr)
  279.                          data (cadr gr)
  280.                    )
  281.                    (cond
  282.                      ((= code 2)       ; 键盘区域
  283.                        (redraw)
  284.                        (if (= data 15)
  285.                          (if (= (getvar "ORTHOMODE") 0)
  286.                            (progn
  287.                              (prompt "\n命令: <正交 开>")
  288.                              (setvar "orthomode" 1)
  289.                            )
  290.                            (progn
  291.                              (prompt "\n命令: <正交 关>")
  292.                              (setvar "orthomode" 0)
  293.                            )
  294.                          )
  295.                        )
  296.                      )
  297.                      ((= code 3)       ; 鼠标左击
  298.                        (setq ptlast pt
  299.                              xunh nil
  300.                        )
  301.                      )
  302.                      ((= code 5)       ; 鼠标移动
  303.                        (if (= (getvar "ORTHOMODE") 1)
  304.                          (progn
  305.                            (setq x0 (car ptlast)
  306.                                  y0 (cadr ptlast)
  307.                                  x1 (car data)
  308.                                  y1 (cadr data)
  309.                            )
  310.                            (if (< (abs (- x0 x1)) (* 1.5 bi (nth 0 lstsz)))
  311.                              (setq pt (list x0 y1))
  312.                              (if (< (abs (- y0 y1)) (* 2 bi (nth 0 lstsz)))
  313.                                (setq pt (list x1 y0))
  314.                                (setq pt data)
  315.                              )
  316.                            )
  317.                          )
  318.                          (setq pt data)
  319.                        )
  320.                       (cond ((= (car (nth 12 lstsz))"圆点")
  321.                        (entmod (reent ent1 (list nil nil nil nil pt (polar pt (if
  322.                                                                                                                     (>
  323.                                                                                                                        (car pt)
  324.                                                                                                                        (car pt0)
  325.                                                                                                                     )
  326.                                                                                                                     0
  327.                                                                                                                     pi
  328.                                                                                                                   ) (if (= kd3 1)(max w w1)w)
  329.                                                                                                         )
  330.                                            )
  331.                                )
  332.                        ))
  333.                            ((= (car (nth 12 lstsz))"箭头")
  334.                              (entmod (reent ent1 (list nil (polar pt0 (angle pt0 pt) (* bi (nth 3 lstsz))) pt (polar pt (if
  335.                                                                                                                     (>
  336.                                                                                                                        (car pt)
  337.                                                                                                                        (car pt0)
  338.                                                                                                                     )
  339.                                                                                                                     0
  340.                                                                                                                     pi
  341.                                                                                                                   ) (if (= kd3 1)(max w w1)w)
  342.                                                                                                         )
  343.                                            )
  344.                                )
  345.                        ))
  346.                             )
  347.                        (entmod (subst
  348.                                  (cons 10 (list (- (car pt) (if (> (car pt) (car pt0))
  349.                                                               0
  350.                                                               (if (= kd3 1)(max w w1)w)
  351.                                                             )
  352.                                                 ) (+ (cadr pt) (* bi (nth 4 lstsz)))
  353.                                           )
  354.                                  )
  355.                                  (assoc 10 ent2)
  356.                                  ent2
  357.                                )
  358.                        )
  359.                       (if (= kd3 1)
  360.                       (entmod (subst
  361.                                  (cons 10 (list (- (car pt) (if (> (car pt) (car pt0))
  362.                                                               0
  363.                                                               (max w w1)
  364.                                                             )
  365.                                                 ) (- (cadr pt) (* bi (nth 4 lstsz))(nth 0 lstsz))
  366.                                           )
  367.                                  )
  368.                                  (assoc 10 ent3)
  369.                                  ent3
  370.                                )
  371.                        ))
  372.                        (redraw)
  373.                      )
  374.                      ((or
  375.                         (= code 11)
  376.                         (= code 25)
  377.                       )                       ; 鼠标右击
  378.                        (if (and
  379.                              (wcmatch txt "~*[~.0-9]*")
  380.                              (= (car (nth 9 lstsz)) "开")
  381.                            )
  382.                          (setq txt (itoa (1- (atoi txt))))
  383.                        )
  384.                       (if (and
  385.                              (wcmatch txt1 "~*[~.0-9]*")
  386.                              (= (car (nth 11 lstsz)) "开")
  387.                            )
  388.                          (setq txt1 (itoa (1- (atoi txt1))))
  389.                        )
  390.                        (entdel name1)
  391.                        (entdel name2)
  392.                        (setq xunh nil)
  393.                        (redraw)
  394.                      )
  395.                      (t
  396.                      )
  397.                    )
  398.                    xunh
  399.                  )
  400.           )
  401.           (if (and
  402.                 (wcmatch txt "~*[~.0-9]*")
  403.                 (= (car (nth 9 lstsz)) "开")
  404.               )
  405.             (setq txt (itoa (1+ (atoi txt))))
  406.           )
  407.           (if (and
  408.                 (wcmatch txt1 "~*[~.0-9]*")
  409.                 (= (car (nth 11 lstsz)) "开")
  410.                 (= kd3 1)
  411.               )
  412.             (setq  txt1 (itoa (1+ (atoi txt1))))
  413.           )
  414.         )
  415.       )
  416.     )
  417.   )
  418.   (command ".UNDO" "E")
  419.   (setq *error* $orr)
  420.   (princ)
  421. )

点评

太厉害了,感谢分享!  详情 回复 发表于 2018-7-31 23:58
高风亮节,世界因你而精彩  详情 回复 发表于 2015-1-25 07:57
谢谢!你真厉害  详情 回复 发表于 2015-1-24 11:54
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 1 反对 0

使用道具 举报

已领礼包: 264个

财富等级: 日进斗金

发表于 2015-1-23 11:19:32 | 显示全部楼层
用MLeader就可以
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-1-24 11:54:33 | 显示全部楼层
lucas3 发表于 2015-1-23 12:13
看演示的风格应该是 E派的风格
这个类似


谢谢!你真厉害
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

发表于 2015-1-24 16:27:34 | 显示全部楼层
楼主,把DWG图压缩下传上来吧。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 5578个

财富等级: 富甲天下

发表于 2015-1-25 07:57:49 | 显示全部楼层
lucas3 发表于 2015-1-23 12:13
看演示的风格应该是 E派的风格
这个类似

高风亮节,世界因你而精彩
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2015-2-1 21:47:17 | 显示全部楼层
11111111111
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 69个

财富等级: 招财进宝

发表于 2018-7-31 23:58:21 | 显示全部楼层
lucas3 发表于 2015-1-23 12:13
看演示的风格应该是 E派的风格
这个类似

太厉害了,感谢分享!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-3-29 21:26 , Processed in 0.188751 second(s), 51 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表