找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 5954|回復(fù): 4
收起左側(cè)

51單片機16x16點陣顯示漢字可左移 帶仿真源程序

[復(fù)制鏈接]
ID:192650 發(fā)表于 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黑下載附件…………
復(fù)制代碼

0.png

下載:
16X16.zip (62.94 KB, 下載次數(shù): 153)


回復(fù)

使用道具 舉報

ID:198737 發(fā)表于 2017-5-9 17:41 | 顯示全部樓層
大佬膜拜啊
回復(fù)

使用道具 舉報

ID:319688 發(fā)表于 2018-5-1 07:46 | 顯示全部樓層
真大佬,謝謝分享
回復(fù)

使用道具 舉報

ID:266388 發(fā)表于 2019-3-12 17:43 | 顯示全部樓層
謝謝分享8888
回復(fù)

使用道具 舉報

ID:653594 發(fā)表于 2019-12-1 18:01 | 顯示全部樓層
我下載了這個作品,不過我這里打不開阿的仿真原件,我的是Proteus 8 Professional,有能用這個軟件打開的嗎?謝謝你喲?梢约幽愕穆(lián)系方式嗎。
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表