找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 5212|回复: 4
收起左侧

51单片机16x16点阵显示汉字可左移 带仿真源程序

[复制链接]
ID:192650 发表于 2017-5-3 14:31 | 显示全部楼层 |阅读模式
51单片机 16x16点阵显示汉字左移proteus仿真原理图:
QQ图片20170503143044.png


16x16点阵单片机左移源程序:
  1. #include<reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. uchar m,n,i,b;
  5. sbit hang0=P0^6;
  6. sbit hang1=P0^7;
  7. uchar code lie[16]={0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f};
  8. uchar code hang[6][32]={{0xFF,0xBF,0xFD,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x01,0x80,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0xFD,0xBF,0xFF,0xBF,0xFF,0xFF},/*"王",0*/
  9. {0xBF,0x7F,0xBD,0xBF,0xBB,0xDF,0xA7,0xE7,0x3F,0xF8,0xBF,0xFF,0x80,0xFF,0xBF,0xFF,0x3F,0xC0,0xAF,0xBF,0xB7,0xBF,0xB9,0xBF,0xBF,0xBF,0xBF,0x87,0xFF,0xFF,0xFF,0xFF},/*"光",1*/
  10. {0xEF,0xFD,0xF3,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xBD,0xDA,0x7D,0x19,0x80,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xEB,0xFD,0xF3,0xFD,0xFF,0xFF},/*"宇",2*/
  11. {0xFF,0x7E,0xFF,0xBE,0xFF,0xDE,0x80,0xE2,0xB6,0xDE,0xB6,0xBE,0xB6,0x7E,0xB6,0x00,0xB6,0x76,0xB6,0x76,0xB6,0x76,0x80,0x76,0xFF,0x76,0xFF,0x7E,0xFF,0x7E,0xFF,0xFF},/*"是",3*/
  12. {0xFF,0x7F,0xFF,0x9F,0x07,0xE0,0xF7,0xFF,0xB7,0xC1,0xB7,0xED,0xB7,0xED,0xB7,0x41,0xF7,0xBF,0x00,0xDE,0xF7,0xE9,0xF6,0xE7,0xF5,0xD9,0x37,0xBE,0xF7,0x07,0xFF,0xFF},/*"咸",4*/
  13. {0xBF,0xBF,0xDF,0xBF,0x0F,0xB0,0xD7,0xB6,0xDB,0xB6,0xD8,0xB6,0xDB,0xB6,0x1B,0xB0,0xDB,0xB6,0xCB,0xB6,0xD3,0xB6,0xDF,0xB6,0x1F,0xB0,0xFF,0xBF,0xFF,0xBF,0xFF,0xFF},/*"鱼",5*/
  14. };
  15. delayms(uint tms)
  16. {
  17.         uint x,y;
  18.         for(x=tms;x>0;x--)
  19.          for(y=110;y>0;y--);
  20. }
  21. main()
  22. {
  23.         while(1)
  24.         {
  25.                 for(m=0;m<6;m++)
  26.                  for(b=0;b<16;b++)
  27.                  for(n=0;n<20;n++)
  28.                   for(i=0;i<16;i++)
  29.                   {
  30.                    hang0=1;
  31.                    P2=lie[i];
  32.                    P1=hang[m][2*(i+b)];
  33.                    hang0=0;
  34.                    P1=0xff;
  35.                    hang1=1;
  36.                    P2=lie[i];
  37.                    P1=hang[m][2*(i+b)+1];
  38.                    hang1=0;
  39.                    delayms(1);
  40.                    P1=0xff;

  41.                   

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

0.png

下载:
16X16.zip (62.94 KB, 下载次数: 152)
回复

使用道具 举报

ID:198737 发表于 2017-5-9 17:41 | 显示全部楼层
大佬膜拜啊
回复

使用道具 举报

ID:319688 发表于 2018-5-1 07:46 | 显示全部楼层
真大佬,谢谢分享
回复

使用道具 举报

ID:266388 发表于 2019-3-12 17:43 | 显示全部楼层
谢谢分享8888
回复

使用道具 举报

ID:653594 发表于 2019-12-1 18:01 | 显示全部楼层
我下载了这个作品,不过我这里打不开阿的仿真原件,我的是Proteus 8 Professional,有能用这个软件打开的吗?谢谢你哟。可以加你的联系方式吗。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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