#include "AT89C51SND1_REG.H"
#include "MCU_UART.H"
#include "Flash_RW.H"

void delay()
{
  unsigned char data i=200;
  while(i--);
}

main()
{
	unsigned int data i,Block,Page,BlockPage,BlockPage2;
    unsigned char data MID,DID;
	unsigned char PageBuf[512];
	init_uart();
	printu("JMBIE MP3 EXP 7 Flash..\n");
	
	Flash_Reset();
	ReadFlashID(&MID,&DID);
	printuf("The Flash MID is 0x%x   ",MID);
	printuf("DID is 0x%x\n",DID);

	for(Block=0;Block<16;Block++)
	   {
		BlockPage = Block<<5;
		BlockErase(BlockPage);
	   	printuf("Erase Block 0x%x\r",Block);
	   	for(i=0;i<200;i++)
			delay();
	   }
	printu("\n----------Erase BLOCK 0-15 OK!\n");

	for(Block=0;Block<16;Block++)
		for(Page=0;Page<32;Page++)
			{
			 BlockPage = (Block<<5)|Page;
			 ReadPage(BlockPage,PageBuf);
			 for(i=0;i<512;i++)
			    if(PageBuf[i]!=0xff) break;
			 if(i==512)
			    {
				 printuf("Block 0x%x ",Block);
				 printuf("Page 0x%x Blank Check OK!\r",Page);
				 }
			 else
			    {
				 printuf("Block 0x%x ",Block);
				 printuf("Page 0x%x Blank Check Error at ",Page);
				 printuf("Byte 0x%x\n",i);
				 }			     		
			 delay();
			}	
	printu("\n----------Blank Check OK!\n");

	for(Block=0;Block<8;Block++)
		for(Page=0;Page<32;Page++)
		{
			for(i=0;i<512;i++)
				PageBuf[i]=Block*32+Page;
			BlockPage = (Block<<5)|Page;
			WritePage(BlockPage,PageBuf);
			printuf("Write Block 0x%x ",Block);
			printuf("Page 0x%x ",Page);
			printuf("of %x\r",PageBuf[0]);
			delay();
		}
	
	printu("\n----------Write BLOCK 0-7 OK!\n");

	for(Block=0;Block<8;Block++)
		for(Page=0;Page<32;Page++)
		{
			BlockPage = (Block<<5)|Page;;
			ReadPage(BlockPage,PageBuf);
			for(i=0;i<512;i++)
				if(PageBuf[i]!=Block*32+Page) break;
			if(i==512)
			    {
				 printuf("Read and Check Block 0x%x ",Block);
				 printuf("Page 0x%x OK!\r",Page);
				 }
			else
			    {
				 printuf("Read and Check Block 0x%x ",Block);
				 printuf("Page 0x%x Error at ",Page);
				 printuf("Byte 0x%x\n",i);			
				}
			delay();
		}

	printu("\n----------Read BLOCK 0-7 and Data Check OK!\n");
	
	for(Block=0;Block<8;Block++)
		for(Page=0;Page<32;Page++)
		{
			BlockPage = (Block<<5)|Page;
			BlockPage2 = ((Block+8)<<5)|Page;
			CopyBack(BlockPage,BlockPage2);
			printuf("Copy Block 0x%x ",Block);
			printuf("Page 0x%x to ",Page);
			printuf("Block 0x%x ",Block+8);
			printuf("Page 0x%x\r",Page);
			delay();
		}
	
	printu("\n----------COPY-BACK from BLOCK 0-7 to BLOCK 8-15 OK!\n");

	for(Block=0;Block<8;Block++)
		for(Page=0;Page<32;Page++)
		{
			BlockPage = ((Block+8)<<5)|Page;;
			ReadPage(BlockPage,PageBuf);
			for(i=0;i<512;i++)
				if(PageBuf[i]!=Block*32+Page) break;
			if(i==512)
			    {
				 printuf("Read and Check Block 0x%x ",Block+8);
				 printuf("Page 0x%x OK!\r",Page);
				 }
			else
			    {
				 printuf("Read and Check Block 0x%x ",Block+8);
				 printuf("Page 0x%x Error at ",Page);
				 printuf("Byte 0x%x\n",i);			
				}
			delay();
		}

	printu("\n----------Read BLOCK 8-15 and Data Check OK!\n");

	while(1);

}