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

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

EDA365欢迎您登录！

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

x

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

1 d% o8 k% l! J# Z( v

注：
每个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;//把电平移进数组2 W7 g9 ^5 Q% W* a( }
# J& W0 x. h; K, o0 l4 D
* \* N4 W$ J0 {! O1 ^
…………限于本文篇幅余下代码请从论坛下载附件…………
* f5 B+ J5 {& J; y" S
  v* K0 Q  j8 n; x汇编语言：
5 A  ?3 R; J& Z% P+ O, S( s' c' D) n7 s  \

+ |/ h7 V& v) f; x7 _;-----------------------------------------------3 x0 R+ p2 C8 x8 F" u
   IRCOM  EQU  20H    ;20H-23H IR使用
, w. U0 c  a! N1 [5 _       X    EQU  26H    ;LCD 地址变量" C5 L; O" r; g  J) {
2 S! R; S) S/ |, i, m0 b6 a
   IRIN EQU  P3.2# V& A- P6 W9 N6 C
;    BEEP EQU  P3.7
( z% S) o& h1 Q1 Y8 l; Y/ @;    RELAY  EQU  P1.0# V0 N1 I% M& W  W

/ [- m& T/ w( o+ i8 I  {       RS EQU  P2.09 G8 A# K/ S7 s
      RW EQU  P2.1) Z, B- R+ D2 I# l; }& R3 W  `
      EN EQU  P2.2; Z3 c. n2 u6 R0 y* L: C
;------------------------------------------------- V2 k7 s- v8 \! `
      ORG 0000H* T$ I+ @, `" A! b; p0 z
      JMP  MAIN& t: G( `3 y: _( L  v! z& J
;------------------------------------------------# H- e9 k; I- L( F' r" O* k
      ORG 0100H
$ r/ I/ [5 ]6 u9 R/ ^5 x  PMAIN:5 U, R$ k0 `% E7 g4 o5 s# S2 Z
      MOV SP,#40H4 a" e: B5 D2 \7 n7 N
      MOV A,#00H
& J# k/ c  X3 M+ g0 K: C       MOV R0,#20H
: \9 k/ ^. C) M3 q5 F* N; E; CLOOP0: MOV @R0,A       ;20H-26H清零
2 ?6 w& u! K0 m7 ~! p       INC R0
7 d, T) X  [- \  f% u4 }       CJNE  R0,#27H,LOOP0  s; q1 g8 u- `! g* M
      SETB  IRIN) r7 z- }; q8 K
      CALL  SET_LCD! }' ^6 H! J. j
      CALL  MENU1
5 C  g" S9 ~7 r. o. Z4 k7 `LOOP1:1 }: v; |2 m2 g! w
      CALL  IR_IN4 x3 a6 O2 m5 T& ?
      CALL  IR_SHOW3 t1 h! i, ~$ ~# m: E5 f7 N9 U

( |+ l+ u. |9 s;       MOV  A,22H' {+ \- O, y0 C
;       CJNE  A,#40H,LOOP2 ;K17键按下$ k( ?& I% z" L: s6 H9 a
;       CLR RELAY          ;继电器吸合
$ r& t6 D. u5 r;LOOP2: CJNE  A,#04H,LOOP3 ;K19键按下
$ a. k: p1 x7 l. ~$ Z, Q;       SETB  RELAY          ;继电器关闭
$ v0 s- s- P, V3 @5 d  h;LOOP3: ! r2 J4 p+ V5 R# [6 s: H) s: O
         JMP LOOP1
& S" G( ^7 F% S2 J0 w$ k% j5 K
/ g+ o4 V2 y9 f# f9 d;-----------------------------------------------------
% R. M$ }, r/ V6 V! v7 j0 Q6 W;  LCD 初始化设置/ a+ V; x4 g! b) i2 o* E
;-----------------------------------------------------$ `8 d* A( E! d& V
SET_LCD:
' B$ U" _/ v/ a       CLR  EN1 g* b: y$ x" m- v6 P, w
      CALL  INIT_LCD    ;初始化 LCD1 A5 a3 {8 t: i3 f3 M
      CALL  DELAY14 `# e6 W/ l* v
      MOV  DPTR,#INFO1 ;指针指到显示信息1
. K7 ]: \) }1 m       MOV  A,#1       ;显示在第一行' w: c: _- {- ^1 l
      CALL  LCD_SHOW
$ B$ U  p" E6 B9 q& o3 P       MOV  DPTR,#INFO2 ;指针指到显示信息2) \# @2 H$ S) v+ i$ P7 e: p
      MOV  A,#2       ;显示在第二行, U% S0 l8 g# w) M! _3 ~
      CALL  LCD_SHOW3 `5 |( m% L! K, j
      RET
% t/ W# d$ Q" G- ^2 \1 E, Q;-----------------------------------------------------! h8 C9 e2 @* `4 n7 c& v2 M2 A; {% I
INIT_LCD:                ;8位I/O控制 LCD 接口初始化0 _7 N8 W$ ~% A
      MOV  A,#38H    ;双列显示，字形5*7点阵, s4 M* s! ?% m3 E8 F. z# f$ y
      CALL  WCOM: h4 u8 l8 i$ x/ q& ^  B, C
      CALL  DELAY1" Y. @: P  C* I, N* s
      MOV  A,#38H    ;双列显示，字形5*7点阵
6 o9 v9 G$ |7 d% @$ w4 f       CALL  WCOM
! |9 n5 U1 @& H0 L       CALL  DELAY1
4 B! y( r8 \9 _, q5 O       MOV  A,#38H    ;双列显示，字形5*7点阵# D% u% ]5 S7 S, F  N8 e  f- t
      CALL  WCOM3 b9 U  M9 X/ B3 S4 w$ W
      CALL  DELAY1
2 D& ~2 P# L! K# y1 ^0 a       MOV  A,#0CH    ;开显示，关光标，. ?9 j' m  j) w0 k1 i3 r
      CALL  WCOM! j' V( V* X9 L$ p! H3 Y
      CALL  DELAY1
* L4 W9 B  ?* o       MOV  A,#01H    ;清除 LCD 显示屏2 C% L$ ?1 E. R9 i9 u3 y$ L
      CALL  WCOM' t( m$ R, u5 x$ p8 H5 e: u2 E
      CALL  DELAY1
, @; H+ X: [: x7 Q" m! ^       RET
5 O" q6 p7 I- n- B, L0 h;----------------------------------------------------
, H2 H( k/ ~3 Q' NLCD_SHOW:    ;在LCD的第一行或第二行显示信息字符4 j* Z) I* {! `* Y

# f3 q/ D8 {2 d# |! c6 `8 C* _4 N       CJNE  A,#1,LINE2  ;判断是否为第一行
: ]; ?  q2 m2 K4 d7 t  {  LINE1:  MOV  A,#80H    ;设置 LCD 的第一行地址5 h- }9 }1 e; J" }
      CALL  WCOM       ;写入命令
( o  X$ I" _! i/ q! x) C, D& K9 P' u       CALL  CLR_LINE ;清除该行字符数据
/ u  S# [* R" C1 O       MOV  A,#80H    ;设置 LCD 的第一行地址
/ g" u; k. T, {0 x       CALL  WCOM       ;写入命令8 W5 O* M% C* G4 b! n6 d
      JMP  FILL
& w! b( L9 l# q9 o) p7 ^0 r4 r2 y8 o
  LINE2:  MOV  A,#0C0H    ;设置 LCD 的第二行地址
3 e% e' N9 P. p       CALL  WCOM       ;写入命令
: ?% \$ x# l  i+ p1 I4 Y1 M1 p       CALL  CLR_LINE ;清除该行字符数据
* M0 I* Q& {& N1 W       MOV  A,#0C0H    ;设置 LCD 的第二行地址
7 A: v# N; t" {. N" w       CALL  WCOM
3 N+ v  M( x$ N) e9 A6 Y6 R  FILL: CLR  A          ;填入字符
3 H* E5 o$ A4 `. f" c! T1 I4 @6 @       MOVC  A,@A+DPTR ;由消息区取出字符! X$ ]% R" m# J% v
      CJNE  A,#0,LC1 ;判断是否为结束码
/ ?  M& M) g' Z       RET
/ C9 E+ k  Y9 M  LC1: CALL  WDATA    ;写入数据7 W1 u4 e1 H9 ?
      INC  DPTR       ;指针加11 F% C' l, N) J% k
      JMP  FILL       ;继续填入字符
" ~' L* t: _( t$ o; r! Q5 B       RET" T/ T- _. P1 P: D# w+ I
;---------------------------------------------------
0 R. k( f( o, iCLR_LINE:                ;清除该行 LCD 的字符2 T0 }, T# w8 ]$ M! l* B
      MOV  R0,#245 ?$ n! K/ f: T7 h3 F7 T( V
CL1: MOV  A,#' '* ]+ y  D" i/ ~) c! z) p7 h
      CALL  WDATA5 a6 ]0 E5 R# a
      DJNZ  R0,CL1
6 J9 p0 `0 b) S- b! L) f; s       RET5 I" u1 E8 n; x7 p, X
;----------------------------------------------------
- |% }6 t9 e; D5 t: z: S; Z4 mMENU1:                   ;LCD 显示工作菜单信息5 F! D6 z+ ?- B7 Z7 }
      MOV DPTR,#MENU2
4 N. g9 p% J* f0 {- w) j       MOV A,#1       ;在第一行显示信息( y5 }* b/ I4 j/ j6 \
      CALL  LCD_SHOW
0 \! S! J5 w1 B+ S( g2 h       RET: ^# |% V1 |4 q% u5 y" r
MENU2:  DB  " REMOTE CONTROL ",0
  U8 |' i% _. L* a  q0 K;-----------------------------------------------------$ G6 x+ C/ w$ _; U4 @9 m) _( p7 w
INFO1:  DB  "             ",0  ;LCD 第一行显示信息2 [" G5 u, G0 n7 T- T. M8 o
INFO2:  DB  "  IR-CODE: --H  ",0  ;LCD 第二行显示信息
) g& `. Q/ E- d: _! i+ @2 z;-----------------------------------------------------
" W/ G* Q. B1 j. F5 \! m3 e& O# F4 J8 L: C, X
;------------------------------------------------------ Y* z6 k5 k$ U
; 写指令、数据使能子程序; X7 s: T# E# z% J+ |
;-----------------------------------------------------
' C" {6 H8 T. I! rWCOM:
7 s" S* |3 ^2 p6 @& l8 U- n       MOV  P0,A       ;写指令使能) l! p& Q7 S7 }! N/ m% n, H- H
      CLR RS          ;RS=L,RW=L,D0-D7=指令码，E=高脉冲
5 u5 a2 d- J& s9 P+ [       CLR RW
, D0 p9 d' i/ U& T( E       SETB EN; X9 h/ p, c4 M; ]: m2 k; g
      CALL  DELAY0; Q4 v+ Y. M; l5 _! U7 `
      CLR EN
7 Z8 J! g9 I% ?, r4 u4 K, o       RET
9 @' `0 R& ]1 N7 ^1 C/ W: S5 K; U( ^+ D' c) Y4 A3 R( q5 d
WDATA:) {9 T7 K5 A# |7 p' S2 J0 ~
      MOV P0,A    ;写数据使能
9 y0 e. X! B, l  v       SETB  RS       ;RS=H,RW=L,D0-D7=数据，E=高脉冲
) V0 X1 ^6 P  J( V4 b' }       CLR RW
1 _% |& E0 k( |2 I8 q. F9 ^       SETB  EN
9 Z5 @0 Q# z3 _& X5 k       CALL  DELAY0
/ O7 b( p! _; |/ |( x: K, i# D! S       CLR EN  b1 R& V: m3 K
      RET
+ {, g- S1 ?, ~* \' z  {) e' C4 o! ~$ m
DELAY0: MOV  R7,#250    ;延时500微秒
- i+ @, Q: Q* a' ^, e3 _+ G       DJNZ  R7,$4 w& ^" g# O1 V& y( Q: r
      RET; Z# C* I" c6 F5 i/ z9 \
;---------------------------------------------------- {4 R# X" f# E5 f
;在 LCD 第二行显示字符
6 A% [5 D2 R, t- `8 i- g# w. a8 y0 H;A=ASC DATA, B=LINE X POS. K! ]  {  V# s( U4 o" w) {
;---------------------------------------------------
& n- V! M5 Q7 C+ A& T+ F9 GLCDP2:                   ;在LCD的第二行显示字符
1 W6 W; }; ?' e  r$ Q( \! z       PUSH  ACC       ;
) s' x3 w3 t" l+ `3 K7 K       MOV  A,B       ;设置显示地址3 B3 }, }0 g& y: C: V
      ADD  A,#0C0H    ;设置LCD的第二行地址& g( x- X( h1 c* S7 i7 V8 K
      CALL  WCOM    ;写入命令
3 l& a# }$ W% _! x! h! z       POP  ACC       ;由堆栈取出A
" ^" b8 a2 H" h) d2 _& B       CALL  WDATA    ;写入数据
1 H8 E- |1 P/ p/ T2 j6 N8 n/ K* v       RET7 d3 f7 D5 b& Z: T5 l0 B
;---------------------------------------------------
$ v8 ]* }; A$ f) x0 c8 g0 Q' t2 b; IR 译码子程序
- u( d3 ^4 d4 Q) O7 d& s;---------------------------------------------------
. x) ]; B" L) eIR_IN:             / m; T' N7 }, s7 f7 t% t+ g. F
      MOV R0,#IRCOM
1 m7 z2 [/ M6 z  E, N I1:    JNB  IRIN,I2    ;等待 IR 信号出现
3 a( P% {1 j8 H% ?4 K       JMP  I13 \& D4 `* A, c5 ?; D+ s$ Q) L
I2:    MOV  R4,#20
- D) q; f, G& Z7 C I20:    CALL  DEL4 ~1 f' m7 o/ J
      DJNZ  R4,I20
: t" ]  @! g$ k) J/ T8 S       JB  IRIN,I1       ;确认IR信号出现
# L; u$ u$ Q, v4 O2 M I21:    JB  IRIN,I3       ;等 IR 变为高电平
, n2 p- w2 ^& g! M& E/ c       CALL  DEL8 N/ ?) `* e- j% l
      JMP  I213 n7 `+ O. _8 x  l: P4 }2 [
I3:    MOV  R3,#0       ;8位数清为0. t: P7 K, J9 v1 }
LL:    JNB  IRIN,I4    ;等 IR 变为低电平
  A  c0 v1 j* v7 S       CALL  DEL- J, |7 N& L$ i: Q* A+ }& R
      JMP  LL: Z4 c+ r1 ]- K  Z& {
I4:    JB  IRIN,I5       ;等 IR 变为高电平
* y+ y8 c% h& v8 H) h$ R0 V# ?( A       CALL  DEL
/ @' V5 a, x% n4 V$ H7 i: c* a3 j" T       JMP  I4, \6 f& U6 ~+ X( Q7 `! _0 g' x% r
I5:    MOV  R2,#0       ;0.14ms 计数7 r3 I+ Q" ^8 ]: {+ \
L1:    CALL  DEL
) O9 a6 q9 v5 @. o6 u; \) i) r4 Z       JB  IRIN, N1    ;等 IR 变为高电平, K) V( x" |6 U1 X% o
                           ;IR=0，检查R2中的计数值 - g; f0 T( l9 U. e: j$ C
      MOV  A,#8& Z: u, r) b9 C
      CLR  C& N; s2 A: a- k
      SUBB  A,R2       ;判断高低位
8 p2 K- K4 m( b4 n/ T% j) X; Y- H0 b                            ;IF C=0  BIT=0
$ O6 `- ], j& ^! Z0 r       MOV  A,@R0! m8 E& M6 b2 n. k
      RRC  A
1 j/ a* ?; P' b9 J       MOV  @R0,A       ;处理完一位/ Q2 `# V; w: [1 ~/ t
      INC  R33 G& `' V8 b" \6 H4 Q, f% C
      CJNE  R3,#8,LL    ;需处理完8位  # c8 A* [/ M0 k& `3 d7 l; p& v  r
      MOV  R3,#0! y- {% E$ _' ^+ I
      INC  R0
  F3 c  V& I2 m1 c+ j6 H' L' f       CJNE  R0,#24H,LL ;收集到4字节了' C+ R* I' I" z5 L: e6 f; A
      JMP  OK" n7 f; z1 l; j- E: e
N1:    INC  R2$ [1 I- ]% c* |* d2 w0 J9 K
      CJNE  R2,#30,L1 ;0.14ms 计数过长则时间到自动离开3 Q; q; s9 i0 E" O
OK:    RET; H9 c4 z. Y- ^. w4 `5 O0 Y; {
;--------------------------------------------------------------------. P7 e5 m! ^' l, f% q1 I2 J, w
IR_SHOW:6 j( b& N4 u7 |
      MOV A,22H( o8 W- g5 x/ b4 m" q$ G
      CPL A             ;将22H取反后和23H比较/ |4 l4 u3 b1 g) l
      CJNE A,23H,IR_SHOW1  ;如果不等表示接收数据发生错误,放弃。) q  R) T0 l, A' v- z% y( I, l
      CALL CONV
6 M% u; Y# @" F, E;       CALL  BEEP_BL       ;蜂鸣器鸣响表示解码成功
! w4 _1 j3 U) e# eIR_SHOW1: RET
4 P& z4 z2 K1 Z& l0 N. t;--------------------------------------------------------------------
- g2 ?3 X# m. J' _9 v  x$ r4 I;转换为 ASCII 码并显示
: h- P7 y6 J# I9 V, }8 T;--------------------------------------------------------------------
CONV:
) e" C/ m. Z6 U" w! ~+ }$ O       MOV X,#11       ;设置显示起始位置
; k" u& O4 g; |0 R* \2 Z6 |2 R5 i       MOV A,22H
8 @" r+ ?& O4 X       ANL A,#0F0H    ;取出高四位二进制数
* b9 j& L( {  T7 i% o. L' |       SWAP  A          ;高四位与低四位互换
. r/ h! s) a: [( g! \: Z; r2 O       PUSH  ACC       ;压入堆栈, E4 c6 H7 ^0 j5 ^2 E5 E
      CLR C          ;C=0
: c8 t+ M0 }9 g( S; N       SUBB  A,#0AH    ;减10
" e, J6 j, h* s) [- o- L# t       POP ACC       ;弹出堆栈
0 v2 {  d/ a$ E       JC ASCII0    ;该数小于10，转ASCII0
4 q$ @' I3 ~$ i" Q. T       ADD A,#07H    ;大于10的数加上37H- w# H/ n; T) e/ R' m3 F" R0 V
ASCII0: ADD A,#30H    ;小于10的数加上30H) |3 j2 Z- M; o* ~& W
      MOV B,X
0 O2 l, D) g6 v# Y3 x5 b% Q7 G       CALL  LCDP2
: [2 U" D7 E7 M% `1 h, F4 r3 A
# G# f8 i. G8 E# s) X1 r7 \* t       MOV A,22H$ u! ?" N8 {3 x
      ANL A,#0FH       ;取出低四位二进制数5 u7 n; X, r( f: `5 Q; s# S; f! c
      PUSH  ACC) M: {: n& E& A( y
      CLR C* G4 D1 P9 m. }" K  u7 m7 x2 U
      SUBB  A,#0AH       ;减10, o$ y6 z. O1 v4 V
      POP ACC
& b% x9 M9 {  l1 g6 ]' x+ |       JC ASCII1       ;该数小于10，转ASCII0
5 {6 q: ?5 o3 ]% o& z       ADD A,#07H       ;大于10的数加上37H
; q' n# P0 ^. \- [) Z% gASCII1: ADD A,#30H       ;小于10的数加上30H# l5 L- E- q5 C' f* [
      INC X% c1 D! O& b4 H' t9 M
      MOV B,X
; x0 K$ d" @! _5 z7 n5 O9 z       CALL  LCDP2
5 Y! j  d, j- H' E% U3 J2 r       RET( l" e1 p" \7 R* K) e. x% x
;--------------------------------------------------------
6 Z& M' Q* N! ~' F;蜂鸣器响一声子程序) w1 {# X7 n' ~; F: a
;--------------------------------------------------------2 F7 e7 d, U$ V  T
BEEP_BL:* J1 ~  u; p- F/ B$ R
      MOV  R6,#100$ }0 j0 ?& Q* P
  BL1: CALL  DEX1
% |) L! \: `; j;       CPL  BEEP: b0 W5 d- `) l! Y
      DJNZ  R6,BL1, a. t$ x/ `1 `) A( U- F1 V
      MOV  R5,#25
8 r- R* O5 g# m+ r6 |7 u       CALL  DELAY
# {; m, F6 m9 b. @" @- L       RET
2 T/ F9 a0 M# M! p* E" x DEX1: MOV  R7,#180+ \$ ]$ l; E8 {7 h$ \" y" R' |0 `# w
DEX2: NOP% h0 O/ @0 C4 c* m3 B
      DJNZ  R7,DEX2
: V9 n  M0 g  f7 e  C1 k       RET2 F" o2 e( M" p) u: d8 \* D
DELAY:                   ;延时R5×10MS
# r# s) U( J) z2 S4 G* u" w2 \$ E) D5 _       MOV  R6,#50
: v5 ]% g: j9 l; @  V  D1: MOV  R7,#100
9 r9 f+ k, z6 k% N" _/ c0 I8 G+ {       DJNZ  R7,$
1 S6 f0 Q0 B* b       DJNZ  R6,D1
5 [5 }0 s% X  C1 C, J2 L       DJNZ  R5,DELAY
; t* l3 l% R- n8 r
# A+ V+ a' V, O3 x
' V& w2 F/ E$ v6 q…………限于本文篇幅余下代码请从论坛下载附件…………) p' R3 L7 `6 @5 x. Z; z

游客，如果您要查看本帖隐藏内容请回复
0 o. q- L. m# C! r" M

- [; x; H1 J& {- o* w

! E/ |) B" s; n5 w- J5 @' C8 m* G! {4 H' D

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

厉害了学习一下

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

看看楼主的代码

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

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

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1