/* * ***************************************************************** * * * * * 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 プロジェクションエッジ計測 PRJEDGE.C */ /*[作成者]H.Yagi */ /* 目的: 関数: 履歴: Ver 1.0 98/12/16 注記: m_menu.h、xx.hをインクルードして下さい。 m_menu.c、m_note.c、xxcomm.c、xxgraph.c、xxedge.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_filter.h" #include "f_file.h" #include "f_math.h" #include "f_gray.h" #include "f_em.h" #include "f_search.h" #include "xx.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_prj_set( int, int, int, PARADIGM * ); void pdm_set_edge_para( int, int, PARADIGM * ); void pdm_set_file_name( int, int, PARADIGM * ); void exec( void ); int exec_edge( int, int, int, int, int *, int *, int ); void set_file( void ); void cut_space( char *, char * ); void fs0_freeze( 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 typedef struct { int xs; /* X始点 */ int ys; /* Y始点 */ int xe; /* X終点 */ int ye; /* Y終点 */ } WIND_T; typedef enum { DIRECTION_X, DIRECTION_Y, DIRECTION_NO } dummy1; typedef enum { DETECT_TYPE1, DETECT_TYPE2, DETECT_TYPE_NO } dummy2; #define FILENAME_SAIZE 12 char grayfile[FILENAME_SAIZE+1]; int pad_level; int pad_level_ptn; static PVAL value[15]; int gray_mem_no1, gray_mem_no2; int exec_sw[DIRECTION_NO]; /*実行スイッチ */ WIND_T wind[DIRECTION_NO]; /*処理範囲 */ int pre_code; int detect_type; int edge_zerocross_mode; int edge_minmaxdiff; int edge_mode; int diff_p; /*微分しきい値 */ int level_p; /*濃度しきい値 */ int wave_onoff; /*波形表示フラグ*/ int fs0_image; /*FS0入力画像スイッチ*/ /* * メイン */ 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; exec_sw[DIRECTION_X] = OFF; exec_sw[DIRECTION_Y] = OFF; wind[DIRECTION_X].xs = 100; wind[DIRECTION_X].ys = 240; wind[DIRECTION_X].xe = 399; wind[DIRECTION_X].ye = 279; wind[DIRECTION_Y].xs = 230; wind[DIRECTION_Y].ys = 100; wind[DIRECTION_Y].xe = 279; wind[DIRECTION_Y].ye = 399; pre_code = 0; detect_type = DETECT_TYPE1; edge_zerocross_mode = 1; edge_minmaxdiff = 10; edge_mode = 0; diff_p = 50; level_p = 50; wave_onoff = OFF; fs0_image = OFF; strcpy( grayfile, "GRAYMEM1.DAT" ); /* 入力ビデオ制御 */ 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_mem_no1 = Lib_alloc_gray_memory(); if ( -1 == gray_mem_no1 ) { Lib_display_message( 70, 200, "グレイメモリ アロケーションエラー", "処理打ち切り" ); return; } else Lib_gray_memory_cls( gray_mem_no1 ); /* グレイメモリのアロケーション */ gray_mem_no2 = Lib_alloc_gray_memory(); if ( -1 == gray_mem_no2 ) { Lib_display_message( 70, 200, "グレイメモリ アロケーションエラー", "処理打ち切り" ); Lib_free_gray_memory( gray_mem_no1 ); return; } else Lib_gray_memory_cls( gray_mem_no2 ); /* メニュー制御 */ 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 ); 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_free_gray_memory( gray_mem_no1 ); Lib_free_gray_memory( gray_mem_no2 ); } /* * メインメニュー表示 */ 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, "【機能\概要】 PRJEDGE" ); Lib_chrdisp( 11, 10, "プロジェクションによるエッジ計測" ); Lib_chrdisp( 11, 12, "任意に固定画像(FS0)入力も可能\です。" ); } /************************************************************************/ /* 設定          */ /************************************************************************/ static char *select_pre_code[7] = { "なし  ", "平均  ", "ソ\ーベル", "最大値 ", "最小値 ", "ロバーツ", "鮮鋭化 " }; static char *select_detect_type[2] = { "1点のみ", "2点以上" }; void set( ) { int no, i; Lib_set_pad_maxstring( 16 ); /*パッド表示文字数変更*/ pad_level = Lib_view_open(); Lib_view_set_title( pad_level, "設定" ); value[0].on_off_type = exec_sw[DIRECTION_X]; value[1].on_off_type = exec_sw[DIRECTION_Y]; value[2].select_type = pre_code; value[3].select_type = detect_type; value[4].on_off_type = wave_onoff; value[5].on_off_type = fs0_image; i = 0; Lib_view_set_uniq_alter( pad_level, 5, 5, "Xプロジェクション位置", value[i].on_off_type, i ); i++; Lib_view_set_uniq_alter( pad_level, 5, 35, "Yプロジェクション位置", value[i].on_off_type, i ); i++; Lib_view_set_select ( pad_level, 5, 65, "前処理" , value[i].select_type, 7, select_pre_code, i ); i++; Lib_view_set_select ( pad_level, 5, 95, "エッジ検出タイプ", value[i].select_type, 2, select_detect_type, i ); i++; Lib_view_set_uniq_alter( pad_level, 5, 125, "波形表\示", value[i].on_off_type, i ); i++; Lib_view_set_uniq_alter( pad_level, 5, 155, "FS0画像", value[i].on_off_type, i ); i++; Lib_set_xparadigm( pad_level, 0, END_TIMING, pdm_prj_set ); Lib_set_xparadigm( pad_level, 1, END_TIMING, pdm_prj_set ); Lib_set_paradigm ( pad_level, 3, END_TIMING, pdm_set_edge_para ); Lib_set_paradigm ( pad_level, 5, END_TIMING, pdm_set_file_name ); 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 ) ) ) { if ( PAD_EXECUTE == no ) { exec_sw[DIRECTION_X] = value[0].on_off_type; exec_sw[DIRECTION_Y] = value[1].on_off_type; pre_code = value[2].select_type; detect_type = value[3].select_type; wave_onoff = value[4].on_off_type; fs0_image = value[5].on_off_type; } } else { Lib_chrdisp( 1, 28, "pad err" ); } Lib_erase_menu( pad_level ); Lib_view_close( pad_level ); Lib_set_pad_maxstring( 10 ); /*パッド表示文字数初期化*/ } /*********************************************************************/ /* プロジェクション位置設定                        */ /*********************************************************************/ void pdm_prj_set( Menu_no, Timing, Numb, val ) int Menu_no; int Timing; int Numb; PARADIGM val[]; { if (( DIRECTION_X == Menu_no ) && ( ON == value[0].on_off_type ) || ( DIRECTION_Y == Menu_no ) && ( ON == value[1].on_off_type )) { Lib_erase_menu( pad_level ); if ( ON == value[5].on_off_type ) fs0_freeze( TRANSMIT ); else Lib_freerun(); if ( DIRECTION_X == Menu_no ) XXwind_set( &wind[DIRECTION_X].xs, &wind[DIRECTION_X].ys, &wind[DIRECTION_X].xe, &wind[DIRECTION_X].ye ); else XXwind_set( &wind[DIRECTION_Y].xs, &wind[DIRECTION_Y].ys, &wind[DIRECTION_Y].xe, &wind[DIRECTION_Y].ye ); Lib_draw_menu( pad_level ); } } /************************************************************************/ /* エッジパラメータ設定       */ /************************************************************************/ static char *select_zerocross[2] = { "平均データ", "生データ " }; static char *select_mode[3] = { "最大微分値", "暗 → 明", "明 → 暗" }; void pdm_set_edge_para( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { int no, i; int pad_level_edge; static PVAL value_edge[5]; Lib_erase_menu( pad_level ); Lib_set_pad_maxstring( 12 ); /*パッド表示文字数変更*/ pad_level_edge = Lib_view_open(); Lib_view_set_title( pad_level_edge, "エッジパラメータ設定" ); i = 0; if ( DETECT_TYPE1 == value[3].select_type ) { value_edge[1].select_type = edge_zerocross_mode; value_edge[2].value_type = ( long )edge_minmaxdiff; value_edge[3].select_type = edge_mode; Lib_view_set_comment ( pad_level_edge,5, 5 ,"1点のみモード", i ); i++; Lib_view_set_select ( pad_level_edge,10, 35,"ゼロクロス処理", value_edge[i].select_type, 2, select_zerocross, i); i++; Lib_view_set_uniq_numeral( pad_level_edge,10, 65,"しきい値" , value_edge[i].value_type, 0, 255, i ); i++; Lib_view_set_select ( pad_level_edge,10, 95,"検出モード", value_edge[i].select_type, 3, select_mode, i ); i++; Lib_view_set_size( pad_level_edge, 50, 50, 5, 5 ); } else { value_edge[1].value_type = ( long )diff_p; value_edge[2].value_type = ( long )level_p; Lib_view_set_comment ( pad_level_edge, 5, 5 ,"2点以上モード", i ); i++; Lib_view_set_uniq_numeral( pad_level_edge, 10, 35, "微分しきい値", value_edge[i].value_type, 1, 99, i ); i++; Lib_view_set_uniq_numeral( pad_level_edge, 10, 65, "濃度しきい値", value_edge[i].value_type, 1, 99, i ); i++; Lib_view_set_size( pad_level_edge, 50, 50, 60, 5 ); } Lib_draw_menu( pad_level_edge ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_edge, value_edge ) ) ) { if ( PAD_EXECUTE == no ) { if ( DETECT_TYPE1 == value[3].select_type ) { edge_zerocross_mode = value_edge[1].select_type; edge_minmaxdiff = value_edge[2].value_type; edge_mode = value_edge[3].select_type; } else { diff_p = value_edge[1].value_type; level_p = value_edge[2].value_type; } } } else { Lib_chrdisp( 1, 28, "pad err" ); } Lib_erase_menu( pad_level_edge ); Lib_view_close( pad_level_edge ); Lib_set_pad_maxstring( 16 ); /*パッド表示文字数初期化*/ Lib_draw_menu( pad_level ); } /*********************************************************************/ /*  ファイル名設定                       */ /*********************************************************************/ void pdm_set_file_name( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { if ( ON == value[5].on_off_type ) Lib_get_string_by_keyboad( 50, 100, 12, grayfile ); } /************************************************************************/ /* 実行          */ /************************************************************************/ void exec( ) { register int j, i, a; int rtn; 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 sta, end; static int shaei[513]; static int s_shaei; int xs, ys, xe, ye; if ( ON == fs0_image ) fs0_freeze( TRANSMIT ); else Lib_freeze( TRANSMIT ); Lib_gray_memory_move( 0, gray_mem_no2, 0xff ); if ( 0 == pre_code ) /*なし*/ /*NOP*/; else if ( 1 == pre_code ) Lib_averaging( 0, gray_mem_no1 ); /*平均*/ else if ( 2 == pre_code ) Lib_sobel( 0, gray_mem_no1, XY_DIRECTION ); /*ソーベル XY*/ else if ( 3 == pre_code ) Lib_max_filter( 0, gray_mem_no1 ); /*最大値*/ else if ( 4 == pre_code ) Lib_min_filter( 0, gray_mem_no1 ); /*最小値*/ else if ( 5 == pre_code ) Lib_roberts( 0, gray_mem_no1 ); /*ロバーツ*/ else if ( 6 == pre_code ) Lib_sharp( 0, gray_mem_no1 ); /*鮮鋭化*/ if ( 0 != pre_code ) { Lib_xvideo_transmit( gray_mem_no1, GRAY_PLANE ); Lib_change_gray_memory( gray_mem_no1 ); } for ( j=0; j sta ) { Lib_drawline( i-1, s_shaei, i, shaei[a] ); } s_shaei = shaei[a]; } } } else { Lib_projection( 0, sumx, NULL, &prj, OFF ); /*プロジェクション(Y)*/ for ( i=0, a=ys; i sta ) { Lib_drawline( s_shaei, i-1, shaei[a], i ); } s_shaei = shaei[a]; } } } rtn = exec_edge( xs, ys, xe, ye, avey, avex, j ); if ( ERROR_RETURN == rtn ) { if ( DIRECTION_X == j ) Lib_chrdisp( 1, 29, "エッジ検出エラー( X )" ); else Lib_chrdisp( 1, 30, "エッジ検出エラー( Y )" ); } if ( ON == wave_onoff ) Lib_display_keyinput( 430, 0, " 確認 " ); Lib_gray_memory_move( gray_mem_no2, 0, 0xff ); } if ( 0 != pre_code ) Lib_change_gray_memory( 0 ); Lib_window( 0, 0, 511, 479 ); if (( OFF == fs0_image ) && ( 0 == pre_code )) Lib_freerun(); Lib_display_keyinput( 460, 0, "確認" ); Lib_cls( ( LINE_PLANE | CHAR_PLANE ), BLACK_COLOR ); } /************************************************************************/ /* エッジ検出 */ /************************************************************************/ int exec_edge( xs, ys, xe, ye, avey, avex, direction ) int xs, ys, xe, ye; int *avey, *avex; int direction; { int status; static int i; unsigned char *base; unsigned char *wwbase; unsigned char *p1; int windx; int windy; EM_INSPECTION *inspection; /*エッジ測定結果格納EM_INSPECTION型構造体ポインタ*/ EM_EDGE_INFO *edge_info; /*エッジ測定結果格納EM_EDGE_INFO型構造体ポインタ */ static double da; static double xx[30], yy[30]; int xp, yp; int x, y; int dx_size; double dx, dy; dx_size = Lib_get_dx_size(); windx = xe - xs + 1; /* ウィンド枠内x画素数 */ windy = ye - ys + 1; /* ウィンド枠内y画素数 */ base = (void *)Lib_adrs_gray_memory( 0 ); if ( DIRECTION_X == direction ) /*X方向*/ { yp = (ys+ye)/2; wwbase = base + yp * dx_size + xs; p1 = wwbase; for ( i=0; inum ) /*エッジペア数チェック*/ { for ( i=0; inum; i++ ) { yy[i] = ( ys + ye ) / 2.0; y = XXd4i5_d( yy[i] ); da = (double)edge_info->upx[i] / 16.0; x = XXd4i5_d( da ); XXdraw_cross( x, y, 5, GRAPH_DRAW ); da = (double)edge_info->downx[i] / 16.0; x = XXd4i5_d( da ); XXdraw_cross( x, y, 5, GRAPH_DRAW ); status = NORMAL_RETURN; } } else status = ERROR_RETURN; } } else { xp = (xs+xe)/2; wwbase = base + ys * dx_size + xp; p1 = wwbase; for ( i=0; inum ) /*エッジペア数チェック*/ { for ( i=0; inum; i++ ) { xx[i] = ( xs + xe ) / 2.0; x = XXd4i5_d( xx[i] ); da = (double)edge_info->upy[i] / 16.0; y = XXd4i5_d( da ); XXdraw_cross( x, y, 5, GRAPH_DRAW ); da = (double)edge_info->downy[i] / 16.0; y = XXd4i5_d( da ); XXdraw_cross( x, y, 5, GRAPH_DRAW ); status = NORMAL_RETURN; } } else status = ERROR_RETURN; } } return( status ); } /************************************************************************/ /* FS0フリーズ */ /************************************************************************/ void fs0_freeze( flag ) int flag; /* バッファ転送フラグ */ { char wwstr[13]; char infile[20]; Lib_freeze( NOT_TRANSMIT ); Lib_chrdisp( 1, 30, "画像ロード中..." ); cut_space( grayfile, wwstr ); Lib_sprintf( infile, "\\FS0\\%s", wwstr ); if ( 0 == Lib_fload( infile, Lib_adrs_gray_memory(0), Lib_get_fx_size()*Lib_get_fy_size() ) ) { Lib_chrdisp( 1, 30, "         " ); Lib_display_message( 70, 200, "fload_err", infile ); } else { Lib_chrdisp( 1, 30, "         " ); if ( ON == flag ) Lib_xvideo_transmit( 0, GRAY_PLANE ); /* モニタ表示 */ } } /*********************************************************************/ /* スペース除去                        */ /*********************************************************************/ void cut_space( instr, otstr ) char *instr; char *otstr; { for(;;) { if ( ' ' != *instr ) *otstr++ = *instr; if ( 0x00 == *instr ) break; instr++; } }