文档详情

蜂鸣器变声控制实验 单片机实验报告.docx

发布:2021-01-05约2.43千字共6页下载文档
文本预览下载声明
蜂鸣器变声控制实验 一.实验目的 1.熟悉数码管的功能和使用。 2.熟悉延时子程序的编写和使用。 3.初步熟悉单片机软硬件设计方法。 二.实验仪器 计算机、Keil编程环境、普中下载软件、单片机开发实验仪。 三.实验内容 通过按键不仅可以显示相应的字符,同时让P1.0连接蜂鸣器,按下不同按键,发生高低不同的声音。 四. 实验线路 五. 注意事项 1.安装实验仪时,先接通讯串口线,再开电源开关。 2.实验过程中,在进行接插线操作时,必须先关闭电源。 六. 实验步骤 1、主机连线说明: JP10 单片机P0口(8位) JP3 共阳极数码管 JP11 单片机P2口(8位) JP5 8个独立按键 JP8.8 P1.0 J8 蜂鸣器控制端 七. 实验步骤 1.打开Keil编程软件编写程序,并进行汇编产生HEX文件。 (1)流程图 (2)汇编源程序 ORG?0000H?? LJMP?MAIN??;0000H地址跳转MAIN程序 ORG?000BH?? LJMP?T0INT??;000BH跳转TOINT子程序 ORG?0030H MAIN:???MOV?SP,#60H?;赋值堆栈指针SP=60H?? MA1:?MOV?A,P2????????;赋值A=P2,如果没有按键按下P2=FFH ?????CJNE?A,#0FFH,LP2?????;A≠FFH时跳转LP2,否则不执行 ?????????LJMP?LP1?????????;跳转LP1 LP2:????LCALL???DEY10?;调用DEY10 ??????????MOV?A,P2????????;赋值A=P2 ??????CJNE?A,#0FFH,LP3????;A≠FFH时跳转LP3 ??????LJMP?LP1????????????;跳转LP1 LP3:????MOV?R3,#1??;识别按键号 ??????????MOV?R2,#8 LP4:????RRC?A?????;循环右移 ??????????JNC?LP5?????;无进位跳转LP5,A最低位为0时右移无进位 ??????INC??R3??????????;若按键是2~8,R3?+对应按键号 ??????DJNZ?R2,LP4?????;R2?-1≠0跳转LP4 ??????LJMP?LP1????????;跳转LP1 LP5:????MOV?A,P2?? ??????????CJNE?A,#0FFH,LP5??;A≠FFH时跳转LP5 ??????LCALL?DISPLAY????;调用DISPLAY,取八段LED字形码数据赋值给P0 ??????MOV???A,R3?????????;不同按键的R3 ??????MOV???B,#30H???????; ??????MUL???AB???????????;R3与30H相乘,高字节放在B,低字节放在A ??????MOV???50H,A????????;定时器初值,不同按键的定时器初值设置不同,频率不同 ??????LCALL?T0INI???????;调用定时函数 LP1:????LJMP?MA1??? DISPLAY: ????????????MOV?A,R3?????????;R3=按键号 ????????MOV?DPTR,#500H??;将数组地址赋给数据指针寄存器 ????????MOVC?A,@A+DPTR??;取数组中的数据 ????????MOV?P0,A???;将数组中数据赋给P0口 ????????RET DEY10:?MOV?R6,#200 ???????????MOV?R7,#0 DEY11:?DJNZ??R7,DEY11??? ???????????DJNZ??R6,DEY11 RET T0INI:?MOV?TMOD,;模式:T0定时器方式2,启动与外部中断无关 ????????MOV?TH0,50H???????;定时器高8位初值 ????????MOV?TL0,50H???????;定时器低8位初值 ????????SETB?TR0??????????;启动定时 ????????SETB?ET0??????????;设置定时器T0溢出中断 ????????SETB?EA???????????;中断允许 ????????RET???????????????;返回调用处 T0INT:???CPL?P1.0????;P1.0取反,定时器溢出定时器中断响应 ????????????RETI???????;返回中断响应之前的位置 ????????????END dey1:?MOV?R5,#40?????????;延时子程序 DEYY1:LCALL?DEY10 ????????DJNZ?R5,DE
显示全部
相似文档