标题: 自编的基于89C52单片机的摩尔斯电码自动（手动）收发报程序 附仿真和源码 [打印本页]
作者: wzqwxx    时间: 2021-10-21 09:01
标题: 自编的基于89C52单片机的摩尔斯电码自动（手动）收发报程序 附仿真和源码
　　辛苦几天编写了基于89C52单片机的摩尔斯电码自动（手动）收发报程序，核心代码都已实现，并仿真通过，其它功能正在完善。
　　自认为是首创，没想到今天早上在阅读贴子时，已有大神在昨天发表了相关程序，很是惭愧，本人太寡闻了。
　　本人由于知识和水平有限，加之书本和网上没有现成的源代码可参考，辛苦了几天，设计了自认比较合理高效占用资源少的数据结构和算法。现发表出来，供大家评论，指出不足，让我加以改进，学习提高。

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


程序编译后占用的内存


单片机源程序如下:
  1. /*-----------------------------------------------
  2. * 【实验平台】： QX-MCS51 单片机开发板
  3. * 【外部晶振】： 11.0592mhz        
  4. * 【主控芯片】： STC89C52
  5. * 【编译环境】： Keil μVisio4         
  6. * 【程序编写】： wzqwxx 水上人家

  8. 名称：摩尔斯电码发送
  9. 内容：……

  11. ------------------------------------------------*/

  13. #include <REGX52.H>
  14. #include <stdio.H>
  15. #include "1602.h"
  16. #include "MRScode.h"

  18. unsigned char *showbuffer;//显示缓冲

  20. // //常用短语库
  21. //unsigned char code *phrase[] = {"ok","NO", "hello","thank you","receive",
  22. //                                                                /*好，不，你好，谢谢你，收到，*/
  23. //"retransmission","Goodbye",        "Help me！", "my location:"
  24. ///*重复，再见，救我或帮我,我的位置：后面写两组数字 东经和北纬*/
  25. //
  26. ///******其它可再添加*****/                                                                                        } ;
  27. //

  29. void UART_init()
  30. {
  31.         TMOD |= 0x20;          //T1工作模式2  8位自动重装
  32.         TH1 = 0xfd;
  33.         TL1 = 0xfd;         //比特率9600   时钟频率11.0592MHZ
  34.         TR1 = 1;                //启动T1定时器
  35.         SM0 = 0;
  36.         SM1 = 1;                 //串口工作方式1 10位异步
  37.         REN = 1;                //串口允许接收
  38.         TI = 1;
  39. }

  41. void main()
  42. {
  43.         unsigned char inputbufstr[26],k,num;
  44.         UART_init();
  45.          lcd_init();
  46.         showbuffer = "Hello! 51hei.com"; //测试文本
  47.         Lcdwritestring(0,0,showbuffer);
  48.         send_mrs_code_TEXT(showbuffer); //发送字符串
  49.         while(1)
  50.         {
  51.                 scanf("%s",inputbufstr); //运行后在仿真终端输入英文字符串
  52.                
  53.                 showbuffer = "";
  54.                 showbuffer = inputbufstr+'\n';
  55.                 Lcdwritestring(0,0,inputbufstr);
  56.                 send_mrs_code_TEXT(inputbufstr);
  57.                                 
  58.         };        
  59. }
复制代码
  1. /******本函数ASCII码转摩尔斯码字符串发送*****/
  2. void send_mrs_code_TEXT(unsigned char *p)
  3. {
  4.         unsigned char i; //i即摩尔斯码字库数组下标
  5.         while(*p)
  6.         {
  7.                 if(*p != 0x20)//是否是空格
  8.                 {
  9.                         if(*p >= 0x41 && *p <= 0x5A )//大写字母A~Z        
  10.                         {
  11.                                 i = *p-0x41;  //i取字母字库 ，0x00地址开始
  12.                         }
  13.                         else if(*p >= 0x61 && *p <= 0x7A) //小写字母a~z
  14.                         {
  15.                                 i = *p-0x61;  //i取字母字库 ,0x00地址开始 ，摩斯码字母不区分大小写
  16.                         }
  17.                         else if(*p >= 0x30 && *p <= 0x39) //数字0~9
  18.                         {
  19.                                 i = *p-0x16;  //i取数字字库 ,0x1A地址开始                                
  20.                         }
  21.                         else
  22.                         {
  23.                                 switch (*p)
  24.                                 {
  25.                                         case '?': i =36;  //即字库数组下标
  26.                                                 break;
  27.                                         case ',': i =37;
  28.                                                 break;
  29.                                         case '.': i =38;
  30.                                                 break;
  31.                                         case '!': i =39;
  32.                                                 break;
  33.                                         case '@': i =40;
  34.                                                 break;
  35.                                         case ':': i =41;
  36.                                                 break;
  37.                                         case '-': i =42;
  38.                                                 break;
  39.                                         default:goto AAA;//其它字符当空格处理
  40.                                                 break;
  41.                                 }
  42.                         }
  43.                         count = 0;//清摩尔码显示位置
  44.                         write_com(0x01);// 清屏
  45.                         Lcdwritestring(0,0,showbuffer);        //第一行显示待发字符串
  46.                         Lcdwritechar(1,3,*p);//第二行显示待发字符
  47.                         p++;
  48.                         MRS_code_send(MRSZK[i]); //发送一个摩尔码
  49.                 }
  50.                 else
  51.                 {
  52.         AAA:        p++;
  53.                         J4_beep(); // 是空格，单词间隔3+4=7个点静音                        
  54.                 }
  55.         }
  56. }
复制代码
接收部分代码中午在另贴发布

仿真文件和源码
摩斯码自动收发程序4.zip (449.37 KB, 下载次数: 31)
作者: xingzhe8    时间: 2021-10-25 10:25
期待你的接收c程序
作者: xyfjb    时间: 2021-10-25 19:47
期待你的接收c程序
作者: wzqwxx    时间: 2021-11-2 09:25
xingzhe8 发表于 2021-10-25 10:25
期待你的接收c程序

谢谢你的鼓励，请查看这个帖子：http://www.51hei.com/bbs/dpj-213705-1.html



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1