การใช้งาน OpenCV ในภาษา Fortran แบบง่าย ๆ

OpenCV (Open Source Computer Vision Library) เป็นไลบรารีที่มีประสิทธิภาพสำหรับการประมวลผลภาพและคอมพิวเตอร์วิชั่น ซึ่งถูกพัฒนาขึ้นเพื่อสนับสนุนการพัฒนาแอปพลิเคชันที่เกี่ยวข้องกับการประมวลผลภาพ เช่น การตรวจจับวัตถุ การรู้จำใบหน้า หรือการวิเคราะห์ภาพต่าง ๆ อย่างไรก็ตาม สำหรับนักพัฒนาที่ใช้ภาษา Fortran ซึ่งเป็นภาษาที่มีอายุยาวนานและมักใช้ในการคำนวณทางวิทยาศาสตร์ จะพบว่าไม่มีการสนับสนุนที่ดีนักในการเข้าถึง OpenCV โดยตรง แต่เราสามารถทำการเรียกใช้งาน OpenCV ผ่าน C หรือ C++ ได้ง่ายๆ

การติดตั้ง OpenCV

การติดตั้ง OpenCV บนระบบของคุณสามารถทำได้ง่าย ๆ โดยการติดตั้งผ่าน package manager หรือ compile จาก source code แต่ก่อนอื่นเราต้องมั่นใจว่าคอมพิวเตอร์ของเราได้ติดตั้ง CMake และไลบรารีที่จำเป็นทั้งหมดไว้แล้ว

ขั้นตอนการติดตั้ง OpenCV:

```bash

sudo apt-get update

sudo apt-get install build-essential cmake git pkg-config libjpeg-dev libtiff-dev libjasper-dev libpng-dev

sudo apt-get install libavcodec-dev libavformat-dev libswscale-dev libv4l-dev

sudo apt-get install libatlas-base-dev gfortran

sudo apt-get install python3-dev

```

```bash

git clone https://github.com/opencv/opencv.git

cd opencv

mkdir build

cd build

cmake ..

make -j8

sudo make install

```

```bash

sudo apt-get install gfortran

```

ตัวอย่างโค้ดที่แสดงการประมวลผลภาพด้วย OpenCV ใน Fortran

ด้วย OpenCV เราสามารถเปิดภาพที่มีอยู่ ตรวจจับขอบของภาพ และบันทึกผลออกมาได้ ในที่นี้เราจะใช้การเรียกใช้ OpenCV จากโค้ดภาษา C โดยการสร้างฟังก์ชั่นที่เป็น Proxy ให้ Fortran เรียกใช้

โครงสร้างของโปรแกรม

เราจะต้องแบ่งทำงานออกเป็นสองส่วน ส่วนแรกจะเป็นโค้ด C ที่ใช้ OpenCV และส่วนที่สองจะเป็นโค้ด Fortran ที่ทำการเรียกใช้งานโค้ด C นี้

#### โค้ด C (opencv_wrapper.c)

 #include <opencv2/opencv.hpp>
extern "C" {
    void process_image(const char* input_image, const char* output_image) {
        cv::Mat img = cv::imread(input_image);
        if (img.empty()) {
            std::cerr << "Could not open or find the image!" << std::endl;
            return;
        }
        cv::Mat edges;
        cv::Canny(img, edges, 100, 200);
        cv::imwrite(output_image, edges);
    }
}

#### โค้ด Fortran (main.f90)

 program main
    implicit none
    interface
        subroutine process_image(input_image, output_image) bind(C, name="process_image")
            import :: iso_c_binding
            character(kind=c_char), dimension(*) :: input_image
            character(kind=c_char), dimension(*) :: output_image
        end subroutine process_image
    end interface

    character(len=100) :: input_img, output_img
    input_img = "input.jpg"
    output_img = "output_edges.jpg"

    call process_image(trim(input_img), trim(output_img))
end program main

คำอธิบายการทำงาน

- ในโค้ด C เราจะใช้ฟังก์ชัน `cv::imread` เพื่อเปิดภาพที่ระบุ จากนั้นเราจะใช้ฟังก์ชัน `cv::Canny` เพื่อทำการตรวจจับขอบภาพ และสุดท้ายเราจะบันทึกภาพที่ได้ด้วย `cv::imwrite`

- ในโค้ด Fortran เราทำการเรียกใช้งานฟังก์ชันจาก C ด้วยการกำหนด interface จึงสามารถส่งชื่อไฟล์ภาพเข้าไปยังฟังก์ชัน `process_image` ได้

Use Case ในโลกจริง

การใช้งาน OpenCV ในภาษา Fortran มีความสำคัญในหลายด้าน เช่น:

ทำไมต้องเรียนภาษาโปรแกรมที่ EPT?

หากคุณสนใจในการเรียนรู้การใช้งาน OpenCV หรือการโปรแกรมมิ่งในแง่มุมอื่น ๆ EPT (Expert-Programming-Tutor) คือสถานที่ที่คุณไม่ควรพลาด เรามีหลักสูตรที่ออกแบบมาโดยผู้เชี่ยวชาญที่มีประสบการณ์ คุณจะได้เรียนรู้และฝึกปฏิบัติอย่างมืออาชีพ ไม่ว่าจะเป็นการนำ OpenCV ไปใช้ในโปรแกรมประยุกต์ การโปรแกรมระบบ หรือการวิเคราะห์ข้อมูล

การเรียนรู้โปรแกรมไม่ใช่แค่การทำโค้ด หากแต่ยังรวมไปถึงการมองเห็นภาพรวมการทำงาน การวิเคราะห์ ปัญหาและวิธีการแก้ไขที่เหมาะสม ที่นี่ EPT เราพร้อมสนับสนุนและพาทุกคนก้าวไปสู่วิศวกรซอฟต์แวร์ชั้นนำ!

หากคุณสนใจสมัครเรียนหรือสอบถามข้อมูลเพิ่มเติมเกี่ยวกับหลักสูตรการเรียนการสอน สามารถเข้าชมเว็บไซต์ของเรา [EPT](https://www.ept.com)!

คุณพร้อมที่จะเริ่มต้นการเดินทางในโลกของโปรแกรมมิ่งหรือยัง? มาเริ่มต้นเรียนรู้ไปด้วยกันที่ EPT!

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