viết lisp để thống kê diện tích

[votinh66 0]

NHỜ CÁC ANH EM GIÚP DÙM:

-ta có 2 layer:

+layer1:là hình màu trắng,với 4 ô có mã khác nhau là L và S(ví dụ)

+layer2:là hình màu đỏ

-ta muốn tính diện tích phần giao giữa hình màu trắng và màu đỏ, kết quả là dịên tích của từng mã bị cắt.Từ đó cộng diện tích các mã giống nhau lại.Lưu thành file *.txt

-Rất cám ơn.

hình vẽ kèm theo.

http://www.cadviet.com/upfiles/ANH.jpg

[doanduyhung 40]

Đối với hình VD trên.

Chọn pline đỏ.

Chọn các pline trắng, sau đó xét từng pline trắng này.

Tìm 2 giao điểm của pline đỏ với 1 pline trắng.

Từ tính ta tọa độ trung điểm của mỗi cặp hai gia điểm này

Vẽ một Boundary với đối tượng là polyline tâm điểm chèn là trung điểm vửa tính ở trên.

Lấy ra diện tích của polyline vửa tạo rồi xóa polyline này đi.

Lưu diện tích này vào tập hợp

Lập lại cho hết các pline trắng còn lại.

Sau đó xuất từng phần tử trong tập hợp diện tích ra file.

;;;;;;;;;;;;;;;;;;;;;;;

List hổ trợ giao điểm đã có trong diển đàn rồi.