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