すべてのカテゴリ

■はじめに VisualBasic+OpenCVSharp4によって、色々な画像認識処理のプログラムを試験的に作成しましたが、その中で、十円玉の画像認識のサンプルプログラムが一番、年上の友人にウケたので、それを載せます。 ■作成環境 ＯＳ：Windows10言語：Microsoft Visual Studio2022 Visual Basic + OpenCVSharp4(パッケージ) 被写体：十円玉数枚 カメラ：COOLPIX A10(NIKON) 静止画を使用 ■円(十円玉)検出処理部分のプログラムソースDim matSoc As Mat = New Mat(画像ファイル名) Dim matGry As Mat =　　　　　　matSoc.CvtColor(ColorConversionCodes.BGR2GRAY) Dim matHou As Mat = matSoc.Clone() ' Cv2.GaussianBlur(matGry, matGry, 　　　　　　　　　　　　New OpenCvSharp.Size(9, 9), 0) Dim Circles As CircleSegment() =        Cv2.HoughCircles(matGry, HoughModes.Gradient,        解像度, 円同士が最低限距離,        円の全体を検出する際の閾値, 円の中心を検出する際の閾値,        検出する円の半径の下限, 検出する円の半径の上限)        Dim Ip As Integer = 0 For Each ite