Tổng hợp lips Autocad [Update]

Mã hóa text trong bản vẽ

Mã hóa (encrypt và decrypt) các text trong bản vẽ?
từ 1 chuỗi text ta có thể cắt rời từng ký tự sau đó thay thế và mã hóa các đối tượng này.
download1

download2


Nối các điểm chèn text bằng các đoạn thẳng
Trên màn hình có các đối tượng là text có ghi các mã điểm (mã điểm có thể định dạng theo: 001, 002, 003 hoặc 1), 2), 3) .v. .v.) tiện ích nối text sẽ thực hiện: khi chọn các text ghi các mã điểm này, lọc các text trong cùng một layer, hỏi mã điểm cần nối, sau đó nối các điểm chèn của text thành những đoạn thẳng theo thứ tự của người sử dụng nhập vào (ví dụ: người sử dụng type tại dòng command : nối điểm 001,002,003 ta sẽ vẽ được 1 đoạn thẳng mà điểm bắt đầu là điểm chèn của text thứ nhất, nối điểm 2 và kết thúc tại điểm chèn của text thứ 3).
Download


Cố định giá trị Dim, để scale hình thì giá trị Dim không đổi
Lisp này biến giá trị dim thành text, khi di thay đổi kích thước, vị trí chân dim thì giá trị vẫn không thay đổi.
Download


Lệnh ẩn, hiện đối tượng được chọn
Thay vì ẩn theo layer của AutoCAD chuẩn, lệnh Invis của lisp sẽ ẩn đối tượng được chọn, lệnh Vis sẽ hiển thị toàn bộ đối tượng đã ẩn.
Download


Lisp tính diện tích và chèn giá trị vào vòng tròn ký hiệu
Lệnh là DSA hoặc SA, tính diện tích của một đối tượng hoặc một miền rồi ghi diện tích vào giữa vòng tròn diện tích.
Cách sử dụng: Download file Dientich.zip rồi bung nén toàn bộ file vào thư mục support của AutoCAD (bạn cần phải làm điều này vì chương trình trên có sử dụng các file block dwg và file slide sld). Sau đó, load file dientich.vlx lên.
Download


Scale đối tượng theo 1 trục (X hoặc Y hoặc Z)
Dùng lệnh XSC hoặc XSCALE sẽ như lệnh Scale, nhưng các đối tượng chỉ scale theo một trục thay vì cả 3 trục như lệnh Scale.
Download

Đánh chữ theo thứ tự
Em vẽ thang mà cứ ngồi FIX từng số 1 của text rất khó chịu. lisp đánh chữ giúp bạn giảm được sự nhàm chán này. Lệnh là DCHU, khi dùng lệnh chỉ cần pick các text theo đúng thứ tự. Có thể dùng tham số f(ence) để chọn cho nhanh theo thứ tự.
Download


Save file hiện tại vào 1 chỗ để lưu, phòng khi sau này dùng lại
Trong quá trình bạn vẽ, bạn gặp phải 1 sự thay đổi. Bạn muốn save file lại để phòng sau này cần phải revert. Bạn làm gì? Thông thường, chúng ta sẽ save as sang 1 file khác, đặt tên theo số. Ví dụ MBT3_1, MBT3_2,… Nhưng có 1 nhược điểm là khi bạn vẽ bản vẽ có sử dụng ánh xạ Xref, nếu tên file bị thay đổi, hệ thống ánh xạ theo tên sẽ gặp vấn đề. Lisp dưới đây để giải quyết trường hợp trên. Lệnh OSAVE của nó sẽ Save As Copy file hiện hành vào thư mục có tên là OLD nằm cùng thư mục với bản vẽ hiện hành. Tên file sẽ là TENFILEGOCxxx, trong đó xxx là 3 số sẽ được tự động thêm vào sau mỗi lần dùng lệnh OSAVE. Bạn nhớ rằng lệnh OSAVE không hề thực hiện lệnh Save hay Save As bản vẽ hiện hành. Vì vậy khi tắt CAD, bạn cần phải save nếu không muốn mất dữ liệu (tất nhiên là nếu mất thì sẽ revert từ thư mục OLD được). Tên file gốc không hề thay đổi khi sử dụng lệnh OSAVE.
Download


Tính tổng chiều dài các đối tượng
Tính tổng chiều dài của các đối tượng được chọn.
Download


convert anonymous block to normal block
AutoCAD không cho chỉnh sửa block anonymous (là block có tên đầu bằng *, vd *U123).
May thay, tìm kiếm được lisp đổi block anonymous sang block bình thường tại trang http://www.draftsperson.net:
Download


Xoay thuộc tính trong block
Lệnh XO của lisp dưới đây sẽ xoay góc nghiêng của Attribute Block về 0.
Download


Thống kê tấm ốp
Khi phải làm một công việc nhàm chán trong AutoCAD là đếm xem trên mặt đứng của một ngôi nhà, có bao nhiêu loại tấm ốp, mỗi tấm ốp có kích thước bao nhiêu, và bao nhiêu tấm mỗi loại. Trên mặt đứng, mỗi tấm là một Polyline được tạo bằng lệnh rectangle (có 4 cạnh).
Download


Đánh cốt trên mặt cắt tự động
Bạn đã bao giờ mệt vì phải tính toán để đánh cốt cao độ của mặt cắt và mặt đứng hay chưa? vừa phải tính xem từ điểm cần tính đến cốt 0.00 có khoảng cách h bao nhiêu, rồi lại nhập vào bản vẽ. Bây giờ, bạn có thể làm điều này một cách nhanh chóng và tự động nhờ vào lisp dc của cadviet. với lisp này, bạn chỉ cần gõ lệnh dc, chương trình sẽ hỏi bạn điểm bạn cần đánh cốt, sau đó chương trình sẽ chèn ký hiệu cốt vào đúng vị trí và giá trị mà bạn cần. Bạn dùng lệnh cot00 để định nghĩa điểm có cao độ là cot00. Để sử dụng lệnh, trước tiên phải copy file cot.dwg vào thư mục support – Đây là file chứa nội dung của ký hiệu cốt. Sau đó appload file danhcot.lsp để sử dụng lệnh. Lưu ý: Với mỗi file DWG mà bạn vẽ, bạn phải đặt lại biến ATTDIA về 0 trước khi dùng lệnh DC (chỉ cần đặt 1 lần cho mỗi file).
Lisp file Download
DWG file Download


Move 1 đối tượng text vào chính giữa 1 rectang
Lệnh này di chuyển một đối tượng text cân vào giữa một hình rectangle.
Download


Vẽ 3D thang bằng lisp
Bạn mệt mỏi khi phải dóng để vẽ mặt đứng thang phức tạp? Hãy để lisp tính thang của CADViet giúp bạn phần nào. Bạn copy đoạn code dưới đây vào file một file lisp rồi appload lên và dùng lệnh tinhthang.
Download


Nối Line, Arc, Pline thành Pline
Khi dùng lệnh nn, chỉ cần pick 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
Download

Scale block và text theo điểm chèn đối tượng
Bạn đã từng gặp trường hợp phải scale đối tượng block và text theo điểm chèn của nó? lệnh SB và STE trong lisp này giúp bạn điều đó.
Download


Tính giá trị của công thức viết trên đối tượng text.
lisp này với lệnh caltxt có tác dụng thay thế một đối tượng text chứa công thức bằng giá trị của công thức đó. VD: text có giá trị: (1+2-3+4*5)/6 sẽ được thay bằng 3.3333
Download


Dọn dẹp các file dwg trong cùng thư mục của bản vẽ hiện hành.
Giả sử trong folder (.dwg) có bản vẽ kiến trúc và các file writeblock để xuất sang max. Sau khi làm xong 1 phần nào đó sẽ có rất nhiều các writeblock đc tạo ra. Vậy làm thế nào để xoá tất cả các file (.dwg) trong cùng 01 folder ko? Lệnh DWGCleanup sẽ làm điều này. Chương trình cho phép bạn chọn các file DWG cần xóa.
Download


Tính diện tích một miền bằng cách pick điểm
Khi muốn tính diện tích của vùng bao quanh một điểm, tức là khi ta bấm vào một điểm thì cad sẽ tự chọn một vùng kín bao quanh điểm đó để tính diện tích. Lệnh DTM sẽ thực hiện điều này.
Download


Tạo danh mục từ các block khung tên đã vẽ.
Chương trình này sẽ tự động đánh danh mục với điều kiện khung tên là 1 block có thuộc tính, thuộc tính đầu tiên là ký hiệu bản vẽ, thuộc tính thứ 2 là tên bản vẽ, các thuộc tính tiếp theo chương trình sẽ bỏ qua. Cách sử dụng:
- Lệnh TSDM (thông số danh mục) để cài đặt thông số cho danh mục. Bao gồm: Chỉ định tên file text chứa dữ liệu của chương trình (bất kỳ tên gì và ở đâu, miễn không writeprotect. Bạn nên giữ nguyên mặc định của chương trình), tên block khung tên mà bạn đang sử dụng.
- Lệnh DANHMUC để ghi dữ liệu toàn bộ các khung tên được chọn vào file text dữ liệu.
- Lệnh TAODANHMUC để tạo bảng danh mục gồm 3 cột như bạn yêu cầu, mỗi hàng là 1 bản vẽ. Thông tin để tạo danh mục được lấy từ file text dữ liệu.
Như vậy, mỗi dự án bạn sử dụng TSDM một lần. Với mỗi file muốn thêm tên bản vẽ vào file text dữ liệu, bạn sử dụng lệnh DANHMUC 1 lần. Và cuối cùng, khi muốn kết xuất các dữ liệu tên bản vẽ thành bảng, bạn sử dụng lệnh TAODANHMUC.
Download


Matchprop bề dày (width) của pline lệnh
CTN giống matchprop nhưng ở dạng sau: khi chọn 1 đừơng line đã có độ dày (width) và khi chọn đừơng khác thì những đường đó sẽ có độ dày đúng như độ dày của đường đích ban đầu.
Download


Lệnh thay đổi chiều dày pline
Thay đổi chiều dày của Pline nhanh chóng.
Download


Đánh số vào các điểm point
Lisp dưới đây thực hiện chức năng sau:
- Cho phép chọn một tập hợp điểm (points) bằng chuột.
- Chỉ định số bắt đầu.
- Lisp sẽ tự động đánh số thứ tự theo chiều tăng dần của X rồi đến Y, nghĩa là từ trái qua phải rồi từ dưới lên trên.
Download


Lisp vẽ tường
Có 3 lệnh dưới đây thực hiện các chức năng:
1. lệnh CVT: vẽ tường cân từ một line hoặc pline. Đầu vào: đối tượng (poly)line, chiều dày tường.
2. lệnh CVTL: vẽ tường lệch từ một line hoặc pline và bề dày. Đầu vào: đối tượng (poly)line, phía offset, khoảng cách offset, chiều dày tường.
3. lệnh CVTRIM: cắt bỏ đoạn line giao nhau giữa 2 tường. Đầu vào: 4 đường, chia làm 2 cặp. Mỗi cặp thể hiện một tường.
Download


Thay text theo định dạng
Lệnh RTF của chương trình dưới đây sẽ thực hiện thay text theo cấu trúc. Ví dụ: D3-16(22×50) sẽ thay bằng D13-16(22×50) khi nhập cấu trúc D*-
Chương trình sẽ yêu cầu nhập vào:
- từ đứng trước: là cụm từ nhận dạng đứng đằng trước từ cần thay. trong ví dụ của Jin, từ này có thể là ‘D’.
- từ đứng sau: là cụm từ nhận dạng đứng đằng sau từ cần thay. trong ví dụ của Jin, từ này có thể là ‘-16(220×50)’ hoặc ‘-16′ đều được.
- từ mới muốn thay: là từ muốn thay vào giữa hai cụm từ nhận dạng trên. Trong ví dụ của trên, từ này là ’13′.
- các text cần thay: chọn các text cần thay.
Các giá trị này được lưu lại, nếu các lần dùng lệnh sau mà không muốn thay đổi giá trị, chỉ việc nhấn enter lúc chương trình hỏi.
Download



Đếm số lần xuất hiện của một cụm từ trong các text được chọn
Lisp yêu cầu nhập cụm từ sau đó nhập điểm chèn trên màn hình, hiện ra kết quả là số lượng cụm từ đó đã tìm thấy là bao nhiêu.
Download


Dàn khoảng cách các hàng dim đều nhau
Khi phải ngồi căn lại khoảng cách giữa các dòng dim cho nó bằng nhau và cảm thấy hơi vất. Bạn muốn có 1 lisp có thể tự động căn chỉnh khoảng cách các dòng dim bằng nhau. ví dụ:- có 3 hàng dim (dim mặt bằng, có khoảng cách không bằng nhau ). Khi dùng lisp sẽ tự động căn chỉnh khoảng cách giữa các hàng dim bằng nhau. Chương trình yêu cầu nhập 1 đường dim làm gốc và chọn các đối tượng dim khác để dàn từ đường dim gốc này.


Là đối tượng có Z khác 0 về 0
Thật khó chịu khi vẽ một bản vẽ mà các đối tượng không nằm trên một mặt phẳng. Nhiều lệnh không thể thực hiện được, các thông số cứ lộn xộn hết. Làm thế nào? Bạn có thể dùng lệnh FLATTEN của AutoCAD nhưng lệnh này sẽ làm vỡ hết đối tượng của bạn. Một giải pháp khác đó là lệnh SUPERIRON của CADViet. lệnh này sẽ là tất cả các đối tượng về mặt phẳng xOy.
Download



Thiết kế sáng tạo

Add comment


Security code
Refresh