/* * ***************************************************************** * * * * * 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 パタン登録時プロジェクションによりセンターマークを自動登録 GSPRJC.C */ /* ( 濃淡エッジ計測ライブラリ使用(微分)版 ) */ /*[作成者]H.Yagi */ /* 目的: 関数: 履歴: Ver 1.0 98/04/17 Ver 2.0 00/05/18 グレイサーチ用パラメータ設定パッドの追加 注記:パタンファイルはシステム共通のGRAY_PTN.SYSを使用します m_menu.h,xx.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_gray.h" #include "f_em.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 gs_joken( void ); void wind_set( int *, int *, int *, int * ); void ptn_reg( void ); int set_box( int *, int *,int *, int * ); int get_center( int, int, int, int, double *, double * ); int tonbo_xy( int, int, int, int, double *, double * ); int XXem_exec( int, int, int, int, int, int ); void ptn_disp( void ); void ptn_search( void ); void disp_center_mark( int, int ); int XXd4i5_d( double ); 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] = { { " GRAY ", " 設 定 " }, { " EXEC ", " 実 行 " }, { " PROC3 ", " 処理3 " }, { " PROC4 ", " 処理4 " } }; #define INIT_CUR_POS_X 255 #define INIT_CUR_POS_Y 239 #define FACTOR 256 static char *select[3] = { "通常" , "高 " , "超高" }; static EM_EDGE_INFO edge_info; /*エッジ測定結果格納EM_EDGE_INFO型構造体 */ static char ss[70]; int name; int xs, ys, xe, ye; int diff_p; /*微分しきい値 */ int level_p; /*濃度しきい値 */ int gs_wxs; /* サーチ範囲始点X */ int gs_wys; /* サーチ範囲始点Y */ int gs_wxe; /* サーチ範囲終点X */ int gs_wye; /* サーチ範囲終点Y */ int seido; /* 精度 */ int complex; /* 複雑度 */ int mid_lower; /* 途中下限値 */ int last_lower; /* 最終下限値 */ /* * メイン */ 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; name = 0x30303030; /* 0000 */ xs = 200; ys = 200; xe = 299; ye = 299; diff_p = 50; level_p = 50; gs_wxs = 0; gs_wys = 0; gs_wxe = 511; gs_wye = 479; seido = 1; complex = 1; mid_lower = 5000; last_lower = 7000; /* 入力ビデオ制御 */ 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 ); /*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(); /* 設定 */ 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 ); ptn_search(); /* 実行 */ 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, "【機能\概要】 GSPRJC" ); Lib_chrdisp( 11, 10, "サーチパタン登録時のセンターマークを自動設定" ); Lib_chrdisp( 11, 12, "するサンプルです。" ); Lib_chrdisp( 11, 14, "サーチパタンに指定した領域の濃度投影を行い" ); Lib_chrdisp( 11, 16, "濃淡エッジ計測ライブラリによってセンターマーク" ); Lib_chrdisp( 11, 18, "位置を自動的に決定します。" ); Lib_chrdisp( 11, 20, "エッジ検出は2点または4点の場合のみ有効です。" ); Lib_chrdisp( 11, 22, " 2点の場合:2点間の中心にて登録します。" ); Lib_chrdisp( 11, 24, " 4点の場合:内側の2点間の中心にて登録します。" ); Lib_chrdisp( 11, 26, "パタンファイルはGRAY_PTN.SYSを使用します。" ); } /************************************************************************/ /* サーチ設定 */ /************************************************************************/ void set( void ) { int pad_level_ptn; int status_flag; int rtn; pad_level_ptn = Lib_view_open(); Lib_view_set_title( pad_level_ptn, "設定" ); Lib_view_set_null( pad_level_ptn, 5, 5, "サーチ条件" , 0 ); Lib_view_set_null( pad_level_ptn, 5, 35, "パタン登録" , 1 ); Lib_view_set_null( pad_level_ptn, 5, 65, "パタン表\示" , 2 ); Lib_view_set_null( pad_level_ptn, 5, 95, "サーチ範囲" , 3 ); Lib_view_set_size( pad_level_ptn, 50, 80, 5, 5 ); Lib_draw_command( pad_level_ptn ); for ( status_flag = ON; OFF != status_flag; ) { if ( ERROR_RETURN != ( rtn = Lib_process_command( pad_level_ptn ) ) ) { switch( rtn ) { case 0:/* サーチ条件 */ gs_joken(); break; case 1:/* パタン登録 */ ptn_reg(); break; case 2:/*パタン表示*/ ptn_disp(); break; case 3:/* サーチ範囲 */ wind_set( &gs_wxs, &gs_wys, &gs_wxe, &gs_wye ); break; case 102:/* 終了 */ status_flag = OFF; break; } } } Lib_erase_command( pad_level_ptn ); Lib_view_close( pad_level_ptn ); Lib_cls( ( LINE_PLANE | CHAR_PLANE ), BLACK_COLOR ); } /************************************************************************/ /* サーチ条件設定 */ /************************************************************************/ void gs_joken( void ) { int pad_level_gs; PVAL value_gs[4]; 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_select ( pad_level_gs, 5, 5, "精度" , seido - 1, 3 , select, 0 ); Lib_view_set_uniq_numeral( pad_level_gs, 5, 35, "複雑度" , complex, 1, 9, 1 ); Lib_view_set_uniq_numeral( pad_level_gs, 5, 65, "途中下限値", mid_lower , 1000, 9999 , 2 ); Lib_view_set_uniq_numeral( pad_level_gs, 5, 95, "最終下限値", last_lower, 1000, 9999 , 3 ); 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[0].select_type + 1; complex = value_gs[1].value_type; mid_lower = value_gs[2].value_type; last_lower = value_gs[3].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level_gs ); Lib_view_close( pad_level_gs ); 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; 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 = *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 ); Lib_recover_plane( idc ); } /************************************************************************/ /* パタン登録 */ /************************************************************************/ void ptn_reg( ) { int xsize, ysize; double xc, yc; int xofset, yofset; int rtn; int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); Lib_freeze( TRANSMIT ); if ( PAD_EXECUTE == set_box( &xs, &ys, &xe, &ye ) ) { xsize = xe - xs + 1; ysize = ye - ys + 1; if ( 1 == xsize % 2 ) xsize = xsize - 1; if ( 1 == ysize % 2 ) ysize = ysize - 1; if ( NORMAL_RETURN == get_center( xs, ys, xe, ye, &xc, &yc ) ) { xofset = XXd4i5_d( xc - (double)xs ); yofset = XXd4i5_d( yc - (double)ys ); disp_center_mark( XXd4i5_d( xc ), XXd4i5_d( yc ) ); /*パタン登録*/ if ( NORMAL_RETURN == ( rtn = Lib_gs_usepat( name, xs, ys, xsize, ysize, xofset*10, yofset*10 ) ) ) Lib_display_keyinput( 460, 0, "確認" ); else if ( -1 == rtn ) Lib_display_message( 100, 200, "エラー", "既に200個登録済み" ); else if ( -2 == rtn ) Lib_display_message( 100, 200, "エラー", "格納領域残容量が僅少" ); else if ( -3 == rtn ) Lib_display_message( 100, 200, "エラー", "始端X/Y位置が範囲外" ); else if ( -4 == rtn ) Lib_display_message( 100, 200, "エラー", "パターンサイズが範囲外" ); else if ( -7 == rtn ) Lib_display_message( 100, 200, "エラー", "一定濃度のため登録不可" ); } else Lib_display_message( 70, 200, "登録エラー", "有効なエッジ検出ができないエリアです" ); } Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_freerun(); Lib_recover_plane( idc ); } /*********************************************************************/ /* パタン登録設定                         */ /*********************************************************************/ int set_box( wxs, wys, wxe, wye ) int *wxs, *wys, *wxe, *wye; /*入出力:BOX位置*/ { PVAL value[5]; int pad_level_box; int no; int x_size,y_size; pad_level_box = Lib_view_open(); Lib_view_set_title( pad_level_box, "枠設定" ); x_size = *wxe - *wxs + 1; y_size = *wye - *wys + 1; Lib_view_set_box ( pad_level_box, 5, 5, "枠始点" , *wxs , *wys , 3, 1, 0 ); Lib_view_set_box ( pad_level_box, 5, 35, "枠サイズ", x_size, y_size , 3, 0, 1 ); Lib_view_set_comment ( pad_level_box, 5, 70 ,"エッジ検出パラメータ", 2 ); Lib_view_set_uniq_numeral( pad_level_box, 10, 100, "微分しきい値", diff_p , 1, 99, 3 ); Lib_view_set_uniq_numeral( pad_level_box, 10, 130, "濃度しきい値", level_p, 1, 99, 4 ); Lib_view_set_size( pad_level_box, 80, 80, 5, 5 ); Lib_draw_menu( pad_level_box ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_box, value ) ) ) { switch( no ) { case 101: /*「実行」が選択された */ *wxs = value[0].box_type.x; *wys = value[0].box_type.y; *wxe = value[0].box_type.x + value[1].box_type.x - 1; *wye = value[0].box_type.y + value[1].box_type.y - 1; diff_p = value[3].value_type; level_p = value[4].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level_box ); Lib_view_close( pad_level_box ); return( no ); } /************************************************************************/ /* センターマーク位置取得 */ /************************************************************************/ int get_center( xs, ys, xe, ye, xc, yc ) int xs, ys, xe, ye; double *xc, *yc; { unsigned char *base; unsigned char *wbase; unsigned char *p1; register int i, a; int windx; int windy; static long sumx[480]; static long sumy[512]; static int avex[480]; static int avey[512]; static struct _prjinfo prj; int status; int dx_size; dx_size = Lib_get_dx_size(); Lib_box( xs, ys, xe, ye, SOLID_LINE ); windx = xe - xs + 1; /* ウィンド枠内x画素数 */ windy = ye - ys + 1; /* ウィンド枠内y画素数 */ Lib_window( xs, ys, xe, ye ); /*プロジェクション範囲*/ Lib_projection( 0, sumx, sumy, &prj, OFF ); /*プロジェクション(X&Y)*/ base = (void *)Lib_adrs_gray_memory( 0 ); wbase = base + ys * dx_size + xs; /* プロジェクションの結果を画像メモリに書き込む */ /* X方向 */ p1 = wbase; a = xs; for ( i = 0; i < windx; i++ ) { avey[i] = (int)( sumy[a] / (long)windy ); *p1 = (unsigned char)avey[i]; a++; p1++; } /* Y方向 */ p1 = wbase; a = ys; for ( i = 0; i < windy; i++ ) { avex[i] = (int)( sumx[a] / (long)windx ); *p1 = (unsigned char)avex[i]; a++; p1 += dx_size; } status = tonbo_xy( xs, ys, xe, ye, xc, yc ); Lib_window( 0, 0, 511, 479 ); return( status ); } /************************************************************************/ /* エッジ検出の結果より中心位置の計算 */ /************************************************************************/ int tonbo_xy( xs, ys, xe, ye, cx, cy ) int xs, ys, xe, ye; double *cx, *cy; { int status; static double da, db; /*中心x計測*/ if ( NORMAL_RETURN == XXem_exec( xs, ys, xe, ys, diff_p, level_p ) ) { if ( 1 == edge_info.num ) { da = (double)edge_info.upx[0] / 16.0; db = (double)edge_info.downx[0] / 16.0; *cx = ( da + db ) / 2.0; status = NORMAL_RETURN; } else if ( 2 == edge_info.num ) { if ( edge_info.upx[0] < edge_info.downx[0] ) { da = (double)edge_info.downx[0] / 16.0; db = (double)edge_info.upx[1] / 16.0; } else { da = (double)edge_info.upx[0] / 16.0; db = (double)edge_info.downx[1] / 16.0; } *cx = ( da + db ) / 2.0; status = NORMAL_RETURN; } else status = ERROR_RETURN; } else status = ERROR_RETURN; if ( ERROR_RETURN != status ) { /*中心y計測*/ XXem_exec( xs, ys, xs, ye, diff_p, level_p ); if ( 1 == edge_info.num ) { da = (double)edge_info.upy[0] / 16.0; db = (double)edge_info.downy[0] / 16.0; *cy = ( da + db ) / 2.0; } else if ( 2 == edge_info.num ) { if ( edge_info.upy[0] < edge_info.downy[0] ) { da = (double)edge_info.downy[0] / 16.0; db = (double)edge_info.upy[1] / 16.0; } else { da = (double)edge_info.upy[0] / 16.0; db = (double)edge_info.downy[1] / 16.0; } *cy = ( da + db ) / 2.0; } else status = ERROR_RETURN; } return( status ); } /************************************************************************/ /* エッジ メジャー試行(複数点検出) */ /************************************************************************/ int XXem_exec( xs, ys, xe, ye, diff_p, level_p ) int xs, ys, xe, ye; /*入力 :エッジ検出ラインの始点、終点座標 */ int diff_p, level_p; /*入力 :微分しきい値、濃度しきい値 */ { int status; status = ERROR_RETURN; if ( NORMAL_RETURN == Lib_em_inspection_open() ) /* エッジ検査の開始 */ { /*エッジ位置の計測*/ if ( NORMAL_RETURN == Lib_em_edge_pos( xs, ys, xe, ye, diff_p, level_p, &edge_info ) ) { Lib_em_edge_disp(); /* エッジ位置を表示する */ status = NORMAL_RETURN; } else status = ERROR_RETURN; Lib_em_inspection_close(); /* エッジ検査の終了 */ } else status = ERROR_RETURN; return( status ); } /************************************************************************/ /* パタン表示 */ /************************************************************************/ void ptn_disp( ) { int idc; idc = Lib_shelter_plane( 0, 0, (Lib_get_dx_size() - 1), (Lib_get_dy_size() - 1), CHAR_PLANE ); Lib_gs_dsppat(); /* パタン表示 */ Lib_freerun(); Lib_recover_plane( idc ); } /************************************************************************/ /* パタンサーチ */ /************************************************************************/ void ptn_search( void ) { int Rslt_Buf[3]; int rtn; Lib_strtclk_count(); /*タイマーカウントモードのスタート*/ Lib_freeze( TRANSMIT ); Lib_gs_window( ON_DISPLAY, gs_wxs, gs_wys, gs_wxe, gs_wye ); if ( 0 < ( rtn = Lib_gs_search( ON_DISPLAY, name, 1, seido, complex, mid_lower, last_lower, Rslt_Buf ) ) ) { Lib_time_disp( 0, 0 ); Lib_sprintf( ss, "( x, y ) = ( %5.1lf, %5.1f ) 相関値 %4d", (double)Rslt_Buf[0] / 10.0, (double)Rslt_Buf[1] / 10.0, Rslt_Buf[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 ); } /************************************************************************/ /* センターマーク表示 */ /************************************************************************/ void disp_center_mark( x, y ) int x, y; { Lib_drawline( x, y-14, x, y-5 ); Lib_drawline( x, y+14, x, y+5 ); Lib_drawline( x-14, y, x-5, y ); Lib_drawline( x+14, y, x+5, y ); } /***********************************************************************/ /* 入力数値(double)の4捨5入した数値(int)を返す */ /***********************************************************************/ int XXd4i5_d( double in ) { int out; if ( in >= 0.0 ) out = (int)( in + 0.5 ); else out = (int)( in - 0.5 ); return( out ); }