PowerShellで静止画の輪郭検出をしてみる

OpenCVSharpを使用して画像の中の輪郭？色の境界？を検出する。

処理のイメージは、画像の中心からいっぱいに一つの丸を描いて輪郭が出てくるまで徐々に狭めていく。

どれくらいまで敏感に輪郭に反応するかは、

$tremCriteria = New-Object OpenCvSharp.CvTermCriteria(270)

の値を大きくすれば、よりはっきりと囲まれる。

1. [void][System.Reflection.Assembly]::LoadFrom((Join-Path $pwd OpenCvSharp.dll))
3. #　グレースケールで読み込む
4. $srcIplImage = [OpenCvSharp.Cv]::LoadImage((Join-Path $pwd "src.jpg"), [OpenCvSharp.LoadMode]::GrayScale)
5. $dstIplImage = New-Object OpenCvSharp.IplImage($srcIplImage.Size, [OpenCvSharp.BitDepth]::U8, 3)
7. [OpenCvSharp.CvPoint[]]$contour = New-Object OpenCvSharp.CvPoint[] 100
9. #　中心点
10. $center = New-Object OpenCvSharp.CvPoint(($srcIplImage.Width / 2), ($srcIplImage.Height / 2))
12. #　全体をかこむ丸を作る
13. for ($i = 0; $i -lt $contour.Length; $i++) {
14. $contour[$i] = New-Object OpenCvSharp.CvPoint([int]($center.X * [System.Math]::Cos(2 * [System.Math]::PI * $i / $contour.Length) + $center.X), [int]($center.Y * [System.Math]::Sin(2 * [System.Math]::PI * $i / $contour.Length) + $center.Y))
15. }
17. $size = New-Object OpenCvSharp.CvSize(15, 15)
18. $tremCriteria = New-Object OpenCvSharp.CvTermCriteria(270)
20. $alpha = [System.Single]0.45
21. $beta = [System.Single]0.35
22. $gamma = [System.Single]0.2
24. #　輪郭を検出
25. $srcIplImage.SnakeImage($contour, $alpha, $beta, $gamma, $size, $tremCriteria, $true)
26. [OpenCvSharp.Cv]::CvtColor($srcIplImage, $dstIplImage, [OpenCvSharp.ColorConversion]::GrayToRgb)
28. #　赤で輪郭を描く
29. $color = [OpenCvSharp.CvColor]::Red
30. for ($i = 0; $i -lt ($contour.Length - 1); $i++) {
31. $dstIplImage.Line($contour[$i], $contour[($i + 1)], $color, 2)
32. }
33. $dstIplImage.Line($contour[($contour.Length -1)], $contour[0], $color, 2)
35. $dstIplImage.SaveImage((Join-Path $pwd "dst.jpg"))
37. $srcIplImage.Dispose()
38. $dstIplImage.Dispose()