MSP430与ATMEL 93C46通讯子程序

;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);
}