单片机实例20-26ourdev.doc

《单片机实例20-26ourdev.doc》由会员分享，可在线阅读，更多相关《单片机实例20-26ourdev.doc（58页珍藏版）》请在沃文网上搜索。

1、20 数字钟 1 实验任务 （1 开机时，显示12：00：00的时间开始计时； （2 P0.0/AD0控制“秒”的调整，每按一次加1秒； （3 P0.1/AD1控制“分”的调整，每按一次加1分； （4 P0.2/AD2控制“时”的调整，每按一次加1个小时； 2 电路原理图 图4.20.1 3 系统板上硬件连线 （1 把“单片机系统”区域中的P1.0P1.7端口用8芯排线连接到“动态数码显示”区域中的AH端口上； （2 把“单片机系统：区域中的P3.0P3.7端口用8芯排线连接到“动态数码显示”区域中的S1S8端口上； （3 把“单片机系统”区域中的P0.0/AD0、P0.1/AD1、P0.2/

2、AD2端口分别用导线连接到“独立式键盘”区域中的SP3、SP2、SP1端口上； 4 相关基本知识 （1 动态数码显示的方法 （2 独立式按键识别过程 （3 “时”，“分”，“秒”数据送出显示处理方法 5 程序框图 6 汇编源程序SECOND EQU 30HMINITE EQU 31HHOUR EQU 32HHOURK BIT P0.0MINITEK BIT P0.1SECONDK BIT P0.2DISPBUF EQU 40HDISPBIT EQU 48HT2SCNTA EQU 49HT2SCNTB EQU 4AHTEMP EQU 4BHORG 00HLJMP STARTORG 0BHLJMP

3、 INT_T0START: MOV SECOND,#00HMOV MINITE,#00HMOV HOUR,#12MOV DISPBIT,#00HMOV T2SCNTA,#00HMOV T2SCNTB,#00HMOV TEMP,#0FEHLCALL DISPMOV TMOD,#01HMOV TH0,#(65536-2000) / 256MOV TL0,#(65536-2000) MOD 256SETB TR0SETB ET0SETB EAWT: JB SECONDK,NK1LCALL DELY10MSJB SECONDK,NK1INC SECONDMOV A,SECONDCJNE A,#60,N

4、S60MOV SECOND,#00HNS60: LCALL DISPJNB SECONDK,$NK1: JB MINITEK,NK2LCALL DELY10MSJB MINITEK,NK2INC MINITEMOV A,MINITECJNE A,#60,NM60MOV MINITE,#00HNM60: LCALL DISPJNB MINITEK,$NK2: JB HOURK,NK3LCALL DELY10MSJB HOURK,NK3INC HOURMOV A,HOURCJNE A,#24,NH24MOV HOUR,#00HNH24: LCALL DISPJNB HOURK,$NK3: LJMP

5、 WTDELY10MS:MOV R6,#10D1: MOV R7,#248DJNZ R7,$DJNZ R6,D1RETDISP:MOV A,#DISPBUFADD A,#8DEC AMOV R1,AMOV A,HOURMOV B,#10DIV ABMOV R1,ADEC R1MOV A,BMOV R1,ADEC R1MOV A,#10MOVR1,ADEC R1MOV A,MINITEMOV B,#10DIV ABMOV R1,ADEC R1MOV A,BMOV R1,ADEC R1MOV A,#10MOVR1,ADEC R1MOV A,SECONDMOV B,#10DIV ABMOV R1,A

6、DEC R1MOV A,BMOV R1,ADEC R1RETINT_T0:MOV TH0,#(65536-2000) / 256MOV TL0,#(65536-2000) MOD 256MOV A,#DISPBUFADD A,DISPBITMOV R0,AMOV A,R0MOV DPTR,#TABLEMOVC A,A+DPTRMOV P1,AMOV A,DISPBITMOV DPTR,#TABMOVC A,A+DPTRMOV P3,AINC DISPBITMOV A,DISPBITCJNE A,#08H,KNAMOV DISPBIT,#00HKNA: INC T2SCNTAMOV A,T2SC

7、NTACJNE A,#100,DONEMOV T2SCNTA,#00HINC T2SCNTBMOV A,T2SCNTBCJNE A,#05H,DONEMOV T2SCNTB,#00HINC SECONDMOV A,SECONDCJNE A,#60,NEXTMOV SECOND,#00HINC MINITEMOV A,MINITECJNE A,#60,NEXTMOV MINITE,#00HINC HOURMOV A,HOURCJNE A,#24,NEXTMOV HOUR,#00HNEXT: LCALL DISPDONE: RETITABLE: DB 3FH,06H,5BH,4FH,66H,6DH

8、,7DH,07H,7FH,6FH,40HTAB: DB 0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FHEND7 C语言源程序#include unsigned char code dispcode=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x00;unsigned char dispbitcode=0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f;unsigned char dispbuf8=0,0,16,0,0,

9、16,0,0;unsigned char dispbitcnt;unsigned char second;unsigned char minite;unsigned char hour;unsigned int tcnt;unsigned char mstcnt;unsigned char i,j;void main(void)TMOD=0x02;TH0=0x06;TL0=0x06;TR0=1;ET0=1;EA=1;while(1)if(P0_0=0)for(i=5;i0;i-)for(j=248;j0;j-);if(P0_0=0)second+;if(second=60)second=0;d

10、ispbuf0=second%10;dispbuf1=second/10;while(P0_0=0);if(P0_1=0)for(i=5;i0;i-)for(j=248;j0;j-);if(P0_1=0)minite+;if(minite=60)minite=0;dispbuf3=minite%10;dispbuf4=minite/10;while(P0_1=0);if(P0_2=0)for(i=5;i0;i-)for(j=248;j0;j-);if(P0_2=0)hour+;if(hour=24)hour=0;dispbuf6=hour%10;dispbuf7=hour/10;while(P

11、0_2=0);void t0(void) interrupt 1 using 0mstcnt+;if(mstcnt=8)mstcnt=0;P1=dispcodedispbufdispbitcnt;P3=dispbitcodedispbitcnt;dispbitcnt+;if(dispbitcnt=8)dispbitcnt=0;tcnt+;if(tcnt=4000)tcnt=0;second+;if(second=60)second=0;minite+;if(minite=60)minite=0;hour+;if(hour=24)hour=0;dispbuf0=second%10;dispbuf

12、1=second/10;dispbuf3=minite%10;dispbuf4=minite/10;dispbuf6=hour%10;dispbuf7=hour/10; 21 拉幕式数码显示技术 1 实验任务 用AT89S51单片机的P0.0/AD0P0.7/AD7端口接数码管的ah端，8位数码管的S1S8通过74LS138译码器的Y0Y7来控制选通每个数码管的位选端。AT89S51单片机的P1.0P1.2控制74LS138的A，B，C端子。在8位数码管上从右向左循环显示“12345678”。能够比较平滑地看到拉幕的效果。 2 电路原理图 图4.21.1 3 系统板上硬件连线 （1 把“单片机

13、系统”区域中的P0.0/AD0P0.7/AD7用8芯排线连接到“动态数码显示”区域中的ah端口上； （2 把“三八译码模块”区域中的Y0Y7用8芯排线连接到“动态数码显示”区域中的S1S8端口上； （3 把“单片机系统”区域中的P1.0P1.2端口用3根导线连接到“三八译码模块”区域中的A、B、C“端口上； 4 程序设计方法 （1 动态数码显示技术；如何进行动态扫描，由于一次只能让一个数码管显示，因此，要显示8位的数据，必须经过让数码管一个一个轮流显示才可以，同时每个数码管显示的时间大约在1ms到4ms之间，所以为了保证正确显示，我必须每隔1ms，就得刷新一个数码管。而这刷新时间我们采用单片机

14、的定时/计数器T0来控制，每定时1ms对数码管刷新一次，T0采用方式2。 （2 在进行数码显示的时候，要对显示单元开辟8个显示缓冲区，每个显示缓冲区装有显示的不同数据即可。 5 程序框图 主程序框图 中断服务程序框图 图4.21.2 6 汇编源程序DISPBUF EQU 30HDISPCNT EQU 38HDISPBIT EQU 39HT1CNTA EQU 3AHT1CNTB EQU 3BHCNT EQU 3CHORG 00HLJMP STARTORG 0BHLJMP INT_T0START: MOV DISPCNT,#8MOV A,#10MOV R1,#DISPBUFLP: MOV R1,A

15、INC R1DJNZ DISPCNT,LPMOV DISPBIT,#00HMOV T1CNTA,#00HMOV T1CNTB,#00HMOV CNT,#00HMOV TMOD,#01HMOV TH0,#(65536-1000) / 256MOV TL0,#(65536-1000) MOD 256SETB TR0SETB ET0SETB EASJMP $INT_T0:MOV TH0,#(65536-1000) / 256MOV TL0,#(65536-1000) MOD 256MOV A,DISPBITADD A,#DISPBUFMOV R0,AMOV A,R0MOV DPTR,#TABLEMO

16、VC A,A+DPTRMOV P0,AMOV A,P1ANL A,#0F8HADD A,DISPBITMOV P1,AINC DISPBITMOV A,DISPBITCJNE A,#08H,NEXTMOV DISPBIT,#00HNEXT: INC T1CNTAMOV A,T1CNTACJNE A,#50,LL1MOV T1CNTA,#00HINC T1CNTBMOV A,T1CNTBCJNE A,#8,LL1MOV T1CNTB,#00HINC CNTMOV A,CNTCJNE A,#9,LLXMOV CNT,#00HMOV A,CNTLLX: CJNE A,#01H,NEX1MOV 30H

17、,#8LL1: LJMP DONENEX1: CJNE A,#02H,NEX2MOV 31H,#8MOV 30H,#8LJMP DONENEX2: CJNE A,#03H,NEX3MOV 32H,#8MOV 31H,#8MOV 30H,#8LJMP DONENEX3: CJNE A,#04H,NEX4MOV 33H,#8MOV 32H,#8MOV 31H,#8MOV 30H,#8LJMP DONENEX4: CJNE A,#05H,NEX5MOV 34H,#8MOV 33H,#8MOV 32H,#8MOV 31H,#8MOV 30H,#8LJMP DONENEX5: CJNE A,#06H,N

18、EX6MOV 35H,#8MOV 34H,#8MOV 33H,#8MOV 32H,#8MOV 31H,#8MOV 30H,#8LJMP DONENEX6: CJNE A,#07H,NEX7MOV 36H,#8MOV 35H,#8MOV 34H,#8MOV 33H,#8MOV 32H,#8MOV 31H,#8MOV 30H,#8LJMP DONENEX7: CJNE A,#08H,NEX8MOV 37H,#8MOV 36H,#8MOV 35H,#8MOV 34H,#8MOV 33H,#8MOV 32H,#8MOV 31H,#8MOV 30H,#8LJMP DONENEX8: CJNE A,#00

19、H,DONEMOV 37H,#10MOV 36H,#10MOV 35H,#10MOV 34H,#10MOV 33H,#10MOV 32H,#10MOV 31H,#10MOV 30H,#10LL: LJMP DONEDONE: RETITABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,00HEND7 C语言源程序#include unsigned char code dispcode=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x

20、00;unsigned char dispbitcode=0xf8,0xf9,0xfa,0xfb,0xfc,0xfd,0xfe,0xff;unsigned char dispbuf8=16,16,16,16,16,16,16,16;unsigned char dispbitcnt;unsigned int t02scnt;unsigned char t5mscnt;unsigned char u;unsigned char i;void main(void)TMOD=0x02;TH0=0x06;TL0=0x06;TR0=1;ET0=1;EA=1;while(1);void t0(void) i

21、nterrupt 1 using 0t5mscnt+;if(t5mscnt=4)t5mscnt=0;P0=dispcodedispbufdispbitcnt;P1=dispbitcodedispbitcnt;dispbitcnt+;if(dispbitcnt=8)dispbitcnt=0;t02scnt+;if(t02scnt=1600)t02scnt=0;u+;if(u=9)u=0;for(i=0;i8;i+)dispbufi=16;for(i=0;iu;i+)dispbufi=8; 22 电子琴 1 实验任务 （1 由4X4组成16个按钮矩阵，设计成16个音。 （2 可随意弹奏想要表达的音

22、乐。 2 电路原理图 图4.22.1 3 系统板硬件连线 （1 把“单片机系统”区域中的P1.0端口用导线连接到“音频放大模块”区域中的SPK IN端口上； （2 把“单片机系统“区域中的P3.0P3.7端口用8芯排线连接到“4X4行列式键盘”区域中的C1C4R1R4端口上； 4 相关程序内容 （1 4X4行列式键盘识别； （2 音乐产生的方法； 一首音乐是许多不同的音阶组成的，而每个音阶对应着不同的频率，这样我们就可以利用不同的频率的组合，即可构成我们所想要的音乐了，当然对于单片机来产生不同的频率非常方便，我们可以利用单片机的定时/计数器T0来产生这样方波频率信号，因此，我们只要把一首歌曲的

23、音阶对应频率关系弄正确即可。现在以单片机12MHZ晶振为例，例出高中低音符与单片机计数T0相关的计数值如下表所示 音符频率（HZ）简谱码（T值）音符频率（HZ）简谱码（T值）低1DO26263628# 4 FA#74064860#1DO#27763731中 5 SO78464898低2RE29463835# 5 SO#83164934#2 RE#31163928中 6 LA88064968低 3 M33064021# 693264994低 4 FA34964103中 7 SI98865030# 4 FA#37064185高 1 DO104665058低 5 SO39264260# 1 DO#1

24、10965085# 5 SO#41564331高 2 RE117565110低 6 LA44064400# 2 RE#124565134# 646664463高 3 M131865157低 7 SI49464524高 4 FA139765178中 1 DO52364580# 4 FA#148065198# 1 DO#55464633高 5 SO156865217中 2 RE58764684# 5 SO#166165235# 2 RE#62264732高 6 LA176065252中 3 M65964777# 6186565268中 4 FA69864820高 7 SI196765283下面我们

25、要为这个音符建立一个表格，有助于单片机通过查表的方式来获得相应的数据 低音019之间，中音在2039之间，高音在4059之间 TABLE: DW 0,63628,63835,64021,64103,64260,64400,64524,0,0 DW 0,63731,63928,0,64185,64331,64463,0,0,0 DW 0,64580,64684,64777,64820,64898,64968,65030,0,0 DW 0,64633,64732,0,64860,64934,64994,0,0,0 DW 0,65058,65110,65157,65178,65217,65252,6

26、5283,0,0 DW 0,65085,65134,0,65198,65235,65268,0,0,0 DW 0 2、音乐的音拍，一个节拍为单位（C调） 曲调值DELAY曲调值DELAY调4/4125ms调4/462ms调3/4187ms调3/494ms调2/4250ms调2/4125ms对于不同的曲调我们也可以用单片机的另外一个定时/计数器来完成。 下面就用AT89S51单片机产生一首“生日快乐”歌曲来说明单片机如何产生的。 在这个程序中用到了两个定时/计数器来完成的。其中T0用来产生音符频率，T1用来产生音拍。 5 程序框图 图4.22.2 6 汇编源程序KEYBUF EQU 30HSTH

27、0 EQU 31HSTL0 EQU 32HTEMP EQU 33HORG 00HLJMP STARTORG 0BHLJMP INT_T0START: MOV TMOD,#01HSETB ET0SETB EAWAIT:MOV P3,#0FFHCLR P3.4MOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKEY1LCALL DELY10MSMOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKEY1MOV A,P3ANL A,#0FHCJNE A,#0EH,NK1MOV KEYBUF,#0LJMP DK1NK1: CJNE A,#0DH,NK2MOV KEYBUF

28、,#1LJMP DK1NK2: CJNE A,#0BH,NK3MOV KEYBUF,#2LJMP DK1NK3: CJNE A,#07H,NK4MOV KEYBUF,#3LJMP DK1NK4: NOPDK1:MOV A,KEYBUFMOV DPTR,#TABLEMOVC A,A+DPTRMOV P0,AMOV A,KEYBUFMOV B,#2MUL ABMOV TEMP,AMOV DPTR,#TABLE1MOVC A,A+DPTRMOV STH0,AMOV TH0,AINC TEMPMOV A,TEMPMOVC A,A+DPTRMOV STL0,AMOV TL0,ASETB TR0DK1A:

29、 MOV A,P3ANL A,#0FHXRL A,#0FHJNZ DK1ACLR TR0NOKEY1:MOV P3,#0FFHCLR P3.5MOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKEY2LCALL DELY10MSMOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKEY2MOV A,P3ANL A,#0FHCJNE A,#0EH,NK5MOV KEYBUF,#4LJMP DK2NK5: CJNE A,#0DH,NK6MOV KEYBUF,#5LJMP DK2NK6: CJNE A,#0BH,NK7MOV KEYBUF,#6LJMP DK2NK7:

30、CJNE A,#07H,NK8MOV KEYBUF,#7LJMP DK2NK8: NOPDK2:MOV A,KEYBUFMOV DPTR,#TABLEMOVC A,A+DPTRMOV P0,AMOV A,KEYBUFMOV B,#2MUL ABMOV TEMP,AMOV DPTR,#TABLE1MOVC A,A+DPTRMOV STH0,AMOV TH0,AINC TEMPMOV A,TEMPMOVC A,A+DPTRMOV STL0,AMOV TL0,ASETB TR0DK2A: MOV A,P3ANL A,#0FHXRL A,#0FHJNZ DK2ACLR TR0NOKEY2:MOV P3

31、,#0FFHCLR P3.6MOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKEY3LCALL DELY10MSMOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKEY3MOV A,P3ANL A,#0FHCJNE A,#0EH,NK9MOV KEYBUF,#8LJMP DK3NK9: CJNE A,#0DH,NK10MOV KEYBUF,#9LJMP DK3NK10: CJNE A,#0BH,NK11MOV KEYBUF,#10LJMP DK3NK11: CJNE A,#07H,NK12MOV KEYBUF,#11LJMP DK3NK12: NOPDK3:M

32、OV A,KEYBUFMOV DPTR,#TABLEMOVC A,A+DPTRMOV P0,AMOV A,KEYBUFMOV B,#2MUL ABMOV TEMP,AMOV DPTR,#TABLE1MOVC A,A+DPTRMOV STH0,AMOV TH0,AINC TEMPMOV A,TEMPMOVC A,A+DPTRMOV STL0,AMOV TL0,ASETB TR0DK3A: MOV A,P3ANL A,#0FHXRL A,#0FHJNZ DK3ACLR TR0NOKEY3:MOV P3,#0FFHCLR P3.7MOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKE

33、Y4LCALL DELY10MSMOV A,P3ANL A,#0FHXRL A,#0FHJZ NOKEY4MOV A,P3ANL A,#0FHCJNE A,#0EH,NK13MOV KEYBUF,#12LJMP DK4NK13: CJNE A,#0DH,NK14MOV KEYBUF,#13LJMP DK4NK14: CJNE A,#0BH,NK15MOV KEYBUF,#14LJMP DK4NK15: CJNE A,#07H,NK16MOV KEYBUF,#15LJMP DK4NK16: NOPDK4:MOV A,KEYBUFMOV DPTR,#TABLEMOVC A,A+DPTRMOV P0

34、,AMOV A,KEYBUFMOV B,#2MUL ABMOV TEMP,AMOV DPTR,#TABLE1MOVC A,A+DPTRMOV STH0,AMOV TH0,AINC TEMPMOV A,TEMPMOVC A,A+DPTRMOV STL0,AMOV TL0,ASETB TR0DK4A: MOV A,P3ANL A,#0FHXRL A,#0FHJNZ DK4ACLR TR0NOKEY4:LJMP WAITDELY10MS:MOV R6,#10D1: MOV R7,#248DJNZ R7,$DJNZ R6,D1RETINT_T0:MOV TH0,STH0MOV TL0,STL0CPL

35、P1.0RETITABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07HDB 7FH,6FH,77H,7CH,39H,5EH,79H,71HTABLE1: DW 64021,64103,64260,64400DW 64524,64580,64684,64777DW 64820,64898,64968,65030DW 65058,65110,65157,65178END7 C语言源程序#include unsigned char code table=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,

36、0x39,0x5e,0x79,0x71;unsigned char temp;unsigned char key;unsigned char i,j;unsigned char STH0;unsigned char STL0;unsigned int code tab=64021,64103,64260,64400,64524,64580,64684,64777,64820,64898,64968,65030,65058,65110,65157,65178;void main(void)TMOD=0x01;ET0=1;EA=1;while(1)P3=0xff;P3_4=0;temp=P3;te

37、mp=temp & 0x0f;if (temp!=0x0f)for(i=50;i0;i-)for(j=200;j0;j-);temp=P3;temp=temp & 0x0f;if (temp!=0x0f)temp=P3;temp=temp & 0x0f;switch(temp)case 0x0e:key=0;break;case 0x0d:key=1;break;case 0x0b:key=2;break;case 0x07:key=3;break;temp=P3;P1_0=P1_0;P0=tablekey;STH0=tabkey/256;STL0=tabkey%256;TR0=1;temp=

38、temp & 0x0f;while(temp!=0x0f)temp=P3;temp=temp & 0x0f;TR0=0;P3=0xff;P3_5=0;temp=P3;temp=temp & 0x0f;if (temp!=0x0f)for(i=50;i0;i-)for(j=200;j0;j-);temp=P3;temp=temp & 0x0f;if (temp!=0x0f)temp=P3;temp=temp & 0x0f;switch(temp)case 0x0e:key=4;break;case 0x0d:key=5;break;case 0x0b:key=6;break;case 0x07:

39、key=7;break;temp=P3;P1_0=P1_0;P0=tablekey;STH0=tabkey/256;STL0=tabkey%256;TR0=1;temp=temp & 0x0f;while(temp!=0x0f)temp=P3;temp=temp & 0x0f;TR0=0;P3=0xff;P3_6=0;temp=P3;temp=temp & 0x0f;if (temp!=0x0f)for(i=50;i0;i-)for(j=200;j0;j-);temp=P3;temp=temp & 0x0f;if (temp!=0x0f)temp=P3;temp=temp & 0x0f;swi

40、tch(temp)case 0x0e:key=8;break;case 0x0d:key=9;break;case 0x0b:key=10;break;case 0x07:key=11;break;temp=P3;P1_0=P1_0;P0=tablekey;STH0=tabkey/256;STL0=tabkey%256;TR0=1;temp=temp & 0x0f;while(temp!=0x0f)temp=P3;temp=temp & 0x0f;TR0=0;P3=0xff;P3_7=0;temp=P3;temp=temp & 0x0f;if (temp!=0x0f)for(i=50;i0;i

41、-)for(j=200;j0;j-);temp=P3;temp=temp & 0x0f;if (temp!=0x0f)temp=P3;temp=temp & 0x0f;switch(temp)case 0x0e:key=12;break;case 0x0d:key=13;break;case 0x0b:key=14;break;case 0x07:key=15;break;temp=P3;P1_0=P1_0;P0=tablekey;STH0=tabkey/256;STL0=tabkey%256;TR0=1;temp=temp & 0x0f;while(temp!=0x0f)temp=P3;temp=temp & 0x0f;TR0=0;