Info | File | ||
Tác giả: aliosa Bài viết gốc: 85149 Tên lệnh: tag |
Viết lisp theo yêu cầu [phần 2]
Xin nhờ các bạn chỉnh giúp mình lisp sau: Minh đang viết một lisp để lấy các giá trị TAG của ATT trong block. Nội dung: Nhưng khi chạy thì em thấy có gì đó không ổn. Vậy nhờ các bạn chỉnh lại giúp mình !
| ||
Tác giả: phamthanhbinh Bài viết gốc: 85428 Tên lệnh: gtb |
Viết lisp theo yêu cầu [phần 2]
Chào bạn aliosa, Cái lisp của bạn mình chưa hiểu hết nên không dám chỉnh sửa gì cả. Bạn thử xài cái lisp này xem có thỏa mãn yêu cầu của bạn không nhé. Nếu có gì chưa ổn hãy post lên diễn đàn và mọi người sẽ xem và sửa chữa lại bạn nhé. http://www.cadviet.com/upfiles/2/laythuoctinhblock.lsp Chúc bạn vui.
| ||
Tác giả: phamthanhbinh Bài viết gốc: 85486 Tên lệnh: gtb |
Viết lisp theo yêu cầu [phần 2]
Bạn xem đoạn lisp sau đây, mình đã bổ sung theo yêu cầu của bạn. Không biết đã đúng chưa, bạn chạy thử nhé. Có thể kết quả in ra là thừa so với yêu cầu của bạn, nếu vậy những cái thừa bạn có thể lược bớt nhé. Chỉ cần xóa dòng code (princ "các kết quả thừa đi") bạn ạ Ví dụ bạn muốn bỏ cái list của các giá trị thuộc tính thì bạn xóa dòng code (princ...
| ||
Tác giả: Tue_NV Bài viết gốc: 87961 Tên lệnh: scd |
Viết lisp theo yêu cầu [phần 2]
Lisp này Tue_NV đã từng viết cho truongthanh rồi. Chỉ cần sửa lại 1 chút là được. Thử nhé : @svba : Dữ liệu input mình định nhập theo cách nào? Nhìn vào file .dwg mà svba đã upload có thể hiểu được ý định của em. Nhưng nhìn hình thứ 3 bên phải thì mấy cái hình phức tạp được vẽ như thế nào? Svba có thể nói rõ hơn về cái dữ liệu Input được không?
| ||
Tác giả: Tue_NV Bài viết gốc: 88037 Tên lệnh: dstt |
Viết lisp theo yêu cầu [phần 2]
Chào svba1608 Anh thấy Polyline đó bo góc chứ không phải vát góc. Hai khái niệm vát góc và bo góc đó khác nhau. Lisp sửa lại cho em đây : Command: dstt Chon ky tu can them phia truoc : -> Nếu có nhập thì nhập vào, nếu không nhập thì enter Chon ky tu can them phia sau : -> Nếu có nhập thì nhập vào, nếu không nhập thì enter Nhap so bat dau < 2.00 > : 1 gia so < + / -...
| ||
Tác giả: Nguyen Hoanh Bài viết gốc: 88639 Tên lệnh: lbd |
Viết lisp theo yêu cầu [phần 2]
Svba dùng lisp LBD (Lập Bản Đồ), chương trình sẽ yêu cầu Svba pick chọn 3 điểm. 2 điểm đầu (p1, p2) để xác định miền chữ nhật chứa bản đồ, điểm thứ 3 (p3) là tọa độ để chèn bảng. Các vấn đề còn lại lisp sẽ tự hiểu, giám thị không cần giải thích gì thêm .
| ||
Tác giả: Nguyen Hoanh Bài viết gốc: 88702 Tên lệnh: lbd |
Viết lisp theo yêu cầu [phần 2]
Sorry, Lisp dưới đây sẽ khắc phục nhược điểm trên (lỗi xảy ra do layer hiện hành là sttkhu):
| ||
Tác giả: phamthanhbinh Bài viết gốc: 89189 Tên lệnh: gkc |
Viết lisp theo yêu cầu [phần 2]
Chào Svba1608, Hy vọng rằng cái này đúng ý bạn http://www.cadviet.com/upfiles/2/svba.lsp Lệnh chạy lisp là gkc. Khi chạy lisp, mỗi khi bạn trả lời "y" và nhấn enter, lisp sẽ dừng để bạn pick hai điểm theo ý bạn và lisp sẽ ghi kích thước này vào bảng, khi muốn dừng bạn trả lời "n" và nhấn enter khi lisp hỏi hoặc chỉ cần nhấn enter. Chúc bạn vui.
| ||
Tác giả: phamthanhbinh Bài viết gốc: 89209 Tên lệnh: gkc |
Viết lisp theo yêu cầu [phần 2]
Chào bác Tue_nv và bạn svba1608, Ý 1 và 2 của bác, mình nhất trí, song có điều sau khi nhập khoảng cách lại phải đặt chế độ osnap về 0. Ý 3 của bác mình chưa hiểu rõ, nếu là để thực hiện yêu cầu cho phép hai kiểu nhập khoảng cách khác nhau nhừ bạn svba đề nghị thì theo mình có thể dùng hàm điều kiện if sẽ hay hơn bác ạ. Gửi bác và bạn SVBA1608 cái lisp mình đã sửa...
| ||
Tác giả: thiep Bài viết gốc: 89689 Tên lệnh: svba |
Viết lisp theo yêu cầu [phần 2]
Sorry svba, Thiep đã xóa 3 dòng khi đã hoàn chỉnh bây giờ thì chép lại cho svba đây:
| ||
Tác giả: Tue_NV Bài viết gốc: 89717 Tên lệnh: ktra |
Viết lisp theo yêu cầu [phần 2]
Check thử cho svba đây : http://www.cadviet.com/upfiles/2/a_4_1.dwg Khi sử dụng Lisp của bác Thiep thì các đường nối 2 điểm nút phải cắt qua Text Nút, nếu không cắt thì không thử được. Hơn nữa -> để Lisp chạy đúng chiều mũi tên (từ điểm nút này đến điểm nút kia) thì nút đầu phải trùng với Startpoint; nút cuối phải trùng với Endpoint. Lisp sau sẽ giúp svba KTRA những...
| ||
Tác giả: thiep Bài viết gốc: 89747 Tên lệnh: svb |
Viết lisp theo yêu cầu [phần 2]
Chào svba, A Thiep thấy có sự khác nhau về câu hỏi: lisp của anh hỏi: "Chon do cao text <20> :" Còn lisp svba chạy thì hỏi: "Chon do cao text : " là sao vậy sao kà! Thôi thì svba tạm thử lại lisp svb.lsp này xem. Nên nhớ cài Express tool nhé
| ||
Tác giả: phamthanhbinh Bài viết gốc: 90215 Tên lệnh: lb2 |
Viết lisp theo yêu cầu [phần 2]
Chào bạn Sucuph, Bạn xài thử lisp này xem sao nhé. Mình chạy thử với LWPOLYLINE thì Ok, nhưng chưa thử với POLYLINE. Nếu có gì chưa ổn hãy post lên nhé. Hề hề hề
| ||
Tác giả: thiep Bài viết gốc: 90258 Tên lệnh: sva |
Viết lisp theo yêu cầu [phần 2]
Chào svba1608, Lisp này sẽ giúp cho svba1608 thêm mũi tên tạo dốc nước chảy. Tuy nhiên để cho lisp chạy 1 cách đầy đủ không bỏ sót thì các đường bao "ranh thửa" phải là đường kín (closed). Để biết 1 pline có closed hay không hãy pick chúng và xem cửa sổ property tại mục closed nó báo YES hay NO nếu NO thì chỉnh lại YES. Ngoài ra, vì chiễu mũi tên sẽ hướng từ điểm dóng của text ra đến...
| ||
Tác giả: phamthanhbinh Bài viết gốc: 90346 Tên lệnh: lb2 |
Viết lisp theo yêu cầu [phần 2]
Hề hề hê, Mình chạy thử rồi, nó đây nè bạn: Kết quả chạy: http://www.cadviet.com/upfiles/2/lb2.jpg http://www.cadviet.com/upfiles/2/lb2.jpg Còn đây là cái lisp đã sửa nè: Hề hề hề, bạn xem xem có giống cái bạn đã sửa không hỉ????
| ||
Tác giả: Nguyen Hoanh Bài viết gốc: 90849 Tên lệnh: imf |
Viết lisp theo yêu cầu [phần 2]
Vừa post xong thì nghĩ lại, thấy cũng không phức tạp lắm. Phiphi thử lisp cải tiến dưới đây
| ||
Tác giả: thiep Bài viết gốc: 91939 Tên lệnh: exp |
Viết lisp theo yêu cầu [phần 2]
Chào TRUNGNGAMY, Lisp sẽ đưa ra 1 list các ename các đối tượng chứa trong block. Bạn tiếp tục khai thác nhé:
| ||
Tác giả: gia_bach Bài viết gốc: 95949 Tên lệnh: tag link |
viết lisp thống kê bản vẽ
Gửi Tue_NV Lisp tạo Link field thuộc tính đầu tiên của Block Att
| ||
Tác giả: gia_bach Bài viết gốc: 95915 Tên lệnh: l2f |
Viết lisp theo yêu cầu [phần 2]
Bạn chạy thử Lisp này : Xuất tất cả tên các Layer có trong bản vẽ ra một file Text.
| ||
Tác giả: Tue_NV Bài viết gốc: 100057 Tên lệnh: noisuy |
Viết lisp theo yêu cầu [phần 2]
Sony hãy thử với đoạn code này. Đây là Lisp nội suy cao độ Z của 1 điểm P khi biết P1(x1,y1,z1) và P2(x2,y2,z2) với z1 và z2 nhập từ bàn phím và điều kiện P phải nằm trên P1P2 (P có thể nằm trong hoặc nằm ngoài đoạn P1P2
|
Trang 66/330