資源簡(jiǎn)介
單片機(jī)點(diǎn)陣模擬電梯上行下行,是利用單片機(jī)控制點(diǎn)陣上面的燈來(lái)來(lái)實(shí)現(xiàn)模擬電梯的上行和下行,是學(xué)習(xí)單片機(jī)和做課程設(shè)計(jì)的好材料。

代碼片段和文件信息
/*-----------------------------------------------
??名稱:雙色點(diǎn)陣
??論壇:www.doflye.net
??編寫:shifang
??修改:無(wú)
??內(nèi)容:使用hc595驅(qū)動(dòng)雙色點(diǎn)陣?
------------------------------------------------*/
#include????//包含頭文件,一般情況不需要改動(dòng),頭文件包含特殊功能寄存器的定義
#include??
//unsigned?char??segout[8]={01234567};?//8列
unsigned?char??segout[8]={0x010x020x040x080x100x200x400x80};?//8列
unsigned?char?code?tab[]={
????????????????????????0x000x000x000x000x000x000x000x00
????????????????????????0x080x1C0x3E0x7F0x1C0x1C0x1C0x1C
0x000x000x000x000x000x000x000x00
????????????????????????};
/*------------------------------------------------
????????????????硬件端口定義
------------------------------------------------*/
sbit?LATCH?=?P1^0;?
sbit?SRCLK=?P1^1;
sbit?SER??=?P1^2;
sbit?LATCH_B?=?P2^2;
sbit?SRCLK_B=?P2^1;
sbit?SER_B=?P2^0;
/*------------------------------------------------
?uS延時(shí)函數(shù),含有輸入?yún)?shù)?unsigned?char?t,無(wú)返回值
?unsigned?char?是定義無(wú)符號(hào)字符變量,其值的范圍是
?0~255?這里使用晶振12M,精確延時(shí)請(qǐng)使用匯編大致延時(shí)
?長(zhǎng)度如下?T=tx2+5?uS?
------------------------------------------------*/
void?DelayUs2x(unsigned?char?t)
{???
?while(--t);
}
/*------------------------------------------------
?mS延時(shí)函數(shù),含有輸入?yún)?shù)?unsigned?char?t,無(wú)返回值
?unsigned?char?是定義無(wú)符號(hào)字符變量,其值的范圍是
?0~255?這里使用晶振12M,精確延時(shí)請(qǐng)使用匯編
------------------------------------------------*/
void?DelayMs(unsigned?char?t)
{
?????
?while(t--)
?{
?????//大致延時(shí)1mS
?????DelayUs2x(245);
?DelayUs2x(245);
?}
}
/*------------------------------------------------
????????????????發(fā)送字節(jié)程序
------------------------------------------------*/
void?SendByte(unsigned?char?dat)
{????
??unsigned?char?i;?
????????
???for(i=0;i<8;i++)
????????{
?????????SRCLK=0;
?????????SER=dat&0x80;
?????????dat<<=1;
?????????SRCLK=1;
?????????}
?????????
}
/*------------------------------------------------
????????????????發(fā)送雙字節(jié)程序
?????595級(jí)聯(lián),n個(gè)595,就需要發(fā)送n字節(jié)后鎖存
------------------------------------------------*/
void?Send2Byte(unsigned?char?dat1unsigned?char?dat2)
{????
???SendByte(dat1);
???SendByte(dat2);??????
}
/*------------------------------------------------
???????????????????595鎖存程序
??595級(jí)聯(lián)發(fā)送數(shù)據(jù)后,鎖存有效
------------------------------------------------*/
void?Out595(void)
{
????????LATCH=0;
????????_nop_();
????????LATCH=1;
}
/*------------------------------------------------
????????????????發(fā)送位碼字節(jié)程序
???????????????使用另外一片單獨(dú)595
------------------------------------------------*/
void?SendSeg(unsigned?char?dat)
{????
unsigned?char?i;?
????????
???for(i=0;i<8;i++)??//發(fā)送字節(jié)
????????{
?????????SRCLK_B=0;
?????????SER_B=dat&0x80;
?????????dat<<=1;
?????????SRCLK_B=1;
?????????}
??????LATCH_B=0;????//鎖存
??????_nop_();
??????LATCH_B=1;
?????????
?????????
}
/*------------------------------------------------
???????????????????主程序
------------------------------------------------*/
void?main()
{
unsigned?char?ijk;
while(1)
{
??????????//上行指示
??????????for(j=0;j<16;j
?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2011-11-10?19:53??點(diǎn)陣模擬電梯上行下行\(zhòng)
?????文件????????4952??2010-06-08?10:06??點(diǎn)陣模擬電梯上行下行\(zhòng)6x8font.h
?????文件???????45139??2010-06-08?11:23??點(diǎn)陣模擬電梯上行下行\(zhòng)8x8font.h
?????目錄???????????0??2011-11-10?19:53??點(diǎn)陣模擬電梯上行下行\(zhòng)obj\
?????文件????????5196??2010-06-16?16:57??點(diǎn)陣模擬電梯上行下行\(zhòng)obj\點(diǎn)陣模擬電梯上行下行
?????文件????????1110??2010-06-16?16:57??點(diǎn)陣模擬電梯上行下行\(zhòng)obj\點(diǎn)陣模擬電梯上行下行.hex
?????文件????????7772??2010-06-16?16:57??點(diǎn)陣模擬電梯上行下行\(zhòng)obj\點(diǎn)陣模擬電梯上行下行.lst
?????文件????????8162??2010-06-16?16:57??點(diǎn)陣模擬電梯上行下行\(zhòng)obj\點(diǎn)陣模擬電梯上行下行.m51
?????文件????????5756??2010-06-16?16:57??點(diǎn)陣模擬電梯上行下行\(zhòng)obj\點(diǎn)陣模擬電梯上行下行.obj
?????文件?????????655??2010-06-16?16:58??點(diǎn)陣模擬電梯上行下行\(zhòng)obj\點(diǎn)陣模擬電梯上行下行.plg
?????文件????????1264??2010-06-16?16:58??點(diǎn)陣模擬電梯上行下行\(zhòng)點(diǎn)陣模擬電梯上行下行.Opt
?????文件????????2046??2010-06-08?12:35??點(diǎn)陣模擬電梯上行下行\(zhòng)點(diǎn)陣模擬電梯上行下行.Uv2
?????文件????????3954??2010-06-16?17:13??點(diǎn)陣模擬電梯上行下行\(zhòng)點(diǎn)陣模擬電梯上行下行.c
?????文件?????????195??2010-06-08?09:49??點(diǎn)陣模擬電梯上行下行\(zhòng)點(diǎn)陣模擬電梯上行下行.plg
- 上一篇:ImageProcess.dll
- 下一篇:矩陣鍵盤簡(jiǎn)易計(jì)算器
評(píng)論
共有 條評(píng)論