單片機16*16點陣源程序注釋詳細原理圖與Proteus仿真字模工具VB6工程源代碼

ID:161768 · 發表于 2017-5-7 21:20

下面是單片機16*16點陣的proteus仿真原理圖（工程文件可到本帖附件中下載）：

仿LED點陣字模的VB6工程源代碼：

單片機16*16點陣源程序如下：

#include <reg51.h> // 預處理命令
#include <stdio.h>
#define uint unsigned int
#define u8 unsigned char
//u8 Lsd[16]={0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1};
u8 j=0; //行變量
//32字節的字模
u8 code zmdata[]=
{0x00,0x08,0x7F,0xFC,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x04,0xFF,0xFE,0x01,0x00,
0x02,0x80,0x02,0x80,0x04,0x40,0x04,0x40,0x08,0x20,0x10,0x10,0x20,0x0E,0xC0,0x04};
sbit sd = P1^6; // 行信號串行輸入線
sbit clk = P1^7; // 串行時鐘線
sbit stbd= P1^5; // 鎖存輸出脈沖線
main() { // 主函數
u8 i;
SCON=0x00; //移位方式
TMOD=0x01; //T0初始化為16位定時
TH0=0xf8; //定時2000us
TL0=0x30; //初值=65536-2000
ET0=1; //開定時器1中斷
EA=1; //開總中斷
//初始化位選，讓16個行輸出是高電平，
sd=1; // 初始化串行輸入數據線為高電平
clk=1; // 初始化時鐘線為高電平
stbd=0; // 初始化鎖存線為低電平
for(i=0;i<16;i++) //移位16次，使移位寄存器輸出全部為高電平
{
clk=0;
clk=1;
}
clk=0; //使時鐘線為低電平
//把移位寄存器的16位進行輸出鎖存
stbd=1;
stbd=0;
TR0=1; //開啟T0定時器
while(1);
} // 主程序結束
void T0str() interrupt 1
{
TL0=0x30;
TH0=0xf8; //定時器初值2ms
j++; //行加1
if(j==16)
{
j=0; //行范圍是0--15
sd=0;
}
else
{
sd=1;
}
TI=0; //串行通信發送標志置0
SBUF=zmdata[2*j+1]; //移位輸出高位
while(!TI);
//移位輸出完成
TI=0;
SBUF=zmdata[2*j]; //移位輸出低位
while(!TI);
//移位輸出完成
//sd=Lsd[j]; //
clk=1; //發移位脈沖
clk=0;
stbd=1; ////發脈沖點亮當前行
stbd=0;
} // max函數結束
// 中
//0x01,0x00,0x01,0x00,0x01,0x04,0x7F,0xFE,0x41,0x04,0x41,0x04,0x41,0x04,0
…………限于本文篇幅余下代碼請從51黑下載附件…………