#include "P89C60X2.h"
#include "hicj5.h"

/* here is the instrution of x25045*/
#define WREN 0x06
#define WRDI 0x04
#define RDSR 0x05
#define WRSR 0x01
#define READ0 0x03
#define READ1 0x0b
#define WRITE0 0x02
#define WRITE1 0x0a
extern union hdd_long {BYTE Hdd_B[4];unsigned long Hdd_L;} Hdd_Str;

unsigned char Read8()
{
  bit bData;
  BYTE cLoop;
  BYTE cData;
  for(cLoop=0;cLoop<8;cLoop++)
  {
   SK=1;
   SK=0;
   SIO=1;
   bData=SIO;
   cData<<=1;
   if(bData)
    {
     cData|=0x01;
     }
   }
   return cData;
 }

void Write8(BYTE cData)
{
  BYTE cLoop;
  for(cLoop=0;cLoop<8;cLoop++)
  {
   if((cData&0x80)==0)    SIO=0;
    else  SIO=1;
   SK=0;
   SK=1;
   cData<<=1;
   }
}

BYTE ReadSR()
{
  BYTE cData;
  CS=0;
  Write8(RDSR);
  cData=Read8();
  CS=1;
  return cData;
}
 /*
BYTE WriteSR(BYTE cData)
{
  BYTE cTemp;
  cTemp=ReadSR();
  if((cTemp&0x01)==1)
  return 0;
  CS=0;
  Write8(WREN);
  CS=1;
  CS=0;
  Write8(WRSR);
  Write8(cData);
  CS=1;
  return 1;
}
   */
void Write1B(BYTE cData,BYTE cAddress,bit bRegion)
/* 寫入一個字節，cData為寫入的數，cAddress為寫入地址，bRegion為頁 */
{
while((ReadSR()&0x01)==1)
  {}
  CS=0;
  short_delay();
  Write8(WREN);
  SK=0;
  CS=1;
  CS=0;
  if(bRegion==0)
  {
  Write8(WRITE0);
  }
  else
  {
   Write8(WRITE1);
  }
  Write8(cAddress);
  Write8(cData);
  SK=0;
  CS=1;
}

BYTE Read1B(BYTE cAddress,bit bRegion)
/* 讀入一個字節，cAddress為讀入地址，bRegion為頁 */
{
  BYTE cData;
  while((ReadSR()&0x01)==1)
  {}
  CS=0;
  short_delay();
  if(bRegion==0)
  {
   Write8(READ0);
   }
   else
    {
     Write8(READ1);
     }
  Write8(cAddress);
  cData=Read8();
  CS=1;
  return cData;
}

unsigned long Read_Hdd(unsigned char i)
{
 Hdd_Str.Hdd_B[0]=Read1B(i*4,0);
 Hdd_Str.Hdd_B[1]=Read1B(i*4+1,0);
 Hdd_Str.Hdd_B[2]=Read1B(i*4+2,0);
 Hdd_Str.Hdd_B[3]=Read1B(i*4+3,0);
 return Hdd_Str.Hdd_L;
 }
void Write_Hdd(unsigned char i)
{
 Write1B(Hdd_Str.Hdd_B[0],i*4,0);
 Write1B(Hdd_Str.Hdd_B[1],i*4+1,0);
 Write1B(Hdd_Str.Hdd_B[2],i*4+2,0);
 Write1B(Hdd_Str.Hdd_B[3],i*4+3,0);
 }