设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › HMC5883L电子指南针单片机程序
返回列表 发新帖
查看: 9333|回复: 10
打印 上一主题 下一主题
收起左侧

HMC5883L电子指南针单片机程序

  [复制链接]
跳转到指定楼层
楼主
ID:127035 发表于 2016-12-19 21:19 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
HMC5883L电子指南针
完整的单片机源程序下载：
2014年6月7日 指南针 1602.rar (45.92 KB, 下载次数: 187)

预览：
  1. #include <reg52.h>                 //调用单片机头文件
  2. #define uchar unsigned char  //无符号字符型 宏定义        变量范围0~255
  3. #define uint  unsigned int         //无符号整型 宏定义        变量范围0~65535
  4. #include  <math.h>    //Keil library  
  5. #include  <stdio.h>   //Keil library        
  6. #include  <INTRINS.H>

  8. sbit rs=P2^3;         //寄存器选择信号 H:数据寄存器          L:指令寄存器
  9. sbit rw=P2^4;         //寄存器选择信号 H:数据寄存器          L:指令寄存器
  10. sbit e =P2^5;         //片选信号   下降沿触发

  12. sbit SCL=P1^1;      //IIC时钟引脚定义
  13. sbit SDA=P1^0;      //IIC数据引脚定义

  15. #define        SlaveAddress   0x3C                 //定义器件在IIC总线中的从地址
  16. uchar BUF[8];                        //接收数据缓存区              
  17. uchar ge,shi,bai,qian,wan;           //显示变量
  18. int  dis_data;                       //变量

  20. /******************1ms 延时函数*******************/
  21. void delay_1ms(uint q)
  22. {
  23.         uint i,j;
  24.         for(i=0;i<q;i++)
  25.                 for(j=0;j<120;j++);
  26. }


  29. /***********************延时函数************************/
  30. void delay_uint(uint q)
  31. {
  32.         while(q--);
  33. }

  35. /**************************************
  36. 延时5微秒(STC90C52RC@12M)
  37. 不同的工作环境,需要调整此函数，注意时钟过快时需要修改
  38. 当改用1T的MCU时,请调整此延时函数
  39. **************************************/
  40. void Delay5us()
  41. {
  42.              _nop_();_nop_();_nop_();_nop_();
  43.              _nop_();_nop_();_nop_();_nop_();
  44.         _nop_();_nop_();_nop_();_nop_();
  45.         _nop_();_nop_();_nop_();_nop_();
  46.               _nop_();_nop_();_nop_();_nop_();
  47.         _nop_();_nop_();_nop_();_nop_();
  48.         _nop_();_nop_();_nop_();_nop_();
  49.              _nop_();_nop_();_nop_();_nop_();

  51. }

  53. /***********************lcd1602写命令函数************************/
  54. void write_com(uchar com)
  55. {
  56.         e=0;
  57.         rs=0;
  58.         rw=0;
  59.         P0=com;
  60.         delay_uint(3);
  61.         e=1;
  62.         delay_uint(25);
  63.         e=0;
  64. }

  66. /***********************lcd1602写数据函数************************/
  67. void write_data(uchar dat)
  68. {
  69.         e=0;
  70.         rs=1;
  71.         rw=0;
  72.         P0=dat;
  73.         delay_uint(3);
  74.         e=1;
  75.         delay_uint(25);
  76.         e=0;        
  77. }

  79. /***********************lcd1602上显示特定的字符************************/
  80. void write_zifu(uchar hang,uchar add,uchar date)
  81. {
  82.         if(hang==1)   
  83.                 write_com(0x80+add);
  84.         else
  85.                 write_com(0x80+0x40+add);
  86.         write_data(date);        
  87. }

  89. /***********************lcd1602上显示这字符函数************************/
  90. void write_string(uchar hang,uchar add,uchar *p)
  91. {
  92.         if(hang==1)   
  93.                 write_com(0x80+add);
  94.         else
  95.                 write_com(0x80+0x40+add);
  96.         while(1)                                                                                                                 
  97.         {
  98.                 if(*p == '\0')  break;
  99.                 write_data(*p);
  100.                 p++;
  101.         }        
  102. }


  105. /***********************lcd1602初始化设置************************/
  106. void init_1602()         //lcd1602初始化设置
  107. {
  108.         write_com(0x38);        //
  109.         write_com(0x0c);
  110.         write_com(0x06);
  111.         delay_uint(1000);
  112.         write_string(1,0,"  zhi nan zhen ");               
  113.         write_string(2,0,"               ");        
  114.         write_zifu(2,11,0xdf);  //显示度        
  115. }

  117. /***********************lcd1602上显示两位十进制数************************/
  118. void write_jiaodu(uchar hang,uchar add,uint date)
  119. {
  120.         if(hang==1)   
  121.                 write_com(0x80+add);
  122.         else
  123.                 write_com(0x80+0x40+add);
  124.         write_data(0x30+date/1000%10);
  125.         write_data(0x30+date/100%10);
  126.         write_data(0x30+date/10%10);
  127.         write_data('.');
  128.         write_data(0x30+date%10);        
  129. }

  131. /**************************************
  132. 起始信号
  133. **************************************/
  134. void HMC5883_Start()
  135. {
  136.     SDA = 1;                    //拉高数据线
  137.     Delay5us();                 //延时
  138.     SDA = 0;                    //产生下降沿
  139.     Delay5us();                 //延时
  140.     SCL = 0;                    //拉低时钟线
  141. }

  143. /**************************************
  144. 停止信号
  145. **************************************/
  146. void HMC5883_Stop()
  147. {
  148.     SDA = 0;                    //拉低数据线
  149.     SCL = 1;                    //拉高时钟线
  150.     Delay5us();                 //延时
  151.     SDA = 1;                    //产生上升沿
  152.     Delay5us();                 //延时
  153. }

  155. /**************************************
  156. 发送应答信号
  157. 入口参数:ack (0:ACK 1:NAK)
  158. **************************************/
  159. void HMC5883_SendACK(bit ack)
  160. {
  161.     SDA = ack;                  //写应答信号
  162.     SCL = 1;                    //拉高时钟线
  163.     Delay5us();                 //延时
  164.     SCL = 0;                    //拉低时钟线
  165.     Delay5us();                 //延时
  166. }

  168. /**************************************
  169. 接收应答信号
  170. **************************************/
  171. bit HMC5883_RecvACK()
  172. {
  173.     SCL = 1;                    //拉高时钟线
  174.     Delay5us();                 //延时
  175.     CY = SDA;                   //读应答信号
  176.     SCL = 0;                    //拉低时钟线
  177.     Delay5us();                 //延时

  179.     return CY;
  180. }

  182. /**************************************
  183. 向IIC总线发送一个字节数据
  184. **************************************/
  185. void HMC5883_SendByte(uchar dat)
  186. {
  187.     uchar i;

  189.     for (i=0; i<8; i++)         //8位计数器
  190.     {
  191.         dat <<= 1;              //移出数据的最高位
  192.         SDA = CY;               //送数据口
  193.         SCL = 0;                //拉高时钟线
  194.         Delay5us();             //延时
  195.         SCL = 1;                //拉低时钟线
  196.         Delay5us();             //延时
  197.     }
  198.     HMC5883_RecvACK();
  199. }

  201. /**************************************
  202. 从IIC总线接收一个字节数据
  203. **************************************/
  204. uchar HMC5883_RecvByte()
  205. {
  206.     uchar i;
  207.     uchar dat = 0;

  209.     SDA = 1;                    //使能内部上拉,准备读取数据,
  210.     for (i=0; i<8; i++)         //8位计数器
  211.     {
  212.         dat <<= 1;
  213.         SCL = 1;                //拉高时钟线
  214.         Delay5us();             //延时
  215.         dat |= SDA;             //读数据               
  216.         SCL = 0;                //拉低时钟线
  217.         Delay5us();             //延时
  218.     }
  219.     return dat;
  220. }

  222. //***************************************************

  224. void Single_Write_HMC5883(uchar REG_Address,uchar REG_data)
  225. {
  226.     HMC5883_SendByte(SlaveAddress);   //发送设备地址+写信号
  227.     HMC5883_SendByte(REG_Address);    //内部寄存器地址，请参考中文pdf
  228.     HMC5883_SendByte(REG_data);       //内部寄存器数据，请参考中文pdf
  229. }

  231. //******************************************************
  232. //
  233. //连续读出HMC5883内部角度数据，地址范围0x3~0x8
  234. //
  235. //******************************************************
  236. void Multiple_read_HMC5883(void)
  237. {   uchar i;
  238.     HMC5883_Start();                          //起始信号
  239.     HMC5883_SendByte(SlaveAddress);           //发送设备地址+写信号
  240.     HMC5883_SendByte(0x03);                   //发送存储单元地址，从0x3开始        
  241.     HMC5883_Start();                          //起始信号
  242.     HMC5883_SendByte(SlaveAddress+1);         //发送设备地址+读信号
  243.         for (i=0; i<6; i++)                      //连续读取6个地址数据，存储中BUF
  244.     {
  245.         BUF[i] = HMC5883_RecvByte();          //BUF[0]存储数据
  246.         if (i == 5)
  247.         {
  248.            HMC5883_SendACK(0);                //最后一个数据需要回NOACK
  249.         }
  250.         else
  251.         {
  252.           HMC5883_SendACK(1);                //回应ACK
  253.        }
  254.    }
  255.     delay_1ms(5);
  256. }

  258. //初始化HMC5883，根据需要请参考pdf进行修改****
  259. void Init_HMC5883()
  260. {
  261.      Single_Write_HMC5883(0x02,0x00);  //
  262. }


  265. /*****************主函数********************/
  266. void main()
  267. {        
  268.     int x,y,z,jiadu;
  269.     double angle;
  270.         P0 = P1 = P2 = P3 = 0xff;                //单片机IO口初始化为1
  271.     Init_HMC5883();
  272.         init_1602();                 //lcd1602初始化
  273.         while(1)
  274.         {   
  275.             Multiple_read_HMC5883();      //连续读出数据，存储在BUF中
  276.         //---------显示X轴
  277.             x=BUF[0] << 8 | BUF[2]; //Combine MSB and LSB of X Data output register
  278.             z=BUF[2] << 8 | BUF[4]; //Combine MSB and LSB of Z Data output register
  279.         
  280.             angle= atan2((double)y,(double)x) * (180 / 3.14); // angle in degrees
  281.                 jiadu = angle;
  282.                 write_jiaodu(2,6,angle);        //显示角度
  283.                 if((angle >= 3380) || (angle <= 220))          //北 N
  284.                         write_string(2,0,"  N  ");        
  285.                 if((angle >= 230) && (angle <= 670))          //东 北
  286.                         write_string(2,0," E N ");        
  287.                 if((angle >= 680) && (angle <= 1120))          //东 E
  288.                         write_string(2,0,"  E  ");        
  289.                 if((angle >= 1130) && (angle <= 1570))          //东 南
  290.                         write_string(2,0," E S ");        
  291.                 if((angle >= 1580) && (angle <= 2010))          //南  S
  292.                         write_string(2,0,"  S  ");        
  293.                 if((angle >= 2020) && (angle <= 2460))          //西 南  
  294.                         write_string(2,0," W S ");        
  295.                 if((angle >= 2470) && (angle <= 2910))          //西  W  
  296.                         write_string(2,0,"  W  ");        
  297.                 if((angle >= 2920) && (angle <= 3360))          //西  北  
  298.                         write_string(2,0," W N  ");        
  299.                 delay_1ms(300);

  301.         }
  302. }
复制代码


指南针, 程序, 电子
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶顶 踩踩

相关帖子
回复

使用道具 举报

沙发
ID:1 发表于 2017-1-3 00:01 | 只看该作者
51黑有你更精彩！！！
回复

使用道具 举报

板凳
ID:198094 发表于 2017-5-8 14:58 | 只看该作者
大神您好，能帮忙解释一下如下程序中，角度值为什么这样设置吗？

angle= atan2((double)y,(double)x) * (180 / 3.14); // angle in degrees
                jiadu = angle;
                write_jiaodu(2,6,angle);        //显示角度
                if((angle >= 3380) || (angle <= 220))          //北 N
                        write_string(2,0,"  N  ");        
                if((angle >= 230) && (angle <= 670))          //东 北
                        write_string(2,0," E N ");        
                if((angle >= 680) && (angle <= 1120))          //东 E
                        write_string(2,0,"  E  ");        
                if((angle >= 1130) && (angle <= 1570))          //东 南
                        write_string(2,0," E S ");        
                if((angle >= 1580) && (angle <= 2010))          //南  S
                        write_string(2,0,"  S  ");        
                if((angle >= 2020) && (angle <= 2460))          //西 南  
                        write_string(2,0," W S ");        
                if((angle >= 2470) && (angle <= 2910))          //西  W  
                        write_string(2,0,"  W  ");        
                if((angle >= 2920) && (angle <= 3360))          //西  北  
                        write_string(2,0," W N  ");        
                delay_1ms(300);
回复

使用道具 举报

地板
ID:198094 发表于 2017-5-8 15:02 | 只看该作者
大神麻烦解释一下如下程序中，东西南北角度值为何这样设呢？

angle= atan2((double)y,(double)x) * (180 / 3.14); // angle in degrees
                jiadu = angle;
                write_jiaodu(2,6,angle);        //显示角度
                if((angle >= 3380) || (angle <= 220))          //北 N
                        write_string(2,0,"  N  ");        
                if((angle >= 230) && (angle <= 670))          //东 北
                        write_string(2,0," E N ");        
                if((angle >= 680) && (angle <= 1120))          //东 E
                        write_string(2,0,"  E  ");        
                if((angle >= 1130) && (angle <= 1570))          //东 南
                        write_string(2,0," E S ");        
                if((angle >= 1580) && (angle <= 2010))          //南  S
                        write_string(2,0,"  S  ");        
                if((angle >= 2020) && (angle <= 2460))          //西 南  
                        write_string(2,0," W S ");        
                if((angle >= 2470) && (angle <= 2910))          //西  W  
                        write_string(2,0,"  W  ");        
                if((angle >= 2920) && (angle <= 3360))          //西  北  
                        write_string(2,0," W N  ");        
                delay_1ms(300);
回复

使用道具 举报

5#
ID:204529 发表于 2017-5-24 22:37 | 只看该作者
貌似这个程序不好用！
回复

使用道具 举报

6#
ID:229064 发表于 2017-9-12 19:55 | 只看该作者
感谢 您对资源的分享！！！！！
回复

使用道具 举报

7#
ID:225984 发表于 2018-3-31 11:27 | 只看该作者
非常66666，正好用得到
回复

使用道具 举报

8#
ID:316962 发表于 2018-5-6 17:34 | 只看该作者
为什么那个显示的角度不会变呢
回复

使用道具 举报

9#
ID:326147 发表于 2018-5-9 18:12 | 只看该作者
有用！
回复

使用道具 举报

10#
ID:63090 发表于 2020-4-12 13:58 | 只看该作者
角度竟然是固定的18度，怎么转动传感器都不会变啊，这程序有问题啊
回复

使用道具 举报

11#
ID:348295 发表于 2020-5-11 16:50 | 只看该作者
请问我按上面程序载入，只显示 18度，值不会变
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

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