Chuyển đến nội dung
Diễn đàn CADViet
microcad

Giúp mk List vẽ điểm biết khoảng cách và góc

Các bài được khuyến nghị

ai có list vẽ 1 điểm khi biết góc ngang của điểm ấy với đoạn thẳng bất kì và biết khoảng cách không cho mk xin

. không thì tạo giúp mk với mk mới hk list nhưng chỉ làm đc cái cơ bản thôi

 ảnh minh họa mk có bên dưới mong đc các b giúpuubq.jpg

 

 

 

Điểm A , B bất kỳ nhé

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Bạn thử cái này. Nó có hỏi thêm phía so với AB. Khi nhập góc nhớ có thêm chữ "d".

 

(defun c:tmp()
  (setq a (getpoint "\nChon diem A:")
b (getpoint a "\nChon diem B:")
g (angtof (getstring "\nNhap goc<thi du: 10d20'30\">:") 3)
kc (getreal "\nNhap khoang cach:")
p (getpoint "\nNhap phia cua diem can ve so voi AB:")
p1 (inters a b p (polar p (+ 1.5708 (angle a b)) 1) nil)
c (polar b (if (equal (angle p1 p) (+ 1.5708 (angle a b)) 0.001)
    (- (+ pi (angle a b)) g) (+ (- (angle a b) pi ) g)) kc))
  
  (command "line" b c "")
)

 

P/S: Bạn viết yêu cầu bằng tiếng gì lạ vậy?

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tôi không có thời gian và cũng chẳng thích dạy học. Cadviet có lớp autolisp online đó, bạn đăng ký vào đó học, có gì khó quá thì post lên đây, ai giúp được thì giúp.

Bạn dùng mấy cái từ "mk","hk" .. làm tôi tưởng đang ở trong chat room nào đó chứ không phải cadviet forum. :)  :)  :)

  • Vote tăng 2

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tôi không có thời gian và cũng chẳng thích dạy học. Cadviet có lớp autolisp online đó, bạn đăng ký vào đó học, có gì khó quá thì post lên đây, ai giúp được thì giúp.

Bạn dùng mấy cái từ "mk","hk" .. làm tôi tưởng đang ở trong chat room nào đó chứ không phải cadviet forum. :)  :)  :)

Ý kiến của anh em cũng rất tán thành. Hiii.  :wub:  :wub:  :wub:  :wub:

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay


×