找回密码
 注册
关于网站域名变更的通知
查看: 437|回复: 5
打印 上一主题 下一主题

NRF24L01一对一发送51单片机代码

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2018-12-4 09:35 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

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

x
NRF24L01一对一发送51单片机代码  L% {( L/ w( }  w, c
& o) `+ ~" h/ |& L' d
#include"reg52.h"
. E% j; a9 q7 c1 h  A#include "INT.h"% K3 P# o$ j. @* Z9 g+ y( `* f
#include "BUZZER.h", ~1 A! b! F* d( \
#include "1602.h"
9 Y' j. l: x: ~+ Z1 C#include "nRF24L01.h"
0 r1 m$ I$ W' [. }) n% e, u, c& s. q' N5 L+ V% y) }6 L4 T! n) X
uchar Tstatus,FLAG_IRQ=0;
( s  h! m  ]6 F# M/ U
% A  ]4 w8 \4 V8 u5 E: ]4 J9 Avoid Test_Disp(uchar temp)4 F4 f7 [+ V, z2 {# h
{
0 m6 k) u- r1 @  C; Q1 v        uchar a,b,c;
6 ^& T5 V1 V' h$ S* N4 w0 g7 F        a=temp/100;) _/ a0 r% F% C$ P3 c/ O
        b=temp%100/10;
5 Y8 }3 R# B+ k" r9 V/ ?+ M        c=temp%10;- t. p/ S6 R* O/ G/ L
        write_date(a+48);
' H  |# Z- i( I$ s$ O        write_date(b+48);
# b; ]* I+ S9 _5 E. h  J1 `8 `        write_date(c+48);0 [5 K1 c: i& O& c; R, m+ j- M
}
! U: R7 {/ v6 u8 Q( ^- u, Svoid main(void)3 a9 a5 ^, V! d* V! F' `
{                                                                        
) H. u! m5 T. Y6 c7 h        INT_INIT();  y! X/ N' e) N5 K) a
        init_lcd1602();% u% ~8 T9 W" E% d# Z# m
//        write_date('a');  K6 ~' C, i* |+ ]# h3 ^6 b1 h, k
        nRF_TX_Mode();: y" d5 Z  l& b" n, S1 h! O! F5 f% H( b
        nRF_Send();
+ V, c; ~# }  f1 v* c3 }        Tstatus=nRF_RD_Reg(RF_CH);
9 I( \& _# `1 {        Test_Disp(Tstatus);. W$ E- j5 H6 s8 D
        Tstatus=nRF_RD_Reg(NRFRegSTATUS);* y% Z  n6 F) m1 I" i: d( f
        Test_Disp(Tstatus);/ l7 {2 d. G8 b
        while(1)
* P* Q5 ]8 j: q' X  u        {- n# Z! Q2 O: @- K: j% s
                /*if(FLAG_IRQ==1)
2 m/ N) W/ N+ T/ T                {
; f( g% {4 Q$ W; G                        FLAG_IRQ=0;: {$ h. z; C# _9 v9 [
                        Tstatus=nRF_RD_Reg(NRFRegSTATUS);
- B  U$ |3 U8 V                        Test_Disp(Tstatus);- K, t3 T7 t& D+ e
                        if(Tstatus&0x20)! X8 [7 o0 p' f5 u
                        {
5 B" \' Q" ^3 O1 @# k8 g                        //        BUZZER_SOUND_NORMAL();2 D- B" z$ Z0 H0 V6 J
                                nRF_WR_Reg(WRITE_REG+NRFRegSTATUS, 0x2e);
8 y$ d% z1 X, j4 W; v5 Z, N                        }
* a; L3 u' p  l' D4 |                //        nRF_Send();
0 W) n( k5 s; M' S! j& y$ O" Q                        Delay_T();        
4 `3 Q5 c7 p5 ^/ s, T                }  */
, E3 G6 |4 p  @3 i        }                   Q4 ?/ u7 h4 y& C4 O  _
}
3 J! N0 {0 G+ |* a; e+ H% i% p/ Cvoid IRQ_nRF(void) interrupt 0
! \# Q6 T# ]2 N& O{1 E' K# j5 q8 ?$ A; n
        EX0=0;. ]3 ?4 Y* q) T$ C# [' h% r
        Delay_uRF(1);
* A: _3 I: j) C8 M( P$ s: W        if(IRQ==0)  K$ r6 q  p+ J! Y  I
        {3 A5 r+ @! _' _# G
                BUZZER_SOUND_NORMAL();8 r* T2 n  H4 R
                FLAG_IRQ=1;! b! [: g  {8 l7 Y  }/ q( r& X
        }
3 }6 T. F; w! O# S( a! Y        EX0=1;
! w8 m: x& `% Q6 a; w3 c$ W}
/ Q7 l- H/ K# Y. E, c! w
游客,如果您要查看本帖隐藏内容请回复
6 n. y* F$ v6 t7 n  S/ B% T

9 \: _! ]' U2 W/ T+ H& u

该用户从未签到

2#
发表于 2018-12-4 10:18 | 只看该作者
路过捧场,谢谢分享!

该用户从未签到

4#
发表于 2019-2-26 17:33 | 只看该作者
看看楼主的代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-6-18 22:15 , Processed in 0.078125 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表