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

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 4779|回復: 1
打印 上一主題 下一主題
收起左側

單片機紅外遙控器解碼實驗 C語言和匯編2個版本的程序都有

[復制鏈接]
跳轉到指定樓層
樓主
注：
每個EXP實驗的文件夾下文件夾分別是P_ASM、P_EMULATOR_C，P_PROTEUS_C，P_EMULATOR_ASM。
P_PROTEUS_ASM        為PROTEUS匯編實例工程
P_PROTEUS_C        為PROTEUS C51仿真實例工程
P_EMULATOR_C        為硬件仿真器（可選配件）C51實例工程
P_EMULATOR_ASM        為硬件仿真器匯編實例工程
一般情況下P_PROTEUS_ASM，P_PROTEUS_C和P_EMULATOR_C和P_EMULATOR_ASM都支持ISP下載脫機運行

P_ISP_C，P_ISP_ASM為ISP下載脫機運行實例。比如看門狗實驗，仿真器不支持，因為復位信號被仿真器接管，所以就只能做硬件脫機實驗，通過ISP下載程序。

如果文件夾帶有（缺省）說明暫時沒有提供此程序，可根據需要再添加。
匯編和c的代碼都有很全面.

c語言程序：
  1. /*************************************************  
  2. *文件名稱： main.c
  3. *作 者：   
  4. *版 本：    V1.00
  5. *說 明：    紅外遙控器解碼實驗
  6. *修改記錄：  
  7. --------------------------------------------------
  8. *Descriptoon:
  9. *接線說明：P32-紅外接收,P25-RS,P26-RW,P27-EN,
  10.            P00~P07-DB0~DB7                 
  11. **************************************************/                        

  13. #include <reg52.h>

  15. #define uchar unsigned char
  16. #define uint unsigned int
  17. //char code SST516[3] _at_ 0x003b;
  18. #define c(x)(x*110592/120000) //晶振11.0592

  20. uchar Lcd_Buf[4];             //顯示數據緩沖區         
  21. unsigned char Ir_Buf[4];      //用于保存解碼結果
  22. sbit Ir_Pin=P3^2;             //紅外線數據接口
  23. sbit rs=P2^0;                     //LCD數據命令端
  24. sbit rw=P2^1;                          //讀寫接口
  25. sbit lcde=P2^2;                          //使能接口
  26. uchar code table[]=" WWW#WINDWAY$CN ";//LCD顯示數據
  27. uchar code table1[]="Wait for IR in..";
  28. uchar code table2[]="  IR DATA...";
  29.                   
  30.            unsigned char code Led_Tab[]={
  31.         0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xf8,
  32.         0x80,0x90,0x88,0x83,0xC6,0xA1,0x86,0x8E};   //共陽極數碼顯示碼0-F
  33. unsigned char code Led_Sel[]={0xf,0xf,0xb,0x7}; //數碼管位選，屏蔽前兩位
  34. unsigned char Led_Buf[4]; //顯示緩沖區
  35. char Led_Index;           //定義位選         
  36. unsigned char Ir_Buf[4];  //用于保存解碼結果

  38. sbit LCD_E = P2^7;
  39. //========1MS延時====================================
  40. void delay(uint z)
  41. {
  42.         uint x,y;
  43.         for(x=z;x>0;x--)
  44.                 for(y=113;y>0;y--);
  45. }
  46. //======LCD寫命令=====
  47. void write_com(uchar com)
  48. {
  49.         rs=0;
  50.         lcde=0;
  51.         P0=com;
  52.         lcde=1;
  53.         delay(1);//延時1MS跳過忙信號
  54.         lcde=0;
  55.         delay(1);
  56. }
  57. //======LCD寫數據=====================================
  58. void write_date(uchar date)
  59. {
  60.         rs=1;
  61.         lcde=0;
  62.         P0=date;
  63.         lcde=1;
  64.         delay(1);
  65.         lcde=0;
  66.         delay(1);
  67. }
  68. //=====初始化函數=====================================
  69. void init()
  70. {        
  71.         uchar num;
  72.         rw=0;                //允許LCD寫
  73.         lcde=0;
  74.         write_com(0x38);//顯示模式設置                                                         
  75.         write_com(0x0c);//顯示開及光標設置
  76.         write_com(0x06);//顯示光標移動設置
  77.         write_com(0x01);//清屏
  78.         write_com(0x80);//顯示首地址
  79.         for(num=0;num<15;num++)//顯示第一行
  80.         {
  81.                 write_date(table[num]);
  82.                 delay(1);
  83.         }
  84.         write_com(0x80+0x40);//顯示第二行
  85.         for(num=0;num<16;num++)
  86.         {
  87.                 write_date(table1[num]);
  88.                 delay(1);
  89.         }
  90.         TMOD=0x10;                //設置定時器0、1工作模式為1
  91. }
  92. //=====顯示解碼========================================
  93. void write_ir(uchar date)
  94. {
  95.         uchar tmp, num,ff;         

  97.         if(ff==0)
  98.         {
  99.                 ff++;
  100.                 write_com(0x01);
  101.                 write_com(0x80);
  102.                 for(num=0;num<12;num++)
  103.                 {
  104.                         write_date(table2[num]);
  105.                         delay(1);
  106.                 }                 
  107.         }
  108.         
  109.         write_com(0xC0+6);//定位在第二行第六位
  110.         tmp = date>>4;                        // 高四位         
  111.         write_date(tmp > 9 ? 'A'+tmp-10 : '0'+tmp);
  112.         write_com(0xC0+7);//定位第二行第七位           
  113.         tmp = date&0x0F;                        // 低四位
  114.         write_date(tmp > 9 ? 'A'+tmp-10 : '0'+tmp);         

  116. }
  117. //======================================================
  118. //解碼取回低電平
  119. unsigned int Ir_Get_Low()
  120. {
  121.         TL1=0;
  122.         TH1=0;
  123.         TR1=1;
  124.         while(!Ir_Pin && (TH1&0x80)==0);   //等待低電平到來              
  125.         TR1=0;           
  126.         return TH1*256+TL1;//提取低電平時間間隔時長
  127. }
  128. //======================================================
  129. //解碼取回高電平========================================
  130. unsigned int Ir_Get_High()
  131. {
  132.         TL1=0;
  133.         TH1=0;
  134.         TR1=1;
  135.         while(Ir_Pin && (TH1&0x80)==0);//等待高電平到來
  136.         TR1=0;
  137.         return TH1*256+TL1;//提取高電平時間間隔時長
  138. }
  139. //======================================================
  140. //======================================================

  142. void main()
  143. {
  144.         unsigned int temp;
  145.         char i,j;
  146.         init();        //初始化
  147. //=====用do做循環，等待遙控按鍵=========================
  148.         do{
  149. restart:
  150.                 while(Ir_Pin) ;//等待低電平

  152.                 temp=Ir_Get_Low();//把低電平附給變量
  153.                 if(temp<c(8500) || temp>c(9500)) continue;//引導脈沖低電平等待9000us
  154.                 temp=Ir_Get_High();//把高電平附給變量
  155.                 if(temp<c(4000) || temp>c(5000)) continue;//引導脈沖高電平等待4500us
  156.                 //連續讀出32個字節
  157.                 for(i=0;i<4;i++) //4個字節
  158.                 {
  159.                         for(j=0;j<8;j++) //每個字節8位
  160.                         {
  161.                                 temp=Ir_Get_Low();
  162.                                 if(temp<c(200) || temp>c(800)) goto restart;//等待560us跳過低電平
  163.                                 temp=Ir_Get_High();
  164.                                 if(temp<c(200) || temp>c(2000)) goto restart;//等待1000us跳過高電平
  165.                                 Ir_Buf[i]>>=1;//把電平移進數組


  168. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

匯編語言：


  3. ;-----------------------------------------------
  4.        IRCOM  EQU  20H       ;20H-23H IR使用
  5.         X     EQU  26H       ;LCD 地址變量

  7.        IRIN   EQU  P3.2
  8. ;       BEEP   EQU  P3.7
  9. ;       RELAY  EQU  P1.0
  10.       
  11.         RS    EQU  P2.0
  12.         RW    EQU  P2.1
  13.         EN    EQU  P2.2
  14. ;------------------------------------------------
  15.          ORG 0000H
  16.          JMP  MAIN
  17. ;------------------------------------------------
  18.           ORG 0100H
  19. MAIN:
  20.           MOV   SP,#40H
  21.           MOV   A,#00H
  22.           MOV   R0,#20H
  23. LOOP0:    MOV   @R0,A          ;20H-26H清零
  24.           INC   R0
  25.           CJNE  R0,#27H,LOOP0
  26.           SETB  IRIN
  27.           CALL  SET_LCD
  28.           CALL  MENU1
  29. LOOP1:
  30.           CALL  IR_IN
  31.           CALL  IR_SHOW

  33. ;          MOV  A,22H
  34. ;          CJNE  A,#40H,LOOP2    ;K17鍵按下
  35. ;          CLR   RELAY           ;繼電器吸合
  36. ;LOOP2:    CJNE  A,#04H,LOOP3    ;K19鍵按下
  37. ;          SETB  RELAY           ;繼電器關閉
  38. ;LOOP3:   
  39.            JMP   LOOP1
  40.          
  41. ;-----------------------------------------------------
  42. ;  LCD 初始化設置
  43. ;-----------------------------------------------------
  44. SET_LCD:
  45.           CLR  EN
  46.           CALL  INIT_LCD     ;初始化 LCD
  47.           CALL  DELAY1
  48.           MOV  DPTR,#INFO1   ;指針指到顯示信息1
  49.           MOV  A,#1          ;顯示在第一行
  50.           CALL  LCD_SHOW
  51.           MOV  DPTR,#INFO2   ;指針指到顯示信息2
  52.           MOV  A,#2          ;顯示在第二行
  53.           CALL  LCD_SHOW
  54.           RET
  55. ;-----------------------------------------------------
  56. INIT_LCD:                 ;8位I/O控制 LCD 接口初始化
  57.           MOV  A,#38H     ;雙列顯示，字形5*7點陣
  58.           CALL  WCOM
  59.           CALL  DELAY1
  60.           MOV  A,#38H     ;雙列顯示，字形5*7點陣
  61.           CALL  WCOM
  62.           CALL  DELAY1
  63.           MOV  A,#38H     ;雙列顯示，字形5*7點陣
  64.           CALL  WCOM
  65.           CALL  DELAY1
  66.           MOV  A,#0CH     ;開顯示，關光標，
  67.           CALL  WCOM
  68.           CALL  DELAY1
  69.           MOV  A,#01H     ;清除 LCD 顯示屏
  70.           CALL  WCOM
  71.           CALL  DELAY1
  72.           RET
  73. ;----------------------------------------------------
  74. LCD_SHOW:       ;在LCD的第一行或第二行顯示信息字符

  76.           CJNE  A,#1,LINE2  ;判斷是否為第一行
  77.   LINE1:  MOV  A,#80H       ;設置 LCD 的第一行地址
  78.           CALL  WCOM        ;寫入命令
  79.           CALL  CLR_LINE    ;清除該行字符數據
  80.           MOV  A,#80H       ;設置 LCD 的第一行地址
  81.           CALL  WCOM        ;寫入命令
  82.           JMP  FILL

  84.   LINE2:  MOV  A,#0C0H      ;設置 LCD 的第二行地址
  85.           CALL  WCOM        ;寫入命令
  86.           CALL  CLR_LINE    ;清除該行字符數據
  87.           MOV  A,#0C0H      ;設置 LCD 的第二行地址
  88.           CALL  WCOM
  89.   FILL:   CLR  A            ;填入字符
  90.           MOVC  A,@A+DPTR   ;由消息區取出字符
  91.           CJNE  A,#0,LC1    ;判斷是否為結束碼
  92.           RET
  93.   LC1:    CALL  WDATA       ;寫入數據
  94.           INC  DPTR         ;指針加1
  95.           JMP  FILL         ;繼續填入字符
  96.           RET
  97. ;---------------------------------------------------
  98. CLR_LINE:                  ;清除該行 LCD 的字符
  99.           MOV  R0,#24
  100.    CL1:   MOV  A,#' '
  101.           CALL  WDATA
  102.           DJNZ  R0,CL1
  103.           RET
  104. ;----------------------------------------------------
  105. MENU1:                      ;LCD 顯示工作菜單信息
  106.          MOV   DPTR,#MENU2
  107.          MOV   A,#1         ;在第一行顯示信息
  108.          CALL  LCD_SHOW
  109.          RET
  110. MENU2:  DB  " REMOTE CONTROL ",0
  111. ;-----------------------------------------------------
  112. INFO1:  DB  "                ",0  ;LCD 第一行顯示信息
  113. INFO2:  DB  "  IR-CODE: --H  ",0  ;LCD 第二行顯示信息
  114. ;-----------------------------------------------------

  116. ;-----------------------------------------------------
  117. ; 寫指令、數據使能子程序
  118. ;-----------------------------------------------------
  119. WCOM:
  120.           MOV  P0,A        ;寫指令使能
  121.           CLR RS           ;RS=L,RW=L,D0-D7=指令碼，E=高脈沖
  122.           CLR RW
  123.           SETB EN
  124.           CALL  DELAY0
  125.           CLR EN
  126.           RET
  127.                   
  128. WDATA:
  129.           MOV   P0,A      ;寫數據使能
  130.           SETB  RS        ;RS=H,RW=L,D0-D7=數據，E=高脈沖
  131.           CLR   RW
  132.           SETB  EN
  133.           CALL  DELAY0
  134.           CLR   EN
  135.           RET

  137. DELAY0:   MOV  R7,#250      ;延時500微秒
  138.           DJNZ  R7,$
  139.           RET
  140. ;---------------------------------------------------
  141. ;在 LCD 第二行顯示字符
  142. ;A=ASC DATA, B=LINE X POS
  143. ;---------------------------------------------------
  144. LCDP2:                    ;在LCD的第二行顯示字符
  145.          PUSH  ACC        ;
  146.          MOV  A,B         ;設置顯示地址
  147.          ADD  A,#0C0H     ;設置LCD的第二行地址
  148.          CALL  WCOM       ;寫入命令
  149.          POP  ACC         ;由堆棧取出A
  150.          CALL  WDATA      ;寫入數據
  151.          RET
  152. ;---------------------------------------------------
  153. ; IR 譯碼子程序
  154. ;---------------------------------------------------
  155. IR_IN:              
  156.           MOV   R0,#IRCOM
  157. I1:      JNB  IRIN,I2       ;等待 IR 信號出現
  158.           JMP  I1
  159. I2:      MOV  R4,#20
  160. I20:     CALL  DEL
  161.           DJNZ  R4,I20
  162.           JB  IRIN,I1        ;確認IR信號出現
  163. I21:     JB  IRIN,I3        ;等 IR 變為高電平
  164.           CALL  DEL
  165.           JMP  I21
  166. I3:      MOV  R3,#0         ;8位數清為0
  167. LL:      JNB  IRIN,I4       ;等 IR 變為低電平
  168.           CALL  DEL
  169.           JMP  LL
  170. I4:      JB  IRIN,I5        ;等 IR 變為高電平
  171.           CALL  DEL
  172.           JMP  I4
  173. I5:      MOV  R2,#0         ;0.14ms 計數
  174. L1:      CALL  DEL
  175.           JB  IRIN, N1       ;等 IR 變為高電平
  176.                              ;IR=0，檢查R2中的計數值
  177.           MOV  A,#8
  178.           CLR  C
  179.           SUBB  A,R2         ;判斷高低位
  180.                              ;IF C=0  BIT=0
  181.           MOV  A,@R0
  182.           RRC  A
  183.           MOV  @R0,A         ;處理完一位
  184.           INC  R3
  185.           CJNE  R3,#8,LL     ;需處理完8位  
  186.           MOV  R3,#0
  187.           INC  R0
  188.           CJNE  R0,#24H,LL   ;收集到4字節了
  189.           JMP  OK
  190. N1:      INC  R2
  191.           CJNE  R2,#30,L1    ;0.14ms 計數過長則時間到自動離開
  192. OK:      RET
  193. ;--------------------------------------------------------------------
  194. IR_SHOW:
  195.           MOV A,22H
  196.           CPL A                ;將22H取反后和23H比較
  197.           CJNE A,23H,IR_SHOW1  ;如果不等表示接收數據發生錯誤,放棄。
  198.           CALL   CONV
  199. ;          CALL  BEEP_BL        ;蜂鳴器鳴響表示解碼成功
  200. IR_SHOW1: RET
  201. ;--------------------------------------------------------------------
  202. ;轉換為 ASCII 碼并顯示
  203. ;--------------------------------------------------------------------
  204. CONV:
  205.           MOV   X,#11        ;設置顯示起始位置
  206.           MOV   A,22H
  207.           ANL   A,#0F0H      ;取出高四位二進制數
  208.           SWAP  A            ;高四位與低四位互換
  209.           PUSH  ACC          ;壓入堆棧
  210.           CLR   C            ;C=0
  211.           SUBB  A,#0AH       ;減10
  212.           POP   ACC          ;彈出堆棧
  213.           JC    ASCII0       ;該數小于10，轉ASCII0
  214.           ADD   A,#07H       ;大于10的數加上37H
  215. ASCII0:   ADD   A,#30H       ;小于10的數加上30H
  216.           MOV   B,X
  217.           CALL  LCDP2

  219.           MOV   A,22H
  220.           ANL   A,#0FH        ;取出低四位二進制數
  221.           PUSH  ACC
  222.           CLR   C
  223.           SUBB  A,#0AH        ;減10
  224.           POP   ACC
  225.           JC    ASCII1        ;該數小于10，轉ASCII0
  226.           ADD   A,#07H        ;大于10的數加上37H
  227. ASCII1:   ADD   A,#30H        ;小于10的數加上30H
  228.           INC   X
  229.           MOV   B,X
  230.           CALL  LCDP2
  231.           RET
  232. ;--------------------------------------------------------
  233. ;蜂鳴器響一聲子程序
  234. ;--------------------------------------------------------
  235. BEEP_BL:
  236.          MOV  R6,#100
  237.   BL1:   CALL  DEX1
  238. ;         CPL  BEEP
  239.          DJNZ  R6,BL1
  240.          MOV  R5,#25
  241.          CALL  DELAY
  242.          RET
  243. DEX1:   MOV  R7,#180
  244. DEX2:   NOP
  245.          DJNZ  R7,DEX2
  246.          RET
  247. DELAY:                    ;延時R5×10MS
  248.          MOV  R6,#50
  249.   D1:    MOV  R7,#100
  250.          DJNZ  R7,$
  251.          DJNZ  R6,D1
  252.          DJNZ  R5,DELAY


  255. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

下載：
EXP19_紅外遙控器解碼實驗.zip (70.27 KB, 下載次數: 54)

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂 踩踩
回復

使用道具 舉報

沙發
ID:436643 發表于 2018-11-30 16:34 | 只看該作者
新手看看程序
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 日韩国产欧美一区 | 中文字幕第二区 | 我爱操 | 国产成人精品区一区二区不卡 | 欧美日韩国产中文 | 九九热这里只有精品在线观看 | 精品九九 | 性色视频在线观看 | 作爱视频免费看 | www.日本国产| 天天爽夜夜爽精品视频婷婷 | 国产成人精品一区二 | 欧美日韩在线视频观看 | 精品国产一区二区三区性色 | 九九久久这里只有精品 | 日韩午夜在线播放 | aaa级片| 97视频成人 | 中文字幕欧美一区 | 91亚洲精品久久久电影 | 国产91久久精品一区二区 | 超碰在线播 | 欧美一区免费 | 成人午夜精品 | 国产成人精品一区 | 九九久久精品 | 亚洲精品片| 天天av综合 | 国产精品久久久乱弄 | 日韩资源 | 欧美国产日韩在线观看 | 成人在线精品 | 成人av一区二区三区 | 国产精品一区二区三区四区 | 超碰人人人人 | 免费激情 | 亚洲啪啪一区 | 欧美v片 | 午夜精品在线 | 日韩欧美精品一区 | 色婷婷激情 |