/*
===============================================================================

 Ftune3 is SH7305 CPG&BSC tuning utility for fx-9860GIII / Graph 35+EII      v2.40

 copyright(c)2014-2019-2020 by sentaro21
 e-mail sentaro21@pm.matrix.jp

===============================================================================
*/
#include "fxlib.h"
#include "stdio.h"
#include "string.h"

#include "common.h"

char points[]={0x13,0x00};				// =>
char IsEmu=0;

//---------------------------------------------------------------------------------------------
int CPU_check(void) {					// SH3:3 SH4A:4
	if ( ( *(volatile unsigned short*)0xFFFFFF80 == 0 ) &&
	     ( *(volatile unsigned short*)0xFFFFFF84 == 0 ) ) return 4;
	return 3 ;
}

int IsG3() {
	if ( ( *(volatile int*)0xA0000000 == *(volatile int*)0xA0400000 ) &&
	     ( *(volatile int*)0xA0100000 == *(volatile int*)0xA0500000 ) ) return 0;
	return 1;
}
int Is35E2() {
	unsigned char version[16];
	SysCalljmp( (int)&version[0], 0, 0, 0, 0x02EE );	//System_GetOSVersion( &version[0] ); // "03.00.2200" etc
	if ( version[6]=='2' ) return 1;	//  35+EII
	return 0;							//	9860GIII
}
int Emu_check() {
//	int i,t,s=RTC_GetTicks();
//	for(i=0;i<140;i++){
//		Bdisp_PutDisp_DD();
//	}
//	t=RTC_GetTicks()-s;
//	if ( t<6) IsEmu=1;	
	if ( *(int*)0x8000FFD0 == 0 ) IsEmu=1;	// is emulator
}

//---------------------------------------------------------------------------------------------
void PrintXYR(int x,int y,char *buf,int rev){
 	if ( rev ) PrintXY(x,y,(unsigned char *)buf,1);
		else   PrintXY(x,y,(unsigned char *)buf,0);
}

void Fkey_Clear(int n) {
	int y;
	for (y=0; y<8; y++){
		Bdisp_ClearLineVRAM(n*21+2,7*8+y,n*21+20,7*8+y);
	}
}
void Fkey_dispN(int n,char *buf) {
	Fkey_Clear(n);
	PrintMini(n*21+4,7*8+2,(unsigned char *)buf, MINI_OVER);
	Bdisp_DrawLineVRAM(n*21+2,7*8+0,n*21+20,7*8+0);
	Bdisp_DrawLineVRAM(n*21+2,7*8+0,n*21+2,7*8+7);
	Bdisp_ClearLineVRAM(n*21+3,7*8+1,n*21+3,7*8+7);
	Bdisp_ClearLineVRAM(n*21+20,7*8+1,n*21+20,7*8+7);
}
void Fkey_DISPN(int n,char *buf) {
	Fkey_Clear(n);
	PrintXY(n*21+2,7*8+1,(unsigned char *)buf,0);
	Bdisp_DrawLineVRAM(n*21+2,7*8+0,n*21+20,7*8+0);
	Bdisp_DrawLineVRAM(n*21+2,7*8+0,n*21+2,7*8+7);
	Bdisp_ClearLineVRAM(n*21+3,7*8+1,n*21+3,7*8+7);
	Bdisp_ClearLineVRAM(n*21+20,7*8+1,n*21+20,7*8+7);
}
void Fkey_dispR(int n,char *buf) {
	Fkey_Clear(n);
	Bdisp_DrawLineVRAM(n*21+2,7*8+0,n*21+20,7*8+0);
	Bdisp_DrawLineVRAM(n*21+2,7*8+1,n*21+20,7*8+1);
	Bdisp_DrawLineVRAM(n*21+2,7*8+2,n*21+20,7*8+2);
	Bdisp_DrawLineVRAM(n*21+2,7*8+3,n*21+20,7*8+3);
	Bdisp_DrawLineVRAM(n*21+2,7*8+4,n*21+20,7*8+4);
	Bdisp_DrawLineVRAM(n*21+2,7*8+5,n*21+19,7*8+5);
	Bdisp_DrawLineVRAM(n*21+2,7*8+6,n*21+18,7*8+6);
	Bdisp_DrawLineVRAM(n*21+2,7*8+7,n*21+17,7*8+7);
	Bdisp_DrawLineVRAM(n*21+2,7*8+0,n*21+ 2,7*8+7);
	PrintMini(n*21+3,7*8+1     ,(unsigned char *)buf, MINI_REV);
	Bdisp_ClearLineVRAM(n*21+21,7*8+0,n*21+21,7*8+7);
	Bdisp_ClearLineVRAM(n*21+22,7*8+0,n*21+22,7*8+7);
	Bdisp_ClearLineVRAM(n*21+20,7*8+5,n*21+20,7*8+5);
	Bdisp_ClearLineVRAM(n*21+19,7*8+6,n*21+20,7*8+6);
	Bdisp_ClearLineVRAM(n*21+18,7*8+7,n*21+20,7*8+7);
}

void Fkey_dispNP(int n) {
	Fkey_DISPN(n," +");
}
void Fkey_dispNM(int n) {
	Fkey_DISPN(n," -");
}
void Fkey_dispNInit(int n) {
	Fkey_dispN(n,"Init");
}

void func_menu1(void){
		Fkey_dispN(0,"Nrm ");
		Fkey_dispN(1," F2 ");
		Fkey_dispN(2," F3 ");
		Fkey_dispN(3," F4 ");
		Fkey_dispN(4," F5 ");
		Fkey_dispR(5,"benc");

}
void func_menu2(void){
	char E693[]={0x20,0xe6,0x93,0x20,0x00};
		Fkey_dispR(0,"Save");
		Fkey_dispN(1,E693);
		Fkey_dispN(2,E693);
		Fkey_dispN(3,E693);
		Fkey_dispN(4,E693);
		Fkey_dispR(5,"Load");
}
void func_menu3(void){
		Fkey_dispN(0,"FRQ ");
		Fkey_dispN(1,"BCR ");
		Fkey_dispR(2,"Bc02");
		Fkey_dispR(3,"Wc02");
		Fkey_dispR(4,"Bc5 ");
		Fkey_dispR(5,"Wc5 ");
}
#ifdef OPTION_REG
void func_menu4(void){
		Fkey_dispN(0,"B34 ");
		Fkey_dispN(1,"W34 ");
		Fkey_dispR(2,"Bc5 ");
		Fkey_dispR(3,"Wc5 ");
		Fkey_dispN(4,"Bc6 ");
		Fkey_dispN(5,"Wc6 ");
}
#endif


void HexPrintXY(int x, int y, char *str, unsigned int hex){
	char buffer[22];
	sprintf(buffer,"%08X",hex);
	locate(x,y); Print((unsigned char *)str); Print((unsigned char *)buffer);
}

int YesNo( char*buffer){
	unsigned int key;

	SaveDisp(SAVEDISP_PAGE1);
	PopUpWin(5);
	locate(3,2); Print((unsigned char *)buffer);
	locate(3,4); Print((unsigned char *) "   Yes:[F1]");
	locate(3,5); Print((unsigned char *) "   No :[F6]");
	Bdisp_PutDisp_DD();

	GetKey(&key);	
	RestoreDisp(SAVEDISP_PAGE1);
	Bdisp_PutDisp_DD();

	if ( key == KEY_CTRL_F1 ) return 1;
	return 0;
}
void ErrorMSG(char*buffer,int err){
	unsigned int key;
	char buf[20];

	SaveDisp(SAVEDISP_PAGE1);
	PopUpWin(5);
	sprintf(buf,"code:%d",err);
	locate(3,2); Print((unsigned char *)buffer);
	locate(3,4); Print((unsigned char *)buf);
	locate(3,6); Print((unsigned char *) "   Press:[EXIT]");
	Bdisp_PutDisp_DD();

	GetKey(&key);	
	RestoreDisp(SAVEDISP_PAGE1);
	Bdisp_PutDisp_DD();
}
void ErrorADRS(char*buffer,int err){
	unsigned int key;
	char buf[20];

	SaveDisp(SAVEDISP_PAGE1);
	PopUpWin(5);
	locate(3,2); Print((unsigned char *)buffer);
	HexPrintXY(3,4,"addres:",err);
	locate(3,6); Print((unsigned char *) "   Press:[EXIT]");
	Bdisp_PutDisp_DD();

	GetKey(&key);	
	RestoreDisp(SAVEDISP_PAGE1);
	Bdisp_PutDisp_DD();
}

void MSG1(char*buffer1){
	SaveDisp(SAVEDISP_PAGE1);
	PopUpWin(1);
	locate(3,4); Print((unsigned char *)buffer1);
	Bdisp_PutDisp_DD();
}
void MSG2(char*buffer1,char*buffer2){
	SaveDisp(SAVEDISP_PAGE1);
	PopUpWin(2);
	locate(3,3); Print((unsigned char *)buffer1);
	locate(3,4); Print((unsigned char *)buffer2);
	Bdisp_PutDisp_DD();
}
void MSGpop(void){
	RestoreDisp(SAVEDISP_PAGE1);
	Bdisp_PutDisp_DD();
}