AD和EEPROM的驱动

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 //定义的 系统头文件和全局变量

/*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_cha

nnel_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 //定义的 系统头文件和全局变量

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