设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › MEGA8红外学习程序下载
返回列表 发新帖
查看: 1994|回复: 0
收起左侧

MEGA8红外学习程序下载

[复制链接]
ID:252159 发表于 2017-11-22 09:10 | 显示全部楼层 |阅读模式
红外学习程序下载

单片机源程序如下:
  1. ///////////////////////////////////////////////////////////////////////////////////
  2. //        This is the TOP2800.c file.                                              //
  3. //                                                                               //
  4. //        04.05.08        Created by domdom.                                       //
  5. ///////////////////////////////////////////////////////////////////////////////////
  6. #include <MEGA8.h>
  7. #include "TWI.H"
  8. #define uchar unsigned char
  9. #define uint  unsigned int
  10. #define M62429MicClk PORTC.2
  11. #define M62429VolClk PORTC.1
  12. #define M62429Data PORTC.3
  13. #define ir_in PIND.2 //ir_in
  14. #define swsda PINB.3 //Key data in
  15. #define swsck PORTB.2//Key ledsck   
  16. #define swcs PORTB.1 //Key cs
  17. #define ledsck PORTB.4//LED ledsck
  18. #define ledsda PORTB.5//LED data
  19. #define sel_vga0 PORTD.6
  20. #define sel_vga1 PORTD.7
  21. #define sel_v PORTD.3
  22. #define sel_a PORTB.6
  23. #define bp PORTC.0
  24. #define up PORTB.7
  25. #define down PORTD.5
  26. #define power PORTB.0
  27. #define ir_out PORTD.4   
  28. #define rd_device_add 0xa1
  29. #define wr_device_add 0xa0  

  31. void CommSend(uchar data);//串行口发送处理子程序
  32. uint ScanKey();//键盘扫描程序
  33. void SysInit(void);  
  34. void LearnIR(void);
  35. void LearnOK(void);  
  36. void SendIR(void);  
  37. void SendToVGA(unsigned char index);
  38. void M62429Ctr(unsigned char VolumeSel,unsigned char Mod,unsigned char Volume);
  39. unsigned char EEPROM_read(unsigned int addr);
  40. //void EEPROM_write(unsigned int addr,unsigned char data);

  42. uchar AT24C32_W(uchar mcu_data,uint AT24C32_address);
  43. uchar AT24C32_R(uint AT24C32_address);
  44. void KeyProcess(uint KeyValue);  
  45. void CommandInput(void);
  46. interrupt [USART_RXC] void comm_isr(void);      //串行口中断程序
  47. interrupt [EXT_INT0] void int0_isr(void);        //the IR Input interrupt
  48. interrupt [TIM1_OVF] void timer1_int(void);  
  49. interrupt [TIM0_OVF] void timer0_int(void);
  50. interrupt [TIM2_OVF] void timer2_int(void);    //used for power delay off   


  53. uchar RxFlag;
  54. uchar RxBuf;  
  55. unsigned char gPWMEn;
  56. unsigned int T2Cnt; //used for Timer2 count
  57. unsigned char gLen,gCount;
  58. unsigned char IrDataIndex;
  59. unsigned char gState,RsFlag;
  60. unsigned char gSending;
  61. unsigned char gTimeoutCount;
  62. unsigned char gLearning;
  63. unsigned char gWaitingIR;
  64. unsigned int gIRData[224];
  65. unsigned char SerialBuf[16];            //串口缓存
  66. const uchar BaudCode[]={7,12,25,51,103}; // 38400(error),19200,9600,4800,2400 bps  
  67. unsigned char VolumeSel,AVCnt,AudioVolume,MicVolume,LedValue,Learncnt,LearnEnCnt,gLearningFail,PowerOffFlag,LearningIREn;


  70. void delay(uint t)//延时
  71. {
  72.    uint i;
  73.    for(i=0;i<t;i++);
  74. }

  76. void Beep(uchar operation)
  77. {
  78.         if(operation) bp=1;
  79.         else bp=0;   
  80. }  

  82. unsigned char EEPROM_read(unsigned int addr)
  83. {
  84.         /* Wait for completion of previous write */
  85.         while(EECR & (1<<1))
  86.         ;
  87.         /* Set up address register */
  88.         EEAR = addr;
  89.         /* Start eeprom read by writing EERE */
  90.         EECR |= (1<<0);
  91.         /* Return data from data register */
  92.         return EEDR;       
  93. }
  94. /*
  95. void EEPROM_write(unsigned int addr,unsigned char data)
  96. {
  97.         //Wait for completion of previous write
  98.         while(EECR & (1<<1))
  99.         ;
  100.         // Set up address and data registers
  101.         EEAR = addr;
  102.         EEDR = data;
  103.         // Write logical one to EEMWE
  104.         EECR |= (1<<2);
  105.         // Start eeprom write by setting EEWE
  106.         EECR |= (1<<1);
  107. }
  108. */
  109. void LED(uchar Data)
  110. {
  111.         uchar i;  
  112.         for(i=0;i<8;i++)
  113.         {               
  114.                 Data<<=1;   
  115.                 ledsda=SREG.0;             
  116.                 ledsck=0;
  117.                 ledsck=1;
  118.         }
  119. }

  121. uint ScanKey()//键盘扫描程序
  122. {
  123.         uchar i;   
  124.         uint KeyVal;
  125.         KeyVal=0x0000;
  126.         delay(20);
  127.         swcs=1;
  128.         delay(20);
  129.         swsck=0;   
  130.         delay(20);
  131.         swsck=1;  
  132.         delay(20);         
  133.         swcs=0;  
  134.         KeyVal=KeyVal|swsda;
  135.         for(i=0;i<15;i++)
  136.         {      
  137.                 swsck=0;
  138.                 delay(20);                          
  139.                 swsck=1;
  140.                 delay(20);
  141.                 KeyVal<<=1;
  142.                 KeyVal=KeyVal|swsda;
  143.         }
  144.         swcs=1;  
  145.         return(KeyVal);
  146. }  

  148. void SysInit(void)
  149. {
  150.         DDRD=0xFB;        /*input:PD2(IR_IN),PD0(RXD)  11111011*/
  151.         PORTD=0xFB;    //0xB3;
  152.         DDRB=0xf7;    /*input:  PB3(swsda)    11110111*/
  153.         PORTB=0xf7;
  154.         DDRC=0xff;
  155.         PORTC=0xfe; //Beep
  156.         
  157.         TWBR=32;   //TWI
  158.         TWSR=0;
  159.         
  160.         TCCR0=1;//stop
  161.         TCNT0=192;
  162.         
  163.         TCCR1A=0x00;
  164.         TCCR1B=0x00;
  165.         TCNT1H=0x00;
  166.         TCNT1L=0x00;
  167.         OCR1AH=0x00;
  168.         OCR1AL=0x00;
  169.         OCR1BH=0x00;
  170.         OCR1BL=0x00;

  172.         TCCR2=0x00;
  173.         ASSR=0x00;//CK
  174.         TCNT2=0;
  175.         OCR2=0;                                
  176.         TCCR2=0;//ctc,No prescaling,No OC2,stop;
  177.         //TCCR2=9;//ctc,No prescaling,No OC2,start;
  178.         GICR= 0x00;        // Enable INT1 interrupt
  179.         MCUCR=1;       //INT0 any change  INT1  //Low LEVEL(SW_IN)          
  180.         TCCR1A=0;
  181.         //TCCR1B=2;   // TIMER1 clock is xtal/8  //start Timer
  182.         TCCR1B = 0; //stop
  183.         // preset TIMER1
  184.         TCNT1=0;
  185.         // clear TIMER1 interrupts flags
  186.         TIFR=0;
  187.         // disable TIMER1 overflow interrupt
  188.         TIMSK=0x00;  
  189.         /*UART初始化*/
  190.         OSCCAL=EEPROM_read(0x1ff); //对内部RC OSC调整       
  191.        
  192.   //        OSCCAL=0xff;
  193.         //UCSRA=0xfc;//0xfc;               
  194.            UBRRH=0;
  195.            UBRRL=BaudCode[3]; //default Baud Rate=4800 (i=3)
  196. //           UBRRL=11;   //19200   
  197. //UBRRL=24;   //19200         
  198.    //        UBRRL=50;   //9600      
  199. //        UBRRL=102;   //4800
  200. //        UBRRL=204;   //1200
  201.       //        UBRL=103;
  202.         UCSRB=0x98;//enable UART receiver and transmitter, and receive interrupt(RXCIE)
  203.         UCSRC=(1<<7)|(1<<2)|(1<<1);//8位数据+1位STOP位        

  205.         SREG=0x80;    //enable interrupt bit in sreg   
  206.   //        CommSend(OSCCAL);

  208.         //initial system Variable  
  209.         if(AT24C32_R(0x00)==0x7e) RsFlag=1;
  210.         else RsFlag=0;
  211.        
  212.         LearningIREn=0;
  213.         RxFlag=0;
  214.         up=1;
  215.         down=1;
  216.         power=0;//Open Projector  

  218.         LedValue=0xff;                         
  219.                                   LedValue&=0xfe;
  220.                                   LedValue|=0x02;         //Off the Notebook LED;
  221.                                       LedValue|=0x04;  //off the DV LED;  
  222.         LedValue&=0xf7;  //On the AV LED
  223.         LedValue|=0x20;         //Off the Screen Down LED;
  224.         LedValue|=0x10;         //Off the Screen Up LED;
  225.         LedValue|=0x40;        //Off the Mic Sel LED       
  226. //        LedValue|=0x80;  //Off the IR Learning Sel LED       
  227.         LED(LedValue);

  229.             sel_a=0; //difference
  230.             sel_v=0;
  231.             sel_vga1=0;
  232.             sel_vga0=0;        
  233.        
  234.         T2Cnt=0; //used for Timer2 count
  235.         Learncnt=0;
  236.         LearnEnCnt=0;   
  237.         VolumeSel=0;
  238.         AVCnt=0;
  239.         gLearning=0;
  240.         gSending=0;
  241.         gLearningFail=0;  
  242.         AudioVolume=73;   
  243.         PowerOffFlag=1;  
  244.         MicVolume = 73;
  245.             M62429Ctr(0,0,73);  //Audio
  246.         M62429Ctr(0,1,73);
  247.             M62429Ctr(1,0,73);  //Mic
  248.         M62429Ctr(1,1,73);
  249. }

  251. /******************************************
  252.                I2C总线写一个字节
  253.                             返回0:写成功
  254.                                 返回非0:写失败
  255. *******************************************/
  256. uchar AT24C32_W(uchar mcu_data,uint AT24C32_address)
  257. {
  258.           unsigned int addr;
  259.           addr=AT24C32_address;
  260.           Start();//I2C启动   
  261.           Wait();
  262.           if(TestAck()!=START) return 1;//ACK
  263.           Write8Bit(wr_device_add);//写I2C从器件地址和写方式
  264.           Wait();
  265.           if(TestAck()!=MT_SLA_ACK) return 1;//ACK
  266.           Write8Bit(addr>>8);//写24C02的ROM地址h
  267.           Wait();
  268.           if(TestAck()!=MT_DATA_ACK) return 1;//ACK
  269.           Write8Bit(AT24C32_address&0x00FF);//写24C02的ROM地址l
  270.           Wait();
  271.           if(TestAck()!=MT_DATA_ACK) return 1;//ACK
  272.           Write8Bit(mcu_data);//写数据到24C02的ROM
  273.           Wait();
  274.           if(TestAck()!=MT_DATA_ACK) return 1;//ACK       
  275.           Stop();//I2C停止
  276.           delay(2000);//延时等EEPROM写完
  277.           return 0;
  278. }
  279. /******************************************
  280.                I2C总线读一个字节
  281.                            如果读失败也返回0
  282. *******************************************/
  283. uchar AT24C32_R(uint AT24C32_address)
  284.       {
  285.            unsigned char temp;  
  286.            unsigned int addr;
  287.            addr=AT24C32_address;
  288.            Start();//I2C启动
  289.            Wait();
  290.            if (TestAck()!=START) return 0;//ACK          
  291.            Write8Bit(wr_device_add);//写I2C从器件地址和写方式
  292.            Wait();
  293.            if(TestAck()!=MT_SLA_ACK) return 0;//ACK
  294.            Write8Bit(addr>>8);//写24C02的ROM地址h
  295.            Wait();
  296.            if(TestAck()!=MT_DATA_ACK) return 0;//ACK
  297.            Write8Bit(AT24C32_address&0x00FF);//写24C02的ROM地址l
  298.            Wait();          
  299.            if (TestAck()!=MT_DATA_ACK) return 0;
  300.            Start();//I2C重新启动
  301.            Wait();
  302.            if (TestAck()!=RE_START)  return 0;
  303.            Write8Bit(rd_device_add);//写I2C从器件地址和读方式
  304.            Wait();
  305.            if(TestAck()!=MR_SLA_ACK)  return 0;//ACK
  306.            Twi();//启动主I2C读方式
  307.            Wait();
  308.            if(TestAck()!=MR_DATA_NOACK) return 0;//ACK       
  309.            temp=TWDR;//读取I2C接收数据
  310.            Stop();//I2C停止
  311.            return temp;
  312.       }

  314. interrupt [USART_RXC] void comm_isr(void)//串行口中断程序
  315. {
  316.      uchar i,sreg,FunCode;
  317.    //  CommSend(0xF5);
  318.      if ((UCSRA&0x80)==0x80)
  319.      {
  320.          sreg=SREG;
  321.          SREG=0x0; //SREG=0x0;
  322.          RxFlag=0;
  323.          while (!(UCSRA&0x80)); UCSRA&=~0x80;//CommSend(UDR);
  324.          if(UDR!=0xFF) goto EXT;          //同步码
  325.          while (!(UCSRA&0x80)); UCSRA&=~0x80; //功能码
  326.          FunCode=UDR;
  327.          //CommSend(FunCode); }
  328.          if(FunCode==0x7F)
  329.          {
  330.                  while (!(UCSRA&0x80)); UCSRA&=~0x80;
  331.                  RxBuf=UDR;delay(0xff);//CommSend(RxBuf);      //接收数据
  332.                 while (!(UCSRA&0x80)); UCSRA&=~0x80;//结束码
  333.                  if(UDR==0x55) RxFlag=1;      
  334.          }
  335.          else if(FunCode==0x8F)//232 databyte
  336.          {
  337.                 while (!(UCSRA&0x80));SerialBuf[0]=UDR;UCSRA&=~0x80;//数据索引  
  338.                 
  339.                 while (!(UCSRA&0x80));SerialBuf[1]=UDR;UCSRA&=~0x80;//Baud Rate
  340.                 
  341.                 while (!(UCSRA&0x80));
  342.                 SerialBuf[2]=UDR;
  343.                 UCSRA&=~0x80;//RsDataLength   
  344.                
  345.                 for(i=0;i<SerialBuf[2];i++)
  346.                 {
  347.                         while (!(UCSRA&0x80));
  348.                         SerialBuf[i+3]=UDR;
  349. //                        AT24C32_W(UDR,RsDataIndex*512+3+i);UCSRA&=~0x80;//RsDataCode
  350.                 }                 
  351.                 
  352.                 while (!(UCSRA&0x80));
  353.                  if(UDR==0x55)
  354.                  {     //  CommSend(SerialBuf[0]);
  355.                         AT24C32_W(SerialBuf[1],SerialBuf[0]*512+1);//CommSend(SerialBuf[1]);//Baud Rate
  356.                         AT24C32_W(SerialBuf[2],SerialBuf[0]*512+2);//CommSend(SerialBuf[2]);//RsDataLength      
  357.                         for(i=0;i<SerialBuf[2];i++)
  358.                         {
  359.                                 //CommSend(SerialBuf[i+3]);
  360.                                 AT24C32_W(SerialBuf[i+3],SerialBuf[0]*512+3+i);//Write RsDataCode TO IIC
  361.                         }
  362.                          AT24C32_W(0x7e,0); //Rs232 Flag
  363.                          RsFlag=1;
  364.                  }
  365.                  else AT24C32_W(0,0); UCSRA&=~0x80;//结束码
  366.                   
  367.          }
  368.          else goto EXT;
  369.      }   
  370. EXT:
  371.          SREG=sreg;     
  372. //    CommSend(0x77);
  373. }
  374.             
  375. void CommSend(uchar data)  //串行口发送处理子程序
  376. {
  377.    /*        UCSRA |= (1<<6);//TXC  
  378.         UDR = data;
  379.         do{} while ((UCSRA&(1<<6)) == 0); */
  380.      while (!(UCSRA&(1<<5)));
  381.          UDR=data;         
  382. }
  383.   
  384. void M62429WriteByte(unsigned char VolumeSel,unsigned char i,unsigned char Data)
  385. {
  386.     if(VolumeSel%2) M62429MicClk = 0;   //Mic
  387.     else M62429VolClk = 0;   //Audio
  388.     do
  389.     {
  390.         Data = Data >> 1;
  391.         M62429Data = SREG.0;
  392.         delay(2);
  393.         if(VolumeSel%2) M62429MicClk = 1;
  394.         else M62429VolClk = 1;
  395.         delay(2);
  396.         M62429Data = 0;
  397.         delay(2);
  398.         if(VolumeSel%2) M62429MicClk = 0;
  399.         else M62429VolClk = 0;
  400.     } while (--i != 0);
  401. }

  403. void M62429Ctr(unsigned char VolumeSel,unsigned char Mod,unsigned char Volume)
  404. {
  405.     unsigned char temp;
  406.     if (Volume < 84)
  407.     {
  408.         Mod = Mod & 0x03;
  409.         temp = (Volume & 0x03) | 0x0c;
  410.         Volume = Volume + 4;
  411.         Volume = (Volume & ~0x03) | Mod;
  412.         M62429WriteByte(VolumeSel,7,Volume);
  413.         M62429WriteByte(VolumeSel,3,temp);
  414.         M62429Data = 1;
  415.         delay(3);
  416.         if(VolumeSel%2) M62429MicClk = 1;
  417.         else M62429VolClk = 1;
  418.         delay(4);
  419.         if(VolumeSel%2) M62429MicClk = 0;
  420.         else M62429VolClk = 0;
  421.         M62429Data = 0;
  422.     }
  423. }

  425. ///////////////////////////////
  426. //IR Learn
  427. void LearnIR(void)
  428. {
  429. //        unsigned int i;
  430. //        for(i=0;i<192;i++)
  431. //        gIRData[i]=0;   
  432.         gCount=0;
  433.         gWaitingIR=1;   
  434.         gState=0;
  435.    //        gTimeoutCount=0;

  437.         GICR= 0x40;        // Enable INT0 interrupt
  438.         MCUCR=0x01;       //toggle  
  439.            SREG=0x80;    //Enable interrupt bit in sreg   
  440.         gLearning=1;//Must add it again  
  441.        
  442.         TIMSK=0x40;// enable TIMER2 overflow
  443.         TCNT2=0;
  444.         TCCR2=0x07;//start timer2/1024  电源控制带延时
  445.        
  446. ……………………

  448. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
top2800-all-ok-1006.rar (7.17 KB, 下载次数: 7)


回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表