实验三、 矩形键盘的使用

1、实 验 报 告课程名称 单片机 专业班级 电子1142 姓 名 学 号 电气与信息学院和谐 勤奋 求是 创新实验教学考核和成绩评定办法1 课内实验考核成绩，严格按照该课程教学大纲中明确规定的比重执行。实验成绩不合格者，不能参加课程考试，待补做合格后方能参加考试。2 单独设立的实验课考核按百分制评分，考核内容应包括基本理论、实验原理和实验。3 实验考核内容包括：1）实验预习；2）实验过程（包括实验操作、实验记录和实验态度、表现）；3）实验报告；权重分别为0.2 、0.4 、 0.4；原则上根据上述三个方面进行综合评定。学生未取得1）和2）项成绩时，第3）项成绩无效。4 实验指导教师应严格按照考核

2、内容分项给出评定成绩，并及时批改实验报告，给出综合成绩，反馈实验中出现的问题。实验成绩在教师手册中有记载。实验报告主要内容一 实验目的 二 实验仪器及设备三 实验原理四 实验步骤五 实验记录及原始记录六 数据处理及结论七 实验体会（可选项）注：1. 为了节省纸张，保护环境，便于保管实验报告，统一采用A4纸，实验报告建议双面打印（正文采用宋体五号字）或手写,右侧装订。2. 实验类别指验证、演示、综合、设计、创新（研究）、操作六种类型实验。3. 验证性实验：是指为了使学生巩固课程基本理论知识而开设的强调演示和证明，注重实验结果（事实、概念或理论）的实验。4. 综合性实验：是指实验内容涉及本课程的综

3、合知识或本课程相关的课程知识的实验。5. 设计性实验：是指给定实验目的、要求和实验条件，由学生自行设计实验方案并加以实现的实验。实验题目 实验三、 矩形键盘的使用实验室电子实验室实验时间2013年 12月 4日 实验类别 同组人数1成 绩指导教师签字： 于新1、 实验目的 了解矩形键盘的工作方式 掌握矩形键盘的使用 按下矩形键盘在数码管上显示出数字二、 实验装置 Proteus软件，keil软件三、 实验内容1. 了解矩形键盘的原理及工作方式，画出模拟硬件电路proteus图2. 根据实验目的，画出程序流程图。3. 根据程序流程图，编写程序。NUM EQU 30H ;给标号赋值WEI EQU

4、33HORG 0000HJMP MAINORG 000BH ;定时中断0入口地址JMP TT0ORG 001BH ;定时中断1入口地址JMP TT1MAIN:MOV TMOD,#11H ;选择定时器工作方式 MOV TH0,#0FFH ;给T0赋除值 MOV TL0,#018H MOV TH1,#0F4H ;给T1赋初值 MOV TH1,#0D8H SETB ET0 ;T0允许 SETB ET1 ;T0允许 SETB EA ;总允许 SETB IT0 ;边沿触发 SETB TR0 ;启动T0 SETB TR1 ;启动T0 MOV WEI,#32H JMP $;TT0: MOV TH0,#04F

5、H ;给T0重装值 MOV TL0,#018H MOV P2,#0FEH ;使P2.0为低，其余位为高 ，查询第一行 NOP NOP MOV A,P2 CJNE A,#0EEH,NK7 ;查询第一行第一列 MOV NUM,#7 ;符合取值 RETINK7: CJNE A,#0DEH,NK8 ;查询第一行第二列 MOV NUM,#8;符合取值 RETINK8:CJNE A,#0BEH,NK9 ;查询第一行第三列 MOV NUM,#9 ;符合取值 RETINK9:CJNE A,#07EH,NKA ;查询第一行第四列 MOV NUM,#10 ;符合取值 RETI;第二行NKA:MOV P2,#0FD

6、H;使P2.1为低，其余位为高，查询第二行 NOP NOP MOV A,P2 CJNE A,#0EDH,NK4 ;查询第二行第一列 MOV NUM,#4 ;符合取值 RETINK4: CJNE A,#0DDH,NK5;查询第二行第二列 MOV NUM,#5 ;符合取值 RETINK5:CJNE A,#0BDH,NK6;查询第二行第三列 MOV NUM,#6 ;符合取值 RETINK6:CJNE A,#07DH,NK11 ;查询第二行第四列 MOV NUM,#11 ;符合取值 RETI;第三行NK11: MOV P2,#0FBH ;使P2.2为低，其余位为高，查询第三行 NOP NOP MOV

7、A,P2 CJNE A,#0EBH,NK1;查询第三行第一列 MOV NUM,#1;符合取值 RETINK1: CJNE A,#0DBH,NK2;查询第三行第二列 MOV NUM,#2;符合取值 RETINK2:CJNE A,#0BBH,NK3;查询第三行第三列 MOV NUM,#3 ;符合取值 RETINK3:CJNE A,#07BH,NK12;查询第三行第四列 MOV NUM,#12;符合取值 RETI;第4行NK12: MOV P2,#0F7H ;使P2.0为低，其余位为高，查询第四行 MOV A,P2 CJNE A,#0E7H,NK13 ;查询第四行第一列 MOV NUM,#13;符合

8、取值 RETINK13: CJNE A,#0D7H,NK0 ;查询第四行第二列 MOV NUM,#0 ;符合取值 RETINK0:CJNE A,#0B7H,NK14 ;查询第四行第三列 MOV NUM,#14 ;符合取值 RETINK14:CJNE A,#077H,NKSR ;查询第四行第四列 MOV NUM,#15 ;符合取值NKSR:MOV P2,#0FFH RETI;TT1:MOV P0,#0ffH MOV TH1,#0efH ;给T0重装值 MOV TL1,#00H MOV R0,WEI MOV A,R0 ;查表输出 MOV DPTR,#TAB MOVC A,A+DPTR MOV P1,A MOV A,WEI CJNE A,#32H,WEI31WEI32:MOV P0,#0FBH DEC WEI RETIWEI31:CJNE A,#31H,WEI30 MOV P0,#0FDH DEC WEI RETIWEI30:CJNE A,#3