luongtienlanh
-
Số lượng nội dung
33 -
Đã tham gia
-
Lần ghé thăm cuối
Bài đăng được đăng bởi luongtienlanh
-
-
2 giờ trước, minhhung15142209@gmail.com đã nói:bạn thử lsp của cụ lee này:
Em thử rồi không được anh ạ.
LeeMac cũng nói là nó không chỉnh được cái offset factor của Dimensions "This argument is ignored for Dimensions, as the background mask for Dimensions does not support an offset factor. The argument is also ignored if the msk argument is nil."
- 1
-
Em không biết gì về Lisp nên nhờ các anh trợ giúp với ạ! :-((
-
Nhờ các anh sửa Lisp sau giúp em với ạ.
Em tìm được lisp dưới đây để tùy chỉnh kích thước của dimension background mask so với kích thước mặc định của autocad.
Tuy nhiên gặp vấn đề là Lisp này chỉ cho chọn 1 đối tượng trong 1 lệnh, nên khi chỉnh nhiều đối tượng sẽ mất rất nhiều thời gian. Nhờ các anh chỉnh giúp để sao nó có thể thực hiện cho nhiều đối tượng trong 1 lệnh với ạ.
Link bài viết thảo luận về chủ đề Lisp này:
Link tải Lisp của tác giả viết Lisp:
https://cadtips.cadalyst.com/2d-editing/adjust-dimension-text-masking
Em cám ơn các anh nhiều! -
10 phút trước, huunhantvxdts đã nói:Angbase bằng 0 bạn nhé
Em cám ơn bác. Bác bắt đúng bệnh rồi ạ! Chúc các bác cuối tuần vui vẻ!
-
UCS không bị xoay bác ạ.
-
Em chào các anh. Có một vấn đề liên quan đến góc quay của text em muốn nhờ anh nào biết chỉ giúp em với ạ.
Với các bản vẽ bình thường nếu để Rotation của text = 0 thì chữ sẽ nằm ngang. Nhưng không hiểu tại sao trong bản vẽ này em để Rotation của text = 0 thì text lại bị xoay dọc như vậy.Muốn để text nằm ngang thì phải chỉnh lại Rotation của text = 270.
Giờ em muốn khi để Rotation text = 0 thì text nằm ngang như bình thường thì phải làm như thế nào ạ?
Em cám ơn ạ.
-
Cám ơn bác Nguyen Hoanh, em cũng thường xuyên dùng Qselect nhưng không để ý có cái này.
-
Em có 1 tập hợp rất nhiều điểm point có Position Z khác nhau (Điểm mia đo cao độ) nhờ các pro viết giúp em lisp lọc đối tượng Point có Position Z nhỏ hơn hoặc lớn hơn một giá trị nào đó mình nhập vào.
Thứ tự thực hiện: Lệnh Pnho hoặc Plon -> nhập giá trị để so sánh lọc -> chọn tập hợp các điểm point -> kết quả chọn được các điểm point như mong muốn.
Em cám ơn các pro nhiều!
-
Em cám ơn bác Hà! Lúc đầu em mới nghĩ đến tình huống có 1 em xinh tươi thôi, nhưng hóa ra em nào cũng xinh nên em muốn hốt hết! Thế là lại phải phiền bác lần nữa! :)
-
Bác Doan Van Ha cho em nhờ thêm chút nữa ạ. Bác có thể chỉnh giúp em sao cho trong trường hợp có nhiều đối tượng có cùng Position Z nhỏ nhất hoặc cao nhất mình chọn 1 lúc tất cả các đối tượng cùng Position Z đấy không ạ? Em vừa dùng thử thì khi có nhiều point có Position Z bằng nhau thì phải lệnh nhiều lần để tìm được hết.
-
Em cám ơn bác Doan Van Ha ! Chúc bác sức khỏe!
-
Bản vẽ của em có 1 loạt điểm point với Position Z khác nhau. Em xin nhờ các bác viết lisp tìm điểm point có Position Z nhỏ nhất và lớn nhất trong các điểm point có trong 1 vùng lựa chọn nào đó.
Thứ tự thực hiện kiểu như sau:
- lệnh pmin -> quét chọn vùng chứa các điểm point -> kết quả chọn được điểm point có Position Z nhỏ nhất.
- lệnh pmax -> quét chọn vùng chứa các điểm point -> kết quả chọn được điểm point có Position Z lớn nhất.
Em cám ơn nhiều!
-
Đã Fix lỗi như mr Ketxu góp ý, bạn tải về dùng nhé
Cám ơn bác! Vẫn tải theo link cũ à bác?
-
Tại sao các yêu cầu này k làm Data Extraction nhỉ ^^
Mà ketxu thấy bác Dinhvantrang chưa set focus lại Excel và CAD sau khi export và Click double, chưa đặt Cancel = True trong action Doubclick, đúng k nhỉ :D
Em thử dùng lệnh DataExtraction trong cad lọc mà nó không có phần tích lọc giá trị của Dim bác ạ.
Với em thì cách làm của bac Dinhvantrang là đủ dùng rồi nhưng bác ketxu có phương án nào tối ưu hơn để em tham khảo không ạ?
- 1
-
Gửi bạn nhé.
https://drive.google.com/file/d/0B143PJiW5hQbZ2R6MTRWbThBMHM/view?usp=sharing
Ở cột ID (cột A) bajn double Click vào để Zoom tới cái Dim đó khi cần kiểm tra. Mình lấy các thông tin ra cho bạn như, Prefix, Length, Suffix, Dimstyle. Hy vọng đúng như bạn cần.
Cám ơn bác rất nhiều.
Bác xử lý còn tuyệt vời trên cả mức em mong đợi.
Chúc bác nhiều sức khỏe và công tác tốt!
- 1
-
Bạn cho kết quả ra thế nào đi, làm được nhưng cách chọn lọc kết quả như thế nào chứ, hay cứ xuất tạm ra excel rồi dùng lọc có sẵn trong Excel nhé
Cám ơn bác đã quan tâm. Kết quả em muốn dạng như sau hoặc tương tự ạ:
-
Công việc của em đang làm là Quy hoạch mạng lưới thoát nước mưa. Trong đó các thông số của cống em sử dụng Dimension như trong file Autocad đính kèm. Đại khái các Dimension của em sẽ gồm Prefix (tiết diện cống) + giá trị Dim (Chiều dài) + Suffix (độ dốc).
Giờ em muốn lập bảng excel thống kê Tổng chiều dài của từng loại cống. Em định lọc giá trị tiết diện cống và chiều dài (hoặc tổng chiều dài) tương ứng.
Các bác có thể giúp em viết lisp để xử lý bài toán này không ạ?
Hoặc là có thể xuất tổng giá trị các Dim của 1 loại Dim Style cũng được ạ.
Em không biết gì về Lisp cả nên phải đi nhờ em cũng ngại lắm.
Rất mong được các bác giúp đỡ. Em cám ơn nhiều ạ!
http://www.cadviet.com/upfiles/7/124491_kl_tnm_2.dwg
(Cấu trúc Dim của em thế này ạ)
- 1
- 1
-
vâng, em cám ơn bác :)
-
nhưng bác ơi bác có thể chỉnh sửa 1 chút là thêm cái lệnh xóa text nguồn sau khi copy nội dung xong không?
-
Cám ơn anh trinhhoanghieu090 1 lần nữa !
-
Các bác viết giúp em lisp gán nội dung của text này sang text kia mà không làm thay đổi các định dạng của text gốc được không ạ. giả sử text gốc là A, text kia là B, giờ muốn nội dung của A giống của B. Sau khi gán thì tự động xóa B đi. Xin cám ơn!
http://www.cadviet.com/upfiles/4/124491_xin_lisp_gan_noi_dung_text_1.dwg
- 1
-
tuyệt vời! Cám ơn bác trinhhoanghieu090 nhiều nhé!
-
http://www.cadviet.com/upfiles/4/124491_noi_suy_tim_duong.dwg
đây ạ. bác xem xử lý giúp em nhé. Cám ơn bác :)
-
Cám ơn bác thanhduan2407 đã quan tâm.Em đã test và hình như kết quả xuất ra tính theo khoảng cách giữa điểm đặt 2 text phải không ạ. Em muốn kết quả tính ra là theo khoảng cách giữa 2 điểm mình kích nên bác có thể chỉnh lại giúp em như thế này không ạ:kích điểm 1=> chọn text cao độ điểm 1 => kích điểm 2=> chọn text cao độ điểm 2=>kích điểm chèn=> cao độ nội suy. Cao độ nội suy tính căn cứ vào khoảng cách của các đoạn thẳng. Công thức tính cao độ nội suy theo điểm có cao độ cao hơn (giả sử là điểm 1): CD=CD1- {(CD1-CD2)*L1/L}. Trong đó:
CD: là cao độ điểm chèn cần tính; CD1 là cao độ điểm 1(điểm cao hơn); CD2 là cao độ điểm 2; L là khoảng cách giữa 1 và 2; L1 là khoảng cách giữa điểm chèn và 1. Cám ơn bác nhiều ạ!
[Nhờ sửa LISP] Dim Fill Resize
trong AutoLisp
Đã đăng · Trả lời báo cáo
Dạ em có chèn file ở trên bài rồi đấy ạ.