/* * ***************************************************************** * * * * * 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値計測により切り出し登録 KIRIDASI.C */ /*[作成者]S.Kodama */ /* 目的: 関数: 履歴: Ver 1.0 97/11/07 注記: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_search.h" #include "f_meas.h" #include "f_exmeas.h" /* * Include CSC90X common local */ #include "m_menu.h" /* * プロトタイプ宣言 */ void main( void ); void main_menu_disp( void ); void disp_help( void ); void set( void ); void pdm_bin_level( int, int, PARADIGM * ); void pdm_set_bin( int, int, PARADIGM * ); void pdm_set_gray( int, int, PARADIGM * ); void pdm_wind_set_bin( int, int, PARADIGM * ); void pdm_wind_set_gs( int, int, PARADIGM * ); void wind_set( int *, int *, int *, int * ); void pdm_reg( int, int, PARADIGM * ); void Sub_execute( 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 ", " 設 定 " }, { " EXEC ", " 実 行 " }, { " PROC3 ", " 処理3 " }, { " PROC4 ", " 処理4 " } }; #define INIT_CUR_POS_X 255 #define INIT_CUR_POS_Y 239 /*------------------------------------*/ /* 固定データ宣言(登録時の指示キー) */ /*------------------------------------*/ #define NEXT 0 /* 次のブローブに進め */ #define PREVIOUS 1 /* 前のブローブに戻れ */ #define REGISTER 2 /* 登録 */ #define FINISH 3 /* 終了 */ static char *select[3] = { "通常" , "高 " , "超高" }; static char *select_color[2] = { "黒", "白" }; int pad_level; static PVAL value[10]; /* 2値計測用パラメータ */ int bin_level; int color; int edge; int l_limit; int u_limit; int bwxs,bwys,bwxe,bwye; /* グレイサーチ用パラメータ */ int name; int seido; /* 精度 */ int complex; /* 複雑度 */ int mid_lower; /* 途中下限値 */ int last_lower; /* 最終下限値 */ int gwxs,gwys,gwxe,gwye; /* * メイン */ 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; /* 2値計測用パラメータ */ bin_level = 128; color = 1; edge = 1; l_limit = 0; u_limit = 245760; bwxs = 0; bwys = 0; bwxe = 511; bwye = 479; /* グレイサーチ用パラメータ */ name = 0x4e545055; /* UPTN */ seido = 1; complex = 1; mid_lower = 5000; last_lower = 7000; gwxs = 0; gwys = 0; gwxe = 511; gwye = 479; /* 入力ビデオ制御 */ Lib_input_video_control( GRAY_PLANE | BIN_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 ); /* グレーパターン格納用ファイル(GRAY_PTN.SYS)をオープンする */ if ( NORMAL_RETURN == Lib_gs_open_data_file( CONTINUE_PTN_AREA ) ) { /* メニュー制御 */ 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 ); set(); /*設定*/ Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); 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 ); Sub_execute(); /*実行*/ 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; /* 終了 */ } } } Lib_gs_close_data_file(); } else Lib_display_message( 100, 200, "エラー", "パタンエリアは使用できません" ); } /* * メインメニュー表示 */ 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 *)NULL, (char *)NULL ); } /* * ヘルプ表示 */ static void disp_help( void ) { Lib_chrdisp( 10, 8, "【機能\概要】 KIRIDASI" ); Lib_chrdisp( 11, 10, "<登録用サーチパタンを2値計測により切り出し登録>" ); Lib_chrdisp( 11, 12, "2値計測で画面上の複数個の対象物を抽出後、各々" ); Lib_chrdisp( 11, 14, "のX_min,X_max,Y_min,Y_max(フェレ径)から切り" ); Lib_chrdisp( 11, 16, "出しを行い、それをグレーサーチ用パターンとして" ); Lib_chrdisp( 11, 18, "登録します。" ); } /* * 設定 */ void set( void ) { int no; pad_level = Lib_view_open(); Lib_view_set_title( pad_level, "設定" ); Lib_view_set_uniq_numeral( pad_level, 5, 5, "2値レベル", bin_level, 0, 255, 0 ); Lib_view_set_null ( pad_level, 5, 35, "2値条件" , 1 ); Lib_view_set_null ( pad_level, 5, 65, "サーチ条件", 2 ); Lib_view_set_null ( pad_level, 5, 95, "登録" , 3 ); Lib_set_paradigm( pad_level, 0, WHOLE_TIMING, pdm_bin_level ); Lib_set_paradigm( pad_level, 1, START_TIMING, pdm_set_bin ); Lib_set_paradigm( pad_level, 2, START_TIMING, pdm_set_gray ); Lib_set_paradigm( pad_level, 3, START_TIMING, pdm_reg ); Lib_view_set_size( pad_level, 50, 50, 5, 5 ); Lib_draw_menu( pad_level ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level, value ) ) ) { switch( no ) { case 101: /*「実行」が選択された */ bin_level = value[0].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level ); Lib_view_close( pad_level ); } /*********************************************************************/ /*  2値レベル設定                         */ /*********************************************************************/ void pdm_bin_level( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { if ( START_TIMING == Timing ) { Lib_erase_menu( pad_level ); Lib_input_video_control( BIN_PLANE ); Lib_display_control( BIN_PLANE | LINE_PLANE | CHAR_PLANE ); Lib_memory_clear( BIN_PLANE ); } else if ( END_TIMING == Timing ) { Lib_input_video_control( GRAY_PLANE | BIN_PLANE ); Lib_display_control( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_draw_menu( pad_level ); } Lib_video_bin_level( (int)val[0].long_type ); Lib_freerun(); } /*********************************************************************/ /* 2値設定                        */ /*********************************************************************/ void pdm_set_bin( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { PVAL value_b[5]; int pad_level_b; int no; int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); pad_level_b = Lib_view_open(); Lib_view_set_title( pad_level_b, "2値条件" ); Lib_view_set_null ( pad_level_b, 5, 5, "計測範囲" , 0 ); Lib_view_set_select ( pad_level_b, 5, 35, "対象色" , color, 2, select_color, 1 ); Lib_view_set_uniq_alter ( pad_level_b, 5, 65, "境界" , edge, 2 ); Lib_view_set_uniq_numeral( pad_level_b, 5, 95, "面積下限値", l_limit, 0, 245760, 3 ); Lib_view_set_uniq_numeral( pad_level_b, 5, 125, "面積上限値", u_limit, 0, 245760, 4 ); Lib_set_paradigm ( pad_level_b, 0, START_TIMING, pdm_wind_set_bin ); Lib_view_set_size( pad_level_b, 50, 80, 30, 5 ); Lib_draw_menu( pad_level_b ); if ( ERROR_RETURN != ( no = Lib_process_menu( pad_level_b, value_b ) ) ) /* メニュー値の取得 */ { switch( no ) { case 101: /*「実行」が選択された */ color = value_b[1].select_type; edge = value_b[2].on_off_type; l_limit = value_b[3].value_type; u_limit = value_b[4].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level_b ); Lib_view_close( pad_level_b ); Lib_recover_plane( idc ); } /*********************************************************************/ /* グレイ設定                        */ /*********************************************************************/ void pdm_set_gray( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { int pad_level_gs; PVAL value_gs[5]; int no; int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); pad_level_gs = Lib_view_open(); Lib_view_set_title( pad_level_gs, "サーチ条件" ); Lib_view_set_null ( pad_level_gs, 5, 5, "計測範囲" , 0 ); Lib_view_set_select ( pad_level_gs, 5, 35, "精度" , seido - 1, 3 , select, 1 ); Lib_view_set_uniq_numeral( pad_level_gs, 5, 65, "複雑度" , complex, 1, 9, 2 ); Lib_view_set_uniq_numeral( pad_level_gs, 5, 95, "途中下限値", mid_lower , 1000, 9999 , 3 ); Lib_view_set_uniq_numeral( pad_level_gs, 5, 125, "最終下限値", last_lower, 1000, 9999 , 4 ); Lib_set_paradigm ( pad_level_gs, 0, START_TIMING, pdm_wind_set_gs ); Lib_view_set_size( pad_level_gs, 100, 130, 35, 5 ); Lib_draw_menu( pad_level_gs ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_gs, value_gs ) ) ) { switch( no ) { case 101: /*「実行」が選択された */ seido = value_gs[1].select_type + 1; complex = value_gs[2].value_type; mid_lower = value_gs[3].value_type; last_lower = value_gs[4].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level_gs ); Lib_view_close( pad_level_gs ); Lib_recover_plane( idc ); } /*********************************************************************/ /*  2値計測ウインド設定制御                    */ /*********************************************************************/ void pdm_wind_set_bin( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); wind_set( &bwxs, &bwys, &bwxe, &bwye ); Lib_recover_plane( idc ); } /*********************************************************************/ /*  サーチウインド設定制御                     */ /*********************************************************************/ void pdm_wind_set_gs( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); wind_set( &gwxs, &gwys, &gwxe, &gwye ); Lib_recover_plane( idc ); } /*********************************************************************/ /*  ウインド設定                          */ /*********************************************************************/ void wind_set( xs, ys, xe, ye ) int *xs, *ys, *xe, *ye; /* 入出力:ウインド位置 */ { int pad_level_wind; PVAL value_wind[2]; int no; int x_size,y_size; pad_level_wind = Lib_view_open(); Lib_view_set_title( pad_level_wind, "処理範囲" ); x_size = *xe - *xs + 1; y_size = *ye - *ys + 1; Lib_view_set_box( pad_level_wind, 5, 5, "始点" , *xs , *ys , 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: /*「実行」が選択された */ *xs = value_wind[0].box_type.x; *ys = value_wind[0].box_type.y; *xe = value_wind[0].box_type.x + value_wind[1].box_type.x - 1; *ye = 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 ); } /*********************************************************************/ /* 登録                        */ /*********************************************************************/ void pdm_reg( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { static struct MEASDATA *measp; static int *indextbl; unsigned int max_blob; char *error_string; int error_code; char ss[50]; int count, blob; int i, x, y; int w, h, push_key; int xs, ys, xe, ye, x_size, y_size, x_offset, y_offset; int err; int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); Lib_set_stage_window( bwxs, bwys, bwxe, bwye ); /* 処理範囲設定 */ /* システムで設定されている「最大ブローブ数」の値を取得し、indextblに必要な容量の */ /* ワークメモリを確保する */ max_blob = Lib_get_meas_max_blob(); if ( ( int * )NULL != ( indextbl = ( int * )Lib_mlalloc( ( max_blob + 1 ) * 4 ) ) ) { /* 2値画像取り込み */ Lib_display_control( BIN_PLANE | LINE_PLANE | CHAR_PLANE ); Lib_freeze( TRANSMIT ); /* システム構築対応1次特徴量計測処理オープン */ Lib_Open_meas_structure(); /* MEASURE計測 */ if( NORMAL_RETURN == Lib_hmeasure( color, edge, l_limit, &measp ) ) { /* BLOBエントリ番号取り出し */ if ( 0 < ( count = Lib_xorderng( measp, 0, 0, color, u_limit, l_limit, indextbl ) ) ) { Lib_display_control( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ); /* システム構築対応1次特徴量アドレステーブル作成 */ Lib_Make_meas_structure ( (void *)measp ); /* 各ワークの切り出し・登録 */ blob = indextbl[0]; /* 最初のBLOB番号をあらかじめ得ておく */ xs = *( Meas_imin + blob ); xe = *( Meas_imax + blob ); ys = *( Meas_jmin + blob ); ye = *( Meas_jmax + blob ); Lib_box( xs, ys, xe, ye, SOLID_LINE ); Lib_get_key_size( 8, &w, &h ); Lib_display_key( 0, 479 - h, "前塊検索", 1 ); Lib_display_key( w, 479 - h, "次塊検索", 1 ); Lib_display_key( w * 2, 479 - h, " 登録 ", 1 ); Lib_display_key( w * 3, 479 - h, " 終了 ", 1 ); for( i = push_key = 0; FINISH != push_key; ) { if( CURSOR_EXECUTE == Lib_get_current_position( &x, &y ) ) { if( 0 <= x && x <= w && 479 - h <= y && y <= 479 ) { Lib_display_key( 0, 479 - h, "前塊検索", 2 ); push_key = PREVIOUS; } if( w <= x && x <= w * 2 && 479 - h <= y && y <= 479 ) { Lib_display_key( w, 479 - h, "次塊検索", 2 ); push_key = NEXT; } if( w * 2 <= x && x <= w * 3 && 479 - h <= y && y <= 479 ) { Lib_display_key( w * 2, 479 - h, " 登録 ", 2 ); push_key = REGISTER; } if( w * 3 <= x && x <= w * 4 && 479 - h <= y && y <= 479 ) { Lib_display_key( w * 3, 479 - h, " 終了 ", 2 ); push_key = FINISH; } } switch( push_key ) { case NEXT: /* 次塊検索 */ if( i < count - 1 ) { Lib_memory_clear( LINE_PLANE ); i++; blob = indextbl[i]; xs = *( Meas_imin + blob ); xe = *( Meas_imax + blob ); ys = *( Meas_jmin + blob ); ye = *( Meas_jmax + blob ); Lib_box( xs, ys, xe, ye, SOLID_LINE ); } break; case PREVIOUS: /* 前塊検索 */ if( i > 0 ) { Lib_memory_clear( LINE_PLANE ); i--; blob = indextbl[i]; xs = *( Meas_imin + blob ); xe = *( Meas_imax + blob ); ys = *( Meas_jmin + blob ); ye = *( Meas_jmax + blob ); Lib_box( xs, ys, xe, ye, SOLID_LINE ); } break; case REGISTER: /* 登録 */ x_size = xe - xs + 1; y_size = ye - ys + 1; if( 0 != ( x_size % 2 ) ) /* サイズは偶数 */ x_size += 1; if( 0 != ( y_size % 2 ) ) /* サイズは奇数 */ y_size += 1; x_offset = ( x_size * 10 ) / 2; y_offset = ( y_size * 10 ) / 2; Lib_gs_smode( Lib_get_gray_filter_opt() ); if ( -1 == ( err = Lib_gs_usepat( name, xs, ys, x_size, y_size, x_offset, y_offset ) ) ) Lib_display_message( 100, 200, "エラー", "既に200個登録済み" ); else if ( -2 == err ) Lib_display_message( 100, 200, "エラー", "格納領域残容量が僅少" ); else if ( -3 == err ) Lib_display_message( 100, 200, "エラー", "始端X/Y位置が範囲外" ); else if ( -4 == err ) Lib_display_message( 100, 200, "エラー", "パターンサイズが範囲外" ); else if ( -7 == err ) Lib_display_message( 100, 200, "エラー", "一定濃度のため登録不可" ); Lib_display_key( 0, 479 - h, "前塊検索", 1 ); Lib_display_key( w, 479 - h, "次塊検索", 1 ); Lib_display_key( w * 2, 479 - h, " 登録 ", 1 ); Lib_display_key( w * 3, 479 - h, " 終了 ", 1 ); Lib_box( xs, ys, xe, ye, SOLID_LINE ); break; case FINISH: /* 終了 */ break; } } } else Lib_display_message( 100, 200, "エラー", "ブローブがありません。" ); } else { error_code = Lib_get_meas_error_code(); error_string = Lib_get_meas_error_string(); Lib_sprintf( ss, " [%d] : %s", error_code, error_string ); Lib_display_message( 70, 200, "2値計測エラー", ss ); } Lib_lfree( ( char * )indextbl ); } else Lib_display_message( 70, 200, "エラー", "indextbl用のワークメモリを確保できません。" ); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_freerun(); Lib_recover_plane( idc ); } /**************************************************************/ /**** サーチ処理の実行 ****************************************/ /**************************************************************/ void Sub_execute() { char ss[50]; int rtn; int result[3]; Lib_cls( ( LINE_PLANE | CHAR_PLANE ), BLACK_COLOR ); Lib_gs_window( NON_DISPLAY, gwxs, gwys, gwxe, gwye ); /* サーチ範囲設定 */ Lib_strtclk_count(); /*タイマーカウントモードのスタート*/ Lib_freeze( TRANSMIT ); /* 画像凍結 */ if ( 0 < ( rtn = Lib_gs_search( ON_DISPLAY, name, 1, seido, complex, mid_lower, last_lower, result ) ) ) { Lib_time_disp( 0, 0 ); Lib_sprintf( ss, "( x, y ) = ( %5.1lf, %5.1f ) 相関値 %4d", (double)result[0] / 10.0, (double)result[1] / 10.0, result[2] ); Lib_chrdisp( 1, 30, ss ); Lib_display_keyinput( 460, 0, "確認" ); } else if ( 0 == rtn ) Lib_display_message( 100, 200, "エラー", "対象物がありません" ); else if ( -1 == rtn ) Lib_display_message( 100, 200, "エラー", "パタンが登録されていません" ); Lib_freerun(); Lib_cls( ( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ), BLACK_COLOR ); }