/* * ***************************************************************** * * * * * 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 FS0拡張画像評価 EXMEM902.C */ /*[作成者]H.Yagi */ /* 目的: 関数: 履歴: Ver 1.0 98/05/20 注記:CSC902シリーズで動作します。 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_file.h" #include "f_gray.h" #include "f_bgray.h" #include "f_filter.h" #include "f_search.h" #include "f_meas.h" #include "f_exmeas.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 ascope( void ); void gs_set( void ); void meas_set( void ); void edge_set( void ); void pad_gs_exec( void ); void set_file( void ); void pdm_file_list( int, int, PARADIGM * ); void pdm_bin_level( int, int, PARADIGM * ); void pdm_wind_set( int, int, PARADIGM * ); void pdm_line_set( int, int, PARADIGM * ); void pdm_displine( int, int, PARADIGM * ); void wind_set( int *, int *, int *, int * ); void ptn_reg( void ); void ptn_disp( void ); void gs_joken( void ); void exec( void ); int d4i5_d( double ); int xxx_freeze( int ); void cut_space( char *, char * ); void make_image( void ); void image_set( void ); void set_mem_size( int *, int * ); double u_dabs( double ); void draw_cross( int, int, int, int ); int gs_exec( int, int, int, int, int, int, int, int, int, int, int ); void meas_exec( int ); void edge_exec( 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 ", " 設 定 " }, { " SET FILE ", " ファイル選択 " }, { " EXEC ", " 実 行 " }, { " PROC4 ", " 処理4 " } }; #define INIT_CUR_POS_X 255 #define INIT_CUR_POS_Y 239 #define FC1300_MSIZE_X 1280 /*FC1300画像のX方向画素数*/ #define FC1300_MSIZE_Y 1030 /*FC1300画像のY方向画素数*/ typedef enum { EXEC_SETTING, EXEC_MAINMENU, EXEC_NO }dummy1; #define MAX_NO_GRAY_SEARCH 50 static int Rslt_Buf[(MAX_NO_GRAY_SEARCH * 3)]; static struct MEASDATA *measp; static int indextbl[8000+1]; static struct CALCDATA *calcultp; #define FACTOR 256 #define FILENAME_SAIZE 12 char grayfile[FILENAME_SAIZE+1]; int pad_level_ptn; int pad_level_ms; static PVAL value_meas[10]; int pad_level_edge; static PVAL value_edge[5]; int pad_level_point; PVAL value_point[2]; int sts; int time; int gray_mem_no; static char ss[100]; int mem_size_x; /* 拡張画像のX方向画素数 */ int mem_size_y; /* 拡張画像のY方向画素数 */ int name; /* サーチパタン名称 */ int gs_wxs; /* サーチ範囲始点X */ int gs_wys; /* サーチ範囲始点Y */ int gs_wxe; /* サーチ範囲終点X */ int gs_wye; /* サーチ範囲終点Y */ int src_no; /* サーチ個数 */ int seido; /* 精度 */ int complex; /* 複雑度 */ int mid_lower; /* 途中下限値 */ int last_lower; /* 最終下限値 */ int bin_level; /*2値レベル */ int wxs, wys, wxe, wye; /*計測範囲 */ int color; /*対象色 */ int meas_edge; /*接触塊オプション */ int l_limit; /*面積下限値 */ int u_limit; /*面積上限値 */ int edge_wxs, edge_wys, edge_wxe, edge_wye; /*エッジ検出始点・終点 */ int diff_p, level_p; /*微分しきい値、濃度しきい値*/ int precise; /*エッジ精度 */ /* * メイン */ void main( void ) { int sts; int xpos; int ypos; int s_xpos; int s_ypos; int rtn; /* 初期メッセージ表示 */ 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; mem_size_x = FC1300_MSIZE_X; mem_size_y = FC1300_MSIZE_Y; name = 0x30303030; /* 0000 */ gs_wxs = 0; gs_wys = 0; gs_wxe = FC1300_MSIZE_X - 1; gs_wye = FC1300_MSIZE_Y - 1; src_no = 1; seido = 0; complex = 1; mid_lower = 5000; last_lower = 7000; strcpy( grayfile, "EXMEM1.DAT" ); bin_level = 128; wxs = 0; wys = 0; wxe = FC1300_MSIZE_X - 1; wye = FC1300_MSIZE_Y - 1; color = WHITE_COLOR; meas_edge = ON; l_limit = 10; u_limit = FC1300_MSIZE_X * FC1300_MSIZE_Y; edge_wxs = 0; edge_wys = 0; edge_wxe = 0; edge_wye = 0; diff_p = 50; level_p = 50; precise = 0; /*拡張画像サイズの設定*/ set_mem_size( &mem_size_x, &mem_size_y ); Lib_gs_open_data_file( CONTINUE_PTN_AREA ); /*拡張ビデオ入力の初期化*/ if ( NORMAL_RETURN != ( rtn = Lib_ExtraCameraInit( mem_size_x, mem_size_y ))) { Lib_display_message( 70, 200, "Lib_ExtraCameraInit エラー", "    処理打ち切り    " ); return; } Lib_set_stage_window( 0, 0, mem_size_x - 1, mem_size_y - 1 ); Lib_stage_input(); /* 入力ビデオ制御 */ 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_no = Lib_alloc_gray_memory(); /* グレイメモリの確保 */ if ( -1 == gray_mem_no ) { Lib_display_message( 70, 200, "グレイメモリ アロケーションエラー", "処理打ち切り" ); return; } else Lib_gray_memory_cls( gray_mem_no ); /* システム構築対応1次特徴量計測処理オープン */ Lib_Open_meas_structure ( ); /* メニュー制御 */ 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 ); set_file( ); /*ファイル名設定*/ 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( ); /*実行*/ 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_no ); Lib_set_stage_window( 0, 0, 511, 479 ); Lib_stage_input(); Lib_set_meas_area_upper( Lib_get_dx_size()*Lib_get_dy_size() ); Lib_ExtraCameraFinish( ); /*拡張ビデオ入力の終了*/ Lib_gs_close_data_file(); } /* * メインメニュー表示 */ 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, "【機能\概要】 EXMEM902.BIN" ); Lib_chrdisp( 11, 10, "FS0拡張画像評価(902用)" ); Lib_chrdisp( 11, 12, "下記処理が可能\です。" ); Lib_chrdisp( 11, 14, " ・Aスコープ" ); Lib_chrdisp( 11, 16, " ・グレイサーチ" ); Lib_chrdisp( 11, 18, " ・2値計測" ); Lib_chrdisp( 11, 20, " ・エッジ検出" ); } /************************************************************************/ /* 設定 */ /************************************************************************/ void set( ) { int rtn; int i; int pad_level_set; Lib_set_pad_maxstring( 14 ); /*パッド表示文字数変更*/ pad_level_set = Lib_view_open(); Lib_view_set_title( pad_level_set, "設定" ); i = 0; Lib_view_set_null( pad_level_set, 5, 5, "Aスコープ", i ); i++; Lib_view_set_null( pad_level_set, 5, 35, "サーチ設定", i ); i++; Lib_view_set_null( pad_level_set, 5, 65, "2値計測設定", i ); i++; Lib_view_set_null( pad_level_set, 5, 95, "エッジ検出設定", i ); i++; Lib_view_set_null( pad_level_set, 5, 125, "画像作成", i ); i++; Lib_view_set_size( pad_level_set, 50, 80, 30, 5 ); Lib_draw_command( pad_level_set ); for (;;) { if ( ERROR_RETURN != ( rtn = Lib_process_command( pad_level_set ) ) ) { switch( rtn ) { case 0: Lib_erase_command( pad_level_set ); ascope( ); /* Aスコープ */ Lib_draw_command( pad_level_set ); break; case 1: Lib_erase_command( pad_level_set ); gs_set( ); /*グレイサーチ設定*/ Lib_draw_command( pad_level_set ); break; case 2: Lib_erase_command( pad_level_set ); meas_set(); /*2値計測設定*/ Lib_draw_command( pad_level_set ); break; case 3: Lib_erase_command( pad_level_set ); edge_set(); /*エッジ検出設定*/ Lib_draw_command( pad_level_set ); break; case 4: Lib_erase_command( pad_level_set ); make_image( ); /*画像ファイル作成*/ Lib_draw_command( pad_level_set ); break; case PAD_QUIT: /* 「終了」をクリック? */ Lib_erase_command( pad_level_set ); Lib_view_close( pad_level_set ); break; } } if ( PAD_QUIT == rtn ) break; } Lib_set_pad_maxstring( 10 ); /*パッド表示文字数初期化*/ } /************************************************************************/ /* Aスコープ */ /************************************************************************/ void ascope( ) { Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) Lib_ex_ascope( 0 ); /*Aスコープ*/ } /************************************************************************/ /* グレイサーチ設定 */ /************************************************************************/ void gs_set( ) { int rtn; int i; pad_level_ptn = Lib_view_open(); Lib_view_set_title( pad_level_ptn, "サーチ設定" ); i = 0; Lib_view_set_null( pad_level_ptn, 5, 5, "サーチ範囲" , i ); i++; Lib_view_set_null( pad_level_ptn, 5, 35, "パタン登録" , i ); i++; Lib_view_set_null( pad_level_ptn, 5, 65, "パタン表\示" , i ); i++; Lib_view_set_null( pad_level_ptn, 5, 95, "サーチ条件" , i ); i++; Lib_view_set_null( pad_level_ptn, 5, 125, "サーチ試行" , i ); i++; Lib_view_set_size( pad_level_ptn, 50, 80, 30, 5 ); Lib_draw_command( pad_level_ptn ); for (;;) { if ( ERROR_RETURN != ( rtn = Lib_process_command( pad_level_ptn ) ) ) { switch( rtn ) { case 0: Lib_erase_command( pad_level_ptn ); wind_set( &gs_wxs, &gs_wys, &gs_wxe, &gs_wye ); /* サーチ範囲 */ Lib_draw_command( pad_level_ptn ); break; case 1: Lib_erase_command( pad_level_ptn ); ptn_reg( ); /* パタン登録 */ Lib_draw_command( pad_level_ptn ); break; case 2: Lib_erase_command( pad_level_ptn ); Lib_set_pad_maxstring( 10 ); /*パッド表示文字数初期化*/ ptn_disp( ); /*パタン表示*/ Lib_set_pad_maxstring( 14 ); /*パッド表示文字数初期化*/ Lib_draw_command( pad_level_ptn ); break; case 3: Lib_erase_command( pad_level_ptn ); gs_joken(); /* サーチ条件 */ Lib_draw_command( pad_level_ptn ); break; case 4: Lib_erase_command( pad_level_ptn ); pad_gs_exec( ); /*サーチ試行*/ Lib_draw_command( pad_level_ptn ); break; case PAD_QUIT: /* 「終了」をクリック? */ Lib_erase_command( pad_level_ptn ); Lib_view_close( pad_level_ptn ); break; } } if ( PAD_QUIT == rtn ) break; } } /************************************************************************/ /* 2値計測設定 */ /************************************************************************/ static char *select_color[2] = { "黒", "白" }; void meas_set( ) { int no, i; pad_level_ms = Lib_view_open(); Lib_view_set_title( pad_level_ms, "2値計測設定" ); value_meas[0].value_type = ( long )bin_level; value_meas[2].select_type = color; value_meas[3].on_off_type = meas_edge; value_meas[4].value_type = ( long )l_limit; value_meas[5].value_type = ( long )u_limit; i = 0; Lib_view_set_uniq_numeral( pad_level_ms, 5, 5, "2値レベル", value_meas[i].value_type , 0, 255, i ); i++; Lib_view_set_null ( pad_level_ms, 5, 35, "計測範囲" , i ); i++; Lib_view_set_select ( pad_level_ms, 5, 65, "対象色", value_meas[i].select_type, 2, select_color, i ); i++; Lib_view_set_uniq_alter ( pad_level_ms, 5, 95, "境界", value_meas[i].on_off_type, i ); i++; Lib_view_set_uniq_numeral( pad_level_ms, 5, 125, "面積下限値", value_meas[i].value_type, 0, mem_size_x*mem_size_y,i ); i++; Lib_view_set_uniq_numeral( pad_level_ms, 5, 155, "面積上限値", value_meas[i].value_type, 0, mem_size_x*mem_size_y,i ); i++; Lib_set_paradigm( pad_level_ms, 0, WHOLE_TIMING, pdm_bin_level ); Lib_set_paradigm( pad_level_ms, 1, 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 ) ) ) { if ( PAD_EXECUTE == no ) { bin_level = value_meas[0].value_type; color = value_meas[2].select_type; meas_edge = value_meas[3].on_off_type; l_limit = value_meas[4].value_type; u_limit = value_meas[5].value_type; } } else { Lib_chrdisp( 1, 28, "pad_meas err" ); } Lib_erase_menu( pad_level_ms ); Lib_view_close( pad_level_ms ); } /************************************************************************/ /* エッジ検出設定 */ /************************************************************************/ static char *select_precise[3] = { "1ライン", "3ライン", "5ライン" }; void edge_set( ) { int no; int i; Lib_set_pad_maxstring( 12 ); /*パッド表示文字数変更*/ pad_level_edge = Lib_view_open(); Lib_view_set_title( pad_level_edge, "エッジ検出設定" ); value_edge[1].value_type = ( long )diff_p; value_edge[2].value_type = ( long )level_p; value_edge[3].select_type = precise; i = 0; Lib_view_set_null ( pad_level_edge, 5, 5, "ライン設定" , i ); i++; Lib_view_set_uniq_numeral( pad_level_edge, 5, 35, "微分しきい値", value_edge[i].value_type, 1, 99, i ); i++; Lib_view_set_uniq_numeral( pad_level_edge, 5, 65, "濃度しきい値", value_edge[i].value_type, 1, 99, i ); i++; Lib_view_set_select ( pad_level_edge, 5, 95, "精度", value_edge[i].select_type, 3, select_precise, i ); i++; Lib_set_paradigm( pad_level_edge, 0, START_TIMING, pdm_line_set ); Lib_view_set_size( pad_level_edge, 80, 80, 5, 5 ); Lib_draw_menu( pad_level_edge ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_edge, value_edge ) ) ) { if ( PAD_EXECUTE == no ) { diff_p = ( int )value_edge[1].value_type; level_p = ( int )value_edge[2].value_type; precise = value_edge[3].select_type; } } else { Lib_chrdisp( 1, 28, "pad_level_edge ERR!" ); } Lib_erase_menu( pad_level_edge ); Lib_view_close( pad_level_edge ); Lib_set_pad_maxstring( 10 ); /*パッド表示文字数初期化*/ } /************************************************************************/ /* 計測ラインの設定制御 */ /************************************************************************/ void pdm_line_set( timing, numb, val ) int timing; int numb; PARADIGM val[]; { int no, i; int scale; Lib_erase_menu( pad_level_edge ); Lib_erase_cursor( ); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) { pad_level_point = Lib_view_open(); Lib_view_set_title( pad_level_point, "ライン設定" ); value_point[0].point_type.x = edge_wxs; value_point[0].point_type.y = edge_wys; value_point[1].point_type.x = edge_wxe; value_point[1].point_type.y = edge_wye; scale = Lib_get_frame_ratio(); i = 0; Lib_view_set_expoint( pad_level_point, 5, 5, "始点" , value_point[i].box_type.x, value_point[i].point_type.y, 4, 0, 0, scale, scale, i ); i++; Lib_view_set_expoint( pad_level_point, 5, 35, "終点", value_point[i].box_type.x, value_point[i].point_type.y, 4, 0, 0, scale, scale, i ); i++; Lib_set_paradigm( pad_level_point, 1, WHOLE_TIMING, pdm_displine ); Lib_view_set_size( pad_level_point, 100, 360, 5, 5 ); Lib_draw_menu( pad_level_point ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_point, value_point ) ) ) { if ( PAD_EXECUTE == no ) { edge_wxs = value_point[0].point_type.x; edge_wys = value_point[0].point_type.y; edge_wxe = value_point[1].point_type.x; edge_wye = value_point[1].point_type.y; } } else { Lib_chrdisp( 1, 28, "pad_level_point ERR!" ); } Lib_erase_menu( pad_level_point ); Lib_view_close( pad_level_point ); } Lib_draw_cursor( 255, 240 ); Lib_draw_menu( pad_level_edge ); } /*********************************************************************/ /* 設定ライン表示                          */ /*********************************************************************/ void pdm_displine( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { static int scale; if ( START_TIMING == Timing ) { scale = Lib_get_frame_ratio(); } Lib_cls( LINE_PLANE, 0 ); Lib_drawline( value_point[0].point_type.x / scale, value_point[0].point_type.y / scale, val[0].int_type / scale, val[1].int_type / scale ); } /*********************************************************************/ /*  2値レベル設定                         */ /*********************************************************************/ void pdm_bin_level( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { static int rtn; if ( START_TIMING == Timing ) { rtn = ERROR_RETURN; Lib_erase_menu( pad_level_ms ); Lib_display_control( BIN_PLANE | LINE_PLANE | CHAR_PLANE ); rtn = xxx_freeze( NOT_TRANSMIT ); /* 画像LOAD */ } else if ( END_TIMING == Timing ) { Lib_display_control( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_draw_menu( pad_level_ms ); } if ( NORMAL_RETURN == rtn ) { Lib_binary_convert( 0, 0, (int)val[0].long_type ); Lib_ex_video_transmit( 0, BIN_PLANE, REDUCE_MODE ); /*拡張画像の表示*/ } } /*********************************************************************/ /*  ウインド設定制御                        */ /*********************************************************************/ void pdm_wind_set( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { Lib_erase_menu( pad_level_ms ); wind_set( &wxs, &wys, &wxe, &wye ); Lib_draw_menu( pad_level_ms ); } /*********************************************************************/ /*  ウインド設定                          */ /*********************************************************************/ void wind_set( xs, ys, xe, ye ) int *xs, *ys, *xe, *ye; /* 入出力:ウインド位置 */ { int pad_level_wind; PVAL value_wind[2]; int no, i; int scale; int param[14]; Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) { pad_level_wind = Lib_view_open(); Lib_view_set_title( pad_level_wind, "処理範囲" ); value_wind[0].box_type.x = *xs; value_wind[0].box_type.y = *ys; value_wind[1].box_type.x = *xe - *xs + 1; value_wind[1].box_type.y = *ye - *ys + 1; scale = Lib_get_frame_ratio(); param[0] = 0; /*X始点オフセット*/ param[1] = 0; /*Y始点オフセット*/ param[2] = scale; /*X方向縮尺*/ param[3] = scale; /*Y方向縮尺*/ param[4] = 1; /*X分解能*/ param[5] = 1; /*Y分解能*/ param[6] = 0; /*最小X座標値*/ param[7] = 0; /*最小Y座標値*/ param[8] = 511; /*最大X座標値*/ param[9] = 479; /*最大Y座標値*/ param[10] = 2; /*最小幅*/ param[11] = 2; /*最小高さ*/ param[12] = 512; /*最大幅*/ param[13] = 480; /*最大高さ*/ i = 0; Lib_view_set_exbox( pad_level_wind, 5, 5, "始点" , value_wind[i].box_type.x, value_wind[i].box_type.y, 4, 1, param, i ); i++; Lib_view_set_exbox( pad_level_wind, 5, 35, "サイズ", value_wind[i].box_type.x, value_wind[i].box_type.y, 4, 0, param, i ); i++; Lib_view_set_size( pad_level_wind, 100, 360, 5, 5 ); Lib_draw_menu( pad_level_wind ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_wind, value_wind ) ) ) { if ( PAD_EXECUTE == no ) { *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; } } else { Lib_chrdisp( 1, 28, "pad_level_wind ERR!" ); } Lib_erase_menu( pad_level_wind ); Lib_view_close( pad_level_wind ); } } /************************************************************************/ /* パタン登録 */ /************************************************************************/ void ptn_reg( ) { int rtn; int scale; Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) { scale = Lib_get_frame_ratio(); if ( NORMAL_RETURN == ( rtn = Lib_gs_exdefpat( name, 0, 0, scale, scale ) ) ) /* パタン登録 */ { /* GRAY_PTN.SYS のセーブ */ Lib_chrdisp( 1, 30, "パタンファイルセーブ中..." ); if ( NORMAL_RETURN != ( rtn = Lib_gs_save_data_file() )) { Lib_sprintf( ss, " 異常終了 = %d ", rtn ); Lib_display_message( 300, 360, "保存エラー", ss ); } Lib_chrdisp( 1, 30, " " ); } else { Lib_sprintf( ss, " 異常終了 = %d ", rtn ); Lib_display_message( 300, 360, "登録エラー", ss ); } } } /************************************************************************/ /* パタン表示 */ /************************************************************************/ void ptn_disp( ) { Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_gs_dsppat( ); Lib_cls( GRAY_PLANE, BLACK_COLOR ); } /************************************************************************/ /* サーチ条件設定 */ /************************************************************************/ static char *select_seido[3] = { "通常", " 高", "超高" }; void gs_joken( ) { int pad_level_gs_joken; PVAL value_gs_joken[5]; int no, i; Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); pad_level_gs_joken = Lib_view_open(); Lib_view_set_title( pad_level_gs_joken, "サーチ条件" ); value_gs_joken[0].value_type = ( long )src_no; value_gs_joken[1].select_type = seido; value_gs_joken[2].value_type = ( long )complex; value_gs_joken[3].value_type = ( long )mid_lower; value_gs_joken[4].value_type = ( long )last_lower; i = 0; Lib_view_set_uniq_numeral( pad_level_gs_joken, 5, 5, "個数" , value_gs_joken[i].value_type, 1, 50, i ); i++; Lib_view_set_select ( pad_level_gs_joken, 5, 35, "精度" , value_gs_joken[i].select_type, 3, select_seido, i ); i++; Lib_view_set_uniq_numeral( pad_level_gs_joken, 5, 65, "複雑度" , value_gs_joken[i].value_type, 1, 9, i ); i++; Lib_view_set_uniq_numeral( pad_level_gs_joken, 5, 95, "途中下限値", value_gs_joken[i].value_type, 1000, 9999, i ); i++; Lib_view_set_uniq_numeral( pad_level_gs_joken, 5, 125, "最終下限値", value_gs_joken[i].value_type, 1000, 9999, i ); i++; Lib_view_set_size( pad_level_gs_joken, 100, 130, 35, 5 ); Lib_draw_menu( pad_level_gs_joken ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_gs_joken, value_gs_joken ) ) ) { src_no = ( int )value_gs_joken[0].value_type; seido = value_gs_joken[1].select_type; complex = ( int )value_gs_joken[2].value_type; mid_lower = ( int )value_gs_joken[3].value_type; last_lower = ( int )value_gs_joken[4].value_type; Lib_set_gray_search_mode( seido + 1 ); Lib_set_gray_complex ( complex ); Lib_set_gray_mid_lower ( mid_lower ); Lib_set_gray_last_lower ( last_lower ); } else { Lib_chrdisp( 1, 28, "pad_gs_joken err" ); } Lib_erase_menu( pad_level_gs_joken ); Lib_view_close( pad_level_gs_joken ); } /***********************************************************************/ /* 入力数値(double)の4捨5入した数値(int)を返す */ /***********************************************************************/ int d4i5_d( in ) double in; /* 入力:浮動小数点数値 */ { int out; if ( in >= 0.0 ) out = (int)( in + 0.5 ); else out = (int)( in - 0.5 ); return( out ); } /************************************************************************/ /* パッド上からのサーチ実行 */ /************************************************************************/ void pad_gs_exec( ) { Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) gs_exec( ON, name, src_no, gs_wxs, gs_wys, gs_wxe, gs_wye, seido, complex, mid_lower, last_lower ); } /************************************************************************/ /* 実行 */ /************************************************************************/ void exec( ) { int rtn; int i; int pad_level_exec; pad_level_exec = Lib_view_open(); Lib_view_set_title( pad_level_exec, "実行" ); i = 0; Lib_view_set_null( pad_level_exec, 5, 5, "サーチ" , i ); i++; Lib_view_set_null( pad_level_exec, 5, 35, "2値計測" , i ); i++; Lib_view_set_null( pad_level_exec, 5, 65, "エッジ検出" , i ); i++; Lib_view_set_size( pad_level_exec, 50, 80, 30, 5 ); Lib_draw_command( pad_level_exec ); for (;;) { if ( ERROR_RETURN != ( rtn = Lib_process_command( pad_level_exec ) ) ) { switch( rtn ) { case 0: Lib_erase_command( pad_level_exec ); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) { /*グレイサーチ*/ gs_exec( ON, name, src_no, gs_wxs, gs_wys, gs_wxe, gs_wye, seido, complex, mid_lower, last_lower ); } Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_draw_command( pad_level_exec ); break; case 1: Lib_erase_command( pad_level_exec ); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) { /*2値計測*/ meas_exec( EXEC_MAINMENU ); } Lib_draw_command( pad_level_exec ); break; case 2: Lib_erase_command( pad_level_exec ); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); if ( NORMAL_RETURN == xxx_freeze( TRANSMIT ) ) { /*エッジ検出*/ edge_exec( edge_wxs, edge_wys, edge_wxe, edge_wye ); } Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_draw_command( pad_level_exec ); break; case PAD_QUIT: /* 「終了」をクリック? */ Lib_erase_command( pad_level_exec ); Lib_view_close( pad_level_exec ); break; } } if ( PAD_QUIT == rtn ) break; } } /************************************************************************/ /* サーチ実行 */ /************************************************************************/ int gs_exec( disp, name, src_no, gs_wxs, gs_wys, gs_wxe, gs_wye, seido, complex, mid_lower, last_lower ) int disp; /* 0:サーチ位置非表示 1:サーチ位置表示*/ int name; /*サーチパタン名称 */ int src_no; /*サーチ個数 */ int gs_wxs, gs_wys, gs_wxe, gs_wye; /*サーチ範囲 */ int seido; /* 精度 */ int complex; /* 複雑度 */ int mid_lower; /* 途中下限値 */ int last_lower; /* 最終下限値 */ { int rtn; int scale; Lib_gs_window( NON_DISPLAY, gs_wxs, gs_wys, gs_wxe, gs_wye ); /**/Lib_strtclk_count(); /*タイマーカウントモードのスタート*/ rtn = Lib_gs_search ( NON_DISPLAY , name, src_no, seido, complex, mid_lower, last_lower, Rslt_Buf ); /**/Lib_time_disp( 0, 452 ); if ( 0 < rtn ) { scale = Lib_get_frame_ratio(); Lib_gs_disp_result( name, 0, 0, scale, scale, rtn, Rslt_Buf, ON ); /*拡張画像サーチ結果表示*/ } else if ( 0 == rtn ) Lib_display_message( 300, 360, "サーチエラー", "対象物なし" ); else { Lib_sprintf( ss, " 異常終了 = %d ", rtn ); Lib_display_message( 300, 360, "サーチエラー", ss ); } Lib_gs_window( NON_DISPLAY, 0, 0, mem_size_x - 1, mem_size_y - 1 ); /* ウインドを元に戻す */ return( rtn ); } /************************************************************************/ /* ファイル名設定 */ /************************************************************************/ void set_file( ) { int i; int no; int pad_level; PVAL value[2]; pad_level = Lib_view_open(); Lib_view_set_title( pad_level, "ファイル設定" ); strcpy( value[0].string_type, grayfile ); i = 0; Lib_view_set_uniq_string ( pad_level, 5, 5, "GRAY FILE", value[i].string_type, 12, i ); i++; Lib_view_set_null ( pad_level, 5, 35, "ファイル一覧", i ); i++; Lib_set_paradigm( pad_level, 1, START_TIMING, pdm_file_list ); Lib_view_set_size( pad_level, 50, 80, 5, 5 ); Lib_draw_menu( pad_level ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level, value ) ) ) { strcpy( grayfile, value[0].string_type ); } else { Lib_chrdisp( 1, 28, "pad err" ); } Lib_erase_menu( pad_level ); Lib_view_close( pad_level ); } /*********************************************************************/ /* ファイル一覧                          */ /*********************************************************************/ void pdm_file_list( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { Lib_system_process( FILE_MENU ); /* FILEパッドの呼出し */ } /************************************************************************/ /* フリーズ */ /************************************************************************/ int xxx_freeze( flag ) int flag; /* バッファ転送フラグ */ { int status; char wwstr[13]; char infile[20]; status = ERROR_RETURN; 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( 300, 360, "fload_err", infile ); } else { Lib_binary_convert( 0, 0, bin_level ); /*2値化*/ Lib_chrdisp( 1, 30, "         " ); if ( ON == flag ) { Lib_ex_video_transmit( 0, GRAY_PLANE, REDUCE_MODE ); /*拡張画像の表示*/ Lib_ex_video_transmit( 0, BIN_PLANE, REDUCE_MODE ); /*拡張画像の表示*/ } status = NORMAL_RETURN; } return( status ); } /*********************************************************************/ /* スペース除去                        */ /*********************************************************************/ void cut_space( instr, otstr ) char *instr; char *otstr; { for(;;) { if ( ' ' != *instr ) *otstr++ = *instr; if ( 0x00 == *instr ) break; instr++; } } /************************************************************************/ /* 画像ファイル作成 */ /************************************************************************/ void make_image( ) { Lib_chrdisp( 1, 30, "画像作成&保存中..." ); image_set(); /*イメージ書き込み*/ Lib_ex_video_transmit( 0, GRAY_PLANE, REDUCE_MODE ); /*拡張画像の表示*/ Lib_sprintf( ss, "\\FS0\\EXMEM0.DAT" ); if ( 0 == Lib_fsave( ss, Lib_adrs_gray_memory(0), Lib_get_fx_size()*Lib_get_fy_size() ) ) Lib_display_message( 300, 360, "fsave_err", ss ); Lib_chrdisp( 1, 30, "           " ); } /************************************************************************/ /* イメージ書き込み */ /************************************************************************/ void image_set() { int i; char *base; int loop; base = Lib_adrs_gray_memory( 0 ); loop = mem_size_x * mem_size_y; for ( i=0; icenterx / 10; /* 重心x */ center_y = calcultp->centery / 10; /* 重心y */ totalarea = calcultp->totalarea; /* 全面積 */ x = center_x / scale; y = center_y / scale; Lib_drawline( x-2, y-2, x+2, y+2 ); Lib_drawline( x-2, y+2, x+2, y-2 ); Lib_sprintf( ss, "%d", totalarea ); Lib_kanjishift( 0, 0, 0, x+5, y-5, ss ); } Lib_sprintf( ss, "個数:%d", ct ); Lib_chrdisp( 50, 30, ss ); /**/Lib_time_disp( 0, 452 ); Lib_display_keyinput(430,0," 確認 "); Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_set_stage_window( 0, 0, mem_size_x - 1, mem_size_y - 1 ); Lib_stage_input(); Lib_set_display_switch( ON ); Lib_input_video_control( GRAY_PLANE ); Lib_display_control( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ); } /*********************************************************************/ /* 拡張画像サイズの設定                 */ /*********************************************************************/ void set_mem_size( mem_size_x, mem_size_y ) int *mem_size_x; int *mem_size_y; { int no, i; int pad_level_mem_size; PVAL value_mem_size[2]; pad_level_mem_size = Lib_view_open(); Lib_view_set_title( pad_level_mem_size, "画像サイズ設定" ); value_mem_size[0].value_type = ( long )*mem_size_x; value_mem_size[1].value_type = ( long )*mem_size_y; i = 0; Lib_view_set_uniq_numeral( pad_level_mem_size, 5, 5, "水平画素数", value_mem_size[i].value_type , 100, 4096, i ); i++; Lib_view_set_uniq_numeral( pad_level_mem_size, 5, 35, "垂直画素数", value_mem_size[i].value_type , 100, 16000, i ); i++; Lib_view_set_size( pad_level_mem_size, 50, 50, 50, 5 ); Lib_draw_menu( pad_level_mem_size ); if( ERROR_RETURN != ( no = Lib_process_menu( pad_level_mem_size, value_mem_size ) ) ) { if ( PAD_EXECUTE == no ) { *mem_size_x = value_mem_size[0].value_type; *mem_size_y = value_mem_size[1].value_type; } } else { Lib_chrdisp( 1, 28, "pad_meas err" ); } Lib_erase_menu( pad_level_mem_size ); Lib_view_close( pad_level_mem_size ); } /*********************************************************************/ /* エッジ検出実行                 */ /*********************************************************************/ void edge_exec( xs, ys, xe, ye ) int xs, ys, xe, ye; { static EM_INSPECTION inspection; /* エッジ測定結果を格納する構造体 */ static EM_EDGE_INFO edge_info; static double dp, dw; int i; int em_precise; int scale; int dxs, dys, dxe, dye; int x, y; /**/Lib_strtclk_count(); /*タイマーカウントモードのスタート*/ scale = Lib_get_frame_ratio(); dxs = xs / scale; dys = ys / scale; dxe = xe / scale; dye = ye / scale; Lib_drawline( dxs, dys, dxe, dye ); if ( NORMAL_RETURN == Lib_em_inspection_open() ) /* エッジ検査の開始 */ { /*エッジ測定 */ if ( 0 == precise ) em_precise = EM_NORMAL_PRECISE; else if ( 1 == precise ) em_precise = EM_HIGH_PRECISE; else if ( 2 == precise ) em_precise = EM_SUPER_PRECISE; if ( NORMAL_RETURN == Lib_em_inspection( xs, ys, xe, ye, diff_p, level_p, em_precise, 1000, 1000, FACTOR, &inspection ) ) { for ( i = 0; i < inspection.num; i++ ) { dp = ( double )inspection.pitch[i] / 16.0; dw = ( double )inspection.width[i] / 16.0; Lib_sprintf ( ss, "(%d)pitch: %.1lf", i+1, dp ); Lib_chrdisp ( 1, 5+i, ss ); Lib_sprintf ( ss, "width: %.1lf", dw ); Lib_chrdisp ( 20, 5+i, ss ); } Lib_em_edge_pos( xs, ys, xe, ye, diff_p, level_p, &edge_info ); /* エッジ位置の計測 */ /* 計測結果の表示 */ Lib_sprintf( ss, "エッジ数 : %d", edge_info.num * 2 ); Lib_chrdisp( 40, 5, ss ); for ( i = 0; i < edge_info.num; i++ ) { x = d4i5_d( ( edge_info.upx[i] / 16.0 ) / (double)scale ); y = d4i5_d( ( edge_info.upy[i] / 16.0 ) / (double)scale ); draw_cross( x, y, 2, GRAPH_DRAW ); x = d4i5_d( ( edge_info.downx[i] / 16.0 ) / (double)scale ); y = d4i5_d( ( edge_info.downy[i] / 16.0 ) / (double)scale ); draw_cross( x, y, 2, GRAPH_DRAW ); } /**/Lib_time_disp( 0, 452 ); } else Lib_chrdisp( 1, 30, "エッジ検出エラー" ); Lib_em_inspection_close(); /* エッジ検査の終了 */ } else Lib_chrdisp( 1, 30, "エッジ検出エラー" ); Lib_display_keyinput( 430, 0, " 確認 " ); } /************************************************************************/ /* 絶対値取得(double型)                    */ /************************************************************************/ double u_dabs( in ) double in; /* 入力:符号付き数値 */ { double out; if ( in < 0.0 ) out = -in; else out = in; return( out ); } /************************************************************************/ /* 十字マーク表示 */ /************************************************************************/ void draw_cross( x, y, size, mode ) int x, y; /*入力:表示位置 */ int size; /*入力:長さ */ int mode; /*入力:0=GRAPH_ERAS, 1=GRAPH_DRAW */ { if ( GRAPH_DRAW == mode ) { Lib_drawline( x-size, y, x+size, y ); Lib_drawline( x, y-size, x, y+size ); } else { Lib_erasline( x-size, y, x+size, y ); Lib_erasline( x, y-size, x, y+size ); } }