這個東西是09年剛學(xué)單片機時做的,,基于51單片機,。點陣屏用的是一個集成好的模塊,就是四個595兩兩級聯(lián)分別控制行和列,,屏可能有點老,所以不是很亮,。字摸直接用網(wǎng)上的字摸提取軟件就能提取,。另外用定時計數(shù)器產(chǎn)生方波做了一個音樂播放器(用了一個運放),放的是天空之城的音樂,,同時用一個兩位數(shù)碼管顯示當(dāng)前的音樂音階(第一位數(shù)碼管表示高中低音),。感覺里面用了不少51的資源,挺好的程序,,現(xiàn)在完全開源的給大家分享出來
作品圖片:
- #include<reg51.h>
- sbit RCK=P2^2;
- sbit SRCK_1=P2^3;
- sbit SRCK_2=P2^4;
- sbit SER_IN_1=P2^5;
- sbit SER_IN_2=P2^6;
- sbit DIG1=P2^0;
- sbit DIG2=P2^1;
- sbit buz=P2^7;
- unsigned char num=13;--字幕有多少個字
- unsigned int speed=85;--每狀態(tài)持續(xù)時間,,數(shù)字越小,字幕速度越快
- unsigned int song_num=136;--音節(jié)個數(shù)
- unsigned char code song[]=--中音前綴為1,,低音為0,,高音為2+后位為歌譜
- {
- 16,17,21,17,21,23,17,13,13,16,15,16,21,15,10,13,13,14,13,14,21,
- 10,13,01,21,21,21,17,14,14,17,17,10,16,17,21,17,21,23,17,10,13,13,16,15,16,21,
- 15,10,13,14,21,17,17,21,22,22,23,21,10,21,17,16,16,17,15,16,10,21,22,23,22,23,
- 25,22,10,15,15,21,17,21,23,23,10,10,16,17,21,17,22,22,21,15,15,10,24,23,22,21,
- 23,23,10,23,26,25,25,23,22,21,10,21,22,21,22,22,25,23,10,23,26,25,23,22,21,10,
- 21,22,21,22,22,17,16,10,16,17,16
- };
-
-
- unsigned char code song_speed[]=--節(jié)拍,數(shù)目越大聲音持續(xù)時間越長,,與各曲譜位置對應(yīng)
- {
- 40,60,120,80,100,100,300,40,60,120,80,100,100,200,100,50,50,120,80,80,120,100,200,25,25,
- 25,25,120,80,105,95,200,100,50,50,120,80,100,100,200,100,50,50,120,80,100,100,300,50,50,
- 100,40,50,110,100,33,33,33,100,100,120,80,50,50,100,100,200,100,50,50,120,80,100,100,
- 200,100,50,50,110,90,100,100,200,100,100,45,55,100,100,50,50,110,80,110,100,100,100,100,100,
- 400,200,100,100,200,100,100,50,50,100,50,50,100,45,55,100,100,200,100,100,200,200,120,80,
- 200,50,50,100,60,40,50,100,200,100,50,50,400
- };
-
- unsigned char code hanzi[]=--字模提取BADC,右旋90度
- {
- 0x80,0x00,0x80,0x00,0x80,0x00,0x80,0x00,0xFF,0xFF,0x80,0x40,0x80,0x40,0xA0,0x23,--長
- 0x90,0x04,0x88,0x08,0x84,0x10,0x86,0x20,0x80,0x60,0xC0,0x20,0x80,0x00,0x00,0x00,
-
- 0x20,0x04,0x22,0x04,0x2A,0x02,0x2A,0x01,0xAA,0xFF,0x6A,0x49,0x3A,0x49,0x2F,0x49,--春
- 0x2A,0x49,0x6A,0x49,0xAA,0xFF,0x2A,0x01,0x2A,0x02,0x22,0x06,0x20,0x02,0x00,0x00,
-
- 0x44,0x10,0x44,0x30,0xFC,0x1F,0x46,0x08,0x44,0x48,0x00,0x48,0xFE,0x44,0x92,0x44,--理
- 0x92,0x44,0xFE,0x7F,0x92,0x44,0x92,0x46,0xFF,0x44,0x02,0x60,0x00,0x40,0x00,0x00,
-
- 0x00,0x20,0x04,0x20,0x04,0x20,0x04,0x20,0x04,0x20,0x04,0x20,0x04,0x20,0xFC,0x3F,--工
- 0x04,0x20,0x04,0x20,0x04,0x20,0x04,0x20,0x06,0x20,0x04,0x30,0x00,0x20,0x00,0x00,
-
- 0x80,0x00,0x80,0x40,0x40,0x40,0x20,0x4A,0x50,0x52,0x48,0x62,0x44,0x42,0xC3,0x7F,--姓 0x44,0x42,0x68,0x62,0x50,0x52,0x20,0x4A,0x40,0x60,0xC0,0x40,0x40,0x00,0x00,0x00,
-
- 0x10,0x00,0x10,0x80,0x10,0x40,0x10,0x30,0x10,0x0C,0x90,0x23,0x7F,0x20,0x10,0x10,--名0xF0,0x3F,0x12,0x44,0x14,0x42,0x10,0x41,0xD0,0x40,0x18,0x40,0x10,0x78,0x00,0x00,
-
- 0x80,0x00,0x40,0x00,0x20,0x00,0xF8,0xFF,0x87,0x00,0x40,0x00,0x30,0x00,0x0F,0x00,--作
- 0xF8,0xFF,0x88,0x08,0x88,0x08,0xC8,0x08,0x88,0x0C,0x0C,0x08,0x08,0x00,0x00,0x00,
- 0x00,0x00,0x00,0xFF,0x00,0x41,0x7E,0x41,0x22,0x41,0x22,0x41,0xA2,0xFF,0x22,0x01,--品
- 0x22,0xFF,0x22,0x41,0x22,0x41,0x7F,0x41,0x02,0x41,0x80,0xFF,0x00,0x01,0x00,0x00,
-
- 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x10,0x7C,0x3B,0xFE,--!
- 0x3B,0xFE,0x10,0x7C,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
-
- 0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,-圖
- 0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,
-
- 0x00,0x01,0x40,0x00,0x10,0x00,0x04,0x00,0x01,0x00,0x04,0x00,0x10,0x00,0x40,0x00,
- 0x00,0x01,0x00,0x04,0x00,0x10,0x00,0x04,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,
-
- 0x00,0x01,0x40,0x00,0x10,0x00,0x04,0x00,0x01,0x00,0x04,0x00,0x10,0x00,0x40,0x00,-案
- 0x00,0x01,0x00,0x04,0x00,0x10,0x00,0x04,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,
-
- 0xF0,0x00,0x08,0x01,0x14,0x02,0x52,0x04,0x12,0x08,0x12,0x10,0x24,0x22,0x58,0x55,
- 0x88,0x68,0x04,0x20,0x12,0x10,0x12,0x08,0x52,0x04,0x14,0x02,0x08,0x01,0xF0,0x00
- };
-
- unsigned char code saomiao[]=--字幕掃描數(shù)組
- {
- 0x00,0x01,0x00,0x02,0x00,0x04,0x00,0x08,0x00,0x10,0x00,0x20,0x00,0x40,0x00,0x80,
- 0x01,0x00,0x02,0x00,0x04,0x00,0x08,0x00,0x10,0x00,0x20,0x00,0x40,0x00,0x80,0x00
- };
- unsigned char tone_l_h[]={0xf0,0xf9,0xf9,0xfa,0xfa,0xfb,0xfb,0xfc};--底音高8位頻率
- unsigned char tone_l_l[]={0xf0,0x21,0xe0,0x8b,0xd7,0x68,0xe8,0x5b};--底音低8位頻率
- unsigned char tone_m_h[]={0xf0,0xfc,0xfc,0xfd,0xfd,0xfd,0xfd,0xfe};--中音高8位頻率
- unsigned char tone_m_l[]={0xf0,0x8f,0xef,0x45,0x6c,0xb5,0xf5,0x2e};--中音低8位頻率
- unsigned char tone_h_h[]={0xf0,0xfe,0xfe,0xfe,0xfe,0xfe,0xfe,0xff};--高音高8位頻率
- unsigned char tone_h_l[]={0xf0,0x47,0x77,0xa2,0xb6,0xda,0xfa,0x16};--高音低8位頻率
- unsigned char code number[]={0xc0,0xf9,0xa4,0xb0,0X99,0X92,0X82,0Xf8,0X80,0X90};--數(shù)碼管顯示0~9
- unsigned char tone_yin[]={0xf7,0xbf,0xfe};--低中高音節(jié)數(shù)碼管顯示
- unsigned char *s=saomiao,*h=hanzi,*w,*t,flog1=0,flog2=0,x,m,count,TH_M0,TL_M0,n;
- unsigned int cx;
- void delay(unsigned int num)--普通延時函數(shù),,用于調(diào)整音調(diào)
- {
- unsigned int z;
- for(z=0;z<num;z++)
- {;}
- }
-
- delay_1()--倒計時延時函數(shù),可控制執(zhí)行次數(shù),,用于控制字幕滾動速度
- {
- cx--;
- if(cx!=0) return(1);
- if(cx==0) return(0);
- }
- void write_1(unsigned char byte)--字模寄存器寫入(根據(jù)點陣特點,,調(diào)整輸出次序)
- {
- unsigned char i;
- for(i=0;i<8;i++)
- {
- SRCK_1=0;
- if((byte&0x01)==0)
- SER_IN_1=0;
- else SER_IN_1=1;
- SRCK_1=1;
- byte=byte>>1;
- }
- SRCK_1=0;
- }
-
-
- void write_2(unsigned char byte)--掃描行寄存器寫入
- {
- unsigned char i;
- for(i=0;i<8;i++)
- {
- SRCK_2=0;
- if((byte&0x80)==0)
- SER_IN_2=0;
- else SER_IN_2=1;
- SRCK_2=1;
- byte=byte<<1;
- }
- SRCK_2=0;
- }
- void scan()--執(zhí)行一次,掃描一行
- {
- unsigned char j;
- flog1++;
- if(flog1==17)
- {
- flog1=1;
- s=saomiao;
- }
- for(j=0;j<2;j++)
- {
- write_2(*(s++));
- }
-
- }
- void gundong(unsigned char n)--每次賦值是輸入2個值,n從1開始,產(chǎn)生滾動
- {
- unsigned char j;
- if(flog2==0)
- {
- t=&hanzi[2*(n-1)];
- if(n<=((num-1)*16+1))
- {
- w=&hanzi[2*(n-1)+32];
- }
- else
- {
- w=&hanzi[2*(n-1)-2*(num-1)*16];--每次只顯示16位,,32個字節(jié),,w是尾地址
- }
- h=t;
- flog2++;
- }
- if(h==w)--他和下面的IF不可調(diào)換次序
- {
- h=t;
- }
- if(h==(hanzi+num*32))
- {
- h=hanzi;
- }
- for(j=0;j<2;j++)
- {
- write_1(*(h++));
- }
- }
- main()
- {
- unsigned char i;
- cx=speed;
- SRCK_1=0;
- SRCK_2=0;
- RCK=0;--清零很重要?,?,?
- n=0;
- EA=1;--打開中斷
- ET0=1;
- ET1=1;--易錯點,定時器打開,,中斷也得開
- TMOD=0x11;--打開定時器
- TR0=1;
- TR1=1;
- PT0=1;--優(yōu)先級設(shè)定
- while(1)
- {
- for(i=0;i<song_num;i++)
- {
- x=song[i];
- m=song[i]/10;
- switch(m)--分中底高位賦值
- {
- case 0:{TH_M0=tone_l_h[x];TL_M0=tone_l_l[x];break;}
- case 1:{TH_M0=tone_m_h[x];TL_M0=tone_m_l[x];break;}
- case 2:{TH_M0=tone_h_h[x];TL_M0=tone_h_l[x];break;}
- }
- TH0=TH_M0;
- TL0=TL_M0;
- delay(song_speed[i]*20);--節(jié)奏控制
- }
- }
- }
-
- void play_music(void) interrupt 1 --輸出音樂函數(shù)+數(shù)碼輸出函數(shù)
- {
- TH0=TH_M0;
- TL0=TL_M0;
- if(x!=0) buz=!buz;
- if(x==0) buz=0;
- count++;
- if(count==1)
- {
- DIG1=0;
- DIG2=1;
- P0=tone_yin[m];
- }
- if(count==2)
- {
- count=0;
- DIG1=1;
- DIG2=0;
- P0=number[x];
- }
- }
- void play(void) interrupt 3
-
- {
- if(n==(num*16))
- {
- n=0;
- }
- n++;
- while(delay_1())
- {
- gundong(n);
- scan();
- RCK=0;
- RCK=1;
- }
- flog1=0;
- flog2=0;
- cx=speed;
- s=saomiao;
- TH1=0xEF;--放后面,,防止不準
- TL1=0xEF;
- TF1=0;
- }
復(fù)制代碼
|