[原创]：实现标注及文字offset的lisp程序

haijiangl

命令：dt_offset
文字offset，适合写多行文字。例如：技术指标，多层标高等；
标注offset，适合绘制详图中的多道尺寸，因为平移的距离相等，图面上美观一点。

2. 
   
3.   [FONT=courier new]
   
4. ;=====================================
   
5. ;获取实体dxf组码内容
   
6. ; (lhj_dxf 实体名 dxf码编号)
   
7. ;例：(lhj_dxf textname 10)，获取文字左下点标
   
8. 
   
9. (defun lhj_dxf (ename code / elist res)
   
10.   (setq elist (entget ename))
    
11.   (setq res (cdr (assoc code elist)))
    
12. )
    
13. (setq lpi2 (/ pi 2))
    
14. ;==========================================
    
15. ;初始化，读取系统变量。结束时，恢复系统变量
    
16. ;  osmode             0
    
17. ;  cmdecho         1
    
18. ;  clayer             2
    
19. ;  textstyle          3
    
20. ;  cecolor        4
    
21. ;  dimstyle        5
    
22. ;  plinewid    6
    
23. ;  filletrad   7
    
24. 
    
25. 
    
26. (defun lhj_start ()
    
27.   (setq        lhj_s_lst
    
28.          (list
    
29.            (getvar "osmode")
    
30.            (getvar "cmdecho")
    
31.            (getvar "clayer")
    
32.            (getvar "textstyle")
    
33.            (getvar "cecolor")
    
34.            (getvar "dimstyle")
    
35.            (getvar "plinewid")
    
36.            (getvar "filletrad")
    
37.          )
    
38.   )
    
39.   (setq old_error *error*)
    
40.   (setvar "cmdecho" 0)
    
41.   (command "undo" "be")
    
42.   (setvar "osmode" 0)
    
43.   (princ)
    
44. )
    
45. 
    
46. 
    
47. (defun lhj_end ()
    
48.   (setvar "osmode" (nth 0 lhj_s_lst))
    
49.   (setvar "clayer" (nth 2 lhj_s_lst))
    
50.   (setvar "textstyle" (nth 3 lhj_s_lst))
    
51.   (setvar "cecolor" (nth 4 lhj_s_lst))
    
52.   (command "dimstyle" "r" (nth 5 lhj_s_lst))
    
53.   (setvar "plinewid" (nth 6 lhj_s_lst))
    
54.   (setvar "filletrad" (nth 7 lhj_s_lst))
    
55.   (setq *error* old_error)
    
56.   (command "undo" "e")
    
57.   (setvar "cmdecho" (nth 1 lhj_s_lst))
    
58.   (princ)
    
59. )
    
60. 
    
61. 
    
62. 
    
63. (defun c:dt_offset (/ dname pt pt10 pt14 ang dlist pint temp loop ali1 pt11 ali2)
    
64. 
    
65. ;初始化程序=======
    
66.   (lhj_start)
    
67. 
    
68.   (defun *error* (msg)
    
69.     (princ "\n")
    
70.     (princ "\n:::lhj_tools:::")
    
71.     (princ msg)
    
72.     (princ ",程序退出!")
    
73.     (if        dname
    
74.       (redraw dname 4)
    
75.     )
    
76.     (lhj_end)
    
77.   )
    
78. ;初始化结束=======
    
79. 
    
80. ;主程序===========
    
81.   (if (not lhj_dodis)
    
82.     (setq lhj_dodis 800)
    
83.   )
    
84.   (princ "\n:::LHJ_TOOLS:::请输入平移距离<")
    
85.   (princ lhj_dodis)
    
86.   (princ ">:")
    
87.   (if (setq temp (getreal))
    
88.     (setq lhj_dodis temp)
    
89.   )
    
90.   (setq loop t)
    
91. 
    
92.   (defun do_dim        ()
    
93.     (redraw dname 3)
    
94.     (setq pt (getpoint "\n:::LHJ_TOOLS:::请点取offset方向:"))
    
95.     (redraw dname 4)
    
96.     (command "copy" dname "" "0,0" "@")
    
97.     (setq dlist (entget (entlast)))
    
98.     (if        pt
    
99.       (progn
    
100.         (setq pt10  (lhj_dxf dname 10)
     
101.               pt14  (lhj_dxf dname 14)
     
102.               ang   (angle pt14 pt10)
     
103.               pint  (inters pt (polar pt (+ ang lpi2) 1000) pt10 pt14 nil)
     
104.               ;dlist (entget dname)
     
105.               ang   (angle pt10 pint)
     
106.               dlist (subst (cons 10 (polar pt10 ang lhj_dodis))
     
107.                            (assoc 10 dlist)
     
108.                            dlist
     
109.                     )
     
110.         )
     
111.         (entmod dlist)
     
112.       )
     
113.     )
     
114.   )
     
115. 
     
116.   (defun do_text ()
     
117.     (redraw dname 3)
     
118.     (setq pt (getpoint "\n:::LHJ_TOOLS:::请点取offset方向:"))
     
119.     (redraw dname 4)
     
120.     (if        pt
     
121.       (progn
     
122.         (setq pt10  (lhj_dxf dname 10)
     
123.               pt11  (lhj_dxf dname 11)
     
124.               ang   (lhj_dxf dname 50)
     
125.               pint  (inters pt
     
126.                             (polar pt (+ ang lpi2) 1000)
     
127.                             pt10
     
128.                             (polar pt10 ang 1000)
     
129.                             nil
     
130.                     )
     
131.               dlist (entget dname)
     
132.               ang   (angle pint pt)
     
133.               ali1  (lhj_dxf dname 72)
     
134.               ali2  (lhj_dxf dname 73)
     
135.         )
     
136.         (if (and (= ali1 0) (= ali2 0))
     
137.           (setq        dlist (subst (cons 10 (polar pt10 ang lhj_dodis))
     
138.                              (assoc 10 dlist)
     
139.                              dlist
     
140.                       )
     
141.           )
     
142.           (setq        dlist (subst (cons 11 (polar pt11 ang lhj_dodis))
     
143.                              (assoc 11 dlist)
     
144.                              dlist
     
145.                       )
     
146.           )
     
147.         )
     
148.         (entmake dlist)
     
149.       )
     
150.     )
     
151.   )
     
152. 
     
153.   (while loop
     
154.     (setq
     
155.       dname (car (entsel "\n:::LHJ_TOOLS:::请选择要offset的尺寸标注或文字:"))
     
156.     )
     
157.     (if        dname
     
158.       (cond ((= (lhj_dxf dname 0) "DIMENSION") (do_dim))
     
159.             ((= (lhj_dxf dname 0) "TEXT") (do_text))
     
160.       )
     
161.       (setq loop nil)
     
162.     )
     
163.   )
     
164. 
     
165. 
     
166. ;主程序结束=======
     
167. 
     
168.   (lhj_end)
     
169.   (princ)
     
170. )
     
171. 
     
172. 
     
173.   [/FONT]
     

<br />   [FONT=courier new]<br /> ;=====================================<br /> ;获取实体dxf组码内容<br /> ; (lhj_dxf 实体名 dxf码编号)<br /> ;例：(lhj_dxf textname 10)，获取文字左下点标<br /> <br /> (defun lhj_dxf (ename code / elist res)<br />   (setq elist (entget ename))<br />   (setq res (cdr (assoc code elist)))<br /> )<br /> (setq lpi2 (/ pi 2))<br /> ;==========================================<br /> ;初始化，读取系统变量。结束时，恢复系统变量<br /> ;  osmode             0<br /> ;  cmdecho         1<br /> ;  clayer             2<br /> ;  textstyle          3<br /> ;  cecolor        4<br /> ;  dimstyle        5<br /> ;  plinewid    6<br /> ;  filletrad   7<br /> <br /> <br /> (defun lhj_start ()<br />   (setq        lhj_s_lst<br />          (list<br />            (getvar "osmode")<br />            (getvar "cmdecho")<br />            (getvar "clayer")<br />            (getvar "textstyle")<br />            (getvar "cecolor")<br />            (getvar "dimstyle")<br />            (getvar "plinewid")<br />            (getvar "filletrad")<br />          )<br />   )<br />   (setq old_error *error*)<br />   (setvar "cmdecho" 0)<br />   (command "undo" "be")<br />   (setvar "osmode" 0)<br />   (princ)<br /> )<br /> <br /> <br /> (defun lhj_end ()<br />   (setvar "osmode" (nth 0 lhj_s_lst))<br />   (setvar "clayer" (nth 2 lhj_s_lst))<br />   (setvar "textstyle" (nth 3 lhj_s_lst))<br />   (setvar "cecolor" (nth 4 lhj_s_lst))<br />   (command "dimstyle" "r" (nth 5 lhj_s_lst))<br />   (setvar "plinewid" (nth 6 lhj_s_lst))<br />   (setvar "filletrad" (nth 7 lhj_s_lst))<br />   (setq *error* old_error)<br />   (command "undo" "e")<br />   (setvar "cmdecho" (nth 1 lhj_s_lst))<br />   (princ)<br /> )<br /> <br /> <br /> <br /> (defun c:dt_offset (/ dname pt pt10 pt14 ang dlist pint temp loop ali1 pt11 ali2)<br /> <br /> ;初始化程序=======<br />   (lhj_start)<br /> <br />   (defun *error* (msg)<br />     (princ "\n")<br />     (princ "\n:::lhj_tools:::")<br />     (princ msg)<br />     (princ ",程序退出!")<br />     (if        dname<br />       (redraw dname 4)<br />     )<br />     (lhj_end)<br />   )<br /> ;初始化结束=======<br /> <br /> ;主程序===========<br />   (if (not lhj_dodis)<br />     (setq lhj_dodis 800)<br />   )<br />   (princ "\n:::LHJ_TOOLS:::请输入平移距离<")<br />   (princ lhj_dodis)<br />   (princ ">:")<br />   (if (setq temp (getreal))<br />     (setq lhj_dodis temp)<br />   )<br />   (setq loop t)<br /> <br />   (defun do_dim        ()<br />     (redraw dname 3)<br />     (setq pt (getpoint "\n:::LHJ_TOOLS:::请点取offset方向:"))<br />     (redraw dname 4)<br />     (command "copy" dname "" "0,0" "@")<br />     (setq dlist (entget (entlast)))<br />     (if        pt<br />       (progn<br />         (setq pt10  (lhj_dxf dname 10)<br />               pt14  (lhj_dxf dname 14)<br />               ang   (angle pt14 pt10)<br />               pint  (inters pt (polar pt (+ ang lpi2) 1000) pt10 pt14 nil)<br />               ;dlist (entget dname)<br />               ang   (angle pt10 pint)<br />               dlist (subst (cons 10 (polar pt10 ang lhj_dodis))<br />                            (assoc 10 dlist)<br />                            dlist<br />                     )<br />         )<br />         (entmod dlist)<br />       )<br />     )<br />   )<br /> <br />   (defun do_text ()<br />     (redraw dname 3)<br />     (setq pt (getpoint "\n:::LHJ_TOOLS:::请点取offset方向:"))<br />     (redraw dname 4)<br />     (if        pt<br />       (progn<br />         (setq pt10  (lhj_dxf dname 10)<br />               pt11  (lhj_dxf dname 11)<br />               ang   (lhj_dxf dname 50)<br />               pint  (inters pt<br />                             (polar pt (+ ang lpi2) 1000)<br />                             pt10<br />                             (polar pt10 ang 1000)<br />                             nil<br />                     )<br />               dlist (entget dname)<br />               ang   (angle pint pt)<br />               ali1  (lhj_dxf dname 72)<br />               ali2  (lhj_dxf dname 73)<br />         )<br />         (if (and (= ali1 0) (= ali2 0))<br />           (setq        dlist (subst (cons 10 (polar pt10 ang lhj_dodis))<br />                              (assoc 10 dlist)<br />                              dlist<br />                       )<br />           )<br />           (setq        dlist (subst (cons 11 (polar pt11 ang lhj_dodis))<br />                              (assoc 11 dlist)<br />                              dlist<br />                       )<br />           )<br />         )<br />         (entmake dlist)<br />       )<br />     )<br />   )<br /> <br />   (while loop<br />     (setq<br />       dname (car (entsel "\n:::LHJ_TOOLS:::请选择要offset的尺寸标注或文字:"))<br />     )<br />     (if        dname<br />       (cond ((= (lhj_dxf dname 0) "DIMENSION") (do_dim))<br />             ((= (lhj_dxf dname 0) "TEXT") (do_text))<br />       )<br />       (setq loop nil)<br />     )<br />   )<br /> <br /> <br /> ;主程序结束=======<br /> <br />   (lhj_end)<br />   (princ)<br /> )<br /> <br /> <br />   [/FONT]<br />

aeo

干脆把offset能用的实体合进程序里,省的还要用另一个命令.
加了一下
命令 o

2. [font=courier]
   
3. (defun c:o( / dname lhj_dodis loop lpi2 pt temp lhj_start lhj_end do_dim do_text lhj_dxf)
   
4. (defun lhj_dxf (ename code / elist res)
   
5.   (setq elist (entget ename))
   
6.   (setq res (cdr (assoc code elist)))
   
7. )
   
8. (setq lpi2 (/ pi 2))
   
9. ;==========================================
   
10. ;初始化，读取系统变量。结束时，恢复系统变量
    
11. ;  osmode             0
    
12. ;  cmdecho         1
    
13. ;  clayer             2
    
14. ;  textstyle          3
    
15. ;  cecolor        4
    
16. ;  dimstyle        5
    
17. ;  plinewid    6
    
18. ;  filletrad   7
    
19. 
    
20. 
    
21. (defun lhj_start ()
    
22.   (setq        lhj_s_lst
    
23.          (list
    
24.            (getvar "osmode")
    
25.            (getvar "cmdecho")
    
26.            (getvar "clayer")
    
27.            (getvar "textstyle")
    
28.            (getvar "cecolor")
    
29.            (getvar "dimstyle")
    
30.            (getvar "plinewid")
    
31.            (getvar "filletrad")
    
32.          )
    
33.   )
    
34.   (setq old_error *error*)
    
35.   (setvar "cmdecho" 0)
    
36.   (command "undo" "be")
    
37.   (setvar "osmode" 0)
    
38.   (princ)
    
39. )
    
40. 
    
41. 
    
42. (defun lhj_end ()
    
43.   (setvar "osmode" (nth 0 lhj_s_lst))
    
44.   (setvar "clayer" (nth 2 lhj_s_lst))
    
45.   (setvar "textstyle" (nth 3 lhj_s_lst))
    
46.   (setvar "cecolor" (nth 4 lhj_s_lst))
    
47.   (command "dimstyle" "r" (nth 5 lhj_s_lst))
    
48.   (setvar "plinewid" (nth 6 lhj_s_lst))
    
49.   (setvar "filletrad" (nth 7 lhj_s_lst))
    
50.   (setq *error* old_error)
    
51.   (command "undo" "e")
    
52.   (setvar "cmdecho" (nth 1 lhj_s_lst))
    
53.    (setq lhj_s_lst nil)
    
54.   (princ)
    
55. )
    
56. 
    
57. 
    
58. 
    
59.   (defun do_dim        ( / ang dlist pint pt10 pt14)
    
60.     (command "copy" dname "" "0,0" "@")
    
61.     (setq dlist (entget (entlast)))
    
62.         (setq pt10  (lhj_dxf dname 10)
    
63.               pt14  (lhj_dxf dname 14)
    
64.               ang   (angle pt14 pt10)
    
65.               pint  (inters pt (polar pt (+ ang lpi2) 1000) pt10 pt14 nil)
    
66.               ang   (angle pt10 pint)
    
67.               dlist (subst (cons 10 (polar pt10 ang lhj_dodis))
    
68.                            (assoc 10 dlist)
    
69.                            dlist
    
70.                     )
    
71.         )
    
72.         (entmod dlist)
    
73.   )
    
74. 
    
75.   (defun do_text ( / ali1 ali2 ang dlist pint pt10 pt11)
    
76.         (setq pt10  (lhj_dxf dname 10)
    
77.               pt11  (lhj_dxf dname 11)
    
78.               ang   (lhj_dxf dname 50)
    
79.               pint  (inters pt
    
80.                             (polar pt (+ ang lpi2) 1000)
    
81.                             pt10
    
82.                             (polar pt10 ang 1000)
    
83.                             nil
    
84.                     )
    
85.               dlist (entget dname)
    
86.               ang   (angle pint pt)
    
87.               ali1  (lhj_dxf dname 72)
    
88.               ali2  (lhj_dxf dname 73)
    
89.         )
    
90.         (if (and (= ali1 0) (= ali2 0))
    
91.           (setq        dlist (subst (cons 10 (polar pt10 ang lhj_dodis))
    
92.                              (assoc 10 dlist)
    
93.                              dlist
    
94.                       )
    
95.           )
    
96.           (setq        dlist (subst (cons 11 (polar pt11 ang lhj_dodis))
    
97.                              (assoc 11 dlist)
    
98.                              dlist
    
99.                       )
    
100.           )
     
101.         )
     
102.         (entmake dlist)
     
103.   )
     
104. 
     
105. ;初始化程序=======
     
106.   (lhj_start)
     
107.   (defun *error* (msg)
     
108.     (princ "\n")
     
109.     (princ "\n:::lhj_tools:::")
     
110.     (princ msg)
     
111.     (princ ",程序退出!")
     
112.     (if        dname
     
113.       (redraw dname 4)
     
114.     )
     
115.     (lhj_end)
     
116.   )
     
117. 
     
118. ;主程序===========
     
119.   (if (not lhj_dodis)
     
120.     (setq lhj_dodis 800)
     
121.   )
     
122.   (princ "\n:::LHJ_TOOLS:::请输入平移距离<")
     
123.   (princ lhj_dodis)
     
124.   (princ ">:")
     
125.   (if (setq temp (getreal))
     
126.     (setq lhj_dodis temp)
     
127.   )
     
128.   (setq loop t)
     
129. 
     
130.   
     
131. 
     
132.   (while loop
     
133.     (if(and (setq dname (car (entsel "\n:::LHJ_TOOLS:::请选择:")))
     
134.             (member (lhj_dxf dname 0)'("TEXT""DIMENSION""LINE""LWPOLYLINE""POLYLINE""SPLINE""ARC""CIRCLE""ELLIPSE"))
     
135.             (setq pt(getpoint"请点取offset方向:"))
     
136.          )
     
137.       (progn
     
138.        (redraw dname 3)
     
139.        (cond ((= (lhj_dxf dname 0) "DIMENSION") (do_dim))
     
140.             ((= (lhj_dxf dname 0) "TEXT") (do_text ))
     
141.             (t(command"offset" lhj_dodis dname pt ""))  
     
142.        )
     
143.       (redraw dname 4)
     
144.       )
     
145.       (setq loop nil)
     
146.     )
     
147.   )
     
148. 
     
149. 
     
150. ;主程序结束=======
     
151. 
     
152.   (lhj_end)
     
153.   (princ)
     
154. )
     
155. [/font]
     

[font=courier]<br /> (defun c:o( / dname lhj_dodis loop lpi2 pt temp lhj_start lhj_end do_dim do_text lhj_dxf)<br /> (defun lhj_dxf (ename code / elist res)<br />   (setq elist (entget ename))<br />   (setq res (cdr (assoc code elist)))<br /> )<br /> (setq lpi2 (/ pi 2))<br /> ;==========================================<br /> ;初始化，读取系统变量。结束时，恢复系统变量<br /> ;  osmode             0<br /> ;  cmdecho         1<br /> ;  clayer             2<br /> ;  textstyle          3<br /> ;  cecolor        4<br /> ;  dimstyle        5<br /> ;  plinewid    6<br /> ;  filletrad   7<br /> <br /> <br /> (defun lhj_start ()<br />   (setq        lhj_s_lst<br />          (list<br />            (getvar "osmode")<br />            (getvar "cmdecho")<br />            (getvar "clayer")<br />            (getvar "textstyle")<br />            (getvar "cecolor")<br />            (getvar "dimstyle")<br />            (getvar "plinewid")<br />            (getvar "filletrad")<br />          )<br />   )<br />   (setq old_error *error*)<br />   (setvar "cmdecho" 0)<br />   (command "undo" "be")<br />   (setvar "osmode" 0)<br />   (princ)<br /> )<br /> <br /> <br /> (defun lhj_end ()<br />   (setvar "osmode" (nth 0 lhj_s_lst))<br />   (setvar "clayer" (nth 2 lhj_s_lst))<br />   (setvar "textstyle" (nth 3 lhj_s_lst))<br />   (setvar "cecolor" (nth 4 lhj_s_lst))<br />   (command "dimstyle" "r" (nth 5 lhj_s_lst))<br />   (setvar "plinewid" (nth 6 lhj_s_lst))<br />   (setvar "filletrad" (nth 7 lhj_s_lst))<br />   (setq *error* old_error)<br />   (command "undo" "e")<br />   (setvar "cmdecho" (nth 1 lhj_s_lst))<br />    (setq lhj_s_lst nil) <br />   (princ)<br /> )<br /> <br /> <br /> <br />   (defun do_dim        ( / ang dlist pint pt10 pt14)<br />     (command "copy" dname "" "0,0" "@")<br />     (setq dlist (entget (entlast)))<br />         (setq pt10  (lhj_dxf dname 10)<br />               pt14  (lhj_dxf dname 14)<br />               ang   (angle pt14 pt10)<br />               pint  (inters pt (polar pt (+ ang lpi2) 1000) pt10 pt14 nil)<br />               ang   (angle pt10 pint)<br />               dlist (subst (cons 10 (polar pt10 ang lhj_dodis))<br />                            (assoc 10 dlist)<br />                            dlist<br />                     )<br />         )<br />         (entmod dlist)<br />   )<br /> <br />   (defun do_text ( / ali1 ali2 ang dlist pint pt10 pt11)<br />         (setq pt10  (lhj_dxf dname 10)<br />               pt11  (lhj_dxf dname 11)<br />               ang   (lhj_dxf dname 50)<br />               pint  (inters pt<br />                             (polar pt (+ ang lpi2) 1000)<br />                             pt10<br />                             (polar pt10 ang 1000)<br />                             nil<br />                     )<br />               dlist (entget dname)<br />               ang   (angle pint pt)<br />               ali1  (lhj_dxf dname 72)<br />               ali2  (lhj_dxf dname 73)<br />         )<br />         (if (and (= ali1 0) (= ali2 0))<br />           (setq        dlist (subst (cons 10 (polar pt10 ang lhj_dodis))<br />                              (assoc 10 dlist)<br />                              dlist<br />                       )<br />           )<br />           (setq        dlist (subst (cons 11 (polar pt11 ang lhj_dodis))<br />                              (assoc 11 dlist)<br />                              dlist<br />                       )<br />           )<br />         )<br />         (entmake dlist)<br />   )<br /> <br /> ;初始化程序=======<br />   (lhj_start)<br />   (defun *error* (msg)<br />     (princ "\n")<br />     (princ "\n:::lhj_tools:::")<br />     (princ msg)<br />     (princ ",程序退出!")<br />     (if        dname<br />       (redraw dname 4)<br />     )<br />     (lhj_end)<br />   )<br /> <br /> ;主程序===========<br />   (if (not lhj_dodis)<br />     (setq lhj_dodis 800)<br />   )<br />   (princ "\n:::LHJ_TOOLS:::请输入平移距离<")<br />   (princ lhj_dodis)<br />   (princ ">:")<br />   (if (setq temp (getreal))<br />     (setq lhj_dodis temp)<br />   )<br />   (setq loop t)<br /> <br />   <br /> <br />   (while loop<br />     (if(and (setq dname (car (entsel "\n:::LHJ_TOOLS:::请选择:")))<br />             (member (lhj_dxf dname 0)'("TEXT""DIMENSION""LINE""LWPOLYLINE""POLYLINE""SPLINE""ARC""CIRCLE""ELLIPSE"))<br />             (setq pt(getpoint"请点取offset方向:"))<br />          )<br />       (progn <br />        (redraw dname 3)<br />        (cond ((= (lhj_dxf dname 0) "DIMENSION") (do_dim))<br />             ((= (lhj_dxf dname 0) "TEXT") (do_text ))<br />             (t(command"offset" lhj_dodis dname pt ""))  <br />        )<br />       (redraw dname 4)<br />       )<br />       (setq loop nil)<br />     )<br />   )<br /> <br /> <br /> ;主程序结束=======<br /> <br />   (lhj_end)<br />   (princ)<br /> )<br /> [/font]<br />

haijiangl

多谢aeo兄鼓励及补充！

狂刀

文字和标注用move也可以阿

haijiangl

斜的文字呢？
标注offset后，与原标注的标记点位置是相同的，:)

xjlmlxbq

如果带属性的块也能offset就好了

huiling6868

加载输入命令显示错误.

huiling6868

加载输入命令显示错误.

烨006

用了之后，回味无穷呀！

zh_6531394

第二个好,但文本只能上下复制而不能左右复制

hardhardwind

命令太长了,能不能来个方便的短的命令!!!!

小钉子

程序没问题
但是只可以向垂直方向偏至可以自主输入角度吗
我觉得那样更好

狂刀

对于标注，一次可偏移多个是不是更好点？

coolzhb

最好能做到框选尺寸，自动等分间距就好了！

zh_6531394

为什么每次偏移距离都是 800 ,最好是上次输入的值