Tue_NV
-
Số lượng nội dung
4260 -
Đã tham gia
-
Lần ghé thăm cuối
-
Ngày trúng
288
Bài đăng được đăng bởi Tue_NV
-
-
Đúng là cad của mình khi nhấp cũng hiện ra cái bảng đó, 6 cột và 3 hàng và kết quả la 18 đối tượng trong mảng array
Và anh ketXu đã liên kết số 18 đó ra text bằng field
Mình vẫn có thể copy cái đó vào bản vẽ của mình và làm tiếp được
Nhưng có điều tự tạo thì chưa, vì không hiểu sao trong máy mình không có đối tượng cột & hàng của array khi dùng field, như hình vẽ ở #3.
Cám ơn bạn.
Đó là do CAD 2012 không có tính năng đó. Dùng CAD 2015 thì có!
-
Mình có bản vẽ trong đó có hiển thị các text. yêu cầu của mình là scale các text nhưng basepoint phải là tại tâm của các Text nhằm phục vụ cho in ấn. Xin nhờ các bạn trên diễn đàn giúp đỡ!
Bạn dùng lệnh SCALETEXT
-
2
-
-
Cần nhờ các Pro hỗ trợ giúp em Lisp Trim Dim khi cắt một đối tựng như hình mô tả đính kèm,
Dim bị chồng lên một đối tượng và mình cần cắt đoạn Dim bị chồng lên đối tượng đó. chân thành cảm ơn.
Bạn sử dụng lệnh Wipeout là được!
-
Thêm cách dùng JUSTIFYTEXT
(defun c:mc() (setq ss (ssget '((0 . "TEXT")))) (foreach en (acet-ss-to-list ss) (command "_txt2mtxt" en "" "JUSTIFYTEXT" "L" "" "MC") ) )
-
1
-
-
Không được mà :wacko:
Autocontrain với các đối tượng
File đính kèm:
-
mà vừa rồi bạn dùng Parametric nào nhỉ?mình nghịch chưa thấy :D
Autocontrain :)
-
Mình có tấm hình minh họa. Mong là đủ để diễn đạt ý mình và thêm nữa là con số 520 đó là do người dùng nhập.
Bạn cho thêm hình trước khi dùng Lisp và sau khi dùng Lisp thì sẽ rõ hơn.
Mình vẫn chưa rõ dữ liệu ban đâù của bạn là Line, Pline và Line hay Pine đó như thế nào? Nó đứng song song như hình bạn đã post?? Khi Lisp chạy thì quét 1 loạt, hay chỉ quét 2 thanh?
-
Chào diễn đàn
Cho em hỏi có cách nào để vẽ 1 đường thẳng cách gốc một khoảng x,y cho trước ko ạ
Vd:
gõ lệnh: line
Pick điểm gốc
Chọn khoảng cách x (vd 500) enter
Chọn khoảng cách y (vd 300) enter
thanks
Bạn dùng chế độ truy bắt From ...
-
Mình chỉ cần 1 lisp đơn giản như zậy, vì mình không hiểu gì về viết lisp nên không hình dung Lisp có thể làm được tới đâu. Nêu phamthanhbinh thấy được thì có thể giúp luôn. Giả sử có 3 khoảng cách theo phương dọc đều bằng 100 thì có thể nhập luôn 3*100 giống Tekla zậy đó.
Giả sử trường hợp nhiều khoảng cách như: 50- 100-100-100-65 thì nhập lần lượt là 50, 3*100, 65. :)
Bạn có thể dùng lệnh copym
Xác định trước bu lông đầu tiên góc trái dưới -> Copym
Bạn xem qua video
https://www.youtube.com/watch?v=XKUAA1vrgC8&feature=youtu.be
-
Bản vẽ của mình có rất nhiều các att block, bây giờ mình muốn thêm các tiền tố vào các giá trị trong các att block này thì phải chọn từng block, rất mất thời gian, không biết các anh em trên diễn đàn có lisp hay mẹo gì để chỉnh sửa một loạt các att block này không ạ!
Đây là hình vẽ cụ thể của mình.
Bây giờ mình muốn thêm các tiền tố như cái block số 3 vào cái 4 và 5 mà không cần chọn từng cái, hoặc có thể chỉnh sửa trực tiếp trên att gốc để khi mình xuất ra có thể như thằng số 3 luôn. Mong anh em trên diễn đàn giúp đỡ ạ.
Chaò bạn!
Bạn có thể sử dụng Lệnh Attout -> Xuất Att sang file txt -> Dùng hàm Excel để xử lý file txt (thêm tiền tố)
-> Dùng lệnh Attin để update file txt (đã thêm tiền tố cho Att) vào bản vẽ CAD
-
1
-
-
Đổi Màu Text
trong Sử dụng AutoCAD
ok. Đúng ý mình rồi. Thanks bạn!
Bạn tích hợp dùm mình đối với trường hợp dim luôn được không bạn. Không biết nên nhờ các bạn cũng thấy ngại lắm!
Có nguyên 1 topic Lisp đổi màu text sau khi sửa : (đối với cả 2 Trường hợp dim, text nằm ở trong bài viết số 29 ở Link dưới đây)
http://www.cadviet.com/forum/topic/14254-lisp-doi-mau-text-sau-khi-sua/page-2
-
làm cách nào để khi sử dụng lệnh khóa đối tuọng laylck đối tượng bị mờ đi vạy các bạn. Mình không biết điều chỉnh setting chỗ nào? mình dùng cad 2007
Bạn điều chỉnh setting ở đây:
Command: layiso
Current setting: Hide layers, Viewports=Off Select objects on the layer(s) to be isolated or [settings]: S
Enter setting for layers not isolated [Off/Lock and fade] <Off>: L
Enter fade value (0-90) <0>: 40
-
dạ ý e hỏi là chuyển nhanh 1 lần tất cả các field.chứ của e có tầm gần 100 cái,chuyển thế này chắc toi mất :(
Bạn tìm đọc lệnh ATTOUT và ATTIN sẽ được như ý nhé!
-
em muốn tính từng chủng loại. Ví dụ thép L63x5 bn mét, thép L80x6 bn, xà gồ bao nhiêu. quét qua phần block kia tổng hợp thành từng loại. Chuẩn bị thép để thi công.
Nếu thép bản mã thì tính trọng lượng thôi phải không bạn? Hay bản mã phải chia ra nữa: : ? bản mã, có kích thước ?
Vậy thì chắc phải viết Lisp
Ứng dụng của mình thì edit và tự update ATT thép hình. Nhưng tính tổng hợp theo từng chủng loại thì mình chưa nghĩ tới ....
-
có bác nào có cách chuyển nhanh tất cả các field của att thành text được không ạ.e tìm mãi mà không thấy có cách nào cả :wacko:
File trực quan đây ạhttp://www.cadviet.com/upfiles/5/146106_mau_block.dwg
Bạn chọn field -> Pick phải chuột -> Chọn convert field to text
-
Nếu đúng là ý tổng hợp thép hình thì chỉ cần khối lượng tổng cộng là đủ rồi.
Với mục đích để tính dự toán thì :
- Với tổng hợp thép tròn thì cần phân ra tính tổng khối lượng theo từng loại đường kính
- Còn với thép hình thì chỉ cần phân ra tính tổng thép cột, thép kèo, giằng, xà gồ là được
-
1
-
-
rất hay do tự động update lại. nhưng thống kê từng loại tiết diện tổng chiều dài, khối lượng riêng thì sao anh!
Chưa hiểu ý?
-
em biêt nó là block thuộc tính ATT, giống mấy lisp thép tròn ctk, hcad. Để tạo ra thì tốn công với mình chưa đủ trình nên tìm xem bác nào có share với
Với thống kê thép hình, thì có thể tạo bằng Field.
Mình Share cái này :
http://www.cadviet.com/upfiles/5/4652_share_tkth.dwg
Chỉ cần edit ATT màu vàng -> Save hoặc REGEN thì Thống kê thép hình tự update
Bạn đã từng xem video của mình Với lisp tác động lên thì toàn bộ ATT Thống kê thép hình tự cập nhật, Field cũng sẽ update luôn
-
Tìm trên mạng được http://www.cadviet.com/upfiles/5/21028_vikeo13m_chuan.dwg file vì kèo này. thấy phần thống kê thép hình rất hay. Dùng block thuộc tính lisp cad chứ không phải excel. bác nào biết chương trình gì chỉ với :)
Có thể dùng Lisp để thống kê. Bạn có thể tạo Block ATT bằng các field để thống kê thép hình
-
1
-
-
1.Cái tkt của mình sẽ không chỉnh sửa bất kỳ cái gì theo yêu cầu nửa. (Lười bản thân mình dùng thế là ok rồi).
......
Cũng thật tiếc, vì anh không phát triển nó nữa ^_^
Và vì thanh thép nó đóng trong Block rồi nên việc thống kê cho thanh thép có hình dáng bất kỳ là chưa thể
Chương trình của anh chỉ có thể thống kê thanh thép có hình dáng do anh "chỉ định" mà thôi!
-
Như thế này bạn ạ. Mình muốn xóa các đối tượng theo các dòng 2 và 3 như bản vẽ đính kèm. Thì có cách nào để xóa không ? Mình xem properties thì thấy các đối tượng text ở dòng 3 cùng Text Alignment Y = 125.3115 . và các line dọc ở dòng 2 có cùng start y và end y. Như thế mình có thể lọc các text có cùng tính chất như thế ra để xóa cho nhanh được không ? http://www.cadviet.com/upfiles/5/145898_trac_ngang.dwg
Cảm ơn bạn
Có thể dùng filter
Ví dụ Chọn các Text ở dòng 2 và dòng 3 trong bản vẽ :
-
Các bác cho em hỏi : em có một danh sách tên lst (mã đối tượng hatch):
Code:((-1 . <Entity name: 7ef96030>) (0 . HATCH) (330 . <Entity name: 7ef9e6e8>) (5 . 1DE7E) (100 . AcDbEntity) (67 . 0) (410 . Model) (8 . 002) (62 . 4) (6 . Continuous) (370 . 0) (100 . AcDbHatch) (10 0.0 0.0 0.0) (210 0.0 0.0 1.0) (2 . SOLID) (70 . 1) (71 . 0) (91 . 1) (92 . 1) (93 . 1) (72 . 2) (10 -183701.0 1320.67 0.0) (40 . 7.0) (50 . 0.0) (51 . 6.28319) (73 . 1) (97 . 0) (75 . 0) (76 . 1) (98 . 1) (10 0.0 0.0 0.0) (450 . 0) (451 . 0) (460 . 0.0) (461 . 0.0) (452 . 0) (462 . 0.0) (453 . 0) (470 . ))em muốn lấy tâm của đối tượng này là (-183701.0 1320.76 0.0) em sử dụng hàm: (cdr (ssoc 10 lst))nhưng kết quả dc đoạn list ( 0.0 0.0 0.0) tức là đoạn list (10 0.0 0.0 0.0) ở trên.các bác giúp em lấy đoạn tâm với ( màu đỏ)Bạn có thể sử dụng:
(cdr (assoc 10 (member (assoc 2 lst) lst)))
-
1
-
-
Cám ơn bác đã chỉ giáo, đúng là theo hướng này có thể giải quyết được vấn đề của chủ thớt. Chỉ có điều (+ - * / sin cos hơi loằng ngoằng), vả lại khi kích thước mương thay đổi thì phải thay đổi trong lisp 1 tý.
Đường biên nó là 1 Pline (màu số 8) nằm trong Block đó bạn
-
Mình sẽ lấy tọa độ các đỉnh theo tọa độ của các đỉnh đường đáy rãnh, cái này làm được.
Mục đính của mình là để tính KL đào rãnh nên không được xóa các đường pline của khuôn rãnh.
Tue_NV xem lại giúp lisp "uppl" không cập nhật được tọa độ cho đường pline. khi chạy thì list "lst-dinh-des" nhận được giá trị dịch tọa độ 1 khoảng X=1.0 Y=1.0, hình như hàm "subst" chưa tác động vào biến ent thì phải?
Bạn thử lại xem nhé!
Nếu không được, bạn upload file mình xem
(defun c:uppl(/ e ent lst-dinh-res lst-dinh-des) (setq e (car(entsel "\nChon PLINE :"))) (setq ent (entget e)) (setq lst-dinh-res (vl-remove-if-not '(lambda(x) (= (car x) 10)) ent)) (setq lst-dinh-des (mapcar '(lambda(x) (list (car x) (+ (cadr x) 1.0) (+ (caddr x) 1.0) 0.0)) lst-dinh-res)) (mapcar '(lambda(x y) (setq ent (subst x y ent))) lst-dinh-des lst-dinh-res) (entmod ent) )
Nhờ Viết Lisp
trong AutoLisp
Đã đăng · Trả lời báo cáo
Không hiểu bạn à!
Khoảng cách copy là khoảng cách tính từ điểm nào đến điểm nào? Chứ sao lại là khoảng cách tính từ đối tượng vừa được copy trươc đó????