/* * ***************************************************************** * * * * * 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 回転オプション付きグレーサーチ サンプル GSROLL2.C */ /* ( 回転パタン事前登録版 ) */ /*[作成者]H.Yagi */ /* 目的: 関数: 履歴: Ver 1.0 97/08/26 Ver 1.1 99/03/17 パタン名称を共用体に変更 Ver 1.2 99/06/28 最大の相関値を得た「該当パタン角度」の表示を追加。 Ver 1.3 00/04/07 回転用パタン名称がヘルプの説明と違っていたのを修正。 Ver 2.0 00/05/17 パラメータ設定用パッド追加。 注記: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_math.h" #include "f_affine.h" /* * Include CSC90X common local */ #include "m_menu.h" /* * プロトタイプ宣言 */ void main( void ); void main_menu_disp( void ); void disp_help( void ); void para_set( void ); void pdm_ptnreg( int, int, PARADIGM * ); void pdm_wind_set( int, int, PARADIGM * ); int rolloption( int, int, int, int ); void exec( void ); int search( int, int *, int *, int * ); int roll_search( int *, int *, int *, int * ); int d4i5_d( double ); void draw_cros( int, int ); int roll_ptn_reg( int, int, int, int, int, int, int, int ); void get_square_center_position( int, int, int, int, int *, int * ); int register_pattern( int, int, int, int, int, int, int ); void box_set( int *, int *, int *, int * ); 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 MAX_ROLL_SU 18 #define SEARCH_OK 0 #define SEARCH_NG -100 #define NON_PAT -101 static char *select[3] = { "通常" , "高 " , "超高" }; typedef union { char cn[5]; /* パタン名称 */ int in; /* パタン名称 */ } PTN_N; static PVAL value[7]; int sts; static char ss[70]; int name; int xx, yy, vv; int roll_option; /*回転オプション要否スイッチ*/ int roll_max; /*最大回転角度(10倍値) */ int roll_bunkatu_su; /*分割個数 */ PTN_N roll_name_r[MAX_ROLL_SU]; /*回転用パタン名称(R側) */ PTN_N roll_name_l[MAX_ROLL_SU]; /*回転用パタン名称(L側) */ int wxs; /* サーチ範囲始点X */ int wys; /* サーチ範囲始点Y */ int wxe; /* サーチ範囲終点X */ int 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 = 0x314e5450; /* PTN1 */ roll_option = OFF; /*回転オプション要否スイッチ*/ roll_max = 150; /*最大回転角度 */ roll_bunkatu_su = 3; /*分割個数 */ wxs = 0; wys = 0; wxe = 511; 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 ); para_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 ); exec(); /* 試行 */ 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, "【機能\概要】 GSROLL2" ); Lib_chrdisp( 11, 10, "回転オプション付きグレイサーチのサンプルです。" ); Lib_chrdisp( 11, 12, "グレイサーチは回転に対応していませんが、あらかじめ" ); Lib_chrdisp( 11, 14, "回転させたサーチパタンを登録し、パタン毎にサーチを" ); Lib_chrdisp( 11, 16, "実行することによって回転したパタンをサーチする例です。" ); Lib_chrdisp( 11, 18, "パタン中心位置は登録パタン枠の中心に自動設定されます。" ); Lib_chrdisp( 11, 20, "サーチ個数は1固定です。" ); Lib_chrdisp( 11, 22, "0度パタン名称 :PTN1" ); Lib_chrdisp( 11, 24, "右回りパタン名称:R001,R002,R003〜" ); Lib_chrdisp( 11, 26, "左回りパタン名称:L001,L002,L003〜" ); } /***********************************************************************/ /* パラメータ設定    */ /***********************************************************************/ void para_set() { int pad_level; int no; pad_level = Lib_view_open(); Lib_view_set_title( pad_level, "設定" ); Lib_view_set_uniq_alter ( pad_level, 5, 5, "回転オプション", roll_option, 0 ); Lib_view_set_null ( pad_level, 5, 35, "パタン登録", 1 ); Lib_view_set_select ( pad_level, 5, 65, "精度" , seido - 1, 3 , select, 2 ); Lib_view_set_uniq_numeral( pad_level, 5, 95, "複雑度" , complex, 1, 9, 3 ); Lib_view_set_uniq_numeral( pad_level, 5, 125, "途中下限値", mid_lower , 1000, 9999 , 4 ); Lib_view_set_uniq_numeral( pad_level, 5, 155, "最終下限値", last_lower, 1000, 9999 , 5 ); Lib_view_set_null ( pad_level, 5, 185, "サーチ範囲", 6 ); Lib_set_paradigm( pad_level, 1, START_TIMING, pdm_ptnreg ); Lib_set_paradigm( pad_level, 6, START_TIMING, pdm_wind_set ); Lib_view_set_size( pad_level, 30, 30, 5, 5 ); Lib_draw_menu( pad_level ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level, value ) ) ) { switch( no ) { case 101: /*「実行」が選択された */ roll_option = value[0].on_off_type; seido = value[2].select_type + 1; complex = value[3].value_type; mid_lower = value[4].value_type; last_lower = value[5].value_type; break; case 102: /*「取り消し」が選択された */ break; } } Lib_erase_menu( pad_level ); Lib_view_close( pad_level ); } /***********************************************************************/ /* パタン登録      */ /***********************************************************************/ void pdm_ptnreg( timing, numb, val ) int timing; int numb; PARADIGM val[]; { int xs, ys, xe, ye; int xsize, ysize; int xofs, yofs; 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 ); box_set( &xs, &ys, &xe, &ye ); xsize = xe-xs+1; ysize = ye-ys+1; if ( 0 != xsize % 2 ) xsize -= 1; if ( 0 != ysize % 2 ) ysize -= 1; xofs = xsize*10/2; yofs = ysize*10/2; Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); xe = xs+xsize-1; ye = ys+ysize-1; Lib_box( xs, ys, xe, ye, SOLID_LINE ); draw_cros( (xs+xe)/2, (ys+ye)/2 ); /* パタン登録(0度パタン)*/ if ( NORMAL_RETURN == ( rtn = Lib_gs_usepat( name, xs, ys, xsize, ysize, xofs, yofs ) ) ) { if ( ON == value[0].on_off_type ) /* パタン登録(回転パタン)*/ { if ( NORMAL_RETURN == rolloption( xs, ys, xe, ye ) ) { Lib_chrdisp( 1, 30, "パタンセーブ中..." ); Lib_gs_save_data_file(); /* サーチパタンのセーブ */ } } } else if ( -1 == rtn ) Lib_display_message( 150, 200, "エラー", "既に200個登録済みです" ); else if ( -2 == rtn ) Lib_display_message( 150, 200, "エラー", "パタン格納領域不足です" ); else if ( -3 == rtn ) Lib_display_message( 150, 200, "エラー", "始点X、Yが範囲外です" ); else if ( -4 == rtn ) Lib_display_message( 150, 200, "エラー", "パタンサイズが範囲外です" ); else if ( -7 == rtn ) Lib_display_message( 150, 200, "エラー", "一定濃度のため登録できません" ); Lib_freerun(); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_recover_plane( idc ); } /*********************************************************************/ /*  ウインド設定制御                        */ /*********************************************************************/ 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 ); } /***********************************************************************/ /* 回転オプション    */ /***********************************************************************/ int rolloption( xs, ys, xe, ye ) int xs, ys, xe, ye; /*0度パタン登録位置*/ { int pad_level_roll; PVAL value_roll[5]; int no; int xo, yo; int status; Lib_set_pad_maxstring( 18 ); pad_level_roll = Lib_view_open(); Lib_view_set_title( pad_level_roll, "回転オプション" ); Lib_view_set_uniq_numeral( pad_level_roll, 5, 5, "最大角度±(10倍値)", roll_max, 0, 1800, 0 ); Lib_view_set_uniq_numeral( pad_level_roll, 5, 35, "分割個数±", roll_bunkatu_su, 0, MAX_ROLL_SU, 1 ); Lib_view_set_size( pad_level_roll, 30, 30, 60, 5 ); Lib_draw_menu( pad_level_roll ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_roll, value_roll ) ) ) { switch( no ) { case 101: /*「実行」が選択された */ roll_max = value_roll[0].value_type; roll_bunkatu_su = value_roll[1].value_type; xo = (xe-xs+1)*10/2; yo = (ye-ys+1)*10/2; /* パタン登録(回転パタン含む)*/ status = roll_ptn_reg( xs, ys, xe, ye, xo, yo, roll_max, roll_bunkatu_su ); break; case 102: /*「取り消し」が選択された */ status = ERROR_RETURN; break; } } Lib_erase_menu( pad_level_roll ); Lib_view_close( pad_level_roll ); Lib_set_pad_maxstring( 10 ); return( status ); } /***********************************************************************/ /* 試行        */ /***********************************************************************/ void exec( void ) { int rtn, i; int xpos, ypos; int ptn_idx; int ptn_angle; double pitch; for ( i=0; i= 0.0 ) out = (int)( in + 0.5 ); else out = (int)( in - 0.5 ); return( out ); } /************************************************************************/ /* クロスマーク表示 */ /************************************************************************/ void draw_cros( x, y ) int x, y; { Lib_drawline( x-8, y, x+8, y ); Lib_drawline( x, y-8, x, y+8 ); } /************************************************************************/ /* 回転登録 */ /************************************************************************/ int roll_ptn_reg( xs, ys, xe, ye, xo, yo, max, num ) int xs; /* 入力:登録したいパターンの領域の始点X座標 */ int ys; /* 入力:登録したいパターンの領域の始点Y座標 */ int xe; /* 入力:登録したいパターンの領域の終点X座標 */ int ye; /* 入力:登録したいパターンの領域の終点Y座標 */ int xo; /* 入力:0度パタン登録時のXオフセット */ int yo; /* 入力:0度パタン登録時のYオフセット */ int max; /*最大角度±*/ int num; /*分割個数±*/ { int i, fnc_status, status; int width, height; int current_gray_mem, rotate_gray_mem; int old_xs, old_ys, old_xe, old_ye; int rotate_angle, angle; int max_len, xd, yd, xc, yc; status = NORMAL_RETURN; if ( max != 0 && num != 0 ) { /* 角度補正あり */ if( ERROR_RETURN != ( rotate_gray_mem = Lib_alloc_gray_memory() ) ) { current_gray_mem = Lib_get_gray_memory(); /* ステージウィンドウ位置の保存 */ Lib_get_stage_window( &old_xs, &old_ys, &old_xe, &old_ye ); rotate_angle = max / num; width = xe - xs + 1; height = ye - ys + 1; max_len = Lib_sqrt32( width * width + height * height ); xd = ( max_len - width ) / 2; yd = ( max_len - height ) / 2; /* 回転中心位置の取得 */ get_square_center_position( xs, ys, xe, ye , &xc, &yc ); /* 回転する領域の指定 */ Lib_set_stage_window( xs - xd, ys - yd, xe + xd, ye + yd ); /* カレントグレイメモリを回転後のメモリにする */ Lib_change_gray_memory( rotate_gray_mem ); for( i = 0, angle = rotate_angle; i < num; i++, angle += rotate_angle ) { Lib_rotation( current_gray_mem, rotate_gray_mem, angle, xc, yc ); Lib_sprintf( roll_name_r[i].cn, "R%03d", i ); fnc_status = register_pattern( roll_name_r[i].in, xs, ys, xe, ye, xo, yo ); /*登録*/ if ( fnc_status != 0 ) { status = ERROR_RETURN; break; } } for ( i = 0, angle = 3600 - rotate_angle; i < num; i++, angle -= rotate_angle ) { if ( fnc_status != 0 ) { status = ERROR_RETURN; break; } Lib_rotation( current_gray_mem, rotate_gray_mem, angle, xc, yc ); Lib_sprintf( roll_name_l[i].cn, "L%03d", i ); fnc_status = register_pattern( roll_name_l[i].in, xs, ys, xe, ye, xo, yo ); /*登録*/ } /* カレントグレイメモリを元に戻す */ Lib_change_gray_memory( current_gray_mem ); /* ステージウィンドウ位置を元に戻す */ Lib_set_stage_window( old_xs, old_ys, old_xe, old_ye ); /* 回転用メモリを開放する */ Lib_free_gray_memory( rotate_gray_mem ); } else Lib_chrdisp( 1, 30, "メモリ不足" ); } return( status ); } /************************************************************************/ /* 矩形の中心位置の取得 */ /************************************************************************/ void get_square_center_position( xs, ys, xe, ye, x, y ) int xs; /* 入力:領域の始点X座標 */ int ys; /* 入力:領域の始点Y座標 */ int xe; /* 入力:領域の終点X座標 */ int ye; /* 入力:領域の終点Y座標 */ int *x; /* 出力:中心X座標 */ int *y; /* 出力:中心Y座標 */ { *x = ( xs + xe ) / 2; *y = ( ys + ye ) / 2; } /************************************************************************/ /* パターンの登録 */ /************************************************************************/ int register_pattern( name, xs, ys, xe, ye, xoffset, yoffset ) int name; /* 入力:登録したいパターンの名称 */ int xs; /* 入力:登録したいパターンの領域の始点X座標 */ int ys; /* 入力:登録したいパターンの領域の始点Y座標 */ int xe; /* 入力:登録したいパターンの領域の終点X座標 */ int ye; /* 入力:登録したいパターンの領域の終点Y座標 */ int xoffset; /* 入力:X座標位置のオフセット (画素の10倍値) */ int yoffset; /* 入力:Y座標位置のオフセット (画素の10倍値) */ { int rtn; int width, height; width = xe - xs + 1; height = ye - ys + 1; if( 1 == ( width % 2 ) ) width -= 1; if( 1 == ( height % 2 ) ) height -= 1; if ( -1 == ( rtn = Lib_gs_usepat( name, xs, ys, width, height, xoffset, yoffset ) ) ) Lib_display_message( 150, 200, "エラー", "既に200個登録済みです" ); else if ( -2 == rtn ) Lib_display_message( 150, 200, "エラー", "パタン格納領域不足です" ); else if ( -3 == rtn ) Lib_display_message( 150, 200, "エラー", "始点X、Yが範囲外です" ); else if ( -4 == rtn ) Lib_display_message( 150, 200, "エラー", "パタンサイズが範囲外です" ); else if ( -7 == rtn ) Lib_display_message( 150, 200, "エラー", "一定濃度のため登録できません" ); return( rtn ); } /************************************************************************/ /* BOX設定 */ /************************************************************************/ void box_set( xs, ys, xe, ye ) int *xs, *ys, *xe, *ye; /* 出力:BOXのxs, ys, xe, ye */ { int xpos, ypos; int s_xpos, s_ypos; int sts; /* 始点設定 */ s_xpos = xpos = 255; s_ypos = ypos = 240; Lib_move_cursor( xpos, ypos ); Lib_chrdisp( 1, 30, "始点を指定してください" ); 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 ) { *xs = xpos; *ys = ypos; break; } } Lib_chrdisp( 1, 30, "終点を指定してください" ); /* 終点設定 */ s_xpos = xpos = *xs; s_ypos = ypos = *ys; Lib_move_cursor( xpos, ypos ); for (;;) { sts = 0; sts = Lib_see_current_position( &xpos, &ypos ); /* マウス位置読みとり */ if ( s_xpos != xpos || s_ypos != ypos ) { Lib_move_cursor( xpos, ypos ); Lib_box( *xs, *ys, s_xpos, s_ypos, 0x00000000 ); Lib_box( *xs, *ys, xpos, ypos, SOLID_LINE ); s_xpos = xpos; s_ypos = ypos; } if ( CURSOR_EXECUTE == sts ) { *xe = xpos; *ye = ypos; break; } } }