/* * ***************************************************************** * * * * * Copyright (c) Fast Corporation, 1997 * * * * * * All Rights Reserved. Unpublished rights reserved under * * * the copyright laws of the Japan. * * * * * * The software contained on this media is proprietary to * * * and embodies the confidential technology of Fast * * * Corporation. Possession, use, duplication or * * * dissemination of the software and media is authorized only * * * pursuant to a valid written license from Fast Corporation. * * * * * ***************************************************************** */ /* CSC90X 自動2値化対応の2値計測サンプル AUTOBIN.C */ /*[作成者]H.Yagi */ /* 目的: 関数: 履歴: Ver 1.0 97/08/14 Ver 2.0 00/04/21 自動2値化手法を選択 by A.Sekimori Ver 3.0 01/12/21 ファイル内関数プロトタイプにstatic追加 注記:m_menu.hをインクルードして下さい。 m_menu.c及びm_note.cをリンクして下さい。 */ /* * Include compiler runtime library */ #include #include /* * Include CSC90X library */ #include "f_stdlib.h" #include "f_time.h" #include "f_gui.h" #include "f_stdio.h" #include "f_graph.h" #include "f_image.h" #include "f_pinf.h" #include "f_video.h" #include "f_system.h" #include "f_bgray.h" #include "f_gray.h" #include "f_meas.h" #include "f_exmeas.h" /* * Include CSC90X common local */ #include "m_menu.h" /* * プロトタイプ宣言 */ void main( void ); static void main_menu_disp( void ); static void disp_help( void ); static void meas_set( void ); static void pdm_bin_level( int, int, PARADIGM * ); static void pdm_wind_set( int, int, PARADIGM * ); static void set_auto_bin( void ); static void exec( void ); static void auto_bin_convert( void ); extern int message_note( void ); /* * メニュー項目 */ #define LANG_N 2 #define MAIN_MENU_N 4 static const char *str_main_menu[MAIN_MENU_N][LANG_N] = { { " SET ", " 2値設定 " }, { "EXEC LOOP ", "自動2値化" }, { "EXEC LOOP ", " 実 行 " }, { " PROC4 ", " 処理4 " } }; #define INIT_CUR_POS_X 255 #define INIT_CUR_POS_Y 239 static char *select_color[2] = { "黒", "白" }; static char *select_mode[7] = {"Pタイル法 ","判別分析法 ","判別分析 高", "ラプラシアン","1次微分  ","局所領域  ","分割領域  "}; int pad_level_ms; static char ss[70]; int sts; int time; int no; int wxs, wys, wxe, wye; /*計測範囲 */ int color; /*対象色 */ int meas_edge; /*接触塊オプション */ int l_limit; /*面積下限値 */ int u_limit; /*面積上限値 */ /* 自動2値化のパラメータ */ int ab_mode; int p_tile; int lap_edgefact; int grad_edgefact; int areasize; int div_x; int div_y; int match_ave; int match_std; int hscreen; /* * メイン */ void main( void ) { int sts; int xpos; int ypos; int s_xpos; int s_ypos; /* 初期メッセージ表示 */ if( NORMAL_RETURN != message_note() ) return; /* パラメタ初期化 */ xpos = INIT_CUR_POS_X; ypos = INIT_CUR_POS_Y; s_xpos = INIT_CUR_POS_X; s_ypos = INIT_CUR_POS_Y; wxs = 0; wys = 0; wxe = 511; wye = 479; color = BLACK_COLOR; meas_edge = ON; l_limit = 10; u_limit = 245760; ab_mode = 1; p_tile = 50; lap_edgefact = 50; grad_edgefact = 50; areasize = 25; div_x = 4; div_y = 4; match_ave = 15; match_std = 20; hscreen = 70; /* 入力ビデオ制御 */ Lib_input_video_control( GRAY_PLANE ); /* ビデオ出力表示項目制御 */ Lib_display_control( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ); /* ビデオ表示項目クリア */ Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); /* カーソル初期化 */ Lib_init_cursor(); /* メインメニューの表示 */ main_menu_disp(); /* マウスカーソルの表示 */ Lib_draw_cursor( INIT_CUR_POS_X, INIT_CUR_POS_Y ); /* メニュー制御 */ for (;;) { sts = 0; /* マウス位置読みとり */ sts = Lib_see_current_position( &xpos, &ypos ); if ( s_xpos != xpos || s_ypos != ypos ) { /* マウス表示位置移動 */ Lib_move_cursor( xpos, ypos ); s_xpos = xpos; s_ypos = ypos; } /* 処理振り分け */ if( CURSOR_EXECUTE == sts ) { if ( xpos > MENU_1_XS && xpos < MENU_1_XE && ypos > MENU_1_YS && ypos < MENU_1_YE ) { Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); meas_set(); /*2値計測設定*/ main_menu_disp(); } else if ( xpos > MENU_2_XS && xpos < MENU_2_XE && ypos > MENU_2_YS && ypos < MENU_2_YE ) { Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); set_auto_bin(); /*自動2値化設定*/ Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); main_menu_disp(); } else if ( xpos > MENU_3_XS && xpos < MENU_3_XE && ypos > MENU_3_YS && ypos < MENU_3_YE ) { Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); exec(); /*実行*/ Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); main_menu_disp(); } else if ( xpos > MENU_H_XS && xpos < MENU_H_XE && ypos > MENU_H_YS && ypos < MENU_H_YE ) { Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); disp_help(); /* ヘルプ */ main_menu_disp(); } else if ( xpos > MENU_E_XS && xpos < MENU_E_XE && ypos > MENU_E_YS && ypos < MENU_E_YE ) { break; /* 終了 */ } } } } /* * メインメニュー表示 */ static void main_menu_disp( void ) { int iLanguage; /* 日本語/英語表示文字列切替情報取得 */ iLanguage = Lib_get_disp_language(); /* 整列キー表示 -> ( m_menu.c ) */ SUB_menu_disp4he( (char *)str_main_menu[0][iLanguage], (char *)str_main_menu[1][iLanguage], (char *)str_main_menu[2][iLanguage], (char *)NULL ); } /* * ヘルプ表示 */ static void disp_help( void ) { Lib_chrdisp( 10, 8, "【機能\概要】 AUTOBIN" ); Lib_chrdisp( 11, 10, "様々な手法により自動的に2値化レベルを" ); Lib_chrdisp( 11, 11, "決定し、2値計測を行います。" ); Lib_chrdisp( 11, 12, "各物体の重心・面積・フェレ径と物体の個数" ); Lib_chrdisp( 11, 13, "を表\示します。" ); Lib_chrdisp( 11, 14, "2値計測はシステム構\築対応です。" ); Lib_chrdisp( 10, 16, "【注意】"); Lib_chrdisp( 11, 18, "局所領域平均値による2値化を行うと、2値計測で"); Lib_chrdisp( 11, 19, "エラーとなる場合があります。その場合はシステムで"); Lib_chrdisp( 11, 20, "最大ブローブ数を増やすことで対処できます。"); } /************************************************************************/ /* 設定 */ /************************************************************************/ static void meas_set( ) { PVAL value_meas[5]; int no; pad_level_ms = Lib_view_open(); Lib_view_set_title( pad_level_ms, "設定" ); Lib_view_set_null ( pad_level_ms, 5, 5, "計測範囲", 0 ); Lib_view_set_select ( pad_level_ms, 5, 35, "対象色", color, 2, select_color, 1 ); Lib_view_set_uniq_alter ( pad_level_ms, 5, 65, "境界", meas_edge, 2 ); Lib_view_set_uniq_numeral( pad_level_ms, 5, 95, "面積下限値", l_limit, 0, 245760, 3 ); Lib_view_set_uniq_numeral( pad_level_ms, 5, 125, "面積上限値", u_limit, 0, 245760, 4 ); Lib_set_paradigm( pad_level_ms, 0, START_TIMING, pdm_wind_set ); Lib_view_set_size( pad_level_ms, 50, 50, 5, 5 ); Lib_draw_menu( pad_level_ms ); if ( ERROR_RETURN != ( no = Lib_process_menu( pad_level_ms, value_meas ) ) ) /* メニュー値の取得 */ { switch( no ) { case 101: /*「実行」が選択された */ color = value_meas[1].select_type; meas_edge = value_meas[2].on_off_type; l_limit = value_meas[3].value_type; u_limit = value_meas[4].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level_ms ); Lib_view_close( pad_level_ms ); } /*********************************************************************/ /*  ウインド設定制御                        */ /*********************************************************************/ static void pdm_wind_set( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { int pad_level_wind; PVAL value_wind[2]; int no; int x_size,y_size; int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); pad_level_wind = Lib_view_open(); Lib_view_set_title( pad_level_wind, "処理範囲" ); x_size = wxe - wxs + 1; y_size = wye - wys + 1; Lib_view_set_box( pad_level_wind, 5, 5, "始点" , wxs , wys , 3, 1, 0 ); Lib_view_set_box( pad_level_wind, 5, 35, "サイズ", x_size, y_size, 3, 0, 1 ); Lib_view_set_size( pad_level_wind, 100, 130, 5, 5 ); Lib_draw_menu( pad_level_wind ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_wind, value_wind ) ) ) { switch( no ) { case 101: /*「実行」が選択された */ wxs = value_wind[0].box_type.x; wys = value_wind[0].box_type.y; wxe = value_wind[0].box_type.x + value_wind[1].box_type.x - 1; wye = value_wind[0].box_type.y + value_wind[1].box_type.y - 1; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level_wind ); Lib_view_close( pad_level_wind ); Lib_recover_plane( idc ); } /********************************************************************* ** 自動2値化設定 ** *********************************************************************/ static void set_auto_bin( void ) { int no; PVAL value[15]; int pad_level; /* メニューサイズの取得 */ Lib_set_pad_maxstring( 12 ); /* パッドのオープン */ pad_level = Lib_view_open(); /* パッドのタイトル */ Lib_view_set_title( pad_level, "自動2値設定" ); /* メニューの登録 */ Lib_view_set_select ( pad_level, 5, 5, "自動2値方法", ab_mode, 7, select_mode, 0 ); Lib_view_set_comment ( pad_level, 5, 40, "Pタイル法" , 1 ); Lib_view_set_uniq_numeral( pad_level, 160, 40, "2値化百分率", p_tile, 0, 100, 2 ); Lib_view_set_comment ( pad_level, 5, 75, "ラプラシアン", 3 ); Lib_view_set_uniq_numeral( pad_level, 160, 75, "Edge Factor" , lap_edgefact, 0, 100, 4 ); Lib_view_set_comment ( pad_level, 5, 110, "1次微分", 5 ); Lib_view_set_uniq_numeral( pad_level, 160, 110, "Edge Factor" , grad_edgefact, 0, 100, 6 ); Lib_view_set_comment ( pad_level, 5, 145, "局所領域平均値", 7 ); Lib_view_set_uniq_numeral( pad_level, 160, 145, "エリアサイズ", areasize, 3, 400, 8 ); Lib_view_set_comment ( pad_level, 5, 180, "分割領域しきい値", 9 ); Lib_view_set_uniq_numeral( pad_level, 160, 180, "横方向分割数", div_x, 1, 511, 10 ); Lib_view_set_uniq_numeral( pad_level, 160, 210, "縦方向分割数", div_y, 1, 479, 11 ); Lib_view_set_uniq_numeral( pad_level, 160, 240, "平均値の差" , match_ave, 1, 255, 12 ); Lib_view_set_uniq_numeral( pad_level, 160, 270, "標準偏差の差", match_std, 1, 255, 13 ); Lib_view_set_uniq_numeral( pad_level, 160, 300, "背景分離度" , hscreen, 1,99, 14 ); /* パッドの表示位置 */ Lib_view_set_size( pad_level, 15, 10, 5, 5 ); /* パッドの表示 */ Lib_draw_menu( pad_level ); if ( ERROR_RETURN != ( no = Lib_process_menu( pad_level, value ) ) ) /* メニュー値の取得 */ { switch( no ) { case 101: /*「実行」が選択された */ ab_mode = value[0].select_type; p_tile = value[2].value_type; lap_edgefact = value[4].value_type; grad_edgefact = value[6].value_type; areasize = value[8].value_type; div_x = value[10].value_type; div_y = value[11].value_type; match_ave = value[12].value_type; match_std = value[13].value_type; hscreen = value[14].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level ); /* メニューパッドを消す */ Lib_view_close( pad_level ); /* パッドのクローズ */ Lib_set_pad_maxstring( 10 ); } /*********************************************************************/ /* 試行                 */ /*********************************************************************/ static void exec() { static struct MEASDATA *measp; static int *indextbl; unsigned int max_blob; char *error_string; int error_code; int i; int fxs, fys, fxe, fye; int ct; int blobno; int center_x; int center_y; int area; int sumi,sumj; Lib_display_control( BIN_PLANE | LINE_PLANE | CHAR_PLANE ); /* システムで設定されている「最大ブローブ数」の値を取得し、indextblに必要な容量の */ /* ワークメモリを確保する */ max_blob = Lib_get_meas_max_blob(); if ( ( int * )NULL != ( indextbl = ( int * )Lib_mlalloc( ( max_blob + 1 ) * 4 ) ) ) { Lib_strtclk_count(); /*タイマーカウントモードのスタート*/ Lib_freeze( NOT_TRANSMIT ); /* 自動2値レベルにより2値化 */ auto_bin_convert(); Lib_window( wxs, wys, wxe, wye ); /* システム構築対応1次特徴量計測処理オープン */ Lib_Open_meas_structure(); if ( NORMAL_RETURN == Lib_xmeasure( color, meas_edge, l_limit, &measp ) ) /* メジャー */ { if ( 0 < ( ct = Lib_xorderng( measp, 0, 0, color, u_limit, l_limit, indextbl ) ) ) { /* システム構築対応1次特徴量アドレステーブル作成 */ Lib_Make_meas_structure ( (void *)measp ); for ( i = 0; i < ct; i++ ) { blobno = indextbl[i]; /* 重心の計算 */ area = *( Meas_area + blobno ); sumi = *( Meas_sumi + blobno ); sumj = *( Meas_sumj + blobno ); center_x = sumi / area; /* 重心x */ center_y = sumj / area; /* 重心y */ /* フェレ経 */ fxs = *( Meas_imin + blobno ); fxe = *( Meas_imax + blobno ); fys = *( Meas_jmin + blobno ); fye = *( Meas_jmax + blobno ); Lib_box( fxs, fys, fxe, fye, SOLID_LINE ); Lib_drawline( center_x-2, center_y-2, center_x+2, center_y+2 ); Lib_drawline( center_x-2, center_y+2, center_x+2, center_y-2 ); Lib_sprintf( ss, "%d", area ); Lib_kanjishift( 0, 0, 0, center_x+5, center_y-5, ss ); } Lib_sprintf( ss, "個数:%d", ct ); Lib_chrdisp( 50, 30, ss ); Lib_time_disp( 0, 452 ); } else Lib_chrdisp( 1, 30, "エラー:ブローブがありません。" ); } else { error_code = Lib_get_meas_error_code(); error_string = Lib_get_meas_error_string(); Lib_sprintf( ss, "2値計測エラー [%d] : %s", error_code, error_string ); Lib_chrdisp( 1, 30, ss ); } } else Lib_chrdisp( 1, 30, "エラー:indextbl用のワークメモリを確保できません。" ); Lib_display_keyinput( 0, 0, " 確認 " ); Lib_cls( ( BIN_PLANE | LINE_PLANE | CHAR_PLANE ), BLACK_COLOR ); Lib_display_control( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ); Lib_window( 0, 0, 511, 479 ); Lib_freerun(); } /***********************************************************************/ /* 自動2値化 */ /***********************************************************************/ static void auto_bin_convert( void ) { struct HISTDATA histp; int bin_level; Lib_bin_memory_cls( CURRENT_MEMORY ); switch( ab_mode ) /* 自動2値化で選択されたのを実行 */ { case 0: /* Pタイル法 */ Lib_histogram( CURRENT_MEMORY, &histp ); bin_level = Lib_p_tile_threshold( p_tile, &histp ); Lib_binary_convert( CURRENT_MEMORY, CURRENT_MEMORY, bin_level ); Lib_chrdisp( 52, 1, "Pタイル法" ); Lib_sprintf( ss,"2値化レベル = %3d",bin_level ); Lib_chrdisp( 44, 3, ss ); break; case 1: /* 判別分析法 */ Lib_histogram( CURRENT_MEMORY, &histp); bin_level = Lib_discrimination_threshold( &histp ); Lib_binary_convert( CURRENT_MEMORY, CURRENT_MEMORY, bin_level ); Lib_chrdisp( 52, 1, "判別分析法" ); Lib_sprintf( ss,"2値化レベル = %3d",bin_level ); Lib_chrdisp( 44, 3, ss ); break; case 2: /* 判別分析法(高精度版) */ Lib_histogram( CURRENT_MEMORY, &histp ); bin_level = Lib_xdiscrimination_threshold( &histp ); Lib_binary_convert( CURRENT_MEMORY, CURRENT_MEMORY, bin_level ); Lib_chrdisp( 44, 1, "判別分析法 高精度" ); Lib_sprintf( ss,"2値化レベル = %3d",bin_level ); Lib_chrdisp( 44, 3, ss ); break; case 3: /* ラプラシアンヒストグラム */ bin_level = Lib_lap_hist_threshold( CURRENT_MEMORY, lap_edgefact ); Lib_binary_convert( CURRENT_MEMORY, CURRENT_MEMORY, bin_level ); Lib_chrdisp( 38, 1, "ラプラシアンヒストグラム" ); Lib_sprintf( ss,"2値化レベル = %3d",bin_level ); Lib_chrdisp( 44, 3, ss ); break; case 4: /* 1次微分ヒストグラム */ bin_level = Lib_grad_hist_threshold( CURRENT_MEMORY, grad_edgefact); Lib_binary_convert( CURRENT_MEMORY, CURRENT_MEMORY, bin_level ); Lib_chrdisp( 42, 1, "1次微分ヒストグラム" ); Lib_sprintf( ss,"2値化レベル = %3d",bin_level ); Lib_chrdisp( 44, 3, ss ); break; case 5: /* 局所領域平均値 */ if( 0 == areasize % 2 ) areasize++; Lib_shift_avr_xthreshold( CURRENT_MEMORY, CURRENT_MEMORY, areasize ); Lib_chrdisp( 48, 1, "局所領域平均値" ); break; case 6: /* 分割領域 */ Lib_part_divide_xthreshold( CURRENT_MEMORY, CURRENT_MEMORY, div_x, div_y, match_ave, match_std, hscreen ); Lib_chrdisp( 46, 1, "分割領域しきい値" ); break; } Lib_xvideo_transmit( CURRENT_MEMORY, BIN_PLANE ); }