Ai:Gemini ช่วยเขียนคำสั่งใหม่ ด้วย LISP ไว้ใช้งาน บน PTCAD

 Ai:Gemini ช่วยเขียนคำสั่งใหม่ ด้วย LISP ไว้ใช้งาน บน PTCAD

 

การเขียน Code สำหรับงานเขียนแบบอย่าง AutoLISP หรือ LISP  อาจจะดูเป็นเรื่องยากสำหรับคนที่ไม่ใช่โปรแกรมเมอร์ แต่ในยุคนี้ เรามีตัวช่วย Ai ที่ชาญฉลาดอย่าง Gemini ที่ช่วยให้การเขียน Script กลายเป็นเรื่องง่ายเพียงแค่ "สั่งด้วยภาษาคน"

 บทความนี้จะไกด์คุณตั้งแต่ขั้นตอนการสั่ง Gemini ไปจนถึงการนำ Code ไปรันบน PTCAD ครับ

 

1. ขั้นตอนการสั่ง Gemini ให้เขียน Code (The Prompting)

กุญแจสำคัญคือการอธิบาย "ขั้นตอน (Logic)" ให้ชัดเจนเหมือนเราสั่งงานเด็กฝึกงานครับ

 ตัวอย่างสถานการณ์: เราต้องการสร้างคำสั่งใหม่ที่คลิกจุดไหนก็ได้ แล้วโปรแกรมจะเขียนตัวเลขลำดับ (1, 2, 3...) ลงไปในวงกลมตรงจุดนั้นพอดี

 ลองใช้ Prompt นี้สั่ง Gemini:

 

1.      "ช่วยเขียน Code AutoLISP ที่ไม่ใช้คำสั่ง Visual “

2.      สร้างคำสั่งชื่อ 'MYCN' (My Circle Number)

3.      เมื่อรันคำสั่ง ให้ผู้ใช้คลิกเลือกจุดบนหน้าจอ

4.      โปรแกรมจะวาดวงกลมรัศมี 5 หน่วย ณ จุดนั้น

5.      ใส่ตัวเลข Text ไว้ตรงกลางวงกลม โดยเริ่มจากเลข 1 และเพิ่มขึ้นทีละ 1 ทุกครั้งที่คลิกจุดใหม่

6.      วนซ้ำไปเรื่อยๆ จนกว่าจะกด Esc เพื่อออก"

 

2. การตรวจสอบและคัดลอก Code

Gemini จะส่ง Code มาให้ในรูปแบบ Block สีดำๆ ให้คุณกดปุ่ม "Copy code" มาได้เลย ตัวอย่างโครงสร้างที่ได้จะหน้าตาประมาณนี้:

 

LISP CODE

(defun c:MYCN (/ pt rad count)

  (setq count 1)

  (setq rad 5.0)

  (while (setq pt (getpoint (strcat "\nเลือกจุดเพื่อวางลำดับที่ " (itoa count) ": ")))

    (command "._CIRCLE" pt rad)

    (command "._TEXT" "Justify" "Middle" pt 2.5 0 (itoa count))

    (setq count (1+ count))

  )

  (princ)

)

 

 

3. วิธีนำไปใช้งานใน PTCAD

เมื่อได้ Code มาแล้ว การนำไปใช้ใน PTCAD มี 2 วิธีหลักๆ ดังนี้ครับ:

 

วิธีที่ 1: การใช้งานแบบชั่วคราว (Fast Track)

หากต้องการทดสอบ Code ทันทีโดยไม่บันทึกไฟล์:

 

1.      เปิดโปรแกรม PTCAD ขึ้นมา

2.      ที่ช่อง Command Line ด้านล่าง ให้คลิกแล้วกด Ctrl + V เพื่อวาง Code ทั้งหมดลงไป

3.      กด Enter

4.      พิมพ์คำสั่งที่คุณตั้งไว้ (เช่น MYCN) แล้วเริ่มใช้งานได้เลย

 

วิธีที่ 2: การบันทึกเป็นไฟล์เพื่อใช้ถาวร (Professional Way)

 

1.      เปิดโปรแกรม Notepad (หรือ Text Editor อื่นๆ)

2.      วาง Code ที่คัดลอกมาลงไป

3.      ไปที่ File > Save As

4.      ตั้งชื่อไฟล์ตามด้วยนามสกุล .lsp เช่น MyTool.lsp (ตรวจสอบให้มั่นใจว่าไม่ได้เซฟเป็น .txt)

5.      ใน PTCAD พิมพ์คำสั่ง APPLOAD

6.      เลือกไฟล์ .lsp ที่บันทึกไว้ แล้วกด Load

 

4. ข้อควรระวังเมื่อใช้ Gemini กับ CAD

Layer และ Style: บางครั้ง Gemini อาจเขียน Code ที่เรียกใช้ Layer หรือ Text Style ที่ไม่มีในไฟล์งานเรา ทำให้เกิด Error ควรเช็คว่าในแบบของคุณมี Style ชื่อนั้นๆ อยู่จริง

 

PTCAD รองรับมาตรฐาน LISP ส่วนใหญ่อยู่แล้ว แต่ถ้า Code ไม่ทำงาน ลองบอก Gemini เพิ่มว่า "ปรับปรุง Code ให้รองรับคำสั่งพื้นฐาน (Standard Command) ของโปรแกรม CAD ทั่วไป"

 

OSNAP: บางครั้งการรัน LISP อาจถูกจุด Snap รบกวน แนะนำให้เพิ่มการปิด Snap ชั่วคราวใน Code (หาก Gemini ไม่ได้ใส่มาให้)