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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 手机蓝牙控制的计算器
返回列表 发新帖
查看: 1679|回复: 0
打印 上一主题 下一主题
收起左侧

手机蓝牙控制的计算器

[复制链接]
跳转到指定楼层
楼主
ID:311395 发表于 2018-4-19 09:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
手机蓝牙控制的计算器
上学期电子设计课程做的
想拿几个币下资料！！

单片机源程序如下:
  1. #include <reg52.h>
  2. #include <stdlib.h>
  3. #include <intrins.h>
  4. #include <stdio.h>

  6. #define uchar unsigned char
  7. #define uint  unsigned int
  8. sbit CS  = P1^5;
  9. sbit SCK = P1^7;
  10. sbit SID = P1^6;
  11. sbit Key = P1^1;
  12. uchar code AC_TABLE[]={
  13. 0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,      //第一行汉字位置
  14. 0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,      //第二行汉字位置
  15. 0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f,      //第三行汉字位置
  16. 0x98,0x99,0x9a,0x9b,0x9c,0x9d,0x9e,0x9f,      //第四行汉字位置
  17. };
  18. uchar code str2[]="欢迎光临!";
  19. uchar code str1[]="白日依山尽，    黄河入海流。    欲穷千里目，    更上一层楼。    ";
  20. uchar code bmp1[];

  22. /******************************************************************************************
  23. * 函数名称    ：SendByte
  24. * 功能描述    ：串口发送一个字节
  25. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  26. *
  27. * 返回值      ：
  28. * 作者        ：
  29. * 创建日期    ：2006-12-19
  30. * 全局变量    ：
  31. * 全局静态变量：
  32. * 局部静态变量：
  33. *----------------------------------------修改历史------------------------------------------
  34. * 当前版本    ：     修改人：                  修改日期：
  35. * 修改说明    ：
  36. ******************************************************************************************/
  37. void SendByte(uchar Dbyte)
  38. {
  39.      uchar i;
  40.      for(i=0;i<8;i++)
  41.      {
  42.            SCK = 0;
  43.            Dbyte=Dbyte<<1;      //左移一位
  44.            SID = CY;            //移出的位给SID
  45.            SCK = 1;
  46.            SCK = 0;
  47.      }
  48. }

  50. /******************************************************************************************
  51. * 函数名称    ：ReceiveByte
  52. * 功能描述    ：串口接收一个字节
  53. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  54. * 仅在读取数据的时候用到
  55. * 而读出的数据是一次只能读出4bit的
  56. * 返回值      ：
  57. * 作者        ：
  58. * 创建日期    ：2006-12-19
  59. * 全局变量    ：
  60. * 全局静态变量：
  61. * 局部静态变量：
  62. *----------------------------------------修改历史------------------------------------------
  63. * 当前版本    ：     修改人：                  修改日期：
  64. * 修改说明    ：
  65. ******************************************************************************************/
  66. uchar ReceiveByte(void)
  67. {
  68.      uchar i,temp1,temp2;
  69.      temp1 = 0;
  70.      temp2 = 0;
  71.      for(i=0;i<8;i++)
  72.      {
  73.            temp1=temp1<<1;
  74.            SCK = 0;
  75.            SCK = 1;            
  76.            SCK = 0;
  77.            if(SID) temp1++;
  78.      }
  79.      for(i=0;i<8;i++)
  80.      {
  81.            temp2=temp2<<1;
  82.            SCK = 0;
  83.            SCK = 1;
  84.            SCK = 0;
  85.            if(SID) temp2++;
  86.      }
  87.      return ((0xf0&temp1)+(0x0f&temp2));
  88. }
  89. /******************************************************************************************
  90. * 函数名称    ：CheckBusy
  91. * 功能描述    ：
  92. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  93. *
  94. * 返回值      ：
  95. * 作者        ：
  96. * 创建日期    ：2006-12-19
  97. * 全局变量    ：
  98. * 全局静态变量：
  99. * 局部静态变量：
  100. *----------------------------------------修改历史------------------------------------------
  101. * 当前版本    ：     修改人：                  修改日期：
  102. * 修改说明    ：
  103. ******************************************************************************************/
  104. void CheckBusy( void )
  105. {
  106.      do   SendByte(0xfc);      //11111,RW(1),RS(0),0
  107.      while(0x80&ReceiveByte());      //BF(.7)=1 Busy
  108. }
  109. /******************************************************************************************
  110. * 函数名称    ：WriteCommand
  111. * 功能描述    ：
  112. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  113. *
  114. * 返回值      ：
  115. * 作者        ：
  116. * 创建日期    ：2006-12-19
  117. * 全局变量    ：
  118. * 全局静态变量：
  119. * 局部静态变量：
  120. *----------------------------------------修改历史------------------------------------------
  121. * 当前版本    ：     修改人：                  修改日期：
  122. * 修改说明    ：
  123. ******************************************************************************************/
  124. void WriteCommand(uchar Cbyte )
  125. {
  126.      CS = 1;
  127.      CheckBusy();
  128.      SendByte(0xf8);            //11111,RW(0),RS(0),0
  129.      SendByte(0xf0&Cbyte);      //高四位
  130.      SendByte(0xf0&Cbyte<<4);//低四位(先执行<<)
  131.      CS = 0;
  132. }
  133. /******************************************************************************************
  134. * 函数名称    ：WriteData
  135. * 功能描述    ：
  136. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  137. *
  138. * 返回值      ：
  139. * 作者        ：
  140. * 创建日期    ：2006-12-19
  141. * 全局变量    ：
  142. * 全局静态变量：
  143. * 局部静态变量：
  144. *----------------------------------------修改历史------------------------------------------
  145. * 当前版本    ：     修改人：                  修改日期：
  146. * 修改说明    ：
  147. ******************************************************************************************/
  148. void WriteData(uchar Dbyte )
  149. {
  150.      CS = 1;
  151.      CheckBusy();
  152.      SendByte(0xfa);            //11111,RW(0),RS(1),0
  153.      SendByte(0xf0&Dbyte);      //高四位
  154.      SendByte(0xf0&Dbyte<<4);//低四位(先执行<<)
  155.      CS = 0;
  156. }
  157. /******************************************************************************************
  158. * 函数名称    ：ReadData
  159. * 功能描述    ：
  160. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  161. *
  162. * 返回值      ：
  163. * 作者        ：
  164. * 创建日期    ：2006-12-19
  165. * 全局变量    ：
  166. * 全局静态变量：
  167. * 局部静态变量：
  168. *----------------------------------------修改历史------------------------------------------
  169. * 当前版本    ：     修改人：                  修改日期：
  170. * 修改说明    ：
  171. ******************************************************************************************
  172. uchar ReadData( void )
  173. {
  174.      CheckBusy();
  175.      SendByte(0xfe);            //11111,RW(1),RS(1),0
  176.      return ReceiveByte();
  177. }
  178. /******************************************************************************************
  179. * 函数名称    ：Delay
  180. * 功能描述    ：
  181. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  182. *
  183. * 返回值      ：
  184. * 作者        ：
  185. * 创建日期    ：2006-12-19
  186. * 全局变量    ：
  187. * 全局静态变量：
  188. * 局部静态变量：
  189. *----------------------------------------修改历史------------------------------------------
  190. * 当前版本    ：     修改人：                  修改日期：
  191. * 修改说明    ：
  192. ******************************************************************************************/
  193. void Delay(uint MS)
  194. {
  195.      uchar us,usn;
  196.      while(MS!=0)            //for 12M
  197.       {
  198.          usn = 2;
  199.          while(usn!=0)
  200.           {
  201.             us = 0xf5;
  202.             while (us!=0)
  203.              {
  204.                us--;
  205.              };
  206.             usn--;
  207.            }
  208.          MS--;
  209.       }
  210. }
  211. /******************************************************************************************
  212. * 函数名称    ：DelayKey
  213. * 功能描述    ：
  214. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  215. *
  216. * 返回值      ：
  217. * 作者        ：
  218. * 创建日期    ：2006-12-19
  219. * 全局变量    ：
  220. * 全局静态变量：
  221. * 局部静态变量：
  222. *----------------------------------------修改历史------------------------------------------
  223. * 当前版本    ：     修改人：                  修改日期：
  224. * 修改说明    ：
  225. ******************************************************************************************/
  226. void DelayKey(uint Second , uint MS100)
  227. {                              //输入精确到0.1S,是用","
  228.      uint i;
  229.      for(i=0;i<Second*100+MS100*10;i++)
  230.      {
  231.            if(Key==0)
  232.            {
  233.                  Delay(20);
  234.                  while(Key==0)
  235.                    {
  236.                     Delay(20);
  237.                    }
  238.                  break;
  239.            }
  240.            else Delay(10);
  241.      }
  242. }
  243. /******************************************************************************************
  244. * 函数名称    ：LcmInit
  245. * 功能描述    ：
  246. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  247. *
  248. * 返回值      ：
  249. * 作者        ：
  250. * 创建日期    ：2006-12-19
  251. * 全局变量    ：
  252. * 全局静态变量：
  253. * 局部静态变量：
  254. *----------------------------------------修改历史------------------------------------------
  255. * 当前版本    ：     修改人：                  修改日期：
  256. * 修改说明    ：
  257. ******************************************************************************************/
  258. void LcmInit( void )
  259. {
  260.      WriteCommand(0x30);      //8BitMCU,基本指令集合
  261.      WriteCommand(0x03);      //AC归0,不改变DDRAM内容
  262.      WriteCommand(0x0C);      //显示ON,游标OFF,游标位反白OFF
  263.      WriteCommand(0x01);      //清屏,AC归0
  264.      WriteCommand(0x06);      //写入时,游标右移动
  265. }

  267. /******************************************************************************************
  268. * 函数名称    ：LcmClearTXT
  269. * 功能描述    ：文本区清RAM函数
  270. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  271. *
  272. * 返回值      ：
  273. * 作者        ：
  274. * 创建日期    ：2006-12-19
  275. * 全局变量    ：
  276. * 全局静态变量：
  277. * 局部静态变量：
  278. *----------------------------------------修改历史------------------------------------------
  279. * 当前版本    ：     修改人：                  修改日期：
  280. * 修改说明    ：
  281. ******************************************************************************************/
  282. void LcmClearTXT( void )
  283. {
  284.      uchar i;
  285.      WriteCommand(0x30);      //8BitMCU,基本指令集合
  286.      WriteCommand(0x80);      //AC归起始位
  287.      for(i=0;i<64;i++)
  288.      WriteData(0x20);
  289. }

  291. /******************************************************************************************
  292. * 函数名称    ：LcmClearBMP
  293. * 功能描述    ：图形区清RAM函数
  294. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  295. * 图形区和文本区显示在两个不同的RAM区
  296. * 返回值      ：
  297. * 作者        ：
  298. * 创建日期    ：2006-12-19
  299. * 全局变量    ：
  300. * 全局静态变量：
  301. * 局部静态变量：
  302. *----------------------------------------修改历史------------------------------------------
  303. * 当前版本    ：     修改人：                  修改日期：
  304. * 修改说明    ：
  305. ******************************************************************************************/
  306. void LcmClearBMP( void )
  307. {
  308.      uchar i,j;
  309.      WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
  310.      WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
  311.      for(i=0;i<32;i++)            //12864实际为256x32
  312.      {
  313.            WriteCommand(0x80|i);      //行位置
  314.            WriteCommand(0x80);      //列位置
  315.            for(j=0;j<32;j++)            //256/8=32 byte
  316.                 WriteData(0);
  317.      }
  318. }
  319. /******************************************************************************************
  320. * 函数名称    ：PutStr
  321. * 功能描述    ：
  322. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  323. *
  324. * 返回值      ：
  325. * 作者        ：
  326. * 创建日期    ：2006-12-19
  327. * 全局变量    ：
  328. * 全局静态变量：
  329. * 局部静态变量：
  330. *----------------------------------------修改历史------------------------------------------
  331. * 当前版本    ：     修改人：                  修改日期：
  332. * 修改说明    ：
  333. ******************************************************************************************/
  334. void PutStr(uchar row,uchar col,uchar *puts)
  335. {
  336.      WriteCommand(0x30);      //8BitMCU,基本指令集合
  337.      WriteCommand(AC_TABLE[8*row+col]);      //起始位置
  338.      while(*puts != '\0')      //判断字符串是否显示完毕
  339.      {
  340.            if(col==8)            //判断换行
  341.            {            //若不判断,则自动从第一行到第三行
  342.                  col=0;
  343.                  row++;
  344.            }
  345.            if(row==4) row=0;      //一屏显示完,回到屏左上角
  346.            WriteCommand(AC_TABLE[8*row+col]);
  347.            WriteData(*puts);      //一个汉字要写两次
  348.            puts++;
  349.            WriteData(*puts);
  350.            puts++;
  351.            col++;
  352.      }
  353. }
  354. /******************************************************************************************
  355. * 函数名称    ：PutBMP
  356. * 功能描述    ：
  357. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  358. *
  359. * 返回值      ：
  360. * 作者        ：
  361. * 创建日期    ：2006-12-19
  362. * 全局变量    ：
  363. * 全局静态变量：
  364. * 局部静态变量：
  365. *----------------------------------------修改历史------------------------------------------
  366. * 当前版本    ：     修改人：                  修改日期：
  367. * 修改说明    ：
  368. ******************************************************************************************/
  369. void PutBMP(uchar *puts)
  370. {
  371.      uint x=0;
  372.      uchar i,j;
  373.      WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
  374.      WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
  375.      for(i=0;i<32;i++)            //12864实际为256x32
  376.      {
  377.            WriteCommand(0x80|i);      //行位置
  378.            WriteCommand(0x80);      //列位置
  379.            for(j=0;j<32;j++)      //256/8=32 byte
  380.            {            //列位置每行自动增加
  381.                  WriteData(puts[x]);
  382.                  x++;
  383.            }
  384.      }
  385. }
  386. /******************************************************************************************
  387. * 函数名称    ：DisplayDots
  388. * 功能描述    ：
  389. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  390. *
  391. * 返回值      ：
  392. * 作者        ：
  393. * 创建日期    ：2006-12-19
  394. * 全局变量    ：
  395. * 全局静态变量：
  396. * 局部静态变量：
  397. *----------------------------------------修改历史------------------------------------------
  398. * 当前版本    ：     修改人：                  修改日期：
  399. * 修改说明    ：
  400. ******************************************************************************************/
  401. void DisplayDots(uchar DotByte)
  402. {
  403.      uchar i,j;
  404.      WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
  405.      WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
  406.      for(i=0;i<32;i++)            //12864实际为256x32
  407.      {
  408.            WriteCommand(0x80|i);      //行位置
  409.            WriteCommand(0x80);      //列位置
  410.            for(j=0;j<32;j++)      //256/8=32 byte
  411.            {            //列位置每行自动增加
  412.               WriteData(DotByte);                  
  413.            }
  414.            DotByte=~DotByte;
  415.      }
  416. }
  417. /******************************************************************************************
  418. * 函数名称    ：
  419. * 功能描述    ：
  420. * 参数        ：  参数名称： 输入/输出？ 类型  描述
  421. *
  422. * 返回值      ：
  423. * 作者        ：
  424. * 创建日期    ：2006-12-19
  425. * 全局变量    ：
  426. * 全局静态变量：
  427. * 局部静态变量：
  428. *----------------------------------------修改历史------------------------------------------
  429. * 当前版本    ：     修改人：                  修改日期：
  430. * 修改说明    ：
  431. ******************************************************************************************/
  432. void main( void )
  433. {
  434.      Delay(100);      //等待复位
  435.      LcmInit();
  436.      LcmClearTXT();
  437.      LcmClearBMP();
  438.      while(1)
  439.      {
  440.            LcmClearTXT();
  441.            PutBMP(bmp1);
  442.            DelayKey(1,5);
  443.            
  444.            DisplayDots(0x55);
  445.            DelayKey(1,5);
  446.            
  447.            LcmClearBMP();
  448.            PutStr(0,0,str1);
  449.            DelayKey(1,5);
  450.                        
  451.            LcmClearTXT();
  452.            DisplayDots(0xaa);
  453.            DelayKey(1,5);
  454.      }
  455. }

  457. uchar code bmp1[]={
  458. //********************************************************//
  459. //***** 转换的文件：E:\!Program\!BmpSample\25632.bmp
  460. //***** 源图形宽度 * 高度：256 * 32
  461. //***** 调整后宽度 * 高度：256 * 32
  462. //***** 字模格式：横向取模,冗余模式,字节正序,正色取模,
  463. //***** 点阵转换时间：2005/03/ 2   16:4:32
  464. //***** 位图点阵占用1024字节
  465. //********************************************************//

  467. 0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,
  468. 0x80,0x00,0x0F,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x70,0x00,0x00,0x01,
  469. 0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
  470. 0x80,0x00,0x3F,0xC0,0x00,0x07,0x07,0x00,0x04,0x01,0x00,0x00,0x38,0x60,0x00,0x01,
  471. 0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
  472. 0x80,0x00,0x78,0xE0,0x00,0x3F,0x83,0x80,0x06,0x03,0x80,0x00,0x1C,0x70,0x00,0x01,
  473. 0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
  474. 0x80,0x02,0x38,0x70,0x00,0xFF,0x07,0x80,0x06,0x39,0x80,0x00,0x1F,0x70,0x00,0x01,
  475. 0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
  476. 0x80,0x02,0x1C,0x30,0x00,0x7C,0x0E,0x00,0x06,0x19,0xC0,0x00,0x1F,0x80,0x00,0x01,
  477. 0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x01,
  478. ……………………

  480. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
新建文件夹.rar (66.88 KB, 下载次数: 8)


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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