单片机红外遥控器解码实验 C语言和汇编2个版本的程序都有

fanichicl · 发表于 2018-11-27 10:05

EDA365欢迎您登录！

您需要登录才可以下载或查看，没有帐号？注册

x

单片机红外遥控器解码实验 C语言和汇编2个版本的程序都有

9 v* B0 t) r3 t

注：
每个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语言程序：

/*************************************************
*文件名称： main.c
*作者：
*版本： V1.00
*说明：红外遥控器解码实验
*修改记录：
--------------------------------------------------
*Descriptoon:
*接线说明：P32-红外接收,P25-RS,P26-RW,P27-EN,
         P00~P07-DB0~DB7
**************************************************/

#include <reg52.h>

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

uchar Lcd_Buf[4];          //显示数据缓冲区
unsigned char Ir_Buf[4];    //用于保存解码结果
sbit Ir_Pin=P3^2;          //红外线数据接口
sbit rs=P2^0;                   //LCD数据命令端
sbit rw=P2^1;                         //读写接口
sbit lcde=P2^2;                         //使能接口
uchar code table[]=" WWW#WINDWAY$CN ";//LCD显示数据
uchar code table1[]="Wait for IR in..";
uchar code table2[]="  IR DATA...";

         unsigned char code Led_Tab[]={
      0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xf8,
      0x80,0x90,0x88,0x83,0xC6,0xA1,0x86,0x8E}; //共阳极数码显示码0-F
unsigned char code Led_Sel[]={0xf,0xf,0xb,0x7}; //数码管位选，屏蔽前两位
unsigned char Led_Buf[4]; //显示缓冲区
char Led_Index;          //定义位选
unsigned char Ir_Buf[4];  //用于保存解码结果

sbit LCD_E = P2^7;
//========1MS延时====================================
void delay(uint z)
{
      uint x,y;
      for(x=z;x>0;x--)
            for(y=113;y>0;y--);
}
//======LCD写命令=====
void write_com(uchar com)
{
      rs=0;
      lcde=0;
      P0=com;
      lcde=1;
      delay(1);//延时1MS跳过忙信号
      lcde=0;
      delay(1);
}
//======LCD写数据=====================================
void write_date(uchar date)
{
      rs=1;
      lcde=0;
      P0=date;
      lcde=1;
      delay(1);
      lcde=0;
      delay(1);
}
//=====初始化函数=====================================
void init()
{
      uchar num;
      rw=0;             //允许LCD写
      lcde=0;
      write_com(0x38);//显示模式设置
      write_com(0x0c);//显示开及光标设置
      write_com(0x06);//显示光标移动设置
      write_com(0x01);//清屏
      write_com(0x80);//显示首地址
      for(num=0;num<15;num++)//显示第一行
      {
            write_date(table[num]);
            delay(1);
      }
      write_com(0x80+0x40);//显示第二行
      for(num=0;num<16;num++)
      {
            write_date(table1[num]);
            delay(1);
      }
      TMOD=0x10;             //设置定时器0、1工作模式为1
}
//=====显示解码========================================
void write_ir(uchar date)
{
      uchar tmp, num,ff;

      if(ff==0)
      {
            ff++;
            write_com(0x01);
            write_com(0x80);
            for(num=0;num<12;num++)
            {
                     write_date(table2[num]);
                     delay(1);
            }
      }

      write_com(0xC0+6);//定位在第二行第六位
      tmp = date>>4;                      // 高四位
      write_date(tmp > 9 ? 'A'+tmp-10 : '0'+tmp);
      write_com(0xC0+7);//定位第二行第七位
      tmp = date&0x0F;                      // 低四位
      write_date(tmp > 9 ? 'A'+tmp-10 : '0'+tmp);

}
//======================================================
//解码取回低电平
unsigned int Ir_Get_Low()
{
      TL1=0;
      TH1=0;
      TR1=1;
      while(!Ir_Pin && (TH1&0x80)==0); //等待低电平到来
      TR1=0;
      return TH1*256+TL1;//提取低电平时间间隔时长
}
//======================================================
//解码取回高电平========================================
unsigned int Ir_Get_High()
{
      TL1=0;
      TH1=0;
      TR1=1;
      while(Ir_Pin && (TH1&0x80)==0);//等待高电平到来
      TR1=0;
      return TH1*256+TL1;//提取高电平时间间隔时长
}
//======================================================
//======================================================

void main()
{
      unsigned int temp;
      char i,j;
      init();       //初始化
//=====用do做循环，等待遥控按键=========================
      do{
restart:
            while(Ir_Pin) ;//等待低电平

            temp=Ir_Get_Low();//把低电平附给变量
            if(temp<c(8500) || temp>c(9500)) continue;//引导脉冲低电平等待9000us
            temp=Ir_Get_High();//把高电平附给变量
            if(temp<c(4000) || temp>c(5000)) continue;//引导脉冲高电平等待4500us
            //连续读出32个字节
            for(i=0;i<4;i++) //4个字节
            {
                     for(j=0;j<8;j++) //每个字节8位
                     {
                              temp=Ir_Get_Low();
                              if(temp<c(200) || temp>c(800)) goto restart;//等待560us跳过低电平
                              temp=Ir_Get_High();
                              if(temp<c(200) || temp>c(2000)) goto restart;//等待1000us跳过高电平
                              Ir_Buf>>=1;//把电平移进数组
- q4 j4 |0 z0 D% O+ W; M4 v, G+ x7 |; u. o$ T1 d

) _5 Y, D1 `" [: _7 Z…………限于本文篇幅余下代码请从论坛下载附件…………: W) {$ g* j9 u

$ S, u, R. ^' `1 N" q1 e汇编语言：& c  W4 L* |- d6 D5 E5 i' a: l
& B, z5 X* i9 d8 @' [8 \
; ?4 \% n- B% j# z) P. j) t1 Y
;-----------------------------------------------5 Q2 \0 ?4 t, T% Z, K9 H# x
   IRCOM  EQU  20H    ;20H-23H IR使用0 Y! B* r; k7 M, Y4 V9 [# |" ?
      X    EQU  26H    ;LCD 地址变量/ F, N3 g; o+ K

3 C, [4 p2 B) S- U! C& P% o: d4 I    IRIN EQU  P3.23 S6 J" A0 q0 l+ L" h3 a5 @
;    BEEP EQU  P3.73 w" _' s- `' i# [) A# q' R9 @" c
;    RELAY  EQU  P1.0
' {) c: o: I( T' z/ T) h8 G2 O" Y* P8 j
      RS EQU  P2.0
2 [( Q1 p. k0 M) w. R       RW EQU  P2.1" \" Z4 P9 H4 N1 D* h$ Y
      EN EQU  P2.2
/ l8 B, B& X9 L7 v9 U& _5 P;------------------------------------------------9 D$ k- s4 C& e4 Z
      ORG 0000H: |3 T% S; p& l2 Z
      JMP  MAIN
/ K3 s9 t) x' J$ O! r( M;------------------------------------------------5 w0 Y/ V2 j2 l
      ORG 0100H4 y; N$ t5 B  j8 Z1 `1 e- [5 [
MAIN:
; w; v5 m+ U# y, _" B' K( Q6 F8 H# z       MOV SP,#40H
# f/ X; Q4 Z) n! C9 W; _       MOV A,#00H
) x! w$ j5 h4 j& B       MOV R0,#20H& v' k2 z2 l: ]$ h) J6 A: k
LOOP0: MOV @R0,A       ;20H-26H清零
  L/ K$ K0 d1 E5 ?' U* Z' E* q       INC R0
5 t, l5 V' Y* h' _0 n# I3 D       CJNE  R0,#27H,LOOP0% N3 M" {& ^# p! {
      SETB  IRIN# O- _9 v; @  i: ^) W5 {
      CALL  SET_LCD
5 R4 m3 t4 N4 g6 b; E) A7 M       CALL  MENU1" u4 p" j, [! f& s+ L7 ^1 Q. {
LOOP1:
, F2 J) h; T. F9 y; p       CALL  IR_IN7 e0 d* @. Y0 E; ^* [
      CALL  IR_SHOW
7 j6 H( Q& u( `0 o8 j" C8 y2 \. u4 W0 m+ e! c  m; s5 \( Z
;       MOV  A,22H
' B. V3 K4 V' @; _- }7 ]/ Z;       CJNE  A,#40H,LOOP2 ;K17键按下4 g' n( Z: S1 _6 ]; d
;       CLR RELAY          ;继电器吸合
* A2 R! X- k: S+ i0 V;LOOP2: CJNE  A,#04H,LOOP3 ;K19键按下( G+ z% h8 {* L* Q/ Z" U. W
;       SETB  RELAY          ;继电器关闭
+ E; i; H. b- d% P- {;LOOP3:
. w" I+ h+ g7 S6 j- P          JMP LOOP1
% V2 s% Y' S. S3 z7 e* s' d. r# g( ]; C8 c6 V5 d' f
;-----------------------------------------------------
2 \8 T$ M1 c, c# ~' u1 I7 Y. w;  LCD 初始化设置
' d, |) a+ f  Y* x, H! m( D+ d" E;-----------------------------------------------------* H4 d1 K  J8 C7 ?% ^$ M" @; f) n
SET_LCD:
  C5 {* t2 y% N3 J       CLR  EN
9 j, R0 b$ W' s+ V  m' J       CALL  INIT_LCD    ;初始化 LCD8 {* _! U8 ?: b/ T1 z+ k. _
      CALL  DELAY1
! O4 L4 H& U6 G# }; k' T- ?6 L* U       MOV  DPTR,#INFO1 ;指针指到显示信息1. ]) B+ |! I, F; d/ D% s
      MOV  A,#1       ;显示在第一行
5 D8 B) v/ h. _8 Z" A       CALL  LCD_SHOW- {( R6 Z' k& Z$ A, t4 n
      MOV  DPTR,#INFO2 ;指针指到显示信息2
" b3 b6 o( n( X7 M       MOV  A,#2       ;显示在第二行9 d" L: ]2 e! Y3 d0 }+ p  t/ T8 E
      CALL  LCD_SHOW2 k4 N5 y1 _, C" O
      RET& W2 A% d! U* P" s2 o
;-----------------------------------------------------' Y' O6 ]/ B% v
INIT_LCD:                ;8位I/O控制 LCD 接口初始化
) p0 ~) e/ v* l3 V7 J       MOV  A,#38H    ;双列显示，字形5*7点阵) g! \8 l, b. M
      CALL  WCOM( |/ c5 V( F0 T8 U
      CALL  DELAY1( Y+ p  I# T9 n+ E
      MOV  A,#38H    ;双列显示，字形5*7点阵, n/ ]& N. A7 R& A, _
      CALL  WCOM2 {8 p) G& x& [5 }* ^& l, r
      CALL  DELAY1
" v, p* `* d; |9 i" t& V1 @% R       MOV  A,#38H    ;双列显示，字形5*7点阵: g& w* e$ s9 C9 {1 I2 W
      CALL  WCOM
6 D4 V; B% z& @" k       CALL  DELAY1
: D- F4 v7 ]# }8 D1 v5 ^, }; Z! h2 f       MOV  A,#0CH    ;开显示，关光标，$ W6 e3 @+ `9 P- \1 z
      CALL  WCOM
! C! I: L. _6 l# C; I' a& P       CALL  DELAY13 \4 J/ k+ g. F0 j6 q
      MOV  A,#01H    ;清除 LCD 显示屏
, h7 c1 U( @; T" X$ M" Y       CALL  WCOM+ n% Y% c9 M( U0 m
      CALL  DELAY1
1 F! w$ _. x7 A9 ^8 c4 ^4 U, e       RET
1 v) X! i6 }( s0 ?8 P0 B4 ?3 y  n;----------------------------------------------------
& l  x" n4 j0 J* D9 [- O: yLCD_SHOW:    ;在LCD的第一行或第二行显示信息字符
1 R$ N, X+ Z, }- r% G# A
7 ~. R" `( v7 f       CJNE  A,#1,LINE2  ;判断是否为第一行
- `, d" A9 j4 t1 |1 l3 C+ S$ E  LINE1:  MOV  A,#80H    ;设置 LCD 的第一行地址7 w$ R! x) Z9 ]7 x7 M* N1 V
      CALL  WCOM       ;写入命令7 A/ Y) V. o4 G0 G5 L1 s: J" Y
      CALL  CLR_LINE ;清除该行字符数据/ U5 q( `5 d8 z' `- A7 S0 ]
      MOV  A,#80H    ;设置 LCD 的第一行地址
: v1 j; J% d& u8 P" F) D       CALL  WCOM       ;写入命令
( Z2 W& D4 c, K( i4 W8 E       JMP  FILL
! ?8 P  b& w) a- w6 w% v0 |5 a9 J* c8 p; R0 e( t% m* H
  LINE2:  MOV  A,#0C0H    ;设置 LCD 的第二行地址
0 V. a* P" m5 S" y. u9 m       CALL  WCOM       ;写入命令/ b4 g( i# S+ V( ^  E
      CALL  CLR_LINE ;清除该行字符数据
" K* Y0 z+ s& p. j& Y" f       MOV  A,#0C0H    ;设置 LCD 的第二行地址
4 B9 j2 N9 m8 I$ y1 G8 |" Q! ]       CALL  WCOM) ~/ e8 d( u$ h% D, o9 F8 I
  FILL: CLR  A          ;填入字符
& O0 ~0 K& f% J' b       MOVC  A,@A+DPTR ;由消息区取出字符
0 u/ @  k8 k/ Q       CJNE  A,#0,LC1 ;判断是否为结束码( s8 I7 f- D5 A' K/ c
      RET1 R; f) X4 h* b" S9 x
  LC1: CALL  WDATA    ;写入数据
9 s3 }$ z$ M0 v, A       INC  DPTR       ;指针加19 l# B6 }/ b0 n) v4 C- }& W: _
      JMP  FILL       ;继续填入字符
* ~( o1 k& L: S* O+ r       RET
" _# p8 h# h: G; B3 _;---------------------------------------------------
( g& w. x" o5 D4 {7 ]. U4 jCLR_LINE:                ;清除该行 LCD 的字符
5 ?3 ?" d) g2 P! E1 J       MOV  R0,#240 E0 Y0 }8 K/ b* R$ z5 v) `* j, C
CL1: MOV  A,#' '5 H" c# O1 i* I$ l
      CALL  WDATA3 x* p3 q* m0 u1 t0 Z
      DJNZ  R0,CL1
3 ]) }- B4 L# s& X5 E       RET
2 i  L1 G4 k' d5 Z0 Z. r" z;----------------------------------------------------
' [5 o: Y0 M/ k! IMENU1:                   ;LCD 显示工作菜单信息2 T: A- u2 `7 z8 r) d' c3 x5 Y2 }, }
      MOV DPTR,#MENU2% q: v/ V& d1 a/ G& ?9 [* p  e
      MOV A,#1       ;在第一行显示信息
8 B* L1 q' Q/ Y9 I# |2 u6 S, K       CALL  LCD_SHOW; K* _! ~. k; z# W" }; a, o6 g
      RET
, ?% N! W. n. [0 S$ Z# EMENU2:  DB  " REMOTE CONTROL ",05 p2 g* w6 T  D; \3 o
;-----------------------------------------------------: `5 {, l0 B$ s8 m, A
INFO1:  DB  "             ",0  ;LCD 第一行显示信息
2 j9 L! {' ?+ AINFO2:  DB  "  IR-CODE: --H  ",0  ;LCD 第二行显示信息" c3 P) |" b& F; c
;-----------------------------------------------------
5 e# I! l4 z" ^) R
;-----------------------------------------------------3 R$ L& W! i$ \" y; }1 S
; 写指令、数据使能子程序
) O& r5 D, ]: u7 h' {/ _) p+ w;-----------------------------------------------------; M5 ?: L& L1 S; p$ d/ v' G" ^
WCOM:( L( [4 Y( }, N' W4 C2 x$ @( |( j9 w) c
      MOV  P0,A       ;写指令使能' z5 E9 r. A% G6 N: X! R- C
      CLR RS          ;RS=L,RW=L,D0-D7=指令码，E=高脉冲
$ b* `- s$ X( l, P9 ?! L7 _       CLR RW/ M* O( Z" x/ k! F; P6 |7 B
      SETB EN7 [& q6 p% Y- M8 D
      CALL  DELAY0
3 e: \) n* }" \3 ~0 U. p" U       CLR EN
- I/ U7 c7 B% x* ?       RET: D+ o5 L, O- R; a$ L$ O; ]+ T  E
* k# ^/ |' T4 h
WDATA:
  v0 o4 t7 f4 Z; F       MOV P0,A    ;写数据使能( m  \2 ^6 X3 o2 |& V+ S3 w6 J
      SETB  RS       ;RS=H,RW=L,D0-D7=数据，E=高脉冲
' U; E) a- n" ^% U0 I       CLR RW. k" q7 \3 O% a6 L: A, }
      SETB  EN
1 R# }/ _$ H. t1 i       CALL  DELAY0
+ C! L7 g5 m# d7 V       CLR EN' u! f( b$ P; Z' ]4 M1 a9 d4 L
      RET: X! A/ E7 V8 {. U; \

* _6 X7 ~  w) u. P. J% n7 Z$ hDELAY0: MOV  R7,#250    ;延时500微秒5 O  \! c; H! W. G
      DJNZ  R7,$8 e5 a, D; F, g6 U& ]" {9 G- C
      RET. k  |8 x. H2 t0 v' {% N6 o2 z
;---------------------------------------------------
. ]; X+ y4 i; W) @/ y/ K;在 LCD 第二行显示字符
7 h+ y  S3 O1 e$ B! };A=ASC DATA, B=LINE X POS
+ h/ k8 W! U7 ?# G0 F% u6 I' W;---------------------------------------------------
# g2 Z: x) K! F$ wLCDP2:                   ;在LCD的第二行显示字符
$ S: Y' \8 e3 f2 b) L8 u       PUSH  ACC       ;
4 r% Y3 j6 t. d0 T       MOV  A,B       ;设置显示地址
# S' L: [1 n* }* g  B) [       ADD  A,#0C0H    ;设置LCD的第二行地址' y" I2 ~4 `+ o& {
      CALL  WCOM    ;写入命令3 V0 h2 l8 q% C1 V( ]- F6 u
      POP  ACC       ;由堆栈取出A
+ m4 i+ A0 p- B* \5 d0 k       CALL  WDATA    ;写入数据
$ V; C  m2 C: e; b$ a4 X5 V& \" x       RET
- q' Y/ Y8 m6 s1 i+ c;---------------------------------------------------
* J5 |9 G7 \1 j( B1 [0 N$ v; IR 译码子程序1 F$ F8 V. R9 C% \3 F8 K
;---------------------------------------------------+ ~( f& e2 x/ }# A' E5 Q3 ]! v* L
IR_IN:
" F4 ?3 ~6 c9 l0 V1 [       MOV R0,#IRCOM7 B# C9 c1 ^4 M9 A/ H
I1:    JNB  IRIN,I2    ;等待 IR 信号出现& I4 v  t& F' p( j5 d
      JMP  I12 l  n6 U% p) R0 [
I2:    MOV  R4,#20- w5 r$ `8 n& Y; i4 g: G7 }& z
I20:    CALL  DEL
5 s- m& J" r1 p* |3 T; g" \       DJNZ  R4,I20- t/ k% r9 n! N% _
      JB  IRIN,I1       ;确认IR信号出现
3 p* B7 A# V" e  x5 R0 ^ I21:    JB  IRIN,I3       ;等 IR 变为高电平# Q8 z' @% H3 M' K2 D3 i3 s
      CALL  DEL
/ }7 V! j1 q1 d2 V4 |5 j       JMP  I211 \. C( B' y+ n. P! x; E; y# K! `
I3:    MOV  R3,#0       ;8位数清为0
8 [- I2 ~" j4 J7 t6 Z LL:    JNB  IRIN,I4    ;等 IR 变为低电平
2 ]# {3 y  k  ]) \+ q* `. e       CALL  DEL
2 L1 u" q! |3 y% u; j1 @; j6 E: U       JMP  LL+ _; G: b7 F8 S  Q( a" K% D2 [
I4:    JB  IRIN,I5       ;等 IR 变为高电平" t' O7 B4 R% p  [$ j9 d' V5 i! T
      CALL  DEL3 w! x7 F/ Q0 q' J* \
      JMP  I4& O- k( [6 ?' I2 l% e' K' f. R# O
I5:    MOV  R2,#0       ;0.14ms 计数
7 m; y. i# d4 Z7 [6 j* O4 v L1:    CALL  DEL
0 F' m! c0 j# {) |' U       JB  IRIN, N1    ;等 IR 变为高电平+ ]8 A" l, G( h$ c. G* F
                           ;IR=0，检查R2中的计数值 ( D2 h3 Y& k$ i( F3 S- g
      MOV  A,#8" Y% [0 L/ b: f' p5 O: ~
      CLR  C
: n. f$ z' [0 M! g6 v: Y; ]       SUBB  A,R2       ;判断高低位
8 n2 Y( {" g6 n; W3 Q  H8 O- f                            ;IF C=0  BIT=0
) D" J: \1 k# O5 E6 B) z. U       MOV  A,@R0
  O- y2 P1 M, l5 c4 Q       RRC  A
6 M: G& X# k2 B0 ]/ B7 g0 ~       MOV  @R0,A       ;处理完一位' R3 M1 ^4 x: `
      INC  R3/ b! {0 y: U9 J' F1 h
      CJNE  R3,#8,LL    ;需处理完8位
1 a1 R  x, F; U* `' [6 ]  m       MOV  R3,#0  a& G; r# W( a& U! z, r5 ~
      INC  R02 g, n8 T' I. a0 S; f; x
      CJNE  R0,#24H,LL ;收集到4字节了- Y# O) O" Y* `5 K, Y
      JMP  OK
! M! k4 h2 d) `) v N1:    INC  R2
7 U9 L2 M4 @2 ^4 ]2 f6 f       CJNE  R2,#30,L1 ;0.14ms 计数过长则时间到自动离开3 Y+ g7 {8 a5 d( E, m+ I9 o
OK:    RET
/ T; c9 c* a( g3 E5 A. ~! }2 Q# _# d;--------------------------------------------------------------------, ~5 J  T8 x. u, z3 b
IR_SHOW:
7 h4 v+ W& N- M/ p, X       MOV A,22H
$ M8 J; S9 R9 }8 |, Y( g; k       CPL A             ;将22H取反后和23H比较
+ c. W# X1 {+ ?* L/ J5 o: S2 q       CJNE A,23H,IR_SHOW1  ;如果不等表示接收数据发生错误,放弃。
( u& W6 J5 @7 B5 c       CALL CONV
; |2 L  l# p& ~6 {;       CALL  BEEP_BL       ;蜂鸣器鸣响表示解码成功! y) s& a1 X- ?5 w. q
IR_SHOW1: RET
7 h0 t8 e% N9 w; ^;--------------------------------------------------------------------8 l! Y. {5 _7 K9 R* [- Z
;转换为 ASCII 码并显示
1 A3 i0 A6 s6 I" q0 G;--------------------------------------------------------------------1 v+ ^5 r/ m& J1 M
CONV:( G- x$ J. \+ I1 j3 N6 T' {4 d
      MOV X,#11       ;设置显示起始位置
# e$ V0 W& i- i- U: M5 M       MOV A,22H2 k3 D* ~7 }$ S# d( g1 l
      ANL A,#0F0H    ;取出高四位二进制数% x7 C# }  F; x# W7 Y
      SWAP  A          ;高四位与低四位互换
9 u* C- @/ \$ a       PUSH  ACC       ;压入堆栈
" L% u* v8 S; }       CLR C          ;C=0
7 l" j3 ~1 K% C, v4 y       SUBB  A,#0AH    ;减10( s; e  o( M  K8 D, I2 i
      POP ACC       ;弹出堆栈
. u2 m! p2 B( i       JC ASCII0    ;该数小于10，转ASCII0
+ a+ \% {: {( Q; j& N       ADD A,#07H    ;大于10的数加上37H
/ a4 O7 [8 I- LASCII0: ADD A,#30H    ;小于10的数加上30H8 T; D8 g+ h+ c; @2 T
      MOV B,X
- |2 _: f4 c" C, B  p       CALL  LCDP2
( o/ [1 [% [" D. _/ W8 {0 ^; l+ v  d: {- V
      MOV A,22H
2 X. H1 p5 @, e! }3 S       ANL A,#0FH       ;取出低四位二进制数4 m2 u- O; v: U# J4 i* x- I
      PUSH  ACC9 K. i6 o( E5 n. X/ e4 P% a2 S
      CLR C9 l# H$ \7 l" y/ \' U, [2 \0 x
      SUBB  A,#0AH       ;减10# d" y6 x( q5 m7 K
      POP ACC+ ]1 [" m$ b6 T& U. A4 R
      JC ASCII1       ;该数小于10，转ASCII00 ?1 i- @  @: u. [' i& x* `
      ADD A,#07H       ;大于10的数加上37H) w- G/ k+ Y" v+ s2 w5 y8 T
ASCII1: ADD A,#30H       ;小于10的数加上30H
, |( v# P0 ^- y" |- K" Y% G7 ]" n       INC X3 h6 W5 N$ |3 L
      MOV B,X
7 k& k4 ~' b) w' `* L" r& W% }       CALL  LCDP2
4 M7 _, Z" f& R% i) K& H2 A       RET# r) H  n3 ?- v4 h; W5 ?  E
;--------------------------------------------------------
0 k7 {5 M: g2 J9 r  Z;蜂鸣器响一声子程序
  j/ p( ~. W7 m0 {) P* ~( e7 F;--------------------------------------------------------# t( t8 D2 `. j1 G) y/ `5 T- K
BEEP_BL:$ C# u" g' p; z# U
      MOV  R6,#100
* e, G) ]9 }9 r  BL1: CALL  DEX12 K- h7 {* a$ f% H! Z0 `
;       CPL  BEEP
' i0 ^2 x% j; P& S8 y( j       DJNZ  R6,BL1
9 h# s& e" H$ k3 ~2 `  e       MOV  R5,#25. f' n1 w: U& w- W  E
      CALL  DELAY
  v! |5 m  z! O  B' f! n/ E       RET# i; X0 c# }% {6 m# p. R
DEX1: MOV  R7,#180
, Q* e( b: F" {9 l0 c# O DEX2: NOP
0 u9 }: L  Z4 M7 y       DJNZ  R7,DEX2
' f) A: M, L8 y+ B: W       RET# q( Z7 p% i. I" p& E+ K9 {
DELAY:                   ;延时R5×10MS
1 K7 D) ^5 L4 v. p       MOV  R6,#50
! b- m( k3 u8 K- B; L  i. C# K6 j  D1: MOV  R7,#1003 ~( f  M) B* T6 J
      DJNZ  R7,$  `( _( s' o$ D/ l5 A$ I$ q3 i
      DJNZ  R6,D1
7 j% E- ^; [; k/ Z2 J' u       DJNZ  R5,DELAY
9 z% ?" U' T6 `/ T: D5 d/ R( \$ ~$ ?* h0 R7 y0 l, ^
' e7 F  V" k  u$ w' `
…………限于本文篇幅余下代码请从论坛下载附件…………
* G- s0 e+ y! m, i5 [% c% ~
游客，如果您要查看本帖隐藏内容请回复
3 i( D0 x! Z! L* t( Z$ H1 ?8 ~

# ]# [; C$ V! H# j( [

( \, P# X$ `) r
. Z0 n3 i) W3 g" {9 M

Demyar · 发表于 2018-11-27 10:10

厉害了学习一下

cat12620 · 发表于 2019-1-24 15:54

看看楼主的代码

帐号		自动登录	找回密码
密码			注册

单片机红外遥控器解码实验 C语言和汇编2个版本的程序都有

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1