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

標題: 單片機紅外遙控器解碼實驗 C語言和匯編2個版本的程序都有 [打印本頁]
作者: jfgg    時間: 2017-5-5 11:15
標題: 單片機紅外遙控器解碼實驗 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下載程序。

如果文件夾帶有（缺省）說明暫時沒有提供此程序，可根據(jù)需要再添加。
匯編和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];             //顯示數(shù)據(jù)緩沖區(qū)         
  21. unsigned char Ir_Buf[4];      //用于保存解碼結果
  22. sbit Ir_Pin=P3^2;             //紅外線數(shù)據(jù)接口
  23. sbit rs=P2^0;                     //LCD數(shù)據(jù)命令端
  24. sbit rw=P2^1;                          //讀寫接口
  25. sbit lcde=P2^2;                          //使能接口
  26. uchar code table[]=" WWW#WINDWAY$CN ";//LCD顯示數(shù)據(jù)
  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};   //共陽極數(shù)碼顯示碼0-F
  33. unsigned char code Led_Sel[]={0xf,0xf,0xb,0x7}; //數(shù)碼管位選，屏蔽前兩位
  34. unsigned char Led_Buf[4]; //顯示緩沖區(qū)
  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寫數(shù)據(jù)=====================================
  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. //=====初始化函數(shù)=====================================
  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做循環(huán)，等待遙控按鍵=========================
  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.                 //連續(xù)讀出32個字節(jié)
  157.                 for(i=0;i<4;i++) //4個字節(jié)
  158.                 {
  159.                         for(j=0;j<8;j++) //每個字節(jié)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;//把電平移進數(shù)組


  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    ;清除該行字符數(shù)據(jù)
  80.           MOV  A,#80H       ;設置 LCD 的第一行地址
  81.           CALL  WCOM        ;寫入命令
  82.           JMP  FILL

  84.   LINE2:  MOV  A,#0C0H      ;設置 LCD 的第二行地址
  85.           CALL  WCOM        ;寫入命令
  86.           CALL  CLR_LINE    ;清除該行字符數(shù)據(jù)
  87.           MOV  A,#0C0H      ;設置 LCD 的第二行地址
  88.           CALL  WCOM
  89.   FILL:   CLR  A            ;填入字符
  90.           MOVC  A,@A+DPTR   ;由消息區(qū)取出字符
  91.           CJNE  A,#0,LC1    ;判斷是否為結束碼
  92.           RET
  93.   LC1:    CALL  WDATA       ;寫入數(shù)據(jù)
  94.           INC  DPTR         ;指針加1
  95.           JMP  FILL         ;繼續(xù)填入字符
  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. ; 寫指令、數(shù)據(jù)使能子程序
  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      ;寫數(shù)據(jù)使能
  130.           SETB  RS        ;RS=H,RW=L,D0-D7=數(shù)據(jù)，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      ;寫入數(shù)據(jù)
  151.          RET
  152. ;---------------------------------------------------
  153. ; IR 譯碼子程序
  154. ;---------------------------------------------------
  155. IR_IN:              
  156.           MOV   R0,#IRCOM
  157. I1:      JNB  IRIN,I2       ;等待 IR 信號出現(xiàn)
  158.           JMP  I1
  159. I2:      MOV  R4,#20
  160. I20:     CALL  DEL
  161.           DJNZ  R4,I20
  162.           JB  IRIN,I1        ;確認IR信號出現(xiàn)
  163. I21:     JB  IRIN,I3        ;等 IR 變?yōu)楦唠娖?br />
  164.           CALL  DEL
  165.           JMP  I21
  166. I3:      MOV  R3,#0         ;8位數(shù)清為0
  167. LL:      JNB  IRIN,I4       ;等 IR 變?yōu)榈碗娖?br />
  168.           CALL  DEL
  169.           JMP  LL
  170. I4:      JB  IRIN,I5        ;等 IR 變?yōu)楦唠娖?br />
  171.           CALL  DEL
  172.           JMP  I4
  173. I5:      MOV  R2,#0         ;0.14ms 計數(shù)
  174. L1:      CALL  DEL
  175.           JB  IRIN, N1       ;等 IR 變?yōu)楦唠娖?br />
  176.                              ;IR=0，檢查R2中的計數(shù)值
  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字節(jié)了
  189.           JMP  OK
  190. N1:      INC  R2
  191.           CJNE  R2,#30,L1    ;0.14ms 計數(shù)過長則時間到自動離開
  192. OK:      RET
  193. ;--------------------------------------------------------------------
  194. IR_SHOW:
  195.           MOV A,22H
  196.           CPL A                ;將22H取反后和23H比較
  197.           CJNE A,23H,IR_SHOW1  ;如果不等表示接收數(shù)據(jù)發(fā)生錯誤,放棄。
  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      ;取出高四位二進制數(shù)
  208.           SWAP  A            ;高四位與低四位互換
  209.           PUSH  ACC          ;壓入堆棧
  210.           CLR   C            ;C=0
  211.           SUBB  A,#0AH       ;減10
  212.           POP   ACC          ;彈出堆棧
  213.           JC    ASCII0       ;該數(shù)小于10，轉ASCII0
  214.           ADD   A,#07H       ;大于10的數(shù)加上37H
  215. ASCII0:   ADD   A,#30H       ;小于10的數(shù)加上30H
  216.           MOV   B,X
  217.           CALL  LCDP2

  219.           MOV   A,22H
  220.           ANL   A,#0FH        ;取出低四位二進制數(shù)
  221.           PUSH  ACC
  222.           CLR   C
  223.           SUBB  A,#0AH        ;減10
  224.           POP   ACC
  225.           JC    ASCII1        ;該數(shù)小于10，轉ASCII0
  226.           ADD   A,#07H        ;大于10的數(shù)加上37H
  227. ASCII1:   ADD   A,#30H        ;小于10的數(shù)加上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, 下載次數(shù): 54)

作者: WZHH    時間: 2018-11-30 16:34
新手看看程序



歡迎光臨 (http://www.zg4o1577.cn/bbs/) Powered by Discuz! X3.1
主站蜘蛛池模板： 欧美日韩中文字幕在线 | 97精品超碰一区二区三区 | 国产成人久久精品 | 日韩在线高清 | 久久丝袜视频 | 99re视频在线观看 | 国产成人精品免费视频 | 午夜免费观看网站 | 日韩精品 电影一区 亚洲 | 中文字幕福利视频 | 国产成人精品亚洲日本在线观看 | 亚洲国产欧美国产综合一区 | 国产99视频精品免视看9 | 操视频网站 | 免费视频二区 | 国产一伦一伦一伦 | 亚洲 一区 | av免费网站在线观看 | 男女免费观看在线爽爽爽视频 | av在线成人 | 精品在线| 国产一区二区麻豆 | 成人在线视频免费观看 | 久久久国产一区二区三区 | 日本高清不卡视频 | 久久久美女 | 亚洲色图婷婷 | 亚洲经典一区 | 亚洲视频免费一区 | 久久91精品国产一区二区 | 中文字幕 国产精品 | 99亚洲| 欧美不卡一区二区三区 | 日韩欧美在线视频 | 久久r免费视频 | 日韩精品成人免费观看视频 | 亚洲视频一区二区三区 | av黄色免费 | 国产精品激情 | 欧美视频区 | 国产一级免费在线观看 |