Info | File | ||
Tác giả: Tue_NV Bài viết gốc: 82060 Tên lệnh: sxt |
Viết lisp theo yêu cầu [phần 2]
Út sử dụng code này nhé : Út có thể thiết lập khoảng cách giữa các text bằng cách pick 2 điểm trên màn hình. Lúc đó khoảng cách giữa 2 điểm mà Út vừa Pick đó là khoảng cách Text Chúc vui vẻ
| ||
Tác giả: phamthanhbinh Bài viết gốc: 82067 Tên lệnh: ctc |
Viết lisp theo yêu cầu [phần 2]
Chào bạn Cadviet.MTV, Bạn xài thử lisp này xem có vừa ý không nhé. Chúc bạn vui.
| ||
Tác giả: Phiphi- Bài viết gốc: 82408 Tên lệnh: td |
Viết lisp theo yêu cầu [phần 2]
Thank you Bác, thôi thì Bác viết giúp em 1 cái Lisp mới vậy. Merry Christmas and Happy New Year! Lisp này có thể sửa lại để select các Circles và Line rồi ghi text như bản vẽ đã upload.
| ||
Tác giả: phamthanhbinh Bài viết gốc: 82519 Tên lệnh: tabc |
Viết lisp theo yêu cầu [phần 2]
Hề hề hề, Đúng là viết mới nhanh hơn sửa cái bác gửi bác phiphi ạ. Nó đây nè. Bác coi xem đã ưng ý chưa nhé. Ở bảng BEND LINE POINTS có dư một cột NOTES. Ấy là do mình lười không muốn căn lại cái bảng. Nếu bác muốn bỏ nó đi thì nên căn lại cái bảng cho nó đèm đẹp là được bác ạ. Chúc bác Giáng sinh vui vẻ. Hề hề hề.
| ||
Tác giả: phamthanhbinh Bài viết gốc: 82664 Tên lệnh: tabc |
Viết lisp theo yêu cầu [phần 2]
Chào bác Phiphi-, Hề hề hề, Hy vọng cái lisp này sẽ làm bác có được Giáng sinh xôm trò. Nó giải quyết được cả việc bác có nhiều BEND LINES. Tuy nhiên bác phải nhớ rằng các BEND LINES này dứt khoát phải là các LINE bác nhé. Bác mà xài BEND LINE bằng LWPOLYLINE hay POLYLINE là hỏng hết bánh kẹo đó nha. Nó cũng sẽ đưa hệ trục tọa độ về cái điểm chuẩn mà bác đã chọn.
| ||
Tác giả: phamthanhbinh Bài viết gốc: 82780 Tên lệnh: tabc |
Viết lisp theo yêu cầu [phần 2]
Hề hề hề, bác Phiphi- ơi, có phải bác muốn món quà này không nhỉ??? Mình loay hoay mất một chút mới làm được cái món quà này, hy vọng bác sẽ hài lòng. Có điều khi xài món quà này bác nhớ rằng cái plate contour của bác chắc chắn phải là một LWPOLYLINE bác nhé. Nếu không là bác tự chịu trách nhiệm đó chớ mình hổng có chịu đâu. Tại vì cái bản vẽ bác gửi thì...
| ||
Tác giả: thiep Bài viết gốc: 82839 Tên lệnh: repstring |
Viết lisp theo yêu cầu [phần 2]
Bác ba dùng đoạn lisp Thiep sưu tầm dùng để tìm và lập lại tất cả các kiểu Text này xem:
| ||
Tác giả: Phiphi- Bài viết gốc: 82845 Tên lệnh: ordy |
Viết lisp theo yêu cầu [phần 2]
Chào bác phamthanhbinh. Để hoàn thiện sản phẩm do bác viết và để mọi người sử dụng biết về nguồn gốc của LISP, PP đề nghị như sau: + Phần đầu có giới thiệu sơ qua mục đích của Lisp, disclaim và copyright của Bác. + Cuối Lisp có đoạn code để nhắc lại Lệnh của Lisp để User nhớ sử dụng. Bác tham khảo 1 Lisp dưới đây để hiểu thêm ý của PP. Góp ý...
| ||
Tác giả: thiep Bài viết gốc: 82931 Tên lệnh: scl |
Viết lisp theo yêu cầu [phần 2]
Chào bác SSG, Thiep xin góp 1 lisp khác theo hướng sử dụng hàm acet-geom-intersectwith trong expresstool Tip: nếu có 1 pline giao với n pline khác, nó sẽ bị scale n lần. Chương trình không kiểm tra việc đó, bạn phải tự chịu trách nhiệm lấy. SSG
| ||
Tác giả: Doan Van Ha Bài viết gốc: 184395 Tên lệnh: ha | |||
Tác giả: gia_bach Bài viết gốc: 83172 Tên lệnh: pid |
Viết lisp theo yêu cầu [phần 2]
Cám ơn các lời nhận xét của bác trinhvqh. (do chủ quan của nguời viết nên 1 số chi tiết chưa hoàn chỉnh) Gửi bác Lisp đã cập nhật theo các yêu cầu ở trên. về ý kiến : khoảng cách Text trong Table so với đường ngang bên dưới (hơi sát quá) - tương tự Text và dimension, CAD cung cấp TABLE STYLE để quản lý các đối tuợng Table. Do đó khoảng cách Text trong Table (do LISP...
| ||
Tác giả: thiep Bài viết gốc: 83267 Tên lệnh: addleader |
Viết lisp theo yêu cầu [phần 2]
Chào KTS dlong, yêu cầu này hình như bạn đã đăng 1 lần rồi thì phải, nó là đối tượng leader torence, chứ không phải block reference. dlong dùng lisp này thử, Thiep viết gần được 98%, lisp yêu cầu người dùng chọn gia số, số đầu tiên, Suffix , chiều cao text, người dùng pick 3 điểm để tạo 1 leader với text là torence. 2% còn lại chưa được là hình ảnh leader khi pick 3 điểm không hiện cùng...
| ||
Tác giả: gia_bach Bài viết gốc: 83276 Tên lệnh: rot |
Viết lisp theo yêu cầu [phần 2]
Hình như bác phamthanhbinh nhầm với yêu cầu của bạn khác ?! Trên CadViet chưa có Lisp : quay tất cả các text bên trong vòng tròn 1 góc nào đó, với tâm quay là tâm của vòng tròn đó. (không cần quay vòng tròn - vòng tròn quay đều quay mãi ... vẫn là .... vòng tròn) Bạn thử Lisp này :
| ||
Tác giả: gia_bach Bài viết gốc: 83298 Tên lệnh: rot |
Viết lisp theo yêu cầu [phần 2]
Gửi bạn Lisp quay tất cả đối tuợng trong đuờng tròn. (Tui e rằng mai mốt bạn lại yêu cầu quay thêm arc hay dimension ... ) Nhắc bạn : tại sao bạn không Upload file CAD (với file CAD mọi chuyện sẽ rõ ràng hơn). nguời sử dụng CAD lại dùng File Word (document) để thể hiện hình ảnh (image)
| ||
Tác giả: phamthanhbinh Bài viết gốc: 83311 Tên lệnh: mulro |
Viết lisp theo yêu cầu [phần 2]
Chào bạn nqt266, Dựa vào gợi ý của bác Gia bach, mình làm thử cái lisp này theo nguyên tắc giống như cái lisp gửi bạn muoild (để move nhiều đối tượng theo nhiều khoảng cách khác nhau). Cái lisp này sẽ cho bạn rotate nhiều nhóm đối tượng trong các vòng tròn lựa chọn mà mỗi nhóm quay theo một góc khác nhau. Nhưng bạn phải nhớ cái trật tự khi lựa chọn các vòng tròn và trật tự góc quay...
| ||
Tác giả: Tue_NV Bài viết gốc: 83386 Tên lệnh: mulro |
Viết lisp theo yêu cầu [phần 2]
Chào Phiphi. Lisp của anh gia_bach, anh PhamThanhBinh và của Tue_NV viết theo yêu cầu của bạn nqt266 và chỉ có thể Rotate các đối tượng nằm trong CIRCLE, chứ chưa làm với đối tượng Block có vòng tròn. Nếu bạn muốn sử dụng thêm Block thì sử dụng Lisp này của Tue_NV mới viết thêm. Mình chưa đáp ứng được yêu cầu của bạn là chọn Line thay vì phải nhập góc muốn quay vì dạo...
| ||
Tác giả: gia_bach Bài viết gốc: 83387 Tên lệnh: rob |
Viết lisp theo yêu cầu [phần 2]
Gửi bác Lisp quay Block thuộc tính tại điểm chèn. góc có thể nhập trực tiếp hoặc Pick 2 điểm.
| ||
Tác giả: Phiphi- Bài viết gốc: 83709 Tên lệnh: swap | |||
Tác giả: Tue_NV Bài viết gốc: 85033 Tên lệnh: scc |
Viết lisp theo yêu cầu [phần 2]
+Thứ nhất : Truongthanh thử đoạn code này thử nhé : + Thứ hai : lệnh Scaletext sẽ giúp cho truongthanh Truongthanh có thể đọc lệnh scaletext ở đây : http://www.cadviet.com/forum/index.php?sho...amp;#entry51051
| ||
Tác giả: Doan Van Ha Bài viết gốc: 184409 Tên lệnh: ha |
Trang 65/330