AutoCAD Tips: ถามมา ตอบไป ข้อความบอกความยาวเส้น Closed Polyline

มีอีเมลจากท่านหนึ่งถามถึง กรณีมีผังที่ดินที่ถูกแบ่งสำหรับสร้างบ้านจัดสรร และต้องการให้เขียนข้อความกำกับไว้ที่แต่ละด้านของเส้นรอบรูปของผังหนึ่งๆที่ถูกสร้างไว้ด้วยเส้น Closed Polyline มีวิธีทำเร็วๆได้อย่างไร?
กรณีที่ไม่ได้พึ่งพาการเขียนโปรแกรม AutoLISP/Visual LISP เลย วิธีทางตรงคือ 1. ใช้คำสั่ง Dist หรือ Measuregeom วัดความยาวของ 2 จุดยอดคู่หนึ่งๆและจดบันทึกค่าไว้ 3. เขียนข้อความด้วยคำสั่ง Mtext หรือ Text โดยกำหนดมุมหมุนข้อความตามทิศทางของเส้นนั้นๆ และกรอกค่าด้วยตัวเลขจากข้อ 1
หรืออีกวิธีใช้ DimAlign เขียนเส้นบอกระยะตามแนวความยาว
งานที่มีจำนวนน้อย สิ่งนี้ทำได้ไม่ยากเลย แต่ถ้าเป็นงานประจำวันและมีจำนวนมากๆทางออกหนึ่งที่จะช่วยเพิ่มผลผลิตได้คือการเขียนโปรแกรมเข้าช่วย

จึงได้พัฒนาคำสั่ง BLI ขึ้น ซึ่งมีพรอมต์ดังนี้
Command: BLI
Developed by S.Chatchawal, schatchawal@gmail.com
Offset distance: <0.90> ระยะออฟเซ็ต
Text height: <0.60> ความสูงตัวอักษร
Select closed polyline: คลิกเลือกรูป Closed Polyline

จะให้ผลเขียนข้อความบอกขนาดของแต่ละท่อนของเส้น Closed polyline พร้อมกับแสดงค่าคำนวณขนาดพื้นที่ในหน่วย ไร่-งาน-ตารางวา ให้ด้วย และยังคงวนแสดงพรอมต์ Select closed polyline: ให้คลิกเลือกได้อีก หากครบแล้วให้กด ENTER เพื่อจบคำสั่งนี้ สังเกตว่าคำสั่งนี้จัดแนวข้อความตามแต่ละช่วงของ Closed Polyline ให้ด้วย

นอกจากนี้ยังได้เขียนคำสั่ง BLo สำหรับการเขียนข้อความไว้ที่รอบนอกด้วย