Lisp tự động chuyển cốt

[arc.tuanhung 21]

E đang cần 1 cái lisp tự động chuyển cốt cao độ. Có nghĩa là khi e cần copy từ cốt 0.00 đến các cốt có cao độ khác nhau khi đó cốt 0.00 sẽ tự động chuyển theo. và từ toạ độ gốc nếu copy lên trên là cốt (+), xuống dưới là cốt (-) hoặc sang phải la (+), sang trái là (-).

[arc.tuanhung 21]

Bạn hỏi đúng lúc quá rồi nè, cái này mình mới vừa hoàn thiện từ 1 lisp nhặt được đây.

Down về giải nén và copy nguyên thư thục Design vào ổ C:\

Dùng và cho góp ý nhé. Lệnh Đánh coste: DCOT; Copy coste: CCOT

Tải file đính kèm

Thân

mình đã dùng thử, cơ bản là ok! nhưng chỉ tự động chuyển cốt khi lên hoăc xuống, còn sang phải hoặc trái thì lại giống copy multi. Có vđề muốn hỏi lại philipdn là: muốn đổi lại kiểu và chiều cao của text từ lisp thì làm ntn? file đang ở đuôi .vlx thì mình chịu. Bạn có file .lsp ko? Nếu có thì chia sẻ cho mình với vì mình sẽ thay đổi lại vđề trên. cảm ơn bạn

[arc.tuanhung 21]

ah.! tên lệnh cũng hơi quá dài nên rút ngắn lại bạn ạ!

[Tue_NV 3915]

mình đã dùng thử, cơ bản là ok! nhưng chỉ tự động chuyển cốt khi lên hoăc xuống, còn sang phải hoặc trái thì lại giống copy multi. Có vđề muốn hỏi lại philipdn là: muốn đổi lại kiểu và chiều cao của text từ lisp thì làm ntn? file đang ở đuôi .vlx thì mình chịu. Bạn có file .lsp ko? Nếu có thì chia sẻ cho mình với vì mình sẽ thay đổi lại vđề trên. cảm ơn bạn

Với đuôi .vlx thì khó nhỉ?.

Bạn xem file Lisp của mình ở đây có đúng ý của bạn không?

Lệnh Đánh Cốt Mgco. Copy Cốt : Ccot

File Lisp đó nằm ở đây :

http://www.cadviet.com/forum/index.php?sho...rt=0#entry41411

[arc.tuanhung 21]

Với đuôi .vlx thì khó nhỉ?.

Bạn xem file Lisp của mình ở đây có đúng ý của bạn không?

Lệnh Đánh Cốt Mgco. Copy Cốt : Ccot

File Lisp đó nằm ở đây :

http://www.cadviet.com/forum/index.php?sho...rt=0#entry41411

thank kiu bác! của bác cũng giống của philipdn.

[quocanhxd05 6]

E đang cần 1 cái lisp tự động chuyển cốt cao độ. Có nghĩa là khi e cần copy từ cốt 0.00 đến các cốt có cao độ khác nhau khi đó cốt 0.00 sẽ tự động chuyển theo. và từ toạ độ gốc nếu copy lên trên là cốt (+), xuống dưới là cốt (-) hoặc sang phải la (+), sang trái là (-).

 

Mình post lên đây nè:

 

http://www.cadviet.com/upfiles/Ghi_cao_do_CAA.zip

 

bạn xem có đúng ý mình không. nếu muốn dùng theo phương khác thì mình nghĩ bạn xoay trục tọa độ theo hướng mình muốn là OK. dùng lệnh UCS đó.

Chúc bạn thành công.

[arc.tuanhung 21]

Mình post lên đây nè:

 

http://www.cadviet.com/upfiles/Ghi_cao_do_CAA.zip

 

bạn xem có đúng ý mình không. nếu muốn dùng theo phương khác thì mình nghĩ bạn xoay trục tọa độ theo hướng mình muốn là OK. dùng lệnh UCS đó.

Chúc bạn thành công.

lisp sử dụng thấy báo lỗi là:

Command: caa - Write height text; error: bad argument type: lselsetp nil

[quocanhxd05 6]

lisp sử dụng thấy báo lỗi là:

Command: caa - Write height text; error: bad argument type: lselsetp nil

Có thể bạn cấu trúc TEXT của bạn có vấn đề. TEXT của bạn phải ở dạng giống như thế này +0.000 or 0.000.

Bạn xem lại thử. Ngoài ra mình nghĩ cũng có thể file lisp này và các file lisp của bạn bị trùng biến với nhau.