Doan Van Ha

Thư mục và file đừng viết tiếng Đông Lào.

Dịch Covid đang tràn vào Autolisp!

Dấu (+ ; like) không bổ béo gì. Dấu (- ; dislike) cũng không ốm o thêm. Nhưng nó cũng "định giá" được tư cách hoặc đóng góp của cá nhân với cộng đồng.

Code này lấy height là height của style current

Có thể do bạn cài autoload 1 file lisp nào đó. Tìm nó mà trị.

Cad không biết tính độ lún đâu.

;; Vẽ hình chữ nhật có chiều dày 20 (defun c:foo (/ p1 p2 p3 p4 p5 p6 p7 p8 os) (setq p1 (getpoint "\nChon point thu nhat") p3 (getpoint "\nChon point thu ba") p2 (list (car p3) (cadr p1)) p4 (list (car p1) (cadr p3)) ; p5 (list (car p1) (cadr p1) 20) p6 (list (car p2) (cadr p2) 20) p7 (list (car p3) (cadr p3) 20) p8 (list (car p4) (cadr p4) 20) ) ; (setq os (getvar "osmode")) (setvar "osmode" 0) (command vpoint "" 1,-1,1 "") (command ".3dface" p1 p2 p3 p4 "" ".3dface" p5 p6 p7 p8 "" ".3dface" p1 p4 p8 p5 "" ".3dface" p2 p3 p7 p6 "" ".3dface" p3 p4 p8 p7 "" ".3dface" p1 p2 p6 p5 "" ) (setvar "osmode" os) (command "zoom" "all") )

Chắc bị osnap

Tình trạng trốn Covid nhiều lắm, có khi cả năm lận

Sẵn bạn gởi bản vẽ (2007) để dễ test.

Cách bá đạo là: bạn cứ add bằng cad rồi sau đó lấy entget rồi tìm cách xử bằng entmod.

Tìm mấy cái lisp bạn đã cài autoload mà xử hoặc xóa.

Trúng quả đậm!

Gửi bản vẽ lên chứ không lẻ sửa trên cái hình này?

Tha hồ trên này mà không chịu tìm! Th

Có nhiều Region không thể biến thành polyline được

Comment trên chỉ tương đương đeo kính vào thôi mà!

Cho bạn cái này, của tác giả trong lisp. Tên lệnh Taborder.

Ủng hộ comment này!

Hơi sức đâu mà các member đi viết những lisp mà nếu thớt làm bằng tay mất 1 phút còn các bác viết mất 10 phút (?). Cộng đồng còn những người khác cần lisp hơn!

Vì cái lisp ấy nó set bắt điểm về reset. Hỏi đơn giản thì câu trả lời cũng đơn giản thế thôi. Còn muốn câu trả lời phức tạp hơn thì phải dòm được cái lisp đã.

Cho hỏi tí anh Gia_Bach, và các bạn biết: nếu viết C# cho Revit thì trong các mục trên cần thay đổi những mục nào? Thanks!