/********************************************************************
* PIC32MX_BMP_WriteTest_1.c（元ソース：Scope_PIC32MX.c）
* オシロ画面のイメージを、BMPファイルとして、SDカードに書込む実験
*
* 実験ハードは、PIC32MXトレーニング基板を使用する為、
* ポート割付は変更できない。
* なので、時間軸レンジ切替用の、DSWの読込み（3bit）は、元の
* SDカードI/Fポートに戻した。
* よって、時間軸の切替えはあきらめて、1mS/D固定にした。
*
* Graphic LCD(Monochrome): SG12864A
* ファイルシステム：MMD File System→　FAT16（FAT32互換）
*
* Condition:
* 8MHz External X'tal Oscillator, 20x PLL (8MHzx20= 160MHz)
* Fcy=160MHz/2=80MHz, Tcy=12.5ns
*
* CPU: PIC32MX340F256H
*
* N.Ishii   2014.10.24
*********************************************************************/
#include <plib.h>		/* PIC32 peripheral library */
#include "glcd_lib32k.h"
#include <FSIO.h>

// コンフィギュレーション設定
// CPU=80MHz Peri=80MHz,HS+PLL,Divider=1/2,PLL=x20,WDT=Off
#pragma config FNOSC=PRIPLL, POSCMOD=HS, FPLLIDIV=DIV_2
#pragma config FPLLMUL=MUL_20, FPBDIV=DIV_1, FPLLODIV=DIV_1
#pragma config FWDTEN=OFF, ICESEL=ICS_PGx2

/// ファイルシステム用変数
FSFILE *fptr;
size_t result;

/// データバッファ
unsigned char Disp_BUF[1024];	// 元になる、表示用のデータバッファ
unsigned char Buffer[1024];	// BMPデータバッファ

////// 128x64ドット白黒BMPヘッダ情報部の、固定データ62バイトセット
const unsigned char monochroBmpHeader[62]= 
{
	/// ファイルヘッダ部：14バイト
	'B', 'M',				// ファイルタイプ 2バイト
	0x3E, 0x04, 0x00, 0x00,	// ファイルサイズ 4バイト：0x0000043E（1086バイト=62+1024）
	0x00, 0x00,			// 予約領域1 2バイト：0x0000 （常に固定）
	0x00, 0x00,			// 予約領域2 2バイト：0x0000 （常に固定）
	0x3E, 0x00, 0x00, 0x00,	// ファイル先頭から画像データまでのオフセット 4バイト：0x0000003E（62バイト）

	/// 情報ヘッダ部：40バイト
	0x28, 0x00, 0x00, 0x00,	// 情報ヘッダサイズ 4バイト：0x00000028（40バイト）
	0x80, 0x00, 0x00, 0x00,	// 画像の幅 [ピクセル] 4バイト：0x00000080（128ピクセル）
	0x40, 0x00, 0x00, 0x00,	// 画像の高さ [ピクセル] 4バイト：0x00000040（64ピクセル）
	0x01, 0x00,			// 色ビット数 [bit]：1画素当たりのデータサイズ 2バイト：0x0001（白黒は、"1"：2色ビットマップ）
	0x01, 0x00,			// 1画素当りのデータサイズ 2バイト：0x0001
	0x00, 0x00, 0x00, 0x00,	// 圧縮形式 4バイト：0x00000000（白黒は無圧縮なので、"0"）
	0x00, 0x04, 0x00, 0x00,	// 画像データサイズ 4バイト：0x00000400（1024バイト）
	0xC4, 0x0E, 0x00, 0x00,	// 水平解像度 [dot/m] 4バイト：0x00000EC4（3480）
	0xC4, 0x0E, 0x00, 0x00,	// 垂直解像度 [dot/m] 4バイト：0x00000EC4（3480）
	0x00, 0x00, 0x00, 0x00,	// 格納パレット数[使用色数] 4バイト：0x00000000（'0'の場合もある→確認済）
	0x00, 0x00, 0x00, 0x00,	// 重要色数 4バイト：0x00000000（'0'の場合もある→確認済）

	/// バレットデータ部：8バイト（※　白黒の場合、パレットデータ：4バイトブロックが、2個存在する）
	0x00,				// 青 1バイト：0x00（白黒の場合は、0x00か、0xFFのいずれかの値が入るようである）
	0x00,				// 緑 1バイト：0x00（白黒の場合は、0x00か、0xFFのいずれかの値が入るようである）
	0x00,				// 赤 1バイト：0x00（白黒の場合は、0x00か、0xFFのいずれかの値が入るようである）
	0x00,				// 予約領域 1バイト：0x00（常に、0x00）

	0xFF,				// 青 1バイト：0xFF（白黒の場合は、0x00か、0xFFのいずれかの値が入るようである）
	0xFF,				// 緑 1バイト：0xFF（白黒の場合は、0x00か、0xFFのいずれかの値が入るようである）緑
	0xFF,				// 赤　1バイト：0xFF（白黒の場合は、0x00か、0xFFのいずれかの値が入るようである）
	0x00				// 予約領域 1バイト：0x00（常に、0x00）
};
////-------------------------------------------------------------------------------

/// RTCC構造体定義
rtccRes res;
rtccDate dt;
rtccTime tm;

// 液晶表示器メッセージ定数
char MsgClock[]  = "'xx/mm/dd hh:mm";
int  SecFlag;

////-----------------------------------------------------------------------------------
/// A Variable (Global)
/// Data Buffer for GLCD
unsigned short Buffer1[192];
unsigned short Buffer2[192];
unsigned short Index,POT,SW;
char EndFlag;
short i;

short FileNo = 0;
char FileName[] = "Wavexxx.bmp";

char HOLD_ON_flag = 0;
char hold_status = 0;
char Write_flag = 0;

///　Function Prottypes
void Oscillo(void);
void AxisDraw(void);
void dotyline(unsigned short x0);
void dotxline(unsigned short y0);

void lcd_ImageRead(void);
void Conv_DispBufTable_to_BmpTable(void);
void BmpDataWrite(void);

void RTCC(void);

void itostring(char digit, unsigned int data, char *buffer);


/************************************************
* Function Main 
************************************************/
int main(void)
{
	//システム最適設定
	SYSTEMConfigPerformance(80000000);
	mJTAGPortEnable(DEBUG_JTAGPORT_OFF);	// JTAGを無効化 

	//I/O設定
	AD1PCFG = 0xFFF8;	// 

	// GLCD制御信号レベルの初期化
	LCD_E = 0;
	LCD_CS1 = 1;
	LCD_CS2 = 1;
	LCD_RW = 1;
	LCD_DI = 1;

	LCD_TRIS = 0x0000;	// LCDデータバス（DB0-DB7）オール出力（TRISE= 0）

	TRISD = 0xFF17;		// LCD_CS1,CS2,DI：全て出力・デバッグLED：出力・SW2-5：入力、他未使用ピンは入力設定
	TRISF = 0xFFFC;		// LCD_E,RW：全て出力、他未使用ピンは入力設定
	TRISG = 0x028C;		// SD_SDO,SCK：出力、SDI：入力・他未使用ピンは入力設定
	TRISB = 0xFFDF;		// RB5：SD_CS出力、RB4：SD_WE入力、RB3：SD_CD入力、RB2：AN2（トリガ入力）、RB1：AN1未使用、RB0：オシロ入力

	CNPUE = 0x0060;		// SD_CD(CN5),WE(CN6)のみ内部プルアップ

	LATDbits.LATD3 = 1;	// デバッグLED消灯

	// 液晶表示器の初期化
	lcd_Init();
	lcd_Clear(0);
	lcd_Str(0, 0, "Start Osccillo");

	delay_ms(1000);

	/// ADC初期設定
	AD1CON1  = 0x0044;	// サンプルモード等設定
				// b15：ON：0：ADCモジュールOFF
				// b14：FRZ：0：デバッグ中動作継続
				// b13：ADSIDL：0：アイドルモードでも動作継続
				// b12：x：0
				//------------------------------------------------------------------------------------------
				// b11：x：0
				// b10：FORM<2>：0：データフォーマット= 整数16ビット
				// b_9：FORM<1>：0
				// b_8：FORM<0>：0
				//------------------------------------------------------------------------------------------
				// b_7：SSRC<2>：0：サンプルクロックソース= T3一致でサンプリング終了し変換開始（ADC1の場合）
				// b_6：SSRC<1>：1
				// b_5：SSRC<0>：0
				// b_4：CLRASAM：0：割込みで変換継続
				//------------------------------------------------------------------------------------------
				// b_3：x：0
				// b_2：ASAM：1：サンプリングは最後の変換終了直後に開始する。SAMPビットは自動セットされる
				// b_1：SAMP：0：S/Hはホールド中
				// b_0：DONE：0：ADCステータスビット
				//------------------------------------------------------------------------------------------

	AD1CON2  = 0x041E;	// スキャンモード等設定
				// b15：VCFG<2>：0：VREF=AVDD-AVSS
				// b14：VCFG<1>：0：
				// b13：VCFG<0>：0：
				// b12：OFFCAL：0：較正モード無効
				//------------------------------------------------------------------------------------------
				// b11：x：0
				// b10：CSCNA：1：※　スキャンモード有効（S/H_CH0の入力をスキャンする）
				// b_9：x：0
				// b_8：x：0
				//------------------------------------------------------------------------------------------
				// b_7：BUFS：0（R-Only）：※　バッファフルステータス　
				// b_6：x：0　　　　　　　　　　BUF_0〜7に書込み中、BUF8〜15内のデータにアクセスせよ
				// b_5：SMPI<3>：0：※　8回のサンプル／変換動作完了毎に割込み発生
				// b_4：SMPI<2>：1
				//------------------------------------------------------------------------------------------
				// b_3：SMPI<1>：1
				// b_2：SMPI<0>：1
				// b_1：BUFM：1：最初の割込みで、BUF0から書込みを開始し、次の割込みでBUF8から開始する 
				// b_0：ALTS：0
				//------------------------------------------------------------------------------------------


	AD1CON3  = 0x0202;	// ADCクロック等設定
				// b15：ADRC：0：ADCクロックソース= システムクロックから取出したクロック
				// b14：x：0
				// b13：x：0
				// b12：SAMC<4>：0：自動サンプル時間（Acquisition Time）Tsmp= 2Tad= 2*75nS=  150nS（規格：≧132nSmin）：80MIPS	                                   
				//------------------------------------------------------------------------------------------
				// b11：SAMC<3>：0
				// b10：SAMC<2>：0
				// b_9：SAMC<1>：1
				// b_8：SAMC<0>：0
				//------------------------------------------------------------------------------------------
				// b_7：ADCS<7>：0：ADCクロック周期（Tad）= 2*Tcy*(ADCS+1)= 2*12.5nS*(2+1)= 75nS（規格：≧65nSmin）：80MIPS
				// b_6：ADCS<6>：
				// b_5：ADCS<5>：0：
				// b_4：ADCS<4>：0
				//------------------------------------------------------------------------------------------
				// b_3：ADCS<3>：0
				// b_2：ADCS<2>：0
				// b_1：ADCS<1>：1
				// b_0：ADCS<0>：0
				//------------------------------------------------------------------------------------------
				////////////////////////////////////////////////////////////////////////////////////////////////
				/// ＜総変換時間算出＞
				/// 　�@　80MIPSの場合
				///      Tconv= 12Tad= 12*0.075uS= 0.9uS
				///      総変換時間= Tsmp + Tconv= 0.15uS+ 0.9uS= 1.05uS
				///////////////////////////////////////////////////////////////////////////////////////////////


	AD1CHS  = 0x00000000;	// MUX設定
				// b31：CH0NB：0：B側のS/Hは未使用（負側入力をAVCCに接続）
				// b30：x：0
				// b29：x：0
				// b28：x：0
				//------------------------------------------------------------------------------------------
				// b27：CH0SB<3>：0
				// b26：CH0SB<2>：0
				// b25：CH0SB<1>：0
				// b24：CH0SB<0>：0
				//------------------------------------------------------------------------------------------
				// b23：CH0NA：0：S/H（CH0）負側入力は、AVSSに接続
				// b22：x：0
				// b21：x：0
				// b20：x：0
				//------------------------------------------------------------------------------------------
				// b19：CH0SA<3>：0：※　AN0 for CH0 +IN
				// b18：CH0SA<2>：0
				// b17：CH0SA<1>：0
				// b16：CH0SA<0>：0
				//------------------------------------------------------------------------------------------

	AD1CSSL  = 0x0005;	// 入力スキャンCH設定
				// b15：CSS15：0：入力スキャンに、AN15を選択しない
				// b14：CSS14：0：入力スキャンに、AN14を選択しない
				// b13：CSS13：0：入力スキャンに、AN13を選択しない
				// b12：CSS12：0：入力スキャンに、AN12を選択しない
				//------------------------------------------------------------------------------------------
				// b11：CSS11：0：入力スキャンに、AN11を選択しない
				// b10：CSS10：0：入力スキャンに、AN10を選択しない
				// b_9：CSS9：0：入力スキャンに、AN9を選択しない
				// b_8：CSS8：0：入力スキャンに、AN8を選択しない
				//------------------------------------------------------------------------------------------
				// b_7：CSS7：0：入力スキャンに、AN7を選択しない
				// b_6：CSS6：0：入力スキャンに、AN6を選択しない
				// b_5：CSS5：0：入力スキャンに、AN5を選択しない
				// b_4：CSS4：0：入力スキャンに、AN4を選択しない
				//------------------------------------------------------------------------------------------
				// b_3：CSS3：0：入力スキャンに、AN3を選択しない
				// b_2：CSS2：1：入力スキャンに、AN2を選択する
				// b_1：CSS1：0：入力スキャンに、AN1を選択しない
				// b_0：CSS0：1：入力スキャンに、AN0を選択する
				//------------------------------------------------------------------------------------------

	AD1PCFG = 0xFFF8;	// アナログ／デジタルピン設定
				// b15：PCFG15：1
				// b14：PCFG14：1
				// b13：PCFG13：1
				// b12：PCFG12：1
				//------------------------------------------------------------------------------------------
				// b11：PCFG1：1
				// b10：PCFG10：1
				// b_9：PCFG9：1
				// b_8：PCFG8：1
				//------------------------------------------------------------------------------------------
				// b_7：PCFG7：1
				// b_6：PCFG6：1
				// b_5：PCFG5：1
				// b_4：PCFG4：1
				//------------------------------------------------------------------------------------------
				// b_3：PCFG3：1：AN3は、デジタル入力ピンに設定（RB1：DSW-1として使用：この場合MUXはAVSS=0Vに接続される）
				// b_2：PCFG2：0：AN2を、アナログ入力ピンに設定
				// b_1：PCFG1：0：AN1を、アナログ入力ピンに設定
				// b_0：PCFG0：AN0を、アナログ入力ピンに設定
				//------------------------------------------------------------------------------------------



	AD1CON1bits.ADON = 1;		// ADC Start

	mAD1ClearIntFlag();			// Clead AD1 IF Flag
	mAD1SetIntPriority(7);		// AD1割込み優先レベル初期設定
	mAD1SetIntSubPriority(3);	// AD1割込みサブ優先レベル初期設定	

	mAD1IntEnable(1);		// Enable ADC INT

	/// Timer3:T3初期設定= Tcy*PS*n= 0.0125uS*2*400 = 10uS（1mS/D固定）
	PR3   = 399;		// n = 400 (PR3=n-1
	T3CON = 0x0010;	// T3_OFF, T3_GATE_OFF, T3_PS_1_2, T3_SOURCE_INT
//	T3CON = 0x0018;	// T3_OFF, T3_GATE_OFF, T3_PS_1_2, 32BIT, T3_SOURCE_INT

	//外部割込み許可　立ち上りエッジで優先レベル2
	ConfigINT4(EXT_INT_ENABLE | RISING_EDGE_INT | EXT_INT_PRI_2);	// HOLD_SW
	ConfigINT3(EXT_INT_ENABLE | RISING_EDGE_INT | EXT_INT_PRI_2);	// Write SW

	// 外部割り込みフラグのクリア
	mINT4ClearIntFlag();
	mINT3ClearIntFlag();

	/// RTCC初期設定
	res = RtccOpen(0x10450000, 0x14102203, 0);	// 10:45:00, 2014／10／22 Wed
	SecFlag = 0;
	
  	//　マルチベクタ割り込み設定、割り込み許可
	INTEnableSystemMultiVectoredInt();

	/// Inittalize Variable
	Index = 0;
	EndFlag = 0;

	/// メイン・ループ
	while(1){
		/// Draw a Graph of Input Wave Data	
		EndFlag = 0;				// Clear End of Convertion Flag
		Index = 0;

		T3CONbits.TON = 1;			// T3ON-> ADC Start

		while(!EndFlag);

		Oscillo();				// Disp. Oscillo
		EndFlag = 0;
		Index = 0;

		/// Cheack HOLD_RUN_SW Status
		while (HOLD_ON_flag){
			/// RTCCレジスタ読込と時計表示
			RTCC();

			hold_status = 1;

			/// オシロ画面ホールド中に、書込みSWが押されたら
			/// 画面イメージを読込み、そのデータを正規のBMPデータに変換して
			/// SDカードに書込む。但しファイル名は、"TEST.bmp"固定にする。
			if(Write_flag){
				lcd_ImageRead();
				Conv_DispBufTable_to_BmpTable();
				for(i= 0; i< 1024; i++) Buffer[i]= ~Buffer[i];	// データ論理反転して入れ替え

				BmpDataWrite();

				Write_flag= 0;
			}

		}
		hold_status = 0;

		delay_ms(500);				// Disp. is 0.5Sec Period
	}
}

/************************************************
*  ADC Interrupt: 2Channel, 4Times (Duble Buffer)
*  ADC Interrupt Period = T3_Period*2*4
*************************************************/
void __ISR(27, ipl7) AD1Interrupt(void)
{

//LATDbits.LATD3 = ~LATDbits.LATD3;


	mAD1ClearIntFlag();					// Clead IF Flag

	if(AD1CON2bits.BUFS){	// '1'-> Useing ADC1BUF8- ADC1BUFE Side (Access is ADC1BUF0- ADC1BUF6 Side)
		Buffer1[Index++] = ADC1BUF0;		// 1Times: Buffer <- AN0 Input Data
		Buffer1[Index++] = ADC1BUF2;		// 2Times: Buffer <- AN0 Input Data
		Buffer1[Index++] = ADC1BUF4;		// 3Times: Buffer <- AN0 Input Data
		Buffer1[Index++] = ADC1BUF6;		// 4Times: Buffer <- AN0 Input Data
		POT = ADC1BUF7;						// Store is AN2 Trigger Potentio Input ADC Value
	}
	else{			// '0'-> Useing ADC1BUF0- ADC1BUF6 Side (Access is ADC1BUF8- ADC1BUFE Side)
		Buffer1[Index++] = ADC1BUF8;		// 1Times: Buffer <- AN0 Input Data
		Buffer1[Index++] = ADC1BUFA;		// 2Times: Buffer <- AN0 Input Data
		Buffer1[Index++] = ADC1BUFC;		// 3Times: Buffer <- AN0 Input Data
		Buffer1[Index++] = ADC1BUFE;		// 4Times: Buffer <- AN0 Input Data
		POT = ADC1BUFF;						// Store is AN2 Trigger Potentio Input ADC Value
	}

	if(Index >= 192){					// Buffer Full ?
		T3CONbits.TON = 0;				// Buffer Full Then T3 OFF and EOC Flag ON
		EndFlag = 1;
	}
}

/****************************************************
*  INT4外部割り込み処理(HOLD SW Read)
****************************************************/
void __ISR(19, ipl2) INT4Handler(void){

	if (!hold_status) {	// hold_status -> 0: RUN
		HOLD_ON_flag = 1;
	}
	else {	// hold_status -> 1: HOLD_ON Loop
		HOLD_ON_flag = 0;
	}

	delay_ms(100);		// チャッタリング回避

	mINT4ClearIntFlag();	// 割り込みフラグクリア
}

/****************************************************
*  INT3外部割り込み処理(WRITE SW Read)
****************************************************/
void __ISR(15, ipl2) INT3Handler(void){

	if (hold_status) {
		Write_flag = 1;
	}	

	delay_ms(100);		// チャッタリング回避

	mINT3ClearIntFlag();	// 割り込みフラグクリア
}	
	
/*******************************************************
*  Disp. Oscillo (Disp. Save Buffer Data)
*  Detect Trigger-> Disp. 128Data from this Position
*  Not Detect Trigger-> Disp. 128Data from Top Position
*******************************************************/
void Oscillo(void){
	unsigned short i,x;

	AxisDraw();							// Drawing Coordinate Axis
	x = 0;								// First Data

	/* Check Trigger  */
	while((x < 128) && !((Buffer1[x]<POT) && (Buffer1[x+1]>=POT))){
		x++;
	}

	/* Detect Trigger-> Disp. 128Data from this Position  */
	if(x<64){
//		LATDbits.LATD3 = 0;	// LED ON
		for(i=0; i<127; i++){
			lcd_Line(i, Buffer1[i+x]/16, i+1, Buffer1[i+x+1]/16);
//			lcd_Line(i, Buffer2[i+x]/16, i+1, Buffer2[i+x+1]/16);
		}
	}
	/* Not Detect Trigger-> Disp. 128Data from Top Position */
	else {
//		LATDbits.LATD3 = 1;	// LED OFF
		for(i=0; i<127; i++){
			lcd_Line(i, Buffer1[i]/16, i+1, Buffer1[i+1]/16);
//			lcd_Line(i, Buffer2[i]/16, i+1, Buffer2[i+1]/16);		
		}
	}
}

/******************************************
*  Drawing Coordinate Axis
*******************************************/
void AxisDraw(void){

	lcd_Clear(0);
	lcd_Line(0, 0, 0, 63);	// Y axis_1：　左端の、Yライン描画
//	dotyline(54);
	dotyline(51);			// Y axis_2：　中央付近最初の、時間軸Yライン描画
//	dotyline(107);
	dotyline(101);			// Y axis_3：　右端付近2番目の、時間軸Yライン描画

	lcd_Line(0, 32, 127, 32);		// X axis
	dotxline(49);
//	dotxline(16);
	dotxline(17);

	/* Disp. HOLD */
	if (HOLD_ON_flag == 1) LATDbits.LATD3 = 0;	// LED ON
	else LATDbits.LATD3 = 1;	// LED OFF

	lcd_Str(7,9,"1.0mS/div");


}

/*******************************************
*  Assist Line X Coordinate Axis (Dot Line)
********************************************/
void dotxline(unsigned short y0){
	unsigned short i;

	for(i=0; i<128; i+=3)
		lcd_Pixel(i, y0-1, 1);
}
/*******************************************
*  Assist Line Y Coordinate Axis (Dot Line)
********************************************/
void dotyline(unsigned short x0){
	unsigned short i;

	for(i=0; i<64; i+=3)
		lcd_Pixel(x0-1, i, 1);
}

/*********************************************************************
*  液晶イメージデータ（全画面分）を読出し、表示バッファに格納する関数
*  最下段のデータ（page7相当）から格納
*  座標は(0,0)-(127,63) の範囲内
**********************************************************************/
void lcd_ImageRead(void){
	char cs;
	short page, colum;
	short Xpos;
	unsigned char dummy;


	for(page=7; page>=0; page--){
		for(colum=0; colum<128; colum++){
			if(colum > 63){
				Xpos=colum-64;
				cs = 1;
			}
			else{
				Xpos = colum;
				cs = 2;
			}

			//// ページをセットする
			lcd_Write(cs, 0xB8+page, 1);

			//// 液晶の仕様により、本番のリードの前に、ダミーリードを行う
			lcd_Write(cs, 0x40+Xpos, 1);		// set colum
			dummy = lcd_Read(cs);			// get current data（1回目はダミーリード）

			//// 本番のリード
			lcd_Write(cs, 0x40+Xpos, 1);				// set colum
 
			/// 表示バッファ：Disp_BUF[*]の、ポインタを、仮にiとすると
			/// iと、pageと、columの関係は、次のようになる。
			/// page7で、colum= 0〜127の時、i= colum+0  （0〜127）
			/// page6で、colum= 0〜127の時、i= colum+128（128〜255）
			/// page5で、colum= 0〜127の時、i= colum+256（256〜383）
			/// page4で、colum= 0〜127の時、i= colum+384（384〜511）
			/// page3で、colum= 0〜127の時、i= colum+512（512〜689）
			/// page2で、colum= 0〜127の時、i= colum+640（640〜767）
			/// page1で、colum= 0〜127の時、i= colum+768（768〜895）
			/// page0で、colum= 0〜127の時、i= colum+896（896〜1023）
			/// 上の関係を、iについての式にすると、下のように書ける。 
			/// i= colum+ (7-page)*128

			Disp_BUF[colum+ (7-page)*128] = lcd_Read(cs);		// get current data（2回目のリードが本番）
		}
	}
}

/**********************************************************************
* 液晶イメージを読込み格納した表示バッファの配列を、
* 標準の、BMPイメージデータの配列に変換
***********************************************************************/
void Conv_DispBufTable_to_BmpTable(void)
{
	short i;	// 元表示用データバッファ：Disp_BUF[*]の、ポインタ
	short j;	// BMPデータバッファ：Buffer[*]の、ポインタ


	/// 各バッファのポインタを、最初の開始位置に初期化
	i= 0;
	j= 0;


	do{
		/// 8 x 8ビットブロックの配列変換（縦8ビット配列を、横8ビット配列に変換）------
		Buffer[j+0]= (Disp_BUF[i+0] & 0x80) | (Disp_BUF[i+1] & 0x80)>> 1 |
						(Disp_BUF[i+2] & 0x80)>> 2 |  (Disp_BUF[i+3] & 0x80)>> 3 |
		     				(Disp_BUF[i+4] & 0x80)>> 4 | (Disp_BUF[i+5] & 0x80)>> 5 |  
						(Disp_BUF[i+6] & 0x80)>> 6 | (Disp_BUF[i+7] & 0x80)>> 7;

		Buffer[j+16]= (Disp_BUF[i+0] & 0x40)<< 1 | (Disp_BUF[i+1] & 0x40) |
						(Disp_BUF[i+2] & 0x40)>> 1 |  (Disp_BUF[i+3] & 0x40)>> 2 |
		     				(Disp_BUF[i+4] & 0x40)>> 3 | (Disp_BUF[i+5] & 0x40)>> 4 |  
						(Disp_BUF[i+6] & 0x40)>> 5 | (Disp_BUF[i+7] & 0x40)>> 6;

		Buffer[j+32]= (Disp_BUF[i+0] & 0x20)<< 2 | (Disp_BUF[i+1] & 0x20)<< 1 | 
						(Disp_BUF[i+2] & 0x20) |  (Disp_BUF[i+3] & 0x20)>> 1 |
						(Disp_BUF[i+4] & 0x20)>> 2 | (Disp_BUF[i+5] & 0x20)>> 3 |
						(Disp_BUF[i+6] & 0x20)>> 4 | (Disp_BUF[i+7] & 0x20)>> 5;

		Buffer[j+48]= (Disp_BUF[i+0] & 0x10)<< 3 | (Disp_BUF[i+1] & 0x10)<< 2 |
						(Disp_BUF[i+2] & 0x10)<< 1 |  (Disp_BUF[i+3] & 0x10) |
						(Disp_BUF[i+4] & 0x10)>> 1 | (Disp_BUF[i+5] & 0x10)>> 2 |
						(Disp_BUF[i+6] & 0x10)>> 3 | (Disp_BUF[i+7] & 0x10)>> 4;

		Buffer[j+64]= (Disp_BUF[i+0] & 0x08)<< 4 | (Disp_BUF[i+1] & 0x08)<< 3 |
						(Disp_BUF[i+2] & 0x08)<< 2 |  (Disp_BUF[i+3] & 0x08)<< 1 |
						(Disp_BUF[i+4] & 0x08) | (Disp_BUF[i+5] & 0x08)>> 1 |
						(Disp_BUF[i+6] & 0x08)>> 2 | (Disp_BUF[i+7] & 0x08)>> 3;

		Buffer[j+80]= (Disp_BUF[i+0] & 0x04)<< 5 | (Disp_BUF[i+1] & 0x04)<< 4 |
						(Disp_BUF[i+2] & 0x04)<< 3 |  (Disp_BUF[i+3] & 0x04)<< 2 |
						(Disp_BUF[i+4] & 0x04)<< 1 | (Disp_BUF[i+5] & 0x04) |
						(Disp_BUF[i+6] & 0x04)>> 1 | (Disp_BUF[i+7] & 0x04)>> 2;

		Buffer[j+96]= (Disp_BUF[i+0] & 0x02)<< 6 | (Disp_BUF[i+1] & 0x02)<< 5 |
						(Disp_BUF[i+2] & 0x02)<< 4 |  (Disp_BUF[i+3] & 0x02)<< 3 |
						(Disp_BUF[i+4] & 0x02)<< 2 | (Disp_BUF[i+5] & 0x02)<< 1 |
						(Disp_BUF[i+6] & 0x02) | (Disp_BUF[i+7] & 0x02)>> 1;

		Buffer[j+112]= (Disp_BUF[i+0] & 0x01)<< 7 | (Disp_BUF[i+1] & 0x01)<< 6 |
						(Disp_BUF[i+2] & 0x01)<< 5 |  (Disp_BUF[i+3] & 0x01)<< 4 |
						(Disp_BUF[i+4] & 0x01)<< 3 | (Disp_BUF[i+5] & 0x01)<< 2 |
						(Disp_BUF[i+6] & 0x01)<< 1 | (Disp_BUF[i+7] & 0x01);
		///-----------------------------------------------------------------------------

		i+= 8;	// 次の、8 x 8ビットブロックの、Disp_BUF[*]の、開始位置に移動
		j++;	// 次の、8 x 8ビットブロックの、Buffer[*]の、開始位置に移動

		if(j == 16) j= 128;		// 最下段（page7相当）の、16ブロック分の変換が終了したら、次の上段（page6相当）の、開始位置に移動
		if(j == 144) j= 256;	// page6相当の、16ブロック分の変換が終了したら、次の上段（page5相当）の、開始位置に移動
		if(j == 272) j= 384;	// page5相当の、16ブロック分の変換が終了したら、次の上段（page4相当）の、開始位置に移動
		if(j == 400) j= 512;	// page4相当の、16ブロック分の変換が終了したら、次の上段（page3相当）の、開始位置に移動
		if(j == 528) j= 640;	// page3相当の、16ブロック分の変換が終了したら、次の上段（page2相当）の、開始位置に移動
		if(j == 656) j= 768;	// page2相当の、16ブロック分の変換が終了したら、次の上段（page1相当）の、開始位置に移動
		if(j == 784) j= 896;	// page1相当の、16ブロック分の変換が終了したら、次の上段（page0相当）の、開始位置に移動

	}while(i< 1017);	// 最後のブロックの、Disp_BUF[*]の、開始位置は、1016になるので、
					// i= 1017で全エリア（全128ブロック：64ビット x 128=8192ビット=1024バイト）
					// の変換が終了することになる
}

/***********************************************************************************
* BMPデータ（ヘッダ情報含む）を、SDカードに書込んだ後、
* その時のタイムスタンプを書込む。。
*
* ＜備考＞
* RTCC（時計）が無いと、イメージをSDに保存した時に、時刻関連の情報が
* でたらめになるため。ホールド中に、書込みSWが押されたら、その時のタイムスタンプを
* SDに保存する必要がある。
* これは、FAT32 FSconfig.hで、USERDEFINEDCLOCKを有効（#define USERDEFINEDCLOCK)
* にして、SetClockVars関数を使うにとによって可能となる。
* ちなみに、FAT32 FSconfig.hで、USEREALTIMECLOCKを有効（#define USEREALTIMECLOCK)
* にして、自動設定にしてみたが、上手く行かなかった。
************************************************************************************/
void BmpDataWrite(void){
	/// カード挿入まで待つ
	lcd_Clear(0);				// 画面消去

	while(!MDD_MediaDetect()){			// カード挿入中か？
		lcd_Str(3, 0, "Wait Card Insert!");	// 挿入待ちメッセージ
		delay_ms(500);
	}
	delay_ms(100);
	
	/// 挿入されたら、ファイルシステムを初期化する
	lcd_Str(3, 0, "Find Card OK!    ");
	FSInit();					// FS初期化

	delay_ms(200);
	lcd_Str(3, 0, "Bmp Write Start!");

	itostring(3, FileNo, FileName+4);	// ファイル名更新
	fptr = FSfopen(FileName, "w");	//  File Open (Write Mode)

	if(fptr != NULL){	// ファイルオープンに成功（書込みなので、ファイル生成に成功）の場合、以下を実行
		/// まずは、ヘッダ情報部：62バイト（BMPフォーマットを、白黒の、128x64ドットに限定しているので、全て固定値で、OK
		if(FSfwrite(monochroBmpHeader, 62, 1, fptr) != 1){
			lcd_Str(3, 0, "File Write error");	// 書き込み失敗
			while(1);				// エラー停止
		}
			
		/// 次に、データ部：1024バイト
		if(FSfwrite(Buffer, 1024, 1, fptr) != 1){
			lcd_Str(3, 0, "File Write error");	// 書き込み失敗
			while(1);				// エラー停止
		}
			
		/// 最後に、タイムスタンプを書込む
		/// RTCCレジスタ値は、BCDなので、バイナリに変換してから値を渡している。
		/// また、年レジスタは、下2桁分しかないので、2000を足している。
		SetClockVars(2000+((dt.year >> 4)*10+(dt.year & 0x0F)),
							(dt.mon >> 4)*10+(dt.mon & 0x0F),
							(dt.mday >> 4)*10+(dt.mday & 0x0F),
							(tm.hour >> 4)*10+(tm.hour & 0x0F),
							(tm.min >> 4)*10+(tm.min & 0x0F),
							(tm.sec >> 4)*10+(tm.sec & 0x0F));

		/// ファイルをクローズ
		if(FSfclose(fptr)){
			lcd_Str(3, 0, "File Close error");	// エラーメッセージ
			while(1);				// クローズエラー停止
		}			

		/// ファイル名番号更新
		FileNo++;		// ファイル番号更新
		if(FileNo > 999){	// ファイル番号上限か？
			FileNo = 0;
		}

		delay_ms(100);
		lcd_Str(3, 0, "Bmp Write End!   ");
		delay_ms(200);
				
		HOLD_ON_flag= 0;	// SDカードへの書込みが終了したら、ホールドモードを抜ける
	}
	else{	// ファイルオープン失敗の場合
		lcd_Str(3, 0, "File Open error!");	// 失敗メッセージ
		while(1);				// エラー停止
	}
		
}

/*****************************************************************
* RTCC
* ホールドモード中、レジスタリードし、液晶に、年／月／日、時：分
* を表示させる。
******************************************************************/
void RTCC(void)
{
    	if(RTCCONbits.HALFSEC != SecFlag){			// 1/2sec変わり目か？	
		SecFlag = RTCCONbits.HALFSEC;   		// 前回値更新 	

		dt.l = RtccGetDate();				// 日付読み込み
		MsgClock[1] = (dt.year >> 4) + 0x30;		// 年
		MsgClock[2] = (dt.year & 0x0F) + 0x30;
		MsgClock[4] = (dt.mon >> 4) + 0x30;		// 月
		MsgClock[5] = (dt.mon & 0x0F) + 0x30;
		MsgClock[7] = (dt.mday >> 4) +0x30;		// 日
		MsgClock[8] = (dt.mday & 0x0F) + 0x30;

		tm.l = RtccGetTime();				// 時刻読み込み
		MsgClock[10] = (tm.hour >> 4) + 0x30;		// 時
		MsgClock[11] = (tm.hour & 0x0F) + 0x30;
		MsgClock[13] = (tm.min >> 4) + 0x30;		// 分
		MsgClock[14] = (tm.min & 0x0F) + 0x30;

		lcd_Str(0, 3, MsgClock);			// 時計表示
	}
}

/*****************************************
*   数値から文字列に変換
*****************************************/
void itostring(char digit, unsigned int data, char *buffer)
{
	char i;
	buffer += digit;						// 文字列の最後
	for(i=digit; i>0; i--) {				// 最下位桁から上位へ
		buffer--;						// ポインター１
		*buffer = (data % 10) + '0';		// その桁数値を文字にして格納
		data = data / 10;					// 桁-1
	}
}