/* * ***************************************************************** * * * * * 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. * * * * * ***************************************************************** */ /* ＣＳＣ９０Ｘ　２値メモリマスク後の２値計測（システム構築対応） BINMASK.C */ /*［作成者］H.Yagi */ /* 目的： 関数： 履歴： Ver 1.0 98/07/02 Ver 2.0 00/04/24 注記：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_bgray.h" #include "f_binmem.h" #include "f_gray.h" #include "f_file.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_binlevel( int, int, PARADIGM * ); void pdm_set_mask( int, int, PARADIGM * ); void pdm_save_mask( int, int, PARADIGM * ); void exec( void ); void mask_load( int ); void mask_save( int ); void def_mask( int, int, int, int, int ); void adjust_mask ( int, int, int, int, int, int ); void set_mask_bit( int *, int, int, int ); void disp_mask_bit( int, unsigned char *, int, int, int ); void mask_bin_to_gray( int, int ); int mask_up_to_bin( 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] = { { " BIN ", "　２　値　" }, { " SET ", "　設　定　" }, { " EXEC ", " 実　行 " }, { " PROC4 ", " 処理４ " } }; #define INIT_CUR_POS_X 255 #define INIT_CUR_POS_Y 239 #define MASK_INIT 0 #define MASK_CONTINUE 1 #define MASK_OFF 0 #define MASK_ON 1 #define MAX_PEN_SIZE 512 /* マスク操作時の最大ペンサイズ */ #define MAX_MASK_SHAPE 2 /* 最大マスク形状数　 */ #define MASK_SHAPE_SQUARE 0 /* マスク形状（矩形） */ #define MASK_SHAPE_CIRCLE 1 /* マスク形状（円形） */ PVAL value[4]; int pad_level; static char ss[70]; int sts; int xs, ys, xe, ye; int time; int no; int bin_level; int mask_sw; int mask_flg; int bin_maskdata_no; /*マスクデータがある２値メモリＮＯ */ int gray_maskingimage_no; /*グレイマスク画像のメモリＮＯ */ /* * メイン */ 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; /* 入力ビデオ制御 */ 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 ); /* ２値メモリの確保 */ if ( ERROR_RETURN != ( bin_maskdata_no = Lib_alloc_bin_memory() ) ) { Lib_bin_memory_cls( bin_maskdata_no ); /* 濃淡メモリの確保 */ if ( ERROR_RETURN != ( gray_maskingimage_no = Lib_alloc_gray_memory() ) ) { /*初期化*/ bin_level = 128; /*２値レベル */ mask_sw = ON; /*マスク要否 */ mask_flg = OFF; /*マスク設定完了フラグ */ /* マスク ファイルロード */ mask_load( bin_maskdata_no ); mask_flg = ON; /* メニュー制御 */ 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 ); Lib_system_process( BINARY_MENU ); /*２値*/ 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(); /*設定*/ 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_maskingimage_no ); } else Lib_display_message( 70, 200, "エラー", "マスク用濃淡画像メモリが確保できません" ); Lib_free_bin_memory( bin_maskdata_no ); } else Lib_display_message( 70, 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 *)str_main_menu[2][iLanguage], (char *)NULL ); } /* * ヘルプ表示 */ static void disp_help( void ) { Lib_chrdisp( 10, 8, "【機能\概要】 　　　　　　　 BINMASK" ); Lib_chrdisp( 11, 10, "入力した２値画像にマスク処理後、２値計測を" ); Lib_chrdisp( 11, 12, "行うサンプルです。" ); Lib_chrdisp( 11, 14, "各物体の重心、面積と物体の個数を表\示します。" ); Lib_chrdisp( 11, 16, "計測のパラメータはシステムのパッドを使用しています。" ); Lib_chrdisp( 11, 18, "２値計測はシステム構\築対応です。" ); } /*********************************************************************/ /* 　設定　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 */ /*********************************************************************/ void set() { pad_level = Lib_view_open(); Lib_view_set_title( pad_level, "設定" ); Lib_view_set_uniq_numeral( pad_level, 5, 5, "２値レベル", bin_level, 0, 255, 0 ); Lib_view_set_uniq_alter ( pad_level, 5, 35, "マスク要否", mask_sw, 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_binlevel ); Lib_set_paradigm( pad_level, 2, START_TIMING, pdm_set_mask ); Lib_set_paradigm( pad_level, 3, START_TIMING, pdm_save_mask ); Lib_view_set_size( pad_level, 50, 80, 5, 5 ); /* 設定パッドの表示 */ Lib_draw_menu( pad_level ); /* 設定値の読みとり */ if( PAD_EXECUTE == Lib_process_menu( pad_level, value ) ) { bin_level = value[0].value_type; mask_sw = value[1].on_off_type; } Lib_erase_menu( pad_level ); Lib_view_close( pad_level ); } /*********************************************************************/ /* 　２値レベル設定　　　　　　　　　　　　　　　　　　　　　　　　 */ /*********************************************************************/ void pdm_binlevel( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { if (Timing == START_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 (Timing == END_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(); } /*********************************************************************/ /* 　マスク設定　　　　　　　　　　　　　　　　　　　　　　　　 */ /*********************************************************************/ void pdm_set_mask( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { Lib_erase_menu( pad_level ); Lib_freeze( TRANSMIT ); if ( OFF == mask_flg ) def_mask( 0, 0, gray_maskingimage_no, bin_maskdata_no, MASK_INIT ); /* マスク設定（１回目） */ else def_mask( 0, 0, gray_maskingimage_no, bin_maskdata_no, MASK_CONTINUE ); /* マスク設定（２回目以降） */ mask_flg = ON; Lib_freerun(); Lib_draw_menu( pad_level ); } /*********************************************************************/ /* 　マスクセーブ　　　　　　　　　　　　　　　　　　　　　　　 */ /*********************************************************************/ void pdm_save_mask( Timing, Numb, val ) int Timing; int Numb; PARADIGM val[]; { mask_save( bin_maskdata_no ); /*マスクファイルセーブ*/ } /*********************************************************************/ /* 実行 　　　　　　　　　　 　　　　 */ /*********************************************************************/ void exec( void ) { static struct MEASDATA *measp; static int *indextbl; unsigned int max_blob; char *error_string; int error_code; register int i; int ct; int blobno; int color; int center_x; int center_y; int area; int sumi,sumj; Lib_input_video_control( BIN_PLANE ); Lib_display_control( BIN_PLANE | LINE_PLANE | CHAR_PLANE ); /* システムで設定されている「最大ブローブ数」の値を取得し、indextblに必要な容量の */ /* ワークメモリを確保する */ max_blob = Lib_get_meas_max_blob(); if ( ( int * )NULL != ( indextbl = ( int * )Lib_mlalloc( ( max_blob + 1 ) * 4 ) ) ) { Lib_video_bin_level( bin_level ); Lib_strtclk_count(); /*タイマーカウントモードのスタート*/ Lib_freeze( NOT_TRANSMIT ); color = Lib_get_meas_color(); /* ﾒｼﾞｬｰ計測色(0:黒,else:白) */ /*２値メモリ０へマスクを反映させる*/ if ( ON == mask_sw ) { if ( BLACK_COLOR == color ) mask_up_to_bin( bin_maskdata_no, CURRENT_MEMORY, WHITE_COLOR ); /*マスクエリアを白にする*/ else mask_up_to_bin( bin_maskdata_no, CURRENT_MEMORY, BLACK_COLOR ); /*マスクエリアを黒にする*/ } Lib_xvideo_transmit( CURRENT_MEMORY, BIN_PLANE ); Lib_get_stage_window( &xs, &ys, &xe, &ye ); Lib_window( xs, ys, xe, ye ); no = Lib_get_measure_no(); /* ｼｽﾃﾑ構築対応１次特徴量計測処理オープン */ Lib_Open_meas_structure(); if ( NORMAL_RETURN == Lib_measure( no, &measp ) ) /* ﾒｼﾞｬｰ */ { if ( 0 < ( ct = Lib_orderng( no, measp, indextbl ) ) ) { /* ｼｽﾃﾑ構築対応１次特徴量ｱﾄﾞﾚｽﾃｰﾌﾞﾙ作成 */ Lib_Make_meas_structure ( (void *)measp ); for ( i = 0; i < ct; i++ ) { blobno = indextbl[i]; /* 重心の計算 */ area = *( Meas_area + blobno ); sumi = *( Meas_sumi + blobno ); sumj = *( Meas_sumj + blobno ); center_x = sumi / area; /* 重心ｘ */ center_y = sumj / area; /* 重心ｙ */ Lib_drawline( center_x-2, center_y-2, center_x+2, center_y+2 ); Lib_drawline( center_x-2, center_y+2, center_x+2, center_y-2 ); Lib_sprintf( ss, "%d", area ); Lib_kanjishift( 0, 0, 0, center_x+5, center_y-5, ss ); } Lib_sprintf( ss, "個数：%d", ct ); Lib_chrdisp( 50, 30, ss ); Lib_time_disp( 0, 452 ); } else Lib_chrdisp( 1, 30, "エラー：ブローブがありません。" ); } 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_chrdisp( 1, 30, ss ); } } else Lib_chrdisp( 1, 30, "エラー：indextbl用のワークメモリを確保できません。" ); Lib_display_keyinput( 430,0," 確認 " ); Lib_input_video_control( GRAY_PLANE ); Lib_display_control( GRAY_PLANE | LINE_PLANE | CHAR_PLANE ); Lib_cls( ( BIN_PLANE | LINE_PLANE | CHAR_PLANE ), BLACK_COLOR ); Lib_freerun(); } /************************************************************************/ /* マスクファイルの読込　　　　　　　 　　　　　　　　　　　　　　　 */ /************************************************************************/ void mask_load( mask_mem_no ) int mask_mem_no; { int *bin_base; bin_base = (void *)Lib_adrs_bin_memory( mask_mem_no ); if ( 0 == Lib_fload( "\\FS0\\MASK.DAT", (char *)bin_base, Lib_get_dx_size()*Lib_get_dy_size()/8 ) ) { /* ファイルなしの場合は初期化 */ Lib_bin_memory_cls( mask_mem_no ); } } /************************************************************************/ /* マスクファイルの保存　　　　　　　 　　　　　　　　　　　　　　　 */ /************************************************************************/ void mask_save( mask_mem_no ) int mask_mem_no; { int *bin_base; Lib_chrdisp( 1, 30, "マスクデータ セーブ中．．．" ); bin_base = (void *)Lib_adrs_bin_memory( mask_mem_no ); if ( 0 == Lib_fsave( "\\FS0\\MASK.DAT", (char *)bin_base, Lib_get_dx_size()*Lib_get_dy_size()/8 ) ) Lib_chrdisp( 1, 30, "MASK.DAT fsave_err!" ); Lib_chrdisp( 1, 30, " " ); } /***********************************************************************/ /* マスクパッド制御 */ /***********************************************************************/ void def_mask( gray_org_no, bin_org_no, gray_maskingimage_no, bin_maskdata_no, init_mode ) int gray_org_no; /*入力 ：グレイ生画像のメモリＮＯ */ int bin_org_no; /*入力 ：２値生画像のメモリＮＯ */ int gray_maskingimage_no; /*入力 ：グレイマスク画像のメモリＮＯ */ int bin_maskdata_no; /*入力 ：マスクデータがある２値メモリＮＯ */ int init_mode; /*入力 ：マスク情報の初期化　０：マスク情報初期化、１：マスク情報を継続使用 */ /*注釈：事前にgray_org_no, bin_org_noへ画像入力（グレイ＆２値）しておいてください*/ { int rtn; int pad_level; int width, height; int mask_keijo; int pen_size; char ss[20]; Lib_get_standard_key_size( &width, &height ); pen_size = 64; mask_keijo = MASK_SHAPE_SQUARE; Lib_gray_memory_move( gray_org_no, gray_maskingimage_no, 0xff ); if ( 0 == init_mode ) /*マスク情報の初期化要？*/ { Lib_cls( BIN_PLANE, BLACK_COLOR ); } else { mask_bin_to_gray( bin_maskdata_no, gray_maskingimage_no ); /*マスクの上書き*/ } Lib_xvideo_transmit( gray_maskingimage_no, GRAY_PLANE ); for (;;) { pad_level = Lib_view_open(); Lib_view_set_title ( pad_level, "マスク設定" ); Lib_view_set_null( pad_level, 5, 5, "ﾏｽｸ・オン", 0 ); Lib_view_set_null( pad_level, 5, 35, "ﾏｽｸ・オフ", 1 ); Lib_view_set_null( pad_level, 5, 65, "全消去" , 2 ); if ( MASK_SHAPE_CIRCLE == mask_keijo ) Lib_view_set_null( pad_level, width+10, 5, "形状: 円形", 3 ); else Lib_view_set_null( pad_level, width+10, 5, "形状: 矩形", 3 ); Lib_sprintf( ss, "ペンｻｲｽﾞ:%2d", pen_size ); Lib_view_set_comment ( pad_level, width+10, 35, ss, 4 ); Lib_view_set_null( pad_level, width+10, 65, "▲", 5 ); Lib_view_set_null( pad_level, width+10, 95, "▼", 6 ); Lib_view_set_size( pad_level, 0, 0, 5, 5 ); Lib_draw_command( pad_level ); rtn = Lib_process_command( pad_level ); switch ( rtn ) { case 0: Lib_cls( LINE_PLANE | CHAR_PLANE, BLACK_COLOR ); adjust_mask( gray_org_no, gray_maskingimage_no, bin_maskdata_no, MASK_ON, pen_size, mask_keijo ); break; case 1: Lib_cls( LINE_PLANE | CHAR_PLANE, BLACK_COLOR ); adjust_mask( gray_org_no, gray_maskingimage_no, bin_maskdata_no, MASK_OFF, pen_size, mask_keijo ); break; case 2: Lib_cls( LINE_PLANE | CHAR_PLANE, BLACK_COLOR ); Lib_xvideo_transmit( gray_maskingimage_no, GRAY_PLANE ); if( PAD_EXECUTE == Lib_display_message2( 100, 100, "ﾏｽｸ設定", "マスク全消去しても良いですか？" ) ) { Lib_bin_memory_cls ( bin_maskdata_no ); Lib_gray_memory_move( gray_org_no, gray_maskingimage_no, 0xff ); Lib_xvideo_transmit( gray_maskingimage_no, GRAY_PLANE ); } break; case 3: mask_keijo++; if ( MAX_MASK_SHAPE <= mask_keijo ) mask_keijo = MASK_SHAPE_SQUARE; break; case 5: if ( MAX_PEN_SIZE > pen_size ) pen_size *= 2; break; case 6: if ( 1 < pen_size ) pen_size /= 2; break; case PAD_QUIT: Lib_xvideo_transmit( gray_org_no, GRAY_PLANE ); break; } Lib_erase_command ( pad_level ); Lib_view_close( pad_level ); if ( PAD_QUIT == rtn ) break; } } /***********************************************************************/ /* マスク描画／消去 */ /***********************************************************************/ void adjust_mask( gray_org_no, gray_maskingimage_no, bin_maskdata_no, on_off, pen_size, mask_keijo ) int gray_org_no; /* 入力 ： グレイ生画像メモリＮＯ */ int gray_maskingimage_no; /* 入力 ：グレイマスク画像のメモリＮＯ */ int bin_maskdata_no; /* 入力 ：マスクデータがある２値メモリＮＯ */ int on_off; /* 入力 ： 書き込み or 消しとり */ int pen_size; /* 入力 ： ペンのサイズ */ int mask_keijo; /* 入力 ： マスク形状 */ { int i, a; int sts; int xpos; int ypos; int s_xpos; int s_ypos; int pen_half; int *bin_base; unsigned char *gray_base; int xs, ys, xe, ye; int dx_size, dy_size; bin_base = (void *)Lib_adrs_bin_memory( bin_maskdata_no ); gray_base = (void *)Lib_adrs_gray_memory( gray_maskingimage_no ); dx_size = Lib_get_dx_size(); dy_size = Lib_get_dy_size(); s_xpos = xpos = 255; s_ypos = ypos = 240; Lib_draw_cursor( s_xpos, s_ypos ); for (;;) { sts = 0; sts = Lib_see_current_position_real( &xpos, &ypos ); /* フレームバッファの表示範囲内かチェック */ if ( xpos < 0 ) xpos = 0; if ( dx_size <= xpos ) xpos = dx_size - 1; if ( ypos < 0 ) ypos = 0; if ( dy_size <= ypos ) ypos = dy_size - 1; /* 前回の位置と違うか？ */ if ( s_xpos != xpos || s_ypos != ypos ) { Lib_move_cursor( xpos, ypos ); s_xpos = xpos; s_ypos = ypos; } /* 左ボタン押下？ */ if ( CURSOR_EXECUTE == sts ) { if ( pen_size == 1 ) { set_mask_bit ( bin_base , xpos, ypos, on_off ); /* ﾏｽｸﾒﾓﾘ(2値ﾒﾓﾘ)へｾｯﾄ */ disp_mask_bit( gray_org_no, gray_base, xpos, ypos, on_off ); /* ﾏｽｸ表示ﾒﾓﾘ(ｸﾞﾚｲﾒﾓﾘ)へｾｯﾄ */ } else { pen_half = pen_size / 2; xs = xpos - pen_half; xe = xpos + pen_half; ys = ypos - pen_half; ye = ypos + pen_half; if ( xs < 0 ) xs = 0; if ( xe >= dx_size ) xe = dx_size - 1; if ( ys < 0 ) ys = 0; if ( ye >= dy_size ) ye = dy_size - 1; for ( i=ys; i<=ye; i++ ) { for ( a=xs; a<=xe; a++ ) { if ( MASK_SHAPE_CIRCLE == mask_keijo ) /* マスク形状は円形？ */ { /************************************************************************************************/ /* 任意の座標がある円内にあるかどうかの判別 */ /* （（ｃｘ−ｘ）＊（ｃｘ−ｘ））＋（（ｃｙ−ｙ）＊（ｃｙ−ｙ））　＜＝　ｒ＊ｒ　なら円内である */ /************************************************************************************************/ if ( ( (xpos-a)*(xpos-a) ) + ( (ypos-i)*(ypos-i) ) <= ( pen_half * pen_half ) ) { set_mask_bit ( bin_base , a, i, on_off ); /* ﾏｽｸﾒﾓﾘ(2値ﾒﾓﾘ)へｾｯﾄ */ disp_mask_bit( gray_org_no, gray_base, a, i, on_off ); /* ﾏｽｸ表示ﾒﾓﾘ(ｸﾞﾚｲﾒﾓﾘ)へｾｯﾄ */ } } else { set_mask_bit ( bin_base , a, i, on_off ); /* ﾏｽｸﾒﾓﾘ(2値ﾒﾓﾘ)へｾｯﾄ */ disp_mask_bit( gray_org_no, gray_base, a, i, on_off ); /* ﾏｽｸ表示ﾒﾓﾘ(ｸﾞﾚｲﾒﾓﾘ)へｾｯﾄ */ } } } } Lib_xvideo_transmit( gray_maskingimage_no, GRAY_PLANE ); } else if ( CURSOR_CANCEL == sts ) { break; } } } /***********************************************************************/ /* ２値メモリへのマスク書き込み */ /***********************************************************************/ void set_mask_bit( bin_base, x, y, color ) int *bin_base; /* 入力 ： ２値メモリの先頭アドレス */ int x; /* 入力 ： 書き込みＸ位置 */ int y; /* 入力 ： 書き込みＹ位置 */ int color; /* 入力 ： 書き込む色 */ { int fr; int bloc; int point; int d; int trc; fr = ( y * 512 ) + x; bloc = fr / 32; point = fr % 32; d = *( bin_base + bloc ); if ( MASK_ON == color ) /* マスクオン */ { if( 0 != ( d & ( 0x80000000 >> point ) ) ) { /* NON_OPERATE */ } else { trc = ( 0x80000000 >> point ); *( bin_base + bloc ) |= trc; /* OR （ 該当bitを１にする ）*/ } } else /* マスクオフ */ { if( 0 == ( d & ( 0x80000000 >> point ) ) ) { /* NON_OPERATE */ } else { trc = ( d & ( 0x80000000 >> point ) ); *( bin_base + bloc ) ^= trc; /* XOR（ 該当bitを０にする ）*/ } } } /***********************************************************************/ /* マスク表示 */ /***********************************************************************/ void disp_mask_bit( org_mem_no, gray_base, x, y, on_off ) int org_mem_no; /* 入力 ： 生画像のグレイメモリＮＯ 　*/ unsigned char *gray_base; /* 入力 ： マスク用グレイメモリの先頭アドレス */ int x; /* 入力 ： 書き込みＸ位置 */ int y; /* 入力 ： 書き込みＹ位置 */ int on_off; /* 入力 ： 書き込む色 */ { unsigned char *base_m0; unsigned char *p, *q; base_m0 = (void *)Lib_adrs_gray_memory( org_mem_no ); p = gray_base + ( y * 512 ) + x; /* マスク表示用画像 */ q = base_m0 + ( y * 512 ) + x; /* 生画像 */ if ( MASK_ON == on_off ) /* マスクオン */ { *p = 0x00; /* 黒エリアにする */ } else /* マスクオフ */ { *p = ( *q & 0xff ); /* 生画像の濃度に戻す */ } } /***********************************************************************/ /* 　マスクの上書き（グレイメモリ用） */ /***********************************************************************/ #define ACCESS_BITS 32 void mask_bin_to_gray( mask_mem_no, dst_mem_no ) int mask_mem_no; int dst_mem_no; { register int i, a; int size_x, size_y; int bloc; int d; int *bbase, *wb; char *gbase, *wg; bbase = (void *)Lib_adrs_bin_memory( mask_mem_no ); gbase = (void *)Lib_adrs_gray_memory( dst_mem_no ); size_x = Lib_get_fx_size( ); size_y = Lib_get_fy_size( ); bloc = size_x * size_y / ACCESS_BITS; for ( i=0; i> a ); if ( 0 != d ) { *wg = 0x00; /* 濃度レベル０ */ } wg++; } } bbase++; gbase += ACCESS_BITS; } } /***********************************************************************/ /* マスクＵＰ */ /***********************************************************************/ int mask_up_to_bin( mask_mem_no, dst_mem_no, color ) int mask_mem_no; /*マスクデータがある２値メモリＮＯ 　 */ int dst_mem_no; /*マスクデータにて塗りつぶす２値メモリＮＯ（マスクの反映先）*/ int color; /*マスク部分の更新したい色　０：黒、１：白 */ /* 戻り値：NORMAL_RETURN 正常終了 ERROR_RETURN 異常終了（メモリ不足） */ { int status; int wk_mem_no1; int wk_mem_no2; status = ERROR_RETURN; if ( ERROR_RETURN != ( wk_mem_no1 = Lib_alloc_bin_memory() ) ) /*２値ワークメモリ確保*/ { if ( ERROR_RETURN != ( wk_mem_no2 = Lib_alloc_bin_memory() ) ) /*２値ワークメモリ確保*/ { Lib_bin_memory_cls( wk_mem_no1 ); Lib_bin_memory_cls( wk_mem_no2 ); Lib_bin_memory_move( mask_mem_no, wk_mem_no1 ); Lib_bin_memory_move( dst_mem_no, wk_mem_no2 ); if ( BLACK_COLOR == color ) { Lib_binnot( wk_mem_no1 ); Lib_binand( wk_mem_no1, wk_mem_no2, dst_mem_no ); /*マスクエリアは黒になります*/ } else Lib_binor( wk_mem_no1, wk_mem_no2, dst_mem_no ); /*マスクエリアは白になります*/ Lib_free_bin_memory( wk_mem_no1 ); Lib_free_bin_memory( wk_mem_no2 ); status = NORMAL_RETURN; } else Lib_free_bin_memory( wk_mem_no1 ); } return ( status ); }