1 / 13
文档名称:

机械基础设计.doc

格式:doc   大小:120KB   页数:13页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

机械基础设计.doc

上传人:读书百遍 2019/11/28 文件大小:120 KB

下载得到文件列表

机械基础设计.doc

相关文档

文档介绍

文档介绍:音乐盒实验报告专业:生产过程自动化班级:08机电(2)班姓名:何远龙指导老师:陈玉琼2010-10-08一、实验材料1、仪器设备,软件工具软件用途keil软件源程序的编译Proteus软件实现电路的仿真Progisp软件将程序下载到学****板上进行实验硬件用途万用表检测硬件电路学****板实现源程序的调试,并通过实验现象来修改程序2、元器件清单元件名称参数数量IC插座DIP401单片机89C511晶体振荡器12MHZ1瓷片电容22PF2按键4IC插座DIP81三极管2N50881电阻1K4电解电容47uF1电阻5108蜂鸣器无源式1小喇叭1放大器LM3861二、实验过程描述1、设计功能描述(1)通过改变单片机输出脉冲高低电平的保持时间和频率,可以得到音阶和调节不同的音调,运用定时中断来控制节拍,从而来演奏乐曲。(2)用数码管显示当前播放的歌曲序号。(3)通过功能键控制上,下曲目的选择以及乐曲的暂停和播放。2、原理图设计思路,经功率放大器控制发声器件小喇叭。,三极管导通,小喇叭通电;,三极管截止,小喇叭断电。、低电平,就会产生一定频率的矩形波,小喇叭就能产生一定频率的声音,再配合延时程序控制高、低电平的持续时间,就能改变音调。、、、,暂停键、下一曲键、上一曲键。图中还将共阳级数码管相应的段选控制端用P0口控制,将数码管的公共端,也称“位选端”由P2口控制。原理图如下:3、程序设计思路,并画出流程图程序思路:初始化设置,开延时与外部中断,,然后循环播放。,再按一次则继续播放;,、上一曲功能。播放歌曲是多少数码管则显示相应的数字。流程图如下:主流程调用del20子程序First子程序选曲地址清0显示码送P0口,显示位送P2口表1首地址送DPTR调用music0子程序调用next子程序RETNext子程序选曲地址加1显示码送P0口,显示位送P2口表2首地址送DPTR是=1?调用music0子程序选曲地址加1RET调用first子程序是=2?表3首地址送DPTR显示码送P0口,显示位送P2口调用music0子程序选曲地址加1是=3?显示码送P0口,显示位送P2口表2首地址送DPTR调用music0子程序表3首地址送DPTR是=2?选曲地址加1Last子程序调用music0子程序是=1?是=0?表1首地址送DPTR显示码送P0口,显示位送P2口显示码送P0口,显示位送P2口调用music0子程序RET?Music0子程序中断计数单元清0查表取常数是结束符00H?恢复初始条件A清零延时1秒后,再循环是休止符FFH????音阶常数送R6R0=0?取节拍常数送R7启动T0定时器,按R6常数延时节拍时间到否停止T0计数,中断计数20H单元清0,DPTR加1RET调用del20子程序延时100ms调用del20子程序跳转到START??调用next子程序调用last子程序调用del20子程序Del20子程序循环次数05送R4空操作RETR4-1=0?R3-1=0?中断响应调用del20子程序?R0值取反中断返回4、写出源程序与必要的注释 shuzhi equ 3fh ;选曲目的地址 song equ ; play equ ; addone equ ; subone equ ; dul equ p0 ;数码管段选P0口 wel equ p2 ; 0000h ljmp 000bh ;定时器0溢出中断入口地址 ajmp cont ; 0013h ;外部中断一入口地址 ajmp pause ; 0100hstart: mov sp,#50h mov th0,#0dbh ;定时器赋初值 mov tl0,#0ffh mov tmod,#01h mov ie,#86h ;开中断 mov tcon,#00h mov r0,#00h mov shuzhi,#00hmain: jnb play,first ; sjmp mainfirst: acall del20 jnb play,first ; mov shuzhi,#00h mov dul,#0f9h ;显示数值1 mov wel,#7fh ;显示位送P2口 mov dptr,#dat1 ;表1首地址送DPTR acall music0 acall next retnext: inc shuzhi ;shuzhi+1 mov a,shuzhi cjne a,#01,loop3 ;A是否=1,不等就跳转到LOOP3 mov dptr,#dat2 ;表2首地址送DPTR mov dul,#0a4h ;显示数值2 mov wel,#7fh acall music0 inc aloop3: cjne a,#02,loop4 ;A是否=2,不等就跳转到LOOP4 mov dptr,#dat3 ;表3首地址送DPTR mov dul