Hỏi về Lisp (thuật toán, ý tưởng, coding,...)

[Hỏi về Lisp (thuật toán, ý tưởng, coding,...)]

Trong đoạn mã của bạn, người viết đã chủ định chỉ bật từng chức năng bắt điểm. Cụ thể:

lệnh (setvar "osmode" 512) là chỉ bật chức năng bắt NEArest.

lệnh (setvar "osmode" 128) là chỉ bật chức năng PERpendicular

lệnh (setvar "osmode" 1) là chỉ bật chức năng ENDpoint

 

Muốn không tắt chức năng này, bạn chỉ cần vô hiệu hóa các mã (setvar "osmode" xxx) với xxx là một số khác 0. Bằng cách xóa dòng lệnh đó đi hoặc thêm dấu chấm phẩy (:lol: vào đầu dòng lệnh.

 

địa chỉ chữa trị bệnh đau tinh hoàn ở Biên Hòa
chi phí chữa trị bệnh rối loạn cương dương ở Biên Hòa
địa chỉ chữa trị bệnh rối loạn cương dương ở Biên Hòa
chi phí chữa trị bệnh vô sinh hiếm muộn ở Biên Hòa

[Xin giúp tạo Lisp cộng số thứ tự trong block att]

LISP COPY THEO THỨ TỰ TĂNG DẦN <3.
Ứng dụng cho đánh khung trục, bản vẽ tiến độ thi công dùng max thích nhá.
➡ TH1 : Copy tăng dần theo thứ tự của chữ viết theo kiểu Text hoặc Mtext . Lệnh CCC
➡ TH2 : Copy tăng dần theo thứ tự của Block thuộc tính . Lệnh OCA
http://www.mediafire.com/file/d6g1hy9rj38cc43/ccc.lsp
http://www.mediafire.com/file/yhhdfqdplkbrgdc/oca.lsp

[[YÊU CẦU] Xin lisp chuyển layer của các đối tượng trong block về cùng layer của block]

Thanks mọi người ạ

Phòng khám đa khoa Thái Dương