Bạn nên theo dỏi theo tên bài viết tăng từ nhỏ tới lớn thì mới đúng trình tự!
*Để chọn 1 điểm (để làm gì thì tùy bạn) dùng dòng sau:
(setq a (getpoint "Chon diem: "))
Trong đó:
-a: là điểm xác định bằng cách pick chuột.
-Chon diem: là dòng chữ sẽ hiển thị trên dòng lệnh khi chạy lệnh.
*Để thực hiện 1 lệnh cad trong lisp thì gỏ đúng trình tự mà lệnh cad chạy, lưu ý "" là thay cho enter.
Ví dụ:(command ".line" a b "")
Tác dụng:
-Thực hiện lệnh line, chọn điểm a, chọn điểm b, enter.
-Bạn thấy chưa giống y như vẽ cad thôi có gì đâu.
*Bây giờ ví dụ gọn gọn nhé:
Bắt đầu bằng cái lisp vẽ đoạn thẳng nhé.
(defun c:doanthang ()
(setq a (getpoint "Chon diem: "))
(setq b (getpoint "Chon diem: "))
(command ".line" a b ""))
-Bạn lưu đoạn trên ra file vdt.lsp-Khởi động CAD.-Gỏ lệnh AP. Chọn đến file vdt.lsp load nó lên.
-Rồi bạn chỉ cần nhập lệnh doanthang nó hỏi bạn Chon diem bạn chọn 1 điểm nó lại hỏi Chon diem bạn lại chọn nó vẽ ra đoạn thẳng qua 2 điểm bạn vừa chọn.
-Khớ khớ chắc bạn kiu lisp gì mà mắc cười vậy. Đừng nôn nóng cái này là bước đầu mà từ từ rồi bạn sẽ thấy cái hay của lisp đem lại.
!^__^! Theo dỏi các bài tiếp theo nhé.
Rat cam on ban !
Trả lờiXóaVề cơ bản thì bạn hiểu về lisp như vậy là đúng rồi. Chẳng qua là phai3bie6t1 cách điều khiển và lấy dữ liệu theo ý mình thôi.
Trả lờiXóaMình rất thích đọc các bài Hướng dẫn viết Lisp của bạn. Bạn có thể link các bài viết lại theo thứ tự được không. Ví dụ: mình đang đọc bài viết 1, muốn đọc bài viết 2 chỉ cần kích Next, hoặc có pop-up chọn bài viết cần đọc. Cảm ơn bạn nhiều!
Trả lờiXóaĐể có list các bài viết bạn xem bêb tay phải dưới phần mục lục bài viết của duy782006. Bạn nấhn vào chổ xem mục lục. Nhấn tiếp vào hướng dẩn viết lisp nó sẽ hiển thị toàn bộ bài viết trong mục hướng dẩn viết lisp. Muốn tới bài mới hay bài cũ thì bạn xuống cuối bài có lựa chọn đấy. Cà bê tay phải có menu mục hướng dẩn viết lisp lisp đấy bạn chọn vào đấy.
Trả lờiXóa