/* * ***************************************************************** * * * * * Copyright (c) Fast Corporation, 2000 * * * * * * 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 最小自乗法2次曲線近似          CALCQUAD.C */ /*[作成者]H.Yagi */ /* 目的: 関数: 履歴: Ver 1.0 00/11/07 注記: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_math.h" /* * Include CSC90X common local */ #include "m_menu.h" /* * プロトタイプ宣言 */ void main( void ); void exec( void ); void dot_set( void ); void disp_help( void ); void main_menu_disp( void ); 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 DOTS ", "ドット設定" }, { " EXEC ", "放物線近似" }, { " PROC3 ", " 処理3 " }, { " PROC4 ", " 処理4 " } }; #define INIT_CUR_POS_X 255 #define INIT_CUR_POS_Y 239 #define MIN_DOT_NO 3 #define MAX_DOT_NO 512 static POINT point[512]; int cnt; /************************************************************************/ /* メイン */ /************************************************************************/ 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( 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 ); /* メニュー制御 */ 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 ); dot_set( ); /* ドット設定 */ Lib_move_cursor( xpos, ypos ); 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( ); /* 放物線近似試行 */ Lib_memory_clear( LINE_PLANE | CHAR_PLANE ); Lib_move_cursor( xpos, ypos ); 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(); /* ヘルプ */ Lib_move_cursor( xpos, ypos ); main_menu_disp(); } else if ( xpos > MENU_E_XS && xpos < MENU_E_XE && ypos > MENU_E_YS && ypos < MENU_E_YE ) { break; /* 終了 */ } } } } /************************************************************************/ /* メインメニュー表示 */ /************************************************************************/ 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, "【機能\概要】        CALCQUAD" ); Lib_chrdisp( 11, 10, "<放物線近似 サンプル>" ); Lib_chrdisp( 11, 12, "3〜512個のドット設定の後、最小自乗法2次曲線" ); Lib_chrdisp( 11, 14, "近似を行い求めた放物線を表\示します。" ); } /************************************************************************/ /* ドット設定 */ /************************************************************************/ void dot_set( void ) { int sts; int xpos; int ypos; int s_xpos; int s_ypos; xpos = INIT_CUR_POS_X; ypos = INIT_CUR_POS_Y; s_xpos = INIT_CUR_POS_X; s_ypos = INIT_CUR_POS_Y; Lib_chrdisp(5,29,"実行キー :設定"); Lib_chrdisp(5,30,"キャンセルキー:終了"); cnt = 0; 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 ) { point[cnt].x = xpos; point[cnt].y = ypos; Lib_pset( xpos, ypos, GRAPH_DRAW ); cnt++; if ( MAX_DOT_NO <= cnt ) break; } if ( CURSOR_CANCEL == sts ) { if ( cnt < MIN_DOT_NO ) /* キャンセルエラーの表示 */ Lib_display_message( 70, 200, "CANCEL err!", "3点以上のドット設定が必要です。" ); else break; } } Lib_cls(CHAR_PLANE, BLACK_COLOR); } /************************************************************************/ /* 2次曲線近似試行 */ /************************************************************************/ void exec( ) { int i; int xe, ye; double da, db, dc; static DPNT_T dpoint[512]; Lib_erase_cursor(); for ( i=0; i