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.Qin   dongxixiaonanbei@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;  //打开全局中断
 }

}