/*
;Discription:本程序为ATMEL93C46与MSP430通讯程序
  1。管脚连接如下：
      93C46           MSP430
      CS              P4。0
      CK              P4。1
      DI              P4。2
      DO              P4。3
  2。晶振：4/8M晶振，4M晶振4分频，选择8M时8分频，选择XT2为MCLK
  3。Date：2006.03.23，Write by: Benny Chen
   
*/
#define CS_93C46_LOW P4OUT &= ~0x01
#define CS_93C46_HIGH P4OUT |= 0x01
#define SK_93C46_LOW P4OUT &= ~0x02
#define SK_93C46_HIGH P4OUT |= 0x02
#define DO_93C46_LOW ~(P4IN & 0x08)
#define DO_93C46_HIGH P4IN & 0x08
#define DI_93C46_LOW P4OUT &= ~0x04
#define DI_93C46_HIGH P4OUT |= 0x04

#define CMD_DisWrite 0x00
#define CMD_WriteAll 0x20  // x020:8bit     0x10:16bit,
#define CMD_EraseAll 0x40  // x040:8bit     0x20:16bit,
#define CMD_EnWrite 0x60   //0x60:8bit      0X30:16BIT
#define CMD_Write 0x80     //8bit:0X80(0 1A6A5A4 A3A2A1A0)   16bit:0X40(01A5A4 A3A2A1A0)
#define CMD_Read 0x100     //8bit:0X100(10A6A5A4 A3A2A1A0)   16bit:0X80(10A5A4 A3A2A1A0)
#define CMD_Erase 0x180    //8bit:0X180(1 1A6A5A4 A3A2A1A0)   16bit:0X80(11A5A4 A3A2A1A0)
#define START_Bit 0x200    //8bit:0x200      16bit:0x100


/*************************************************************/
/*Name         : Delay() */
/*Discription  : 延时子程序/
/*************************************************************/
void Delay(unsigned int num)
{
while(--num);
}

/*************************************************************/
/*Name         : START_93C46() */
/*Discription  : 启动93C46 */
/*************************************************************/
void START_93C46()
{
CS_93C46_HIGH; /*开启93C46*/
CS_93C46_LOW;
DI_93C46_LOW;
SK_93C46_LOW;
CS_93C46_HIGH;
Delay(1000);
}

/****************************************************************/
/*Name         :END_93C46() */
/*Discription  :用于93C46的结束
/****************************************************************/
void END_93C46()
{
CS_93C46_LOW;
DI_93C46_HIGH;
SK_93C46_HIGH;
}

/*************************************************************/
/*Name         :SEND_DATA_93C46() */
/*Discription  :在93C46启动下，送入指定位数的数据 */
/*输入: op_data 要输入的数据 */
/* num 输入的位数 */
/*************************************************************/
void SEND_DATA_93C46(unsigned int Op_Data,unsigned char Num)
{
unsigned char i;
Op_Data = Op_Data << (16 - Num); /*左移去掉无用位*/
for(i = Num; i > 0; i --)
{
if ((Op_Data & 0X8000) ==0 ) DI_93C46_LOW;
else DI_93C46_HIGH;
SK_93C46_HIGH;
SK_93C46_LOW;
Op_Data <<= 1;
}
}

/*********************************************************/
/*Name         : EWEN_93C46() */
/*Discription  :93C46的编程启动.操作码(100 11XXXXX) */
/*********************************************************/
void EWEN_93C46()
{
START_93C46();
SEND_DATA_93C46(START_Bit + CMD_EnWrite, 0X0A);
END_93C46();
}

/***********************************************************************/
/*Name         : EWDS_93C46() */
/*Discription  : 93C46的编程关闭.操作码(8bit:100 00XXXXX    16bit:100 00XXXX) */
/**********************************************************************/
void EWDS_93C46()
{
START_93C46();
SEND_DATA_93C46(START_Bit + CMD_DisWrite, 0X0A);
END_93C46();
}

/***********************************************************************/
/*Name         :READ() */
/*Discription  :93C46的字读取程序 */
/*输入:要读取的字地址(8bit:7位，16bit:6位) */
/*输出:读取的字数值 */
/**********************************************************************/
unsigned int Read_One(unsigned char Address)
{
unsigned int i;
unsigned int Result;
START_93C46();
SEND_DATA_93C46(START_Bit + CMD_Read + Address, 0X0A);
Result = 0; /*存放返回数据的缓冲先清零*/
for(i =8; i >0; i--) /*循环读出8个数据*/
{
Result = Result << 1;
SK_93C46_HIGH;
SK_93C46_LOW;
if (DO_93C46_HIGH) Result = Result | 0X01;

}
END_93C46();
return Result;
}

/**********************************************************************/
/*Name         :WRITE() */
/*Discription  :93C46的字写入程序 */
/*输入: address 要写入的字地址(6位) */
/* op_data 要写入的数据(16位) */
/*输出: 读取的字数值 */
/**********************************************************************/
unsigned int Write_One(unsigned char Address,unsigned int Op_Data)
{
unsigned char ErrorFlag;
unsigned int mCount;
EWEN_93C46();
START_93C46();
SEND_DATA_93C46(START_Bit + CMD_Write + Address, 0x0A);
SEND_DATA_93C46(Op_Data,0X08);
CS_93C46_LOW;
CS_93C46_HIGH;
ErrorFlag = 0;
mCount = 50000;
while (DO_93C46_LOW)
{
if (! --mCount)
{
ErrorFlag = 1;
break;
}
}
END_93C46();
EWDS_93C46(); /*返回表示擦除状态的特征*/
return ErrorFlag;
}

/************************************************************************/
/*Name         :ERASE() */
/*Discription  :93C46的字擦除程序 */
/*输入: address 要擦除的字地址(6位) */
/************************************************************************/
unsigned int Erase_One(unsigned char Address)
{
unsigned char ErrorFlag;
unsigned int mCount;
EWEN_93C46();
START_93C46();
SEND_DATA_93C46(START_Bit + CMD_Erase + Address, 0X0A);
CS_93C46_LOW;
CS_93C46_HIGH;
ErrorFlag = 0;
mCount = 50000; //设置一个最大延时等待数值.不同的晶振下延时不同*/
while (DO_93C46_LOW)
{
if (! --mCount)
{
ErrorFlag = 1;
break;
}
}
END_93C46();
EWDS_93C46(); /*返回表示擦除状态的特征*/
return ErrorFlag;
}

/**********************************************************************/
/*Name         :ERAL() */
/*Discription  :93C46的全部擦除程序 */
/**********************************************************************/
unsigned int Erase_All()
{
unsigned char ErrorFlag;
unsigned int mCount;
EWEN_93C46();
START_93C46();
SEND_DATA_93C46(START_Bit + CMD_EraseAll, 0X0A);
CS_93C46_LOW;
CS_93C46_HIGH;
ErrorFlag = 0;
mCount = 50000; /*设置一个最大延时等待数值.注意在不同的晶振下延时是不同的*/
while (DO_93C46_LOW)
{
if (! --mCount)
{
ErrorFlag = 1;
break;
}
}
END_93C46();
EWDS_93C46(); /*返回表示擦除状态的特征*/
return ErrorFlag;
}

/***********************************************************************/
/*Name         :WRAL() */
/*Discription  :93C46的写全部程序 */
/*输入: op_data 要写入的数据(8位) */
/*输出: 读取的字数值 */
/***********************************************************************/
unsigned int Write_All(unsigned int Op_Data)
{
unsigned char ErrorFlag;
unsigned int mCount;
EWEN_93C46();
START_93C46();
SEND_DATA_93C46(START_Bit + CMD_WriteAll, 0X0A);
SEND_DATA_93C46(Op_Data,0X08);
CS_93C46_LOW;
CS_93C46_HIGH;
ErrorFlag = 0;
mCount = 50000; /*设置一个最大延时等待数值.不同晶振下延时是不同*/
while (DO_93C46_LOW)
{
if (! --mCount)
{
ErrorFlag = 1;
break;
}
}
END_93C46();
EWDS_93C46();
return(ErrorFlag);
}