51的测试程序(主要是用仿真串口进行测试)

/*
**************************************************************************************
**************************************************************************************
*/
#include
#include
#include "lcd_51.h"
#include "delay_51.h"
#include "24c64.h"
#include "key.h"
//#include "adc0832.h"

#define uchar unsigned char
#define uint unsigned int

//adc0832部分
uchar ReadAdc0832( uchar channel ) reentrant;
//ADC0832端口定义
#define ADC0832_SCK_H P1_1 = 1
#define ADC0832_SCK_L P1_1 = 0

#define ADC0832_DIDO_H P1_2 = 1
#define ADC0832_DIDO_L P1_2 = 0
#define ADC0832_DIDO P1_2

#define ADC0832_CS_H P1_0 = 1
#define ADC0832_CS_L P1_0 = 0

//按键部分
uchar sure = 0;
uchar model = 0;
uchar add_b = 0;
uint add_p = 0x0000;

//串口部分

//uchar flag44 = 0;
//uchar flagadc0832 = 0;
//uchar flag24c64 = 0;
//uchar flagshumaguang = 0;
uchar flagwhole = 5;
//uchar flagno = 1;
uchar flagfillallow = 0;

uchar flagsendmessage44 = 0;
uchar flagsendmessageadc0832 = 0;
uchar flagsendmessageshumaguang = 0;
uchar flagsendmessage24c64 = 0;
uchar flagdoing24c64 = 0;

//波特率宏定义
#define RELOAD_COUNT 0xfd;//SMOD=1, crystal=11.0592, baud= 19200
//#define RELOAD_COUNT 0xFa//SMOD=1, crystal=11.0592, baud= 9600
//#define RELOAD_COUNT 0xf4//SMOD=1, crystal=11.0592, baud= 4800
//#define RELOAD_COUNT 0xe8//SMOD=1, crystal=11.0592, baud= 2400

//缓冲区
#define Rec_Max 9 //定义最大值
#define COMRECSIZE 16 //定义缓冲区大小

uchar Rec_buf[COMRECSIZE];
uchar *Point2Rec_buf; //定义指向数组Rec_buf的指针

uchar Rec_n = 0; //接收字节个数初始化为0
uchar RecFullFlag = 0; //接收满标志初始化为0

//-----------------------------------------------------串口部分接口函数--------------------------------------------------
/*
********************************************************************
** 函数名：串口初始化函数
** 例子 : UART_Init();
**
********************************************************************
*/
void UART_Init( void )
{
SCON |= 0x50; //串口工作方式1, 波特率可变, 波特率由T1决定, 允许接收位REN = 1.无奇偶校验位
PCON |= 0x80; //波特率加倍
TMOD |= 0x20; //T1, 8位自动, 方式2, 之所以选择工作方式2是因为它有自动加载功能，可以避免程序反复装入初值引起的误差

TH1 = RELOAD_COUNT;//赋初值高8位TH RELOAD_COUNT由前宏定义
TL1 = RELOAD_COUNT;//赋初值低8位TH
ES = 1; //开串口中断
ET1 = 0; //禁止T1中断允许, 以免产生不必要的中断带来的频率误差
TR1 = 1; //打开T1

//EA = 1; //注意, 还没有打开全局中断
}

//串口接收中断服务程序
void serial_INT4( void ) interrupt 4
{
if( RI )
{
RI = 0; //硬件置位，软件清零
if( flagdoing24c64 == 0 )
{
switch( SBUF )
{
case '1':
{
//4*4
flagwhole = 1;
flagsendmessage44 = 1;
LCD_write_string( 1, 0, " made by hebei " );
LCD_write_string( 2, 0, " TEST 4*4 --> 0 " );
} break;

case '2':
{
//ADC
flagwhole = 2;
flagsendmessageadc0832 = 1;
LCD_write_string( 1, 0, " made by hebei " );
LCD_write_string( 2, 1, "TEST ADC--> " );
} break;

case '3':
{
//shumaguang
flagwhole = 3;
flagsendmessageshumaguang = 1;
LCD_write_string( 1, 0, " made by hebei " );
LCD_write_string( 2, 0, "TEST shumaguang " );
} break;

case '4':
{
//24C64
flagwhole = 4;
flagsendmessage24c64 = 1;
LCD_write_string( 1, 1, "0000 >0 is " ); //
LCD_write_string( 2, 0, " ");

} break;

case '5':
{
//结束
flagwhole = 5;
LCD_write_string( 1, 0, " made by hebei " );
LCD_write_string( 2, 0, " NO TEST " );
} break;

}
}

if( flagdoing24c64 == 1 )
{
if( flagfillallow == 1 )
{
Rec_buf[Rec_n++] = SBUF;

if( Rec_n == Rec_Max )
RecFullFlag = 1;
}
}
}

return;
}

/*
********************************************************************
** 函数名：串口发送一个字符
** 例子 : UART_Sendstr( 'a' );
**
** 说明 : UART_SendCh(10); //
** UART_SendCh(13); //回车换行
********************************************************************
*/
void UART_SendCh( uchar Tmp_char )
{
TI = 0;
SBUF = Tmp_char;
while( !TI )
{;}
}

/*
********************************************************************
** 函数名：串口发送字符串函数
** 例子 : UART_Sendstr( "how are you?" );
**
********************************************************************
*/
void UART_SendStr( uchar *str )
{
ES=0; //disable uart0 interrupt;
while( *str )
{
TI = 0;
SBUF = ( *str );
++str;
while( !TI )
{;} //waitting for sending finished.
}
TI=0;
ES=1;
}

//-----------------------------------------------------串口部分接口函数结束--------------------------------------------------

//-----------------------------------------------------外部中断0部分接口函数(24c64按键)--------------------------------------------------
//外中断初始化
void Int0init( void )
{
EX0 = 1; //允许外中断0
IT0 = 1; //边沿触发
}

//
void modelchang( void )
{
model++;
model %= 3; //model在0-2之间
switch( model )
{
case 0: LCD_write_char( 1, 0, ' ' ); LCD_write_char( 1, 6, ' ' ); break;
case 1: LCD_write_char( 1, 0, '>' ); LCD_write_char( 1, 6, ' ' ); break;
case 2: LCD_write_char( 1, 0, ' ' ); LCD_write_char( 1, 6, '>' ); break;
default: break;
}
}

//
void add( void )
{
uint k = add_p;
switch( model )
{
case 1:
add_p++;
add_p %= 0x000A;
LCD_write_char( 1, 4, ( add_p & 0x000f ) + 0x30 ); break;
case 2:
add_b %= Rec_Max;
LCD_write_char( 1, 7, ( add_b & 0x000f ) + 0x30 );
LCD_write_char( 1, 12, I2cReadDataFromAddr( 0xa0, k + add_b ) ); //从24C64里面读数据
add_b++;
break;

default : break;
}
}

//确定
void ok( void )
{
sure = 1;
}

//外中断0服务程序
void int0_int( void ) interrupt 0
{
EA = 0; //禁止再次外中断

if( ( P3 & 0x3c ) != 0x3c )
{
delay_nms( 20 ); //去除抖动
if( ( ( P3 & 0x3c ) != 0x3c ) )
{
switch( P3 & 0x3c )
{
//模式
case 0x30 : modelchang(); break;
//加
case 0x28 : add(); break;
//确定
case 0x18 : ok(); break;

default : break;
}
}
}

EA = 1; //打开外中断
}

//-----------------------------------------------------外部中断0部分接口函数结束--------------------------------------------------

//-----------------------------------------------------芯片74HC595以及74HC139部分接口函数(数码管)--------------------------------------------------

//595端口定义
#define HC595_SHCP_H P0_0 = 1
#define HC595_SHCP_L P0_0 = 0
#define HC595_DS_H P0_1 = 1
#define HC595_DS_L P0_1 = 0
#define HC595_STCP_H P0_2 = 1
#define HC595_STCP_L P0_2 = 0

//139端口定义
#define HC139A_H P0_3 = 1
#define HC139A_L P0_3 = 0
#define HC139B_H P0_4 = 1
#define HC139B_L P0_4 = 0

//共阳a-7 b-6 c-5 d-4 e-3 f-2 g-1 h-0
uchar code Atab[] = //注意，此处要定义为code
{
0x03,/*0*/
0x9F,/*1*/
0x25,/*2*/
0x0D,/*3*/
0x99,/*4*/
0x49,/*5*/
0x41,/*6*/
0x1F,/*7*/
0x01,/*8*/
0x09,/*9*/
};

//139译码
void HC139_Sendbyte( uchar senddata )
{
switch( senddata )
{
case 0: HC139A_L; HC139B_L; break;
case 1: HC139A_H; HC139B_L; break;
case 2: HC139A_L; HC139B_H; break;
case 3: HC139A_H; HC139B_H; break;
default: break;
}
}

/**********************************
** 函数作用：向595发送一个字节数据的低n位
** 入口参数：要写的字节 senddata
** 返回值 : 无
***********************************/
void HC595_Send( uchar Btemp )
{
uchar i;
for( i = 0; i < 8; i++ )
{
if( 0x01 & Btemp ) //先发送低位， 再发高位
HC595_DS_H;

else
HC595_DS_L;

HC595_SHCP_L;
//asm("nop");
HC595_SHCP_H;
//asm("nop");

Btemp = Btemp >> 1;
}

//锁存
HC595_STCP_L;
//delay_nus( 1 );
HC595_STCP_H;
}

//数码管显示
void NumDisplay( unsigned char Bit, unsigned char num )
{
HC139_Sendbyte( Bit );
HC595_Send( Atab[num] ); //第3位数字显示数num
}

//注意此函数在循环体中使用
//内部包含5ms延时
void DataDisp( long int datal )
{
uchar i;
unsigned int wei[4];
wei[0] = datal / 1000;
wei[1] = (datal - wei[0] * 1000) / 100;
wei[2] = (datal - wei[0] * 1000 - wei[1] * 100) / 10;
wei[3] = datal % 10;

//显示停留时间
for( i = 0; i < 5; i++ )
{
NumDisplay( 0,wei[0] );
delay_nms( 3 );

NumDisplay( 1, wei[1] );
delay_nms( 3 );

NumDisplay( 2, wei[2] );
delay_nms( 3 );

NumDisplay( 3, wei[3] );
delay_nms( 3 );
}
}

//-----------------------------------------------------芯片74HC595以及74HC139部分接口函数(数码管)结束--------------------------------------------------

//-----------------------------------------------------ADC0832驱动部分函数--------------------------------------------------
/*
********************************************************************
** 函数名 ：ADC0832读数据程序
** 入口 ：需转换通道channel [0:1]
** 返回 : 无符号字符型 uchar
** 例子 : Data_adc = ReadAdc0832( 0 ); //读取adc0832芯片的0通道模拟电压
** 说明 : 使用时请在芯片加上精准电压源, 建议用专用芯片
********************************************************************
*/

//工作时序
//当cs由高变低时，选中ADC0832。在时钟的上升沿，DI端的数据移入ADC0832内部的多路地址移位寄存器。
//在第一个时钟期间，Dl为高，表示启动位，紧接着输入两位配置位。当输入启动位和配置位后，选通输入模拟通道，转换开始。
//转换开始后，经过一个时钟周期延迟，以使选定的通道稳定。ADC0832接着在第4个时钟下降沿输出转换数据。
//数据输出时先输出最高位(D7~DO)；输出完转换结果后，又以最低位开始重新输出一遍数据(D7～DO)，两次发送的最低位共用。当片选cS
//为高时，内部所有寄存器清0，输出变为高阻态。如果要再进行一次模傲转换，片选cs必须再次从高向低跳变，后面再输入启动位和配置位

//adc0832读数据
uchar ReadAdc0832( uchar channel ) reentrant
{
uchar i = 0;
uchar outdata = 0;
//初始化: 选通 数据口保持高电平
//当cs由高变低时，选中ADC0832。在时钟的上升沿，DI端的数据移入ADC0832内部的多路地址移位寄存器
ADC0832_CS_L; // 使能
ADC0832_DIDO_H; //
ADC0832_SCK_L; //第一次触发
_nop_();
_nop_();
ADC0832_SCK_H; //
_nop_();
_nop_();

//模拟通道的选择及单端输入和差分输入的选择
ADC0832_DIDO_H;
ADC0832_SCK_L; //第二次触发
_nop_();
_nop_();
ADC0832_SCK_H;
_nop_();
_nop_();

if( channel == 1 )
{
ADC0832_DIDO_H;
}

else
{
ADC0832_DIDO_L;
}
ADC0832_SCK_L; //第三次触发
_nop_();
_nop_();
ADC0832_SCK_H;
_nop_();
_nop_();


ADC0832_SCK_L;
_nop_();
_nop_();
ADC0832_DIDO_H; //置为输入准备读数据
ADC0832_SCK_H;
_nop_();
_nop_();

outdata = 0; //初始化

//读数据D7~D0
for( i = 1; i <= 8; i++ )
{
if( ADC0832_DIDO == 1 )
{
outdata |= 0x01;
}

ADC0832_SCK_H;
ADC0832_SCK_L;

outdata = outdata << 1; //左移一位
}

//此函数不再读数据D0~D7 (注意D0位重叠)
ADC0832_CS_H; //禁止

return outdata;
}
//-----------------------------------------------------ADC0832驱动部分函数结束--------------------------------------------------

//显示标签
void sendlogo( void )
{
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " Test Message " );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( "***************************************************************************" );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " 1 ---> test 4*4 " );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " 2 ---> test ADC0832 " );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " 3 ---> test shumaguang " );
UART_SendCh(10); //
UART_SendCh(13); //
UART_SendStr( " 4 ---> test I2C(24C64) " );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " 5 ---> no test " );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " 06AotoControl QiXi.Qindongxixiaonanbei@163.com" );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( "***************************************************************************" );
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( "Please enter you want to test --------> " );
}

//总初始化
void Device_init( void )
{
LCD_init();
Int0init();
UART_Init();
EA = 1;
}

//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~主函数~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
void main( void )
{
uchar tmp;
uint shu = 9999; //数码管初值
uchar new = 0;
uchar old = 0;

Device_init(); //总初始化

while( 1 )
{
EA = 0; //禁止中断，以免写液晶时出现不必要显示的字符

//4*4
if( flagwhole == 1 )
{
if( flagsendmessage44 == 1 )
{
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " " );
UART_SendCh(10); //
UART_SendCh(13);
flagsendmessage44 = 0;

}
new = KeyScan44();
if( old != new )
{
old = new;
LCD_write_datalongint( 2, 14, new );

if( new < 10 )
LCD_write_char( 2, 15, ' ' );
}
}

//AD采样
if( flagwhole == 2 )
{
if( flagsendmessageadc0832 == 1 )
{
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " " );
UART_SendCh(10); //
UART_SendCh(13);
flagsendmessageadc0832 = 0;

}

tmp = ReadAdc0832( 0 );

//清除一些不必要的显示
if( tmp < 100 )
LCD_write_char( 2, 15, ' ' );
if( tmp < 10 )
LCD_write_char( 2, 14, ' ' );

//显示该值
LCD_write_datalongint( 2, 13, tmp );
}

//数码管
if( flagwhole == 3 )
{
if( flagsendmessageshumaguang == 1 )
{
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " " );
UART_SendCh(10); //
UART_SendCh(13);
flagsendmessageshumaguang = 0;

}
DataDisp( shu-- );
}

//I2C(24C64)
if( flagwhole == 4 )
{
if( flagsendmessage24c64 == 1 )
{
UART_SendCh(10); //
UART_SendCh(13); //
UART_SendStr( "UART_SendCh( Rec_Max / 10 + 0x30 );
UART_SendCh( Rec_Max % 10 + 0x30 );
UART_SendStr( " words to the Device 24C64> " );
UART_SendCh(10); //
UART_SendCh(13); //
flagsendmessage24c64 = 0; //标志清0

flagfillallow = 1; //允许开始装入数据
flagdoing24c64 = 1;
Rec_n = 0;
}

if( RecFullFlag == 1 ) //如果装满
{
UART_SendCh(10); //
UART_SendCh(13); //
UART_SendStr( ">>>>>You had finished sendding " );
UART_SendCh( Rec_n / 10 + 0x30 );
UART_SendCh( Rec_n % 10 + 0x30 );
UART_SendStr( " words to Device 24C64! " );
UART_SendCh(10); //
UART_SendCh(13); //
UART_SendStr( ">>>>>you can press 3 Keys on the board to see what you had send to the 24C64, " );
UART_SendCh(10); //
UART_SendCh(13); //
UART_SendStr( ">>>>>if you press the key *sure*, you can break out the job now, and it is the only way to break out ^_^ ");
UART_SendCh(10); //
UART_SendCh(13);
RecFullFlag = 0;
Rec_n = 0; //准备重新接收
}

if( sure == 1 )
{
sure = 0;
I2c_Write_n( 0xa0, add_p, Rec_buf, Rec_Max);
LCD_write_array( 2, 2, Rec_buf );//在1602上显示该数组字符串
UART_SendCh(10); //
UART_SendCh(13);
UART_SendStr( " " );
UART_SendCh(10); //
UART_SendCh(13);
flagdoing24c64 = 0;
}
}

//正常状态
if( flagwhole == 5 )
{
flagwhole = 0; //置标志为0，不做任何测试
flagdoing24c64 = 0; //任务24C64的工作正在执行标志
LCD_write_string( 1, 0, " made by hebei " );
LCD_write_string( 2, 0, " NO TEST " );
sendlogo(); //显示标签
}

EA = 1; //打开全局中断
}

}