/*
 * *****************************************************************
 * *                                                               *
 * *       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.  *
 * *                                                               *
 * *****************************************************************
 */

/* ＣＳＣ９０Ｘ　ファイル装置（ＦＳ０）へのデータ保存と読み出し     SAVELOAD.C*/
/*［作成者］H.Yagi */
/*
目的：
関数：
履歴：  Ver 1.0     97/09/01
        Ver 2.0     99/03/25  CSC903確認
注記：m_menu.hをインクルードして下さい。
      m_menu.c及びm_note.cをリンクして下さい。
*/

/*
 * Include compiler runtime library
 */
#include <string.h>
#include <math.h>


/*
 * 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 CSC90X common local
 */
#include "m_menu.h"


/*
 * プロトタイプ宣言
 */
void  main( void );
void  main_menu_disp( void );
void  disp_help( void );
void load( void );
void save( void );
void para_init( void );
void disp_data( 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] = {
    { "   SAVE   ", "  セーブ  " },
    { "   LOAD   ", "　ロード  " },
    { "  PROC3   ", "  処理３  " },
    { "  PROC4   ", "  処理４  " }
};


#define  INIT_CUR_POS_X     255
#define  INIT_CUR_POS_Y     239


/* ファイル装置（ＦＳ０）へのセーブデータ構造体 */
typedef struct
{
    int    data1;
    int    data2;
    double data3;
} SAVE_DATA;
static SAVE_DATA    save_data;


/*
 * メイン
 */
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 );

    load( );                        /* DATA FILEのロード */

    /* メニュー制御 */
    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 );
                save( );                                            /* DATA FILEのセーブ */
                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 );
                load( );                                            /* DATA FILEのロード */
                disp_data( );                                       /* DATA 表示 */
                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;                                              /* 終了 */
            }
        }
    }
}


/*
 * メインメニュー表示
 */
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, "【機能\概要】                  SAVELOAD    " );
    Lib_chrdisp( 11, 10, "ファイル装置（ＦＳ０）へのデータ保存と読み出し" );
    Lib_chrdisp( 11, 12, "保存ファイル名：SAMP.DAT" );
}


/************************************************************************/
/*  設定データの読込　　　　　　　　　   　　　　　　　　　　　　　　　 */
/************************************************************************/
void load()
{
    if ( 0 == Lib_fload( "\\FS0\\SAMP.DAT", (char *)&save_data, sizeof( SAVE_DATA ) ) )
    {
        /* ファイルなしの場合の初期設定 */
        para_init();
    }
}


/************************************************************************/
/*  設定データの保存　　　　　　　　　   　　　　　　　　　　　　　　　 */
/************************************************************************/
void save()
{
    Lib_chrdisp( 1, 30, "セーブ中．．．" );

    if ( 0 == Lib_fsave( "\\FS0\\SAMP.DAT", (char *)&save_data, sizeof( SAVE_DATA ) ) )
        Lib_chrdisp( 1, 30, "SAMP.DAT fsave_err!" );

    Lib_chrdisp( 1, 30, "　　　　　　　" );
}


/************************************************************************/
/*  設定データの初期化　　　　　　　　   　　　　　　　　　　　　　　　 */
/************************************************************************/
void para_init()
{
    save_data.data1 = 10;
    save_data.data2 = 20;
    save_data.data3 = 30.5;
}


/************************************************************************/
/*  データ表示                                                          */
/************************************************************************/
void disp_data()
{
char ss[40];

    Lib_sprintf( ss, "data1 = %d", save_data.data1 );
    Lib_chrdisp( 1, 10, ss );
    Lib_sprintf( ss, "data2 = %d", save_data.data2 );
    Lib_chrdisp( 1, 11, ss );
    Lib_sprintf( ss, "data3 = %.1lf", save_data.data3 );
    Lib_chrdisp( 1, 12, ss );
}