Info | File | ||
Tác giả: congdung04 Bài viết gốc: 101562 Tên lệnh: sapxep |
Viết lisp theo yêu cầu [phần 2]
Rất cảm ơn bác đã nhiệt tình giúp đỡ nhưng bác có thể đơn giản hóa lisp này hơn chút nữa không ạ, cụ thể là không cần nó phải ra cả một cái bảng mà trong đó không có chữ nào mà chỉ cần nó cho ra một cột gồm tất cả các text đã chọn (mỗi hàng một đối tượng text đã chọn - như thể là...
| ||
Tác giả: gia_bach Bài viết gốc: 101588 Tên lệnh: sapxep |
Viết lisp theo yêu cầu [phần 2]
Muốn đơn giản hóa ?! có ngay LISP sắp xếp theo cột.
| ||
Tác giả: Nguyen Hoanh Bài viết gốc: 101241 Tên lệnh: fu |
Giúp chuyển text từ cad sang Excel?
Đúng là AutoCAD thao tác với unicode rất khó khăn. Dưới đây là lisp để biến file txt của bạn thành file txt unicode (mở bằng Wordpad hoặc MS Word). Tuy nhiên không triệt để bởi vì Autolisp không thể tạo ra một dấu xuống dòng unicode được. chính vì vậy, tạm thời dấu xuống dòng được biến thành dấu chấm phẩy ( ; ) vào trong word hoặc excel bạn biến nó thành ngắt dòng sau.
| ||
Tác giả: gia_bach Bài viết gốc: 101556 Tên lệnh: sxt |
Viết lisp theo yêu cầu [phần 2]
Bạn sài tạm : Lisp lập một bảng thống kê danh mục bản vẽ cho đối tượng text độc lập.
| ||
Tác giả: VUVUZELA Bài viết gốc: 100741 Tên lệnh: wipe |
Lisp nối Line thành Pline ?
Bác có thể dùng đoạn lisp này để đổi bất kỳ elisp hay Circle thành đường Pline
| ||
Tác giả: Nguyen Hoanh Bài viết gốc: 100917 Tên lệnh: fixtext |
Chuyển text từ mã font %% sang text thường
Một vài file CAD có định dạng Text trong file được tạo nên từ các ký tự Ascii có cấu trúc %%xxx. Chính vì vậy hiển thị trong CAD vẫn ngon lành, tuy nhiên nội dung của text là lộn xộn. Lisp này giúp bạn sửa lỗi text trên
| ||
Tác giả: Tue_NV Bài viết gốc: 100733 Tên lệnh: nn |
Lisp nối Line thành Pline ?
Hề hề, có 1 dấu tick Thanks, bạn tick vào đó là được mờ. NgocSon hãy thử code này : Bạn pick vào 1 trong các line, arc, pline nào đó -> là nó tự tìm các đoạn liên kết được để nối và các đoạn này có cùng tên layer. Tên Layer này được lấy theo đối tượng mà bạn đã pick. OK? Đây là code Hy vọng trúng ý của bạn
| ||
Tác giả: gia_bach Bài viết gốc: 100367 Tên lệnh: edatt |
LISP voi thuoc tinh
Bạn tham khảo Lisp : Cập nhật Text ATT trong Block thuộc tính.
| ||
Tác giả: Thaistreetz Bài viết gốc: 100287 Tên lệnh: rb |
Viết lisp theo yêu cầu [phần 2]
Nếu cần ngay thì bạn dùng tạm code này. mình không có thời gian làm hộp thoại cho bạn.
| ||
Tác giả: Truongson2006corp Bài viết gốc: 5760 Tên lệnh: noi |
Diễn giải các lệnh trong 1 file Autolisp
Mình có một đoạn Lisp, mìnhđọc mãi không hiểu lắm nhờ các bạn giải thích giúp mình. Một số lệnh trong Lisp mình đã đọc ở phần Help của Lisp nhưng mình vẫn không hiểu. Vì mình vừa mới nhập môn Lisp. Có bạn nào có tài liệu về giải thích các lệnh trong Lisp không, nếu có gửi cho mình với. Cám ơn các bạn nhiều. Sau đây là đoạn Lisp mình nhờ các bạn giải thích dùm:
| ||
Tác giả: phamngoctukts Bài viết gốc: 110218 Tên lệnh: taob |
TÁCH BLOCK TỪ FILE!
Của bác đây. lệnh taob chọn block muốn tạo thành file mới. các file mới được tạo ra trong thư mục c:\wblock
| ||
Tác giả: phamthanhbinh Bài viết gốc: 168090 Tên lệnh: tpg |
(Yêu cầu) Lisp tìm phân giác góc lơn nhất tạo bởi các đoạn thẳng đồng qui
Hề hề hề, Bác Trungngamy thử xài cái này xem có ưng ý không nhé. Mình mới viết cho trường hợp là các line đồng quy, còn các polyline thì chưa xét. Nếu bác thấy cần thì mình sẽ bổ sung sau. Chúc bác vui...
| ||
Tác giả: ketxu Bài viết gốc: 168112 Tên lệnh: gd |
Gióng đường kẻ Dim
Sử dụng cùng bộ với Lisp Cắt chân dim sẽ tạo ra các đường dim thẳng đẹp xinh :)
| ||
Tác giả: gia_bach Bài viết gốc: 165863 Tên lệnh: exptxt |
Giúp chỉnh sửa lisp xuất tọa độ và cao độ sang text
Do file CAD của bạn set biến hệ thống DimZin = 8 nên CAD cắt bỏ các chữ số zero không có nghĩa phần chữ số thập phân. (khi biến hệ thống DimZin khác 8 -> K/quả có hiển thị số 0 sau dấu phẩy) Sửa lại cho bạn :
| ||
Tác giả: phamthanhbinh Bài viết gốc: 168189 Tên lệnh: glt |
Lisp tính lý trình các điểm trên 1 polyline/line
Hề hề hề, Của bạn đây. Hy vọng bạn sẽ hài lòng với lần sửa này; Chúc bạn luôn vui khi tham gia diễn đàn cùng mọi người.
| ||
Tác giả: phamthanhbinh Bài viết gốc: 119619 Tên lệnh: pkp |
You can order them on the spot with much confidence as most of the reputed online sellers give you 12-month warranty on buying these entertainment systems.
Chào bạn Nghia_XD, Bạn xài thử cái này xem có đúng ý không nhé, nếu không ổn hãy post lên.
| ||
Tác giả: phamthanhbinh Bài viết gốc: 51606 Tên lệnh: ptest |
help: làm sao để chia một đường polyline thành các đoạn có chiều dài khác nhau?
Chào bạn manhhuy1984, Bạn dùng thử cái lisp này xem có đúng ý bạn không nhé. Có gì chưa đúng post lên để mình xem lại. Bạn lư ý là lisp này chèn cái block b trên bản vẽ bạn post. Nếu bạn muốn chèn một block khác thì bạn sửa lại tên nó trong hàm insert hoặc thay vào đó là một hàm chọn tên block bạn nhé. Hơn nữa vì mình xài cái block cũ của bạn nên bạn đã đặt điểm chèn của...
| ||
Tác giả: Tue_NV Bài viết gốc: 168299 Tên lệnh: gdclnil%0D%0A | |||
Tác giả: phamthanhbinh Bài viết gốc: 168357 Tên lệnh: gcdtn |
lisp tạo ra các điểm point lấy gt từ trắc dọc
Hề hề hề, Giờ thì mọi việc có vẻ sẽ thuận lợi hơn. Dựa theo bản vẽ bổ sung của bạn mình viết thử cái lisp này để bạn dùng xem có cần bổ sung hay sửa chữa gì thêm không nhé. Chúc bạn vui.
| ||
Tác giả: ssg Bài viết gốc: 11320 Tên lệnh: gp |
lấy thuộc tính từ block
Thông cảm với bạn vì attrib block là đối tượng phức tạp. Bạn mới làm quen với entity, lại chọn đúng cái phức tạp mà "chơi" nên lúng túng cũng phải! Đoạn lisp sau lấy ra được các thuộc tính từ attrib block có tên "caodomoc" trong bản vẽ của bạn. Kết quả nhận được là: p: toạ độ điểm chèn block, kiểu point (list có 3 thành phần) CD_TN: cao độ hiện trạng, kiểu string
|
Trang 52/330