Nhờ anh chị trên diễn đàn sửa lỗi lisp

[S1mple 0]

Như tiêu đề, em mới bắt đầu học viết lisp nhưng gặp lỗi trong khi viết. Mong mọi người có thể giúp em sửa flie lisp này.

http://www.mediafire.com/file/sseo0ll47yjyhtc/file_lisp_bánh_răng_thân_khai.rar

[Danh Cong 422]

Mình đưa ra 1 số nhận xét cá nhân:

+ Lisp này bạn tự viết hay là đi sửa của ai?

+ Lisp đưa lên trên diễn đàn cần có các file ".DCL". Không có file này thì chịu, lis ko chạy được.

+ Đưa ra 1 lisp rất dài thì nên tách thành các đoạn nhỏ. Kiểm tra kỹ từng đoạn với các biến "toàn cục". Khi nào ngon lành hết mới chuyển biến "toàn cục" thành biến "cục bộ" Ví dụ:  (defun c:abc ( / a b c)). Chứ viết luôn thì khi sảy ra lỗi rất khó tìm được lỗi.

 

[S1mple 0]

lisp ở trên là em copy trong sách Lập trình thiết kế với Autolisp và Visual Lisp của TS Nguyễn Hữu Lộc. Nhưng e chép theo đúng với trong sách nhưng không chạy được.

Còn file .DCL của file lisp trên e gửi trên link mediafire đó a.

Anh có file lisp về vẽ bánh răng biên dạng thân khai cho e xin được không ạ

[Danh Cong 422]

+ Không kiểm tra cho bạn được. Chịu. Mình cũng ko phải dân cơ khí.

+ Bạn có thể tìm qua tính năng "Tìm kiếm trên diễn đàn", có nhiều bài viết có thể tham khảo: 

https://www.cadviet.com/forum/topic/106347-nhờ-giúp-đỡ-lisp-vẽ-đường-thân-khai-bánh-răng/