Hướng dẩn viết lisp bài 19:

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ự!

Bây giờ sau khi thực hiện lisp bạn dùng lệnh undo sẽ thấy nó undo từng chút từng chút chứ không giống lệnh của cad xíu nào vì trong lisp mình thực hiện một mớ lệnh nó sẽ từ từ undo từng lệnh một. Việc này gây phiền phức nếu trong lisp mình dùng rất nhiều lệnh bạn muốn lisp undo cũng giống như lệnh cad kìa. Cách làm như sau: Thêm hai dòng sau vào lisp.
+Thêm dòng sau vào sau dòng mở đầu:
(defund c:lenh ()
(command "undo" "be")
+Thêm dòng sau trước dòng kết thúc:
(command "undo" "end")
(Princ)
)

-Lúc này sau khi thực lisp bạn thực hiện lệnh undo nó sẽ undo nguyên tiến trình lisp thực hiện.
-Từ đây trở đi sẽ kết nạp thêm hai dòng này vào phần mở đầu và kết thúc lisp nhé.