单片机电子琴实验

电子琴

设 计 报 告

专 业： 通信工程 班 级： 通信1401 团 队： 第四组 指导老师： 李毅 队 员：

设计时间： 2016年6月23日星期四

一、 电路设计

二、 汇编语言

LJMP MAIN

ORG 000BH LJMP ITOP ORG 001BH JMP TIM0

MAIN:MOV P0,#0FFH MOV 31H,#00H MOV 32H,#00H MOV 33H,#00H MOV 34H,#00H MOV SP,#60H MOV TMOD,#11H SETB ET0 SETB EA LJMP LOOP KEY1:LCALL TIME1 JB P1.0,LOOP CLR P0.0

MOV 31H,#43H MOV 32H,#0FCH MOV TL0,31H MOV TH0,32H SETB TR0

KEY11:JB P1.0,LOOP LJMP KEY11 KEY2:LCALL TIME1 JB P1.1,LOOP CLR P0.1

MOV 31H,#0ADH MOV 32H,#0FCH MOV TL0,31H MOV TH0,32H SETB TR0 KEY21:JB P1.1,LOOP LJMP KEY21 KEY3:LCALL TIME1 JB P1.2,LOOP CLR P0.2

MOV 31H,#0A0H MOV 32H,#0FDH MOV TL0,31H

MOV TH0,32H SETB TR0 KEY31:JB P1.2,LOOP LJMP KEY31 KEY4:LCALL TIME1 JB P1.3,LOOP CLR P0.3

MOV 31H,#34H MOV 32H,#0FDH MOV TL0,31H MOV TH0,32H SETB TR0

KEY41:JB P1.3,LOOP LJMP KEY41 LOOP:MOV P2,#00H MOV P0,#0FFH MOV P1,#0FFH CLR TR0

JNB P1.0,KEY1 JNB P1.1,KEY2 JNB P1.2,KEY3 JNB P1.3,KEY4 JNB P1.4,KEY5 JNB P1.5,KEY6 JNB P1.6,KEY7 JNB P1.7,KEY8 LJMP LOOP KEY5:LCALL TIME1 JB P1.4,LOOP CLR P0.4

MOV 31H,#82H MOV 32H,#0FDH MOV TL0,31H MOV TH0,32H SETB TR0

KEY51:JB P1.4,LOOP LJMP KEY51 KEY6:LCALL TIME1 JB P1.5,LOOP CLR P0.5

MOV 31H,#0C8H MOV 32H,#0FDH MOV TL0,31H MOV TH0,32H

SETB TR0

KEY61:JB P1.5,LOOP LJMP KEY61 KEY7:LCALL TIME1 JB P1.6,LOOP CLR P0.6

MOV 31H,#06H MOV 32H,#0FEH MOV TL0,31H MOV TH0,32H SETB TR0

KEY71:JB P1.6,LOOP LJMP KEY71 KEY8: SETB ET1 CLR P0.7

START0:MOV 30H,#00H NEXT: MOV A,30H

MOV DPTR,#TABLE MOVC A,@A+DPTR MOV R2,A JZ END0 ANL A,#0FH MOV R5,A MOV A,R2 SWAP A ANL A,#0FH JNZ SING CLR TR1 JMP D1 SING: DEC A

MOV 22H,A RL A MOV DPTR,#TABLE1 MOVC A,@A+DPTR MOV TH1,A MOV 33H,A MOV A,22H RL A INC A MOVC A,@A+DPTR MOV TL1,A MOV 34H,A SETB TR1 D1: CALL DELAY

INC 30H JMP NEXT END0:CLR TR1 JMP MAIN TIM0:PUSH ACC PUSH PSW MOV TH1,33H MOV TL1,34H CPL P2.0 POP PSW POP ACC RETI DELAY: MOV R7,#02 D2: MOV R4,#187 D3: MOV R3,#248 DJNZ R3,$ DJNZ R4,D3 DJNZ R7,D2 DJNZ R5,DELAY RET

ITOP: MOV TL0,31H MOV TH0,32H CPL P2.0 RETI TABLE1:

DW 64260,64400,64524,64580 DW 64684,64777,64820,64898 DW 64968,65030,65058,65110 DW 65157,65178,65217 TABLE:

DB 82H,01H,81H,94H,84H DB 0B4H,0A4H,04H

DB 82H,01H,81H,94H,84H DB 0C4H,0B4H,04H

DB 82H,01H,81H,0F4H,0D4H DB 0B4H,0A4H,94H

DB 0E2H,01H,0E1H,0D4H,0B4H DB 0C4H,0B4H,04H

DB 82H,01H,81H,94H,84H DB 0B4H,0A4H,04H

DB 82H,01H,81H,94H,84H DB 0C4H,0B4H,04H

DB 82H,01H,81H,0F4H,0D4H DB 0B4H,0A4H,94H

DB 0E2H,01H,0E1H,0D4H,0B4H DB 0C4H,0B4H,04H DB 00H

TIME1: MOV R5,#25 D8: MOV R6,#200 DJNZ R6,$ DJNZ R5,D8 RET END