AutoCAD Tips: Visual LISP ใส่ Hatch ในผนัง

บทความนี้น่าจะตรงใจคนที่ทำงานเขียนแบบแปลนอาคาร
ที่มีการใส่ Hatch แบบเส้นเฉียง 45 องศาระหว่างเส้นตรง
ที่เป็นเส้นคู่ที่แทนถึงผนังในแบบแปลน

พรอมต์ของคำสั่งมีดังนี้

Command: HW
Hatch in wall, developed by S.Chatchawal, schatchawal@gmail.com
Select objects: เพื่อความสะดวกให้เลือกแบบ Crossing ลากกรอบจากทางขวาไปซ้าย
หรือจะคลิกเลือกทีละเส้นก็ได้
Select objects: กด Enter

เงื่อนไข
1.เส้นตรงที่แทนผนังต้องอยู่บนเลเยอร์ A-Wall
2.hatch ที่ได้จะถูกวางบนเลเยอร์ A-hatch
3. เส้นภายในห่างจากเส้นผนัง 0.02
4. hatch เส้นห่างกัน 0.03
5. hatch ทำมุม 45 องศา

ข้อสังเกต
1. ตอนลากกรอบแม้ว่าจะใช้ Crossing ตัดผ่าน
ซึ่งให้ผลรวมทุกเส้นที่กรอบเลือกตัดผ่าน
แต่คำสั่งนี้จะกรองเอาเฉพาะรูปวาดบนเลเยอร์ A-Wall เท่านั้น
จึงสะดวกอย่างมาก ไม่ต้องกังวลว่าจะได้รูปอื่นเข้ามา

ปกติแนวเส้นผนังนี้จะมีเส้น Grid รวมอยู่ด้วย ซึ่งจะถูกคำสั่งนี้
กรองออกไปให้เอง

2.ไฟล์ที่ให้โหลดนี้เป็น .VLX ซึ่งคือ .LSP
ที่คอมไพล์แล้ว และมีอายุใช้ได้ถึงสิ้นเดือน กพ 2010
นี้ เพื่อให้ผู้ใช้แจ้งปัญหาใช้งาน และจะส่งฉบับแก้ไขให้ใหม่
แบบไม่หมดอายุ
3. หลังจากโหลดตาม Link ข้างนี้แล้ว
เลือกเอาเฉพาะตัวใดตัวหนึ่ง เพราะเป็นไฟล์เดียวกัน
ให้แตกออก จะได้ไฟล์ Hatchinwall.vlx
4. โหลดใช้งานด้วยคำสั่ง Appload

Link โหลดไฟล์
http://www.tempf.com/getfile.php?id=384237&key=4b78dfaf81b4d

หรือ

http://www.mediafire.com/file/nmfynzkgivh/Hatchinwall.zip