找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開(kāi)始

帖子
查看: 2613|回復(fù): 4
收起左側(cè)

51單片機(jī)模擬太極八卦陣顯示 點(diǎn)陣屏+LED程序與Proteus仿真圖

[復(fù)制鏈接]
ID:1040821 發(fā)表于 2022-8-5 00:41 | 顯示全部樓層 |閱讀模式
stc89c52制作的八卦陣計(jì)時(shí)程序,包含仿真和源代碼
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)
51hei.gif


單片機(jī)源程序如下:
  1. #include <REGX51.H>
  2. #include <intrins.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char

  5. sbit Elock=P2^0;                                                                //控制眼鎖存
  6. sbit Llock=P2^1;                                                                //控制陰陽(yáng)鎖存
  7. uchar code yang[8]={0x87,0x0f,0x1e,0x3c,0x78,0xf0,0xe1,0xc3};
  8. uchar code eye[8]={0xa5,0x4b,0x96,0x2d,0x5a,0xb4,0x69,0xd2};
  9. uchar i=1;
  10. void delay(unsigned int num)                //延時(shí)函數(shù)
  11. {
  12.         unsigned x, y;
  13.         for(x=num;x>0;x--)
  14.                 for(y=120;y>0;y--);
  15. }

  16. void circle()
  17. {
  18.         Llock=1;                                                                                //鎖存器八個(gè)管腳控制16個(gè)燈
  19.         P1=yang[i];
  20.         Llock=0;
  21.         Elock=1;
  22.         P1=eye[i];
  23.         Elock=0;
  24.         i++;
  25.         if(i==8)                                                                                //數(shù)組循環(huán),陰陽(yáng)相濟(jì)
  26.                 i=0;
  27. }

  28. void main(void)
  29. {
  30.         P1 = 0xff;

  31.         P1=eye[2];
  32.         Elock=1;
  33.         Elock=0;
  34.         P1=yang[2];
  35.         Llock=1;
  36.         Llock=0;

  37.         while(1)
  38.         {
  39.                 circle();
  40.                 delay(999);
  41.         }
  42. }
復(fù)制代碼
51hei.png
所有資料51hei附件下載:
仿真程序.7z (198.21 KB, 下載次數(shù): 40)

評(píng)分

參與人數(shù) 2黑幣 +65 收起 理由
wpppmlah + 15 贊一個(gè)!
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評(píng)分

回復(fù)

使用道具 舉報(bào)

ID:58110 發(fā)表于 2022-8-5 10:46 | 顯示全部樓層
漂亮,有創(chuàng)意!
回復(fù)

使用道具 舉報(bào)

ID:299519 發(fā)表于 2022-8-5 13:14 | 顯示全部樓層
這應(yīng)該是先天八卦。。
回復(fù)

使用道具 舉報(bào)

ID:16255 發(fā)表于 2022-8-5 16:59 | 顯示全部樓層
看不懂
回復(fù)

使用道具 舉報(bào)

ID:61876 發(fā)表于 2022-8-5 18:09 | 顯示全部樓層
既有創(chuàng)意,又特別新穎!
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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