Casio fx-880P - โปรแกรมคำนวณวงรอบปิด (Close Traverse)

กลับมาเขียนบทความอีกครั้งหลังจากห่างหายไปนาน(ประมาณ 7 เดือน) เดิมทีตอนที่สร้างบล็อกใหม่ๆ ตั้งใจว่าจะเขียนเกี่ยวกับการเขียนโปรแกรมบนเครื่องคิดเลข Casio fx-880P ให้มากซักหน่อย แต่คิดไปคิดมาเข้าใจว่าน่าจะเหลือคนที่ใช้เครื่องรุ่นนี้น้อยเต็มทีเพราะบริษัทคาสิโอเลิกผลิตรุ่นนี้ไปสิบกว่าปีแล้วนับเป็นเรื่องที่น่าเสียดาย เพราะเจ้า 880(ชื่อเล่น)ตัวนี้มากความสามารถและเหมาะกับการเขียนโปรแกรมงานสำรวจเป็นอย่างมาก นี่จึงเป็นสาเหตุที่ผู้เขียนคงจะเขียนเกี่ยวกับเจ้า 880 นี้เพียงบทความเดียว (เพื่อเป็นการไว้อาลัย ^ ^)

ในบทนี้จะแสดงตัวอย่างการเขียนโปรแกรมคำนวณวงรอบปิด (Close Traverse) ที่ผู้เขียนเคยใช้เมื่อสิบกว่าปีที่แล้วที่ลองค้นกลับมาดูอีกครั้งรู้สึกหงุดหงิดตัวเอง ความจริงตัวโปรแกรมก็ไม่ได้คำนวณผิดอะไรเพียงแต่คิดว่าถ้าได้เขียนใหม่จะเขียนให้ดีกว่านี้ แต่ก็คงจะกลับไปแก้ไขอะไรไม่ได้เพราะเจ้า 880 ที่ใช้งานได้คงหายากเต็มที และคิดว่าจะไม่เขียนคำอธิบายอะไรเกี่ยวกับการเขียนโปรแกรม แต่จะขออธิบายความสามารถของตัวโปรแกรมนี้กับวิธีใช้เท่านั้น


ความสามารถพิเศษของโปรแกรม

• อ่านข้อมูลที่ใช้ในการคำนวณจาก DATA BANK หรือที่เรียกติดปากกันว่า MODE 9 เพื่อลดความผิดพลาดในการป้อนข้อมูล
• โปรแกรมคำนวณข้อมูลทุกอย่างในการคำนวณวงรอบเช่น ค่าแก้มุม, Azimuth, Lat, ค่าแก้ Lat, Dep, ค่าแก้ Dep, N, E ในทุกๆ Station และ Accuracy(Closure) ซึ่งสามารถคำนวณจบได้ในโปรแกรมเดียว
• คำนวณค่าแก้มุมด้วยความละเอียดเป็นทศนิยม 2 ตำแหน่งของฟิลิปดา
• ปัดเศษ ค่าแก้มุม, ค่าแก้ Lat, ค่าแก้ Dep อัตโนมัติในโปรแกรมเพื่อให้ผลรวมของค่าทั้งสามลงตัวกับผลรวม มุม, Lat, Dep
• สามารถป้อนได้มากกว่า 1 โครงการโดยป้อนข้อมูลใหม่เพิ่มต่อๆ กันไป แต่มีข้อแม้ว่าจะต้องตั้งชื่อโครงการไม่ซ้ำ

โค้ดโปรแกรม

การบันทึกข้อมูลที่ใช้ในการคำนวณ

ข้อมูลในที่ใช้ในการคำนวณนี้จะต้องเก็บอยู่ใน DATA BANK เพราะฉะนั้นขั้นแรกต้องเข้าไปในโหมดนี้ด้วยการกดปุ่ม "MODE" และปุ่มเลข "9" แล้วทำการใส่ข้อมูลลงไปดังนี้

ชื่อโครงการ(ไม่เกิน 8 ตัวอักษร)
จำนวนหมุด, องศา Az เริ่มต้น, ลิปดา Az เริ่มต้น, ฟิลิปดา Az เริ่มต้น, N เริ่มต้น, E เริ่มต้น
องศา มุม1, ลิปดา มุม1, ฟิลิปดา มุม1, ระยะทาง1
องศา มุม2, ลิปดา มุม2, ฟิลิปดา มุม2, ระยะทาง2
......................................................................
......................................................................
......................................................................
องศา มุมN, ลิปดา มุมN, ฟิลิปดา มุมN, ระยะทางN

หมายเหตุ : หลังจากการป้อนข้อมูลในแต่ละบรรทัดให้กดปุ่ม "EXE" หนึ่งครั้งเพื่อบันทึกข้อมูลและกดปุ่ม "EXE" อีกครั้งเพื่อเริ่มต้นป้อนข้อมูลในบรรทัดใหม่ (ป้อนเสร็จหนึ่งบรรทัด กด "EXE" สองครั้ง)

เขียนอธิบายอย่างนี้อ่านดูแล้วอาจจะงง(ผู้เขียนเองก็งงเหมือนกัน) มาดูตัวอย่างกันดีกว่า




ตัวอย่างการใช้โปรแกรม

ทำการรังวัดที่ดินแปลงหนึ่ง(ชื่อ HOMELAND) ได้ข้อมูลรายละเอียดเบื้องต้นดังภาพข้างล่าง จงคำนวณรายการคำนวณรังวัดที่ดินแปลงนี้

การป้อนข้อมูล

เข้าไปที่โหมด DATA BANK โดยกดปุ่ม "MODE" และปุ่มเลข "9" แล้วทำการใส่ข้อมูลลงไปดังนี้

การใช้โปรแกรม

หลังจากป้อนข้อมูลเสร็จแล้วก็ลองรันโปรแกรมขึ้นมา โปรแกรมจะขึ้นข้อความ


PROJECT NAME : _


ป้อนชื่อโครงการเข้าไป


PROJECT NAME : HOMELAND               // แล้วกดปุ่ม "EXE"


โปรแกรมก็จะคำนวณ ค่าแก้มุม, Azimuth, Lat, ค่าแก้ Lat, Dep, ค่าแก้ Dep, N, E ให้ทุก Station และ Accuracy(Closure)

หากท่านใดที่ยังใช้เจ้าตัว 880 อยู่ก็ลองป้อนโปรแกรมนี้ไปใช้ดูนะครับ อาจพอมีประโยชน์บ้างก็ได้ หรือถ้าใครสามารถแปลงไปใช้กับเครื่องรุ่นอื่นๆ ได้ก็ลองดัดแปลงดูครับ

จบ...

นอกเรื่อง (ไม่ต้องอ่านก็ได้)

ตอนที่เจ้า 880 เครื่องสุดท้ายพังไป(รู้สึกเศร้ามาก) ผู้เขียนเองก็ลองเสิร์ทข้อมูลตาม google ดูว่ามีเครื่องรุ่นไหนที่มีความสามารถดีพอที่จะมาแทนเจ้า 880 ได้ แต่ก็ยังไม่เจอซักที จนมีสหายท่านนึงแนะนำว่าช่างสำรวจปัจจุบันใช้ Casio fx-5800P กันมาก ผู้เขียนก็เลยตัดสินใจซื้อเจ้า 5800 มาลองเขียนโปรแกรมดู ความเห็นส่วนตัวคิดว่าดีพอใช้ได้ สามารถเขียนโปรแกรมช่างสำรวจได้เกือบทุกอย่างที่ 880 เขียนได้ แต่ที่ทำให้หงุดหงิดใจคือเรื่อง "Database" กับตัวแปร "Array" 

ความสามารถสำคัญที่ 880 มี แต่ 5800 ไม่มี คือ 880 นั้นสามารถอ่านเขียนหรือเก็บข้อมูลได้ทั้งแบบแยกออกจากโปรแกรมต่างหากอย่าง DATA BANK หรือจะเก็บข้อมูลไว้ในตัวโปรแกรมโดยใช้คำสั่ง READ - DATA ซึ่งทำให้สะดวกในการเก็บข้อมูลจำนวนมากเช่น เก็บข้อมูลการวางโค้งทั้งโครงการ เมื่อต้องการคำนวณรายการวางโค้งก็ไม่ต้องป้อนรายละเอียดทั้งหมด เพียงแต่ป้อนช่วง sta. ที่ต้องการเท่านั้น ซึ่งผู้เขียนเคยเขียนใช้ในหลายโครงการ ไว้โอกาสหน้าจะนำเสนออีกที

ส่วนอีกปัญหานึงของเจ้า 5800 คือเรื่องตัวแปร "Array" ที่กำหนดให้ใช้ได้เฉพาะตัวแปร Z เท่านั้น มันทำให้การเขียนโปรแกรมที่มีการคำนวณกับตัวแปรมากๆ เป็นเรื่องที่ยุ่งยาก อย่างเช่น โปรแกรมวงรอบ เป็นต้น

บ่นเจ้า 5800 เบาๆ แค่นี้พอ ก่อนจบขออนุญาตโชว์เข้า 880 เครื่องสุดท้ายของผู้เขียนที่ตอนนี้นอนหมดสภาพกลายเป็นของสะสมไว้ดูเป็นที่ระลึก และได้แต่แอบหวังเล็กๆ ว่าบริษัทคาสิโอจะมีนโยบายกลับมาผลิต pocket pc ออกมาจำหน่ายอีกครั้ง เพื่อให้ชาวสำรวจได้มีเครื่องคิดเลขดีๆ ใช้กันอีก ^ ^

จบ...อีกที