Hướng dẫn ae một đoạn Lisp trong tài liệu nè.

[img][/img]Cũng mới tìm hiểu thôi, căn bản là vẽ ra rồi, tuy là nhỏ bé cũng xin đóng góp, mọi người đừng chê. Cùng nhau học hỏi nha
Đoạn Lisp, bên cạnh là chú thích câu lệnh của mình
(defun C:vdt() ( Đặt tên cho Lisp, sau khi load xong, bạn gõ vdt để thực
hiện lệnh)
(setq n 1) ( gán giá trị cho n=1)
(setq pt1 (list 0 0)) (gán giá trị cho pt1 là điểm 0,0 = gốc tọa độ)
(while (<= n 10) ( lệnh lặp khi n <=10 )
(setq pt2 (list n ( n 0.5))) (gán giá trị pt2 có tọa độ n, n 0.5
(setq n (1 n)) ( gán n bằng n 1)
(command "LINE" pt1 pt2 "") ( vẽ ra đường nối pt1 và pt2 )
)
(command "ZOOM" "e") ( sau command, lệnh trong "" là của CAD)
)
Dưới đây là hình mà CAD vẽ ra

Mọi người ai có lisp hay để nghị up lên kèm chú thích cho ae cùng tìm hiểu nha.

Chà! hay quá! quả là kì diệu

damtuongquan đã viết:Chà! hay quá! quả là kì diệu

Ạc!
sao tui viết 1đoạn lisp mà sao vào cad mà nó kô nhận nhẩy?

Help me mọi người ơi.Mặc dù thử đoạn lisp của cu Quân vẫn thấy nó kô chạy là sao nhẩy?

VTPBKA đã viết:

damtuongquan đã viết:Chà! hay quá! quả là kì diệu

Ạc!
sao tui viết 1đoạn lisp mà sao vào cad mà nó kô nhận nhẩy?

Help me mọi người ơi.Mặc dù thử đoạn lisp của cu Quân vẫn thấy nó kô chạy là sao nhẩy?

Thảo Gà. Sau khi load file xong, như lisp trên thì gõ VDT để chạy.

cách tạo file notepad: bấm chuột phải chọn new/text document,sửa lại đuôi file là ".lsp", bấm enter!ta đã được file notepad rồi đó! tha hồ mà lập trình autolisp nhé!
Cách chạy chương trình autolisp:mở giao diện cad,gõ "ap" vào dòng nhắc lệnh command. hiện ra cửa sổ chọn đường dẫn đến file có đuôi .lsp chứa chương trình cần chạy, sau đó bấm close! và thế là chương trình đó đã được cài mặc định trong cad của bạn! chỉ cần mở cad ra và gõ tên chương trình là bắt đầu chạy êm ru!
[quote]Hướng dẫn này chỉ dùng cho những ai chưa biết gì! ai biết rồi thì đề nghị không chê cười nhé! vì nó quá cơ bản!

[quote="supercuong"]cách tạo file notepad: bấm chuột phải chọn new/text document,sửa lại đuôi file là ".lsp", bấm enter!ta đã được file notepad rồi đó! tha hồ mà lập trình autolisp nhé!
Cách chạy chương trình autolisp:mở giao diện cad,gõ "ap" vào dòng nhắc lệnh command. hiện ra cửa sổ chọn đường dẫn đến file có đuôi .lsp chứa chương trình cần chạy, sau đó bấm close! và thế là chương trình đó đã được cài mặc định trong cad của bạn! chỉ cần mở cad ra và gõ tên chương trình là bắt đầu chạy êm ru!

Hướng dẫn này chỉ dùng cho những ai chưa biết gì! ai biết rồi thì đề nghị không chê cười nhé! vì nó quá cơ bản!

Đúng là cái thằng chuyên gia Spam.