stc单片机AD和EEPROM的驱动C程序[转贴]

cpubbs

stc单片机AD和EEPROM的驱动C程序
参考链接：http://www.picavr.com/news/2008-07/7172.htm

stc单片机具有在应用编程，调试起来比较方便；带有10位AD；内部eeprom；可在1T/机器周期下工作，速度是传统51单片机的12倍；下面是我写的AD和EEPROM的驱动C代码：
/*----------------------------------------------------------------     
*File Name: stc_AD.c                                          -
*Description: A/D 转换程序              
*Project:                                                     -
*MCU type: STC12C5410AD                                       -
                                                                     -
*Company: WY                                                   -
*Compiler: KEIL C51                                             -
*DESINER:        郭准 06.2.7                                          -
-----------------------------------------------------------------------*/
#include <global.h>    //定义的 系统头文件和全局变量
/*A/D  SFR*/
sfr ADC_LOW2  = 0xBE;
sfr ADC_CONTR = 0xC5;
sfr ADC_DATA  = 0xC6;
sfr CLK_DIV   = 0xC7;   ////////
//定义变量
uchar code display_AD_channel_ID[2] = {0x00,0x01};
uchar data AD_channel_result[2][5]; //各通道A/D转换结果。前是通道号；后是转换的值
//定义引用外部
extern void Delay(uint number);//晶振=11059200,机器周期=1.085069444us,"加"的机器周期=1
extern void send_char_com(uchar ch);  
extern void send_string_com(uchar *str,uchar strlen);
void Ad_Change(uchar channel);

//------------------------------------------------------
//功能：A/D转换
//入口：channel = 通道号 .0：0通道；1：1通道。。。。。。。
//出口：AD_channel_1_result: 10位的数据，16进制。
//设计：郭准，伟业，2006/2/7
//------------------------------------------------------
void Ad_Change(uchar channel)
{
uint AD_Result_Temp = 0 ;
//---------------------将P1.0--P1.1设置成适合AD转换的模式
/// P1 = 0xff;                 //将P1口置高，为A/D转换作准备
ADC_CONTR = ADC_CONTR|0x80; //1000,0000打开A/D转换电源
P1M0 = 0x03;                //0000，0011用于A/D转换的P1.x口，先设为开漏
P1M1 = 0x03;                //0000，0011P1.0--P1.1先设为开漏。断开内部上拉电阻
Delay(20);                   //20
ADC_CONTR = ADC_CONTR&0xE0; //1110,0000 清ADC_FLAG,ADC_START位和低3位
ADC_CONTR = ADC_CONTR|(display_AD_channel_ID[channel]&0x07); //设置当前通道号
Delay(1);                 //延时使输入电压达到稳定
ADC_DATA = 0;               //清A/D转换结果寄存器
ADC_LOW2 = 0;
    ADC_CONTR = ADC_CONTR|0x08; //0000，1000ADCS ＝ 1，启动转换
do { ; }     
    while((ADC_CONTR & 0x10)==0);   //0001,0000等待A/D转换结束

ADC_CONTR = ADC_CONTR&0xE7; //1110,0111清ADC_FLAG位，停止A/D转换
AD_Result_Temp = ((AD_Result_Temp|ADC_DATA)<<2)|(ADC_LOW2&0x03);  
//保存返回AD转换的 结果
//----------------------------转换成可由串口显示的字符
AD_channel_result[channel][0] = AD_Result_Temp/1000+0x30;
AD_channel_result[channel][1] = (AD_Result_Temp%1000)/100+0x30;
AD_channel_result[channel][2] = (AD_Result_Temp%100)/10+0x30;
AD_channel_result[channel][3] = AD_Result_Temp%10+0x30;

//------------------------串口监视
// send_char_com(ADC_DATA);    //////发送转换 的 到的 值，这里只是 高8位，值的转换需要考虑
// send_char_com(ADC_LOW2);    //////发送转换 的 到的 值，这里只是 低2位，值的转换需要考虑
send_string_com(AD_channel_result[channel],4);
Delay(1);    //  
}
/*----------------------------------------------------------------     
*File Name: STC_EEPROM.c                                    -
*Description: IAP/ISP 功能                     -  
*Project:                                                       -
*MCU type: STC12C5410AD                                       -
                                                                     -
*Company: WY                                                   -
*Compiler: KEIL C51                                             -
*DESINER:        郭准 06.2.7                                          -
-----------------------------------------------------------------------*/
#include <global.h>    //定义的 系统头文件和全局变量
/*IAP有关功能寄存器*/
sfr ISP_DATA  = 0xE2;
sfr ISP_ADDRH = 0xE3;
sfr ISP_ADDRL = 0xE4;
sfr ISP_CMD   = 0xE5;
sfr ISP_TRIG  = 0xE6;
sfr ISP_CONTR = 0xE7;
//----------------------------定义常量
#define ENABLE_ISP 0x82  //<20MHz
//#define ENABLE_ISP 0x83  //<12MHz
#define DEBUG_DATA 0x5A
//----------------------------flash 存储的起始地址
#define DATA_FLASH_START_ADDRESS  0x2800  //stc12c2052ad  ////////////???????????
uchar tx_buf[3] = {0,0,0};
extern void Delay(uint number);//晶振=11059200,机器周期=1.085069444us,"加"的机器周期=1
extern void send_char_com(uchar ch);  
extern void send_string_com(uchar *str,uchar strlen);
uchar Byte_Read(uint address);
void Sector_Erase(uint address);
void Byte_Program(uint address,uchar ch);
/*
void Eeprom_Start(void)
{
P1 = 0xf0; //开始工作
    Delay(2); //22us..原13us
// SP = 0xE0;  //堆栈指针指向0E0H单元
}
*/
//------------------------------------------------------
//功能：读一字节;调用前需打开IAP功能
//入口：uint address＝页地址0～512，为了提高处理速度，最好用0~256的范围
//出口：
//设计：郭准，伟业，2006/2/7
//------------------------------------------------------
uchar Byte_Read(uint address)
{
uchar data ch;
     
ISP_CONTR = ENABLE_ISP;    //打开IAP功能，设置Flash操作等待时间
ISP_CMD = 0x01;                //选择读AP模式
//--------------------------
address = DATA_FLASH_START_ADDRESS+address;
ISP_ADDRH = (uchar)(address>>8);      //填页地址
ISP_ADDRL = (uchar)(address);      //填页地址
EA = 0;
ISP_TRIG = 0x46;      //出发ISP处理器
ISP_TRIG = 0xB9;
    nop();
ch = ISP_DATA;   //保存数据
EA = 1;
//------------------------在处理器完成之前,CUP将暂停
//------------------------关闭IAP功能,清与ISP有关的特殊功能寄存器
ISP_CONTR = 0;
ISP_CMD = 0;
ISP_TRIG = 0;
// send_char_com(ch + 0x30);
return ch;
}
//------------------------------------------------------
//功能：擦除扇区
//入口：uint address＝页地址0～512，为了提高处理速度，最好用0~256的范围
//出口：
//设计：郭准，伟业，2006/2/7
//------------------------------------------------------
void Sector_Erase(uint address)
{
ISP_CONTR = ENABLE_ISP;    //打开IAP功能，设置Flash操作等待时间
ISP_CMD = 0x03;                //选择页擦除模式
//--------------------------
address = DATA_FLASH_START_ADDRESS+address;
ISP_ADDRH = (uchar)(address>>8);      //填页地址
ISP_ADDRL = (uchar)(address);      //填页地址
EA = 0;
ISP_TRIG = 0x46;      //出发ISP处理器
ISP_TRIG = 0xB9;
    nop();
EA = 1;
//------------------------关闭IAP功能,清与ISP有关的特殊功能寄存器
ISP_CONTR = 0;
ISP_CMD = 0;
ISP_TRIG = 0;
}
//------------------------------------------------------
//功能：字节编程，写
//入口：uint address＝页地址0～512，为了提高处理速度，
//      最好用0~256的范围;uchar ch=要写的数据
//出口：
//设计：郭准，伟业，2006/2/7
//------------------------------------------------------
void Byte_Program(uint address,uchar ch)
{   
//   Sector_Erase(address);
ISP_CONTR = ENABLE_ISP;    //打开IAP功能，设置Flash操作等待时间
ISP_CMD = 0x02;                //选择字节编程模式
//--------------------------
address = DATA_FLASH_START_ADDRESS+address;
ISP_ADDRH = (uchar)(address>>8);      //填页地址
ISP_ADDRL = (uchar)(address);      //填页地址
ISP_DATA = ch;
EA = 0;
ISP_TRIG = 0x46;      //出发ISP处理器
ISP_TRIG = 0xB9;
    nop();
  
  EA = 1;
//------------------------关闭IAP功能,清与ISP有关的特殊功能寄存器
ISP_CONTR = 0;
ISP_CMD = 0;
ISP_TRIG = 0;  
}
//------------------------------------------------------
//功能：字节编程，写字符串
//入口：uint address＝页地址0～512，为了提高处理速度，
//      最好用0~256的范围;uchar ch=要写的数据
//      len=字符串的长度
//出口：
//设计：郭准，伟业，2006/2/7
//------------------------------------------------------
void Morebyte_Program(uint address,uchar *ch,uchar len)
{  
    uchar k = 0;
    Sector_Erase(address);
do  
    {
Byte_Program(address,*(ch + k));
address++;  
        k++;
    }
while(k < len);
}
//------------------------------------------------------
//功能：读多字节;调用前需打开IAP功能
//入口：uint address＝页地址0～512，为了提高处理速度，最好用0~256的范围
//出口：
//设计：郭准，伟业，2006/2/7
//------------------------------------------------------
void Moreyte_Read(uint address)
{
uchar k = 0;
do  
    {
tx_buf[k] = Byte_Read(address);  
address++;  
        k++;
    }
while(k < 3);  
}
参考链接：http://www.picavr.com/news/2008-07/7172.htm