Sửa lisp tính Trung bình cộng

[Htn02 0]

Em chào các bác. Em có sưu tầm được 1 lisp tính Trung bình cộng trên nhóm nhưng để phục vụ cho công việc tốt hơn. Các bác có thể giúp e sửa theo nhu cầu bên dưới không ạ. Em cảm ơn

Chọn số để tính  --> Nhập đường kính thép mình muốn --> Từ đó tính ra khoảng cách thép cần rải --> chọn vị trí xuất kết quả (kết quả sẽ bao gồm đường kính đã nhập và bước thép tính được)

VD: 16a250
(Nếu có thể thì lisp sẽ tự động bôi vàng các số được chọn dùng để tính ko)
Text kết quả: 
- Luôn quay theo phương X
-Layer là layer hiện hành
-Kiểu text là kiểu hiện hành
- Chiều cao theo chiều cao của các số dùng để tính TBC

Tinh TBC.LSP

[cuongtk2 431]

(dùng Chat GPT) 

Autolisp: chọn một Text muốn tính ra A (khoảng cách rải), sau đó nhập vào đường kính d . A = pi * d * d * 1000 / ( 4 * 100 * TBC) . Sau đó làm tròn A đến 10. Kết quả có dạng 16a250 với 16 là đường kính, 250 là A. Kết quả này là text sẽ được đặt vào autocad với điểm pick, các thuộc tính khác lấy từ text đã chọn. Text đã chọn sẽ đổi màu sang màu 3. 

Kết quả sẽ ra như bạn mong muốn. Vấn đề quan tâm ở đây là bạn phải diễn đạt rõ ràng nội dung, đúng lộ trình thao tác. 

[tannguyen291 170]

3 phút trước, cuongtk2 đã nói:

(dùng Chat GPT) 

Autolisp: chọn một Text muốn tính ra A (khoảng cách rải), sau đó nhập vào đường kính d . A = pi * d * d * 1000 / ( 4 * 100 * TBC) . Sau đó làm tròn A đến 10. Kết quả có dạng 16a250 với 16 là đường kính, 250 là A. Kết quả này là text sẽ được đặt vào autocad với điểm pick, các thuộc tính khác lấy từ text đã chọn. Text đã chọn sẽ đổi màu sang màu 3. 

 Kết quả sẽ ra như bạn mong muốn.

Có lần yêu cầu phức tạp hơn cả code, em từng viết cái prompt dài như 1 cái sớ và dài hơn cả code nếu viết gọn mấy cái xuống dòng lại.

[cuongtk2 431]

@tannguyen291 Có nhiều khi câu hỏi quan trọng hơn câu trả lời.

[Htn02 0]

Vào lúc 25/4/2025 tại 21:04, NTHAHT đã nói:

Bạn dùng lệnh ATTSYNC>Yes, hoặc insert lại block đó là được.

 

4 giờ trước, cuongtk2 đã nói:

(dùng Chat GPT) 

Autolisp: chọn một Text muốn tính ra A (khoảng cách rải), sau đó nhập vào đường kính d . A = pi * d * d * 1000 / ( 4 * 100 * TBC) . Sau đó làm tròn A đến 10. Kết quả có dạng 16a250 với 16 là đường kính, 250 là A. Kết quả này là text sẽ được đặt vào autocad với điểm pick, các thuộc tính khác lấy từ text đã chọn. Text đã chọn sẽ đổi màu sang màu 3. 

Kết quả sẽ ra như bạn mong muốn. Vấn đề quan tâm ở đây là bạn phải diễn đạt rõ ràng nội dung, đúng lộ trình thao tác. 

cảm ơn a đã chỉ bảo, cơ mà cái đổi màu những text được chọn chat gpt nó chịu a ah, a có thể xem qua được không

Tinh TBC - Sao chép.LSP

[Htn02 0]

hic

[duy782006 1598]

Vào lúc 6/5/2025 tại 21:06, Htn02 đã nói:

 

cảm ơn a đã chỉ bảo, cơ mà cái đổi màu những text được chọn chat gpt nó chịu a ah, a có thể xem qua được không

Tinh TBC - Sao chép.LSP

Tôi chạy thử lisp thấy nó đổi màu được ra màu xanh lá rồi mà bạn?

[Htn02 0]

10 phút trước, duy782006 đã nói:

Tôi chạy thử lisp thấy nó đổi màu được ra màu xanh lá rồi mà bạn?

a dùng win10 hay 11 vậy ạ, e thử trên win 11 lại không được

[Htn02 0]

à em chỉnh được rồi, cảm ơn mọi người ạ

[amateurday 21]

Thì ra số trung bình cộng nó là thế lày. Thầy cô ngày xưa lừa mình rồi.

[ketxu 3007]

Vào lúc 8/5/2025 tại 16:51, amateurday đã nói:

Thì ra số trung bình cộng nó là thế lày. Thầy cô ngày xưa lừa mình rồi.

=))))
Đọc yêu cầu mình biết thừa ý OP rồi, mà dân XD còn biết, chứ k thì cũng oải xà lách :D

[amateurday 21]

 

Vậy ý nghĩa kết quả và mục đích là gì cả nhà mình nhỉ?

[Htn02 0]

Vào lúc 13/5/2025 tại 07:47, amateurday đã nói:

 

Vậy ý nghĩa kết quả và mục đích là gì cả nhà mình nhỉ?

Tính đường kính và bước thép rải sàn á b