Update to 2.0.0 tree from current Fremantle build
[opencv] / samples / octave / chessboard.m
1 #! /usr/bin/env octave
2 cv;
3 highgui;
4
5 arg_list=argv();
6
7 cvNamedWindow("win");
8 if (!size(arg_list,1))
9   error("must specify filename");
10   exit
11 endif
12 filename = arg_list{1};
13 im = cvLoadImage(filename, CV_LOAD_IMAGE_GRAYSCALE);
14 im3 = cvLoadImage(filename, CV_LOAD_IMAGE_COLOR);
15 chessboard_dim = cvSize( 5, 6 );
16
17 [found_all, corners] = cvFindChessboardCorners( im, chessboard_dim );
18
19 cvDrawChessboardCorners( im3, chessboard_dim, corners, found_all );
20
21 cvShowImage("win", im3);
22 cvWaitKey();
23