久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標(biāo)題: 單片機紅外遙控器匯編程序 控制LED燈 支持掉電喚醒 [打印本頁]
作者: 418854190    時間: 2021-9-16 12:43
標(biāo)題: 單片機紅外遙控器匯編程序 控制LED燈 支持掉電喚醒
程序是反編譯后整理修改 單片機用的是15w201s  支持掉電喚醒  INT0 INT1 INT4喚醒

兩節(jié)CR2016電池供電 電池容量太小  紅外耗電有點大  發(fā)射時電壓從6V降到5V甚至更低  電池可能用不了多久

制作出來的實物圖如下：

單片機源程序如下:


  3. ;==========================================================================
  4. //發(fā)送紅外數(shù)據(jù)  void ir_send()
  5. ir_send:           MOV   set_count_1,#02H; //發(fā)送編碼中的引導(dǎo)碼(9ms高電平+4.5ms低電平)  
  6.                    MOV   set_count_2,#9EH;                  
  7.                    SETB  irflag  ////紅外發(fā)射標(biāo)志      
  8.                                    LCALL TX_TIME;   //定時器發(fā)送
  9.                                                 
  10.                    MOV   set_count_1,#01H; //發(fā)送編碼中的4.5ms低電平
  11.                    MOV   set_count_2,#50H;                 
  12.                    CLR   irflag      //紅外發(fā)射標(biāo)志   低電平則不發(fā)射   
  13.                                    LCALL TX_TIME;    //定時器發(fā)送  
  14.                                                 
  15.                    MOV   ircode,#80H;   //發(fā)送16位用戶碼的前1-8位   
  16.                    LCALL ir_sendbyte    //紅外發(fā)送一個字節(jié)數(shù)據(jù)
  17.                                                 
  18.                    MOV   ircode,#7FH;   //發(fā)送16位用戶碼的前9-16位
  19.                    LCALL ir_sendbyte    //紅外發(fā)送一個字節(jié)數(shù)據(jù)  
  20.                                                 
  21.                    MOV   ircode,irdata; //發(fā)送8位數(shù)據(jù)碼     
  22.                    LCALL ir_sendbyte    //紅外發(fā)送一個字節(jié)數(shù)據(jù)
  23.                                                 
  24.                    MOV   A,irdata;
  25.                    CPL   A ;              取反                  
  26.                    MOV   ircode,A       //發(fā)送8位數(shù)據(jù)反碼      
  27.                    LCALL ir_sendbyte    //紅外發(fā)送一個字節(jié)數(shù)據(jù)  

  29.                    MOV   set_count_1,#00H; //發(fā)送編碼中的0.56ms高電平
  30.                    MOV   set_count_2,#23H;               
  31.                    SETB  irflag        //紅外發(fā)射標(biāo)志
  32.                                    LCALL TX_TIME;   //定時器發(fā)送   
  33.   
  34. ;                                   SETB  IR    ;//發(fā)射完了關(guān)閉紅外發(fā)射二極管  
  35. ;                       RET;
  36. ;   不加入下面這部分程序 遙控成功概率變低很多               
  37.                    LCALL DELAY23MS   //延時23ms（編碼中的23ms低電平）                  
  38.                    MOV   set_count_1,#02H;  //發(fā)送編碼中的引導(dǎo)碼(9ms高電平+4.5ms低電平)  
  39.                    MOV   set_count_2,#9EH;           
  40.                    SETB  irflag  
  41.                                    LCALL TX_TIME;  //定時器發(fā)送                                                           
  42.                    MOV   set_count_1,#01H    //發(fā)送編碼中的4.5ms低電平  
  43.                    MOV   set_count_2,#50H                  
  44.                    CLR   irflag   
  45.                    LCALL TX_TIME;  //定時器發(fā)送   
  46.                    MOV   set_count_1,#00H     //發(fā)送編碼中的0.56ms高電平   
  47.                    MOV   set_count_2,#23H;                    
  48.                    SETB  irflag  
  49.                    LCALL TX_TIME;  //定時器發(fā)送                             
  50.                                    SETB  IR    ;//發(fā)射完了關(guān)閉紅外發(fā)射二極管  
  51.                        RET;
  52.                                                                                                 
  53. ;----------------------------------------------------------------------------------
  54. //紅外發(fā)送一個字節(jié)數(shù)據(jù)
  55. ir_sendbyte:       MOV   R7,#0x00;
  56. Q0223:             MOV   set_count_1,#00H; //發(fā)送編碼中的0.56ms高電平
  57.                    MOV   set_count_2,#23H;                 
  58.                    SETB  irflag   //紅外發(fā)射標(biāo)志  啟動紅外發(fā)射二極管發(fā)射   
  59.                                    LCALL TX_TIME;  //定時器發(fā)送
  60.                                    MOV   A,ircode        //判斷紅外編碼最低位,若為1則1.69ms的低電平
  61.                    JNB   ACC.0,Q024C               
  62.                    MOV   set_count_1,#00H;    //為0則0.565ms的低電平  
  63.                    MOV   set_count_2,#82H;                  
  64.                    SJMP  Q0252                        
  65. Q024C:             MOV   set_count_1,#00H;                    
  66.                    MOV   set_count_2,#0x2B;               
  67. Q0252:             CLR   irflag    //紅外發(fā)射標(biāo)志    低電平則不發(fā)射   
  68.                             LCALL TX_TIME;   //定時器發(fā)送
  69.                                    MOV   A,ircode        //判斷紅外編碼最低位,若為1則1.69ms的低電平  
  70.                    CLR   C                       
  71.                    RRC   A       //將數(shù)據(jù)右移，即從低位到高位發(fā)送           
  72.                    MOV   ircode ,A                     
  73.                    INC   R7                          
  74.                    CJNE  R7,#0x08,Q0223              
  75.                    RET  
  76. ;------------------------------------------------------------------------------------------------                                                               
  77. //定時器發(fā)送                                            
  78. TX_TIME:           MOV   count_1,#00H;  //中斷計數(shù)先清0               
  79.                    MOV   count_2,#00H;                  
  80.                    SETB  TR0          //開啟定時器0            
  81. Q0232:             CLR   C            //等待發(fā)送完            
  82.                    MOV   A,count_2;
  83.                    SUBB  A,set_count_2;
  84.                    MOV   A,count_1;
  85.                    SUBB  A,set_count_1;
  86.         
  87.                    JC    Q0232                     
  88.                    CLR   TR0          //關(guān)閉定時器0              
  89.                                    RET;

復(fù)制代碼

;    LED燈遙控程序
;   
;             15W201S                 11.0592M
;==========================================================================
;標(biāo)號==============指令================================地址===機器碼=======
;==========================================================================
                                   count_1      EQU 08H;  
                                   count_2      EQU 09H;

                               set_count_1  EQU 0CH;
                                   set_count_2  EQU 0DH;
                                   irdata                EQU 0EH;         
                                   ircode            EQU 0FH;
                  
                                   keyflag EQU 20H.0;  按鍵標(biāo)志位         按下=1
                               irflag  EQU 20H.1;  紅外發(fā)射標(biāo)志         發(fā)射=1        
                   P5M1    DATA    0xC9            ; P5M1.n,P5M0.n     =00--->Standard,    01--->push-pull
                   P5M0    DATA    0xCA
                   P5 EQU 0C8H

                                   KA   EQU  P3.0;           開關(guān)
                               KB   EQU  P3.2;           變光
                               KC   EQU  P3.3;           亮度加
                               KD   EQU  P5.4;           亮度減
                                   IR   EQU  P3.1;           輸出
                                   LED  EQU  P5.5;           指示燈

                                 INT_CLKO    DATA    08FH        //外部中斷與時鐘輸出控制寄存器
                        ;         INT2        BIT     P3.6       //INT2引腳定義
                ;                 INT3        BIT     P3.5        //INT3引腳定義
                                 INT4        BIT     P3.0        //INT4引腳定義
                                 
                                      
                                   
                  ORG 0000H
                  LJMP     main;   
                                  ORG                0003H                        
                          LJMP        INT_0                          
;==========================================================================
                  ORG 000BH  
                  LJMP     timer0;
                                  ORG                0013H                        
                          LJMP        INT_1  
                ;                  ORG   0053H                 //INT2中斷入口
        ;          RETI
                ;                  ORG   005BH                 //INT3中斷入口
        ;          RETI
                                  ORG   0083H                 //INT4中斷入口
                  RETI
                        
                                  ORG 100H
;==========================================================================
main:                           MOV   SP,#3FH;  MOV      SP,#0x20;
                        ;           ORL   INT_CLKO,#10H         //(EX2 = 1)使能INT2下降沿中斷
                        ;           ORL   INT_CLKO,#20H         //(EX3 = 1)使能INT3下降沿中斷
                                   ORL   INT_CLKO,#40H    //(EX4 = 1)使能INT4下降沿中斷
                           CLR     A
                                   MOV     P5M1, A     ;設(shè)置為準雙向口
                   MOV     P5M0, A

                   LCALL    timer0_init; //定時0初始化                 
                   MOV   count_1,#00H    //中斷計數(shù)先清0     
                   MOV   count_2,#00H                     
                   CLR   irflag          //紅外發(fā)射標(biāo)志先置0
                                   SETB  LED;
                                   SETB KA;           
                                   SETB KB;           
                                   SETB KC;           
                                   SETB KD;         

;==========================================================================
C01C4:            LCALL    keyscan;      //鍵值掃描  
                                  JB      keyflag,C01C5         //若有按鍵按下
                      JNB        INT0, $                ;高電平時才進入睡眠
                      JNB        INT1, $                ;高電平時才進入睡眠        
                      CLR        IE0                    ;外中斷0標(biāo)志位
                      CLR        IE1                    ;外中斷1標(biāo)志位        
                      SETB        EX0                    ;INT0 Enable
                      SETB        EX1                    ;INT1 Enable
                      SETB        IT0                    ;INT0 下降沿中斷               
                      SETB        IT1                    ;INT1 下降沿中斷               
                      ORL   PCON, #0x02;         
                      NOP
                      NOP
                                  LJMP C01C4
//---------------------------------------------------------------------------
C01C5:                          CLR LED;
                                   LCALL DELAY6MS;
                                  LCALL    ir_send;  //發(fā)送紅外編碼
                              JNB KA,$;
                                  JNB KB,$;
                                  LCALL DELAY6MS;
                                  JNB KA,$;
                                  JNB KB,$;         
                                CLR      keyflag; //按鍵標(biāo)志清零
                                  SETB LED;
                ;                  MOV                R1, #110
                                  SJMP     C01C4                                                   
//---------------------------------------------------------------------------
//void keyscan() // 按鍵掃描  
keyscan:
                                         JB       ka,C01EE;                //A鍵按下                                    
                                      MOV      irdata,#0x01;
                                         SETB     keyflag;
                                         RET;         

C01EE:               JB       kb,C01F6;                //B鍵按下                                       
                                      MOV      irdata,#0x06;
                                         SETB     keyflag;
                                         RET;

C01F6:               JB       kc,C01FE;                //C鍵按下
                                         JB       KD,C01F7;                //D鍵按下
                                         MOV      irdata,#0x1E;
                                      SETB     keyflag;
                                         RET;

C01F7:                                 MOV      irdata,#0x12;
                                      SETB     keyflag;
                                         RET

C01FE:           ;    JB       kd,C0206;                //D鍵按下
                             ;         MOV      irdata,#0x1E;
                             ;         SETB     keyflag;
C0206:               RET         
;==========================================================================
//定時器0中斷  timer0_interrupt  
timer0:                                                                                            
                             PUSH  ACC                          
                   INC   count_2;
                   MOV   A,count_2;
                   JNZ   Q02B3                  
                   INC   count_1;
Q02B3:             JNB   irflag,Q02BA ; //有發(fā)射標(biāo)志，則發(fā)射38khz的矩形波         
                   CPL   IR;      
                   SJMP  Q02BC                       
Q02BA:             SETB  IR;//否則不發(fā)射，即相當(dāng)于發(fā)射編碼中的低電平      
Q02BC:             POP   ACC  

                   RETI   
;==========================================================================
//定時器0初始化
timer0_init:       MOV   TMOD,#02H    //定時0 8位自動重裝模式               
                                   MOV   TH0,#0F3H;   //定時13us,38K紅外矩形波        
                   MOV   TL0,#0E6H;                  
                                   SETB  EA   
                   SETB  ET0                          ;
                   RET   
;========================================================================
INT_1:
        CLR                EX1                ;INT1 Disable
        CLR                IE1                ;外中斷1標(biāo)志位
        RETI
;========================================================================
INT_0:
        CLR                EX0                ;INT0 Disable
        CLR                IE0                ;外中斷0標(biāo)志位
        RETI                                                                                                
;==========================================================================
//延時  
DELAY6MS:   ;誤差 -0.018084490741us
    MOV R6,#0C2H
DL0:
    MOV R5,#54H
    DJNZ R5,$
    DJNZ R6,DL0
    NOP
    RET
;==========================================================================
DELAY23MS:   ;誤差 -0.054253472225us                       11.0592        1T
    MOV R7,#38H
DL3:
    MOV R6,#0FCH
DL2:
    MOV R5,#03H
    DJNZ R5,$
    DJNZ R6,DL2
    DJNZ R7,DL3
    MOV R5,#01H
    DJNZ R5,$
    RET            

;==========================================================================
$INCLUDE (TX.ASM)
END;




上圖Keil代碼下載: 15W201S 15W204S紅外遙控器 - 掉電喚醒.rar (30.89 KB, 下載次數(shù): 31)
作者: 新鄉(xiāng)家電維修    時間: 2021-9-17 21:00
有學(xué)習(xí)功能么，就是兩個遙控對著紅外線管學(xué)習(xí)
作者: hhdsdy    時間: 2021-9-17 21:11
電路板可以去免費打樣雙面板啊，這樣更精致美觀
作者: 418854190    時間: 2021-9-18 11:17
新鄉(xiāng)家電維修 發(fā)表于 2021-9-17 21:00
有學(xué)習(xí)功能么，就是兩個遙控對著紅外線管學(xué)習(xí)

沒有  還不會寫
作者: 418854190    時間: 2021-9-18 11:18
hhdsdy 發(fā)表于 2021-9-17 21:11
電路板可以去免費打樣雙面板啊，這樣更精致美觀

不做產(chǎn)品就是自己做著玩 用不著打樣  



歡迎光臨 (http://m.zg4o1577.cn/bbs/) Powered by Discuz! X3.1
主站蜘蛛池模板： 91精品在线播放 | 亚洲一区二区在线播放 | 日韩午夜在线 | 亚洲理论片| 日韩精品视频在线免费观看 | 中文字幕理伦片免费看 | 国产精品主播一区二区 | 国产精品成人免费精品自在线观看 | 亚洲天堂免费 | 成年在线观看 | 中文字幕免费 | 99视频+国产日韩欧美 | 特级特黄aaaa免费看 | 欧美三级a做爰在线观看 | 成人免费在线播放 | 99精品久久久 | 久久精品一区二区三区四区五区 | 精品日韩一区二区三区 | 国产精品伦一区二区三级视频 | 一本久久道 | 一级片黄色| 久久精品久久久 | 一区二区黄色 | 日本在线观看网站 | 综合久久久 | 欧美日韩一二三 | 国产精品久久久久久久久久久久久久久 | a毛片视频 | 欧美日韩在线免费观看 | 免费国产视频 | 久久久久成人网 | 午夜在线 | 国产视频一区二区在线 | 久久精品人人 | 五月婷婷在线观看 | 一区二区不卡 | 亚洲九九九 | a级片在线 | 红桃av在线 | 黄色成人小视频 | 欧美一级淫片免费视频魅影视频 |