C51汇编语言完整源码
单片机最小系统,两位LED数码管由串口输出接两个164驱动,Lout,Rout为左右声道输出,SET, ALT0, ALT1为三个按键,也可自己在开始的I/O定义改成你想用的I/O口;12M晶振,若用89C51则只可装下约14首歌曲,用89C52则可装下近40曲
源程序:
; Electronic Music ; Version 4.50 ; Copyright (c) XAJ 2001 ;============================ LOUT BIT P1. ;左声道输出 ROUT BIT P1. ;右声道输出 SET BIT P3. ;SET按键 ALT0 BIT P3. ;ALT0按键 ALT1 BIT P3. ;ALT1按键 ;REPNUM EQU 09H重复段编号 STATU EQU 0AH;状态寄存器 LDYDSR EQU 0BH;左低音度数 RDYDSR EQU 0CH;右低音度数 LDYAR EQU 0DH;左低音协助 RDYAR EQU 0EH;右低音协助 JPCLK EQU 0FH;节拍时钟 GENCLK EQU 10H;通用时钟 SNSDCLK EQU 11H;搜、存显示时钟 GEN16T0 EQU 12H;通用16位时钟 GEN16T1 EQU 13H; SETST0 EQU 14H;设置状态 SETST1 EQU 15H; 定时时钟 DISNUM0 EQU 16H;显示数值 DISNUM1 EQU 17H;寄存器(2位) CSN EQU 18H;当前曲曲号 REP0L EQU 19H;0号重复段地址 REP0H EQU 1AH; REP1L EQU 1BH;1号重复段地址 REP1H EQU 1CH; REP2L EQU 1DH;2号重复段地址 REP2H EQU 1EH REP3L EQU 1FH;3号重复段地址 REP3H EQU 23H; COSPEEDN EQU 24H; SPENR EQU 25H; LOCF BIT 00H;左声道开关标志 ROCF BIT 01H;右声道开关标志 SECHSTOF BIT 02H;搜索、存储标志 NEXTSF BIT 03H;下一曲标志 CSBESTOF BIT 04H;当前曲锁存/释放 CUYFD BIT 05H;当前音符显示 KSETF BIT 06H;SET键按下标志 KALT0F BIT 07H;ALT0键按下标志 KALT1F BIT 08H;ALT1键按下标志 SPEEDF BIT 09H;速度增/减标志 TONEF BIT 0AH;音调增/减标志 YPBIT BIT 0BH;音频逻辑输出 KBDISF BIT 0CH;键盘显示标志 REP0F BIT 0DH;0号重复段控制 REP1F BIT 0EH;1号重复段控制 REP2F BIT 0FH;2号重复段控制 REP3F BIT 10H;3号重复段控制 SBOTM EQU 25H;堆栈区(栈底) BUFF0 EQU 43H;锁存曲数 BUFF EQU 44H;锁存曲缓冲区 ;============================ ;=========BEGIN============== ORG 0000H LJMP MAIN ;---------T0INT-------------- ORG 000BH LJMP T0INT ;---------T1INT-------------- ORG 001BH LJMP T1INT ;.音频发生器 ;---------YPFSQ(01)---------- ORG 0030H T0INT: MOV TL0,R4 MOV TH0,R5 PUSH PSW PUSH ACC PUSH 01H JB LOCF,ROPER MOV R1,#00H MOV A,LDYAR T0LLOP: RRC A MOV YPBIT,C XCH A,R1 CJNE A,LDYDSR,T0LNEXT MOV C,YPBIT MOV LOUT,C INC LDYAR ; INC P0 SJMP ROPER T0LNEXT: XCH A,R1 INC R1 SJMP T0LLOP ROPER: JB ROCF,T0RETI MOV R1,#00H MOV A,RDYAR T0RLOP: RRC A MOV YPBIT,C XCH A,R1 CJNE A,RDYDSR,T0RNEXT MOV C,YPBIT MOV ROUT,C INC RDYAR ; INC P2 SJMP T0RETI T0RNEXT: XCH A,R1 INC R1 SJMP T0RLOP T0RETI: POP 01H POP ACC POP PSW RETI ;.通用时钟 ;---------CLOCK(02)---------- T1INT: MOV TL1,#0F0H MOV TH1,#0D8H PUSH PSW PUSH ACC INC JPCLK INC GENCLK INC SNSDCLK MOV A,SNSDCLK CJNE A,#0FFH,T1NEXT CLR SECHSTOF T1NEXT: INC GEN16T0 MOV A,GEN16T0 CJNE A,#,T1NEXT0 MOV GEN16T0,#00H INC GEN16T1 T1NEXT0: INC SETST0 MOV A,SETST0 CJNE A,#,T1RETI MOV SETST0,#00H INC SETST1 MOV A,SETST1 CJNE A,#,T1RETI MOV SETST1,#00H MOV STATU,#00H T1RETI: POP ACC POP PSW RETI ;.显示子程序 ;---------DISPLAY(03)-------- DISPLAY: PUSH ACC PUSH DPL PUSH DPH MOV DPTR,#T_FIGCODE MOV A,DISNUM0 MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV A,DISNUM1 MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI POP DPH POP DPL POP ACC RET T_FIGCODE: DB 088H,0EBH,04CH,049H ; DB 02BH,019H,018H,0CBH ; 4 5 6 7 DB 008H,009H,00AH,038H ; 8 9 A B DB 09CH,068H,01CH,01EH ; C D E F DB 080H,0E3H,044H,041H ; 0. 1. 2. 3. DB 023H,011H,010H,0C3H ; 4. 5. 6. 7. DB 000H,001H,002H,030H ; 8. 9. A. B. DB 094H,060H,014H,016H ; C. D. E. F. DB 0FFH,02FH,098H,07FH ; 熄灭 # G - DB 07CH,078H,0BCH,00AH ; c o L R DB 029H ; Y ;.主程序MAIN ;---------MAIN(04)----------- MAIN: MOV R0,#01H CLR A CLRAM: MOV @R0,A INC R0 CJNE R0,#80H,CLRAM MOV R0,A MOV SP,#SBOTM MOV 08H,#BUFF ;MOV 09H,#BUFF MOV SCON,#00H MOV TMOD,#11H MOV TL1,#0F0H MOV TH1,#0D8H SETB EA SETB ET0 SETB ET1 SETB TR1 START: MOV DPTR,#T_SONGS RYF: LCALL RYFSUP MOV A,R7 JZ START CJNE R7,#0FFH,SYF JBC NEXTSF,NEXTSCL MOV A,STATU JNZ GONSBQ MOV A,BUFF0 JNZ MPSQCL LCALL PAQSCL SJMP MQNFD MPSQCL: LCALL PSQSCL MQNFD: LCALL QNFDSUP MOVPJRYF: INC DPTR INC DPTR SJMP RYF NEXTSCL: LCALL CSBESTOJG JB CSBESTOF,CALLPSCL LCALL PAQSCL SJMP MOVPJRYF CALLPSCL: LCALL PSQSCL SJMP MOVPJRYF GONSBQ: LCALL CSDPTR INC DPTR INC DPTR SJMP MOVPJRYF SYF: CJNE R6,#0FFH,CALLPLAY LCALL REPCLSUP SJMP MOVPJRYF CALLPLAY: LCALL YFDSUP LCALL PLAY SJMP MOVPJRYF ;5.读音符子程序 ;---------RYFSUP(05)-------- RYFSUP: CLR A MOVC A,@A+DPTR MOV R6,A MOV A,#01H MOVC A,@A+DPTR MOV R7,A RET ;.统唱曲首处理 ;---------PAQSCL(06)-------- PAQSCL: MOV CSN,R6 INC DPTR INC DPTR LCALL RYFSUP MOV 02H,R6 MOV 03H,R7 RET ;7.存唱曲首处理 ;---------PSQSCL(07)-------- PSQSCL: PUSH PSW SETB RS0 CLR RS1 PSQC7E: CJNE R0,#7EH,PSQNEXT PSQNEXT: JC PSQNEXT1 MOV R0,#BUFF SJMP PSQC7E PSQNEXT1: MOV A,@R0 JNZ PSQNEXT2 INC R0 INC R0 INC R0 SJMP PSQC7E PSQNEXT2: MOV CSN,@R0 INC R0 MOV 02H,@R0 INC R0 MOV 03H,@R0 INC R0 POP PSW LCALL CSDPTR INC DPTR INC DPTR RET ;.曲号闪显子程序 ;---------QNFDSUP(08)------- QNFDSUP: PUSH ACC MOV GEN16T0,#00H MOV GEN16T1,#00H QNGON: LCALL CSNSDISN LCALL DISPLAY MOV GENCLK,#00H QNWAIT: MOV A,GENCLK CJNE A,#,QNWAIT MOV DISNUM0,#20H MOV DISNUM1,#20H LCALL DISPLAY MOV GENCLK,#00H QNWAIT1: MOV A,GENCLK CJNE A,#,QNWAIT1 MOV A,GEN16T1 CJNE A,#,QNGON POP ACC RET ;.曲号送显示寄存器 ;---------CSNSDISN(09)------ CSNSDISN: MOV A,CSN ANL A,#0FH LCALL CSBESTOJG JNB CSBESTOF,NADP ADD A,#10H NADP: MOV DISNUM0,A MOV A,CSN SWAP A ANL A,#0FH MOV DISNUM1,A RET ;.当前曲是否被存储判断 ;---------CSBESTOJG(10)----- CSBESTOJG:PUSH ACC PUSH PSW MOV A,BUFF0 JZ CLRCSTOF MOV R0,#BUFF CSBCMPCSN:MOV A,@R0 CJNE A,CSN,CSBGSCAN SETB CSBESTOF SJMP CSBRET CSBGSCAN: INC R0 INC R0 INC R0 CJNE R0,#7EH,CSBNEXT CSBNEXT: JC CSBCMPCSN CLRCSTOF: CLR CSBESTOF MOV R0,#BUFF CSBCMP0: MOV A,@R0 JZ CSBRET INC R0 INC R0 INC R0 CJNE R0,#7EH,CSBNEXT1 CSBNEXT1: JC CSBCMP0 CSBRET: POP PSW POP ACC RET ;.找当前曲首址 ;---------CSDPTR(11)-------- CSDPTR: MOV DPTR,#T_SONGS CSDSCAN: LCALL RYFSUP CJNE R7,#0FFH,CSDNEXT MOV A,R6 CJNE A,CSN,CSDNEXT SJMP CSDRET CSDNEXT: INC DPTR INC DPTR SJMP CSDSCAN CSDRET: RET ;.重复段处理子程序 ;---------REPCLSUP(12)------ REPCLSUP: MOV A,R7 ANL A,#0FH CJNE A,#02H,CMPA3 MOV A,R7 SWAP A ANL A,#0FH JNZ H4CMP1 JNB REP0F,REPRET0 CLR REP0F MOV DPL,REP0L MOV DPH,REP0H REPRET0: RET H4CMP1: CJNE A,#01H,H4CMP2 JNB REP1F,REPRET CLR REP1F MOV DPL,REP1L MOV DPH,REP1H RET H4CMP2: CJNE A,#02H,H4CMP3 JNB REP2F,REPRET CLR REP2F MOV DPL,REP2L MOV DPH,REP2H RET H4CMP3: CJNE A,#03H,REPRET JNB REP3F,REPRET CLR REP3F MOV DPL,REP3L MOV DPH,REP3H RET CMPA3: CJNE A,#03H,REPRET MOV A,R7 SWAP A ANL A,#0FH JNZ H4VS1 SETB REP0F MOV REP0L,DPL MOV REP0H,DPH SJMP SREPHAD H4VS1: CJNE A,#01H,H4VS2 SETB REP1F MOV REP1L,DPL MOV REP1H,DPH SJMP SREPHAD H4VS2: CJNE A,#02H,H4VS3 SETB REP2F MOV REP2L,DPL MOV REP2H,DPH SJMP SREPHAD H4VS3: CJNE A,#03H,REPRET SETB REP3F MOV REP3L,DPL MOV REP3H,DPH SREPHAD: MOV 09H,A LCALL CSDPTR REPGON: INC DPTR INC DPTR LCALL RYFSUP CJNE R6,#0FFH,REPGON MOV A,R7 SWAP A ANL A,#0FH CJNE A,09H,REPGON REPRET: RET ;.音符显示子程序 ;---------YFDSUP(13)-------- YFDSUP: MOV A,STATU JNZ YFDRET JB SECHSTOF,YFDRET JNB CUYFD,YFSLED XZFCLD: MOV DISNUM0,#20H MOV DISNUM1,#20H SJMP YFDSPLAY YFSLED: MOV A,R6 JZ XZFCLD ANL A,#0FH PUSH DPL PUSH DPH MOV DPTR,#T_YFDCOD MOVC A,@A+DPTR MOV DISNUM0,A POP DPH POP DPL MOV A,R6 SWAP A ANL A,#0FH MOV DISNUM1,A YFDSPLAY: LCALL DISPLAY YFDRET: RET T_YFDCOD: DB 20H ;-- DB 01H DB 02H DB 03H DB 04H DB 05H DB 06H DB 07H DB 11H ;#1 DB 12H ;#2 DB 14H ;#4 DB 15H ;#5 DB 16H ;#6 ;.唱音符子程序 ;---------PLAY(14)---------- PLAY: MOV A,R6 JZ PCOSPECL PUSH DPL PUSH DPH MOV DPTR,#T_SD ANL A,#0FH MOVC A,@A+DPTR XCH A,R6 SWAP A ANL A,#0FH MUL AB ADD A,R6 ADD A,R2 RL A MOV R6,A MOV DPTR,#T_RAN MOVC A,@A+DPTR MOV TH0,A MOV R5,A MOV A,R6 INC A MOVC A,@A+DPTR MOV TL0,A MOV R4,A POP DPH POP DPL SETB TR0 PCOSPECL: LCALL COSPECL PJPWAIT: MOV JPCLK,#00H PDELAY: LCALL KCXCL JB NEXTSF,PRET MOV A,JPCLK CJNE A,01H,PNEXT PNEXT: JC PDELAY DJNZ R7,PJPWAIT PRET: CLR TR0 RET ;---------TABSD------------- T_SD: DB 01h ;useless DB 01H DB 03H DB 05H DB 06H DB 08H DB 0AH DB 0CH DB 02H DB 04H DB 07H DB 09H DB 0bH ;---------TABRAN------------ T_RAN: DW 0F111H ;useless dw 0f111h ; area 0 dw 0f1e8h dw 0f2b2h dw 0f373h dw 0f426h dw 0f4eeh dw 0f571h dw 0f609h dw 0f699h dw 0f71fh dw 0f79fh dw 0f817h dw 0f889h ; area 1 dw 0f8f4h dw 0f95ah dw 0f9b9h dw 0fa13h dw 0fa68h dw 0fab9h dw 0fb04h dw 0fb4ch dw 0fb90h dw 0fbcfh dw 0fc0ch dw 0fc45h ;area 2 dw 0fc7ah dw 0fcadh dw 0fcdch dw 0fd0ah dw 0fd34h dw 0fd5ch dw 0fd82h dw 0fda6h dw 0fdc8h dw 0fde8h dw 0fe06h dw 0fe22h ; area 3 dw 0fe3dh dw 0fe56h dw 0fe6eh dw 0fe85h dw 0fe9ah dw 0feaeh dw 0fec1h dw 0fed3h dw 0fee3h dw 0fef4h dw 0ff02h dw 0ff11h ;area 4 dw 0ff1fh dw 0ff2bh dw 0ff37h dw 0ff42h dw 0ff4dh dw 0ff57h dw 0ff60h dw 0ff6ah dw 0ff72h dw 0ff7ah dw 0ff81h dw 0ff89h ;.共速处理 ;---------COSPECL(15)------- COSPECL: MOV R1,03H MOV A,COSPEEDN JZ COSPRET PUSH COSPEEDN MOV A,R1 COSPEGON: MOV B,#08H MUL AB CLR C SUBB A,R1 JNC COSPNEXT DEC B COSPNEXT: MOV R6,#03H DIV8: CLR C XCH A,B RRC A XCH A,B RRC A DJNZ R6,DIV8 MOV R1,A DJNZ COSPEEDN,COSPEGON POP COSPEEDN MOV A,R1 JNZ COSPRET MOV R1,#01H COSPRET: RET ;.键盘查询处理 ;---------KCXCL(16)--------- KCXCL: LCALL KSET LCALL KALT0 LCALL KALT1 JNB KSETF,KNEXT0 LCALL KSETCL KSETSTC: MOV SETST0,#00H MOV SETST1,#00H SETB KBDISF SJMP KDIS KNEXT0: JNB KALT0F,KNEXT1 LCALL KALT0CL SJMP KSETSTC KNEXT1: JNB KALT1F,KDIS LCALL KALT1CL SJMP KSETSTC KDIS: MOV A,STATU JNZ KSSNSD JNB SECHSTOF,KRET KSSNSD: JNB KBDISF,KRET CLR KBDISF LCALL DISPLAY KRET: RET ;.KSET键是否按下查询 ;---------KSET(17)---------- KSET: SETB SET JB SET,CSETRET MOV GENCLK,#00H SETLOP: MOV A,GENCLK CJNE A,#,SETLOP SETB SET JB SET,CSETRET CLR TR0 SETWAIT: SETB SET JNB SET,SETWAIT MOV GENCLK,#00H SETLOP1: MOV A,GENCLK CJNE A,#,SETLOP1 SETB TR0 SETB KSETF RET CSETRET: CLR KSETF RET ;.KALT0键是否按下查询 ;---------KALT0(18)--------- KALT0: SETB ALT0 JB ALT0,CALT0RET MOV GENCLK,#00H ALT0LOP: MOV A,GENCLK CJNE A,#,ALT0LOP SETB ALT0 JB ALT0,CALT0RET CLR TR0 ALT0WAIT: SETB ALT0 JNB ALT0,ALT0WAIT MOV GENCLK,#00H ALT0LOP1: MOV A,GENCLK CJNE A,#,ALT0LOP1 SETB TR0 SETB KALT0F RET CALT0RET: CLR KALT0F RET ;.KALT1键是否按下查询 ;---------KALT1(19)--------- KALT1: SETB ALT1 JB ALT1,CALT1RET MOV GENCLK,#00H ALT1LOP: MOV A,GENCLK CJNE A,#,ALT1LOP SETB ALT1 JB ALT1,CALT1RET CLR TR0 ALT1WAIT: SETB ALT1 JNB ALT1,ALT1WAIT MOV GENCLK,#00H ALT1LOP1: MOV A,GENCLK CJNE A,#,ALT1LOP1 SETB TR0 SETB KALT1F RET CALT1RET: CLR KALT1F RET ;20.SET键处理 ;---------KSETCL(20)-------- KSETCL: INC STATU MOV A,STATU CJNE A,#07H,STATUDIS MOV STATU,#00H STATUDIS: MOV DISNUM0,#23H MOV DISNUM1,STATU RET ;21.KALT0键处理 ;---------KALT0CL(21)------- KALT0CL: MOV A,STATU JNZ CASEB1 KA0S0GO: INC DPTR INC DPTR LCALL RYFSUP MOV A,R7 JNZ EQUFF MOV DPTR,#T_SONGS SJMP KA0NEXT EQUFF: INC A JNZ KA0S0GO KA0NEXT: LCALL RYFSUP MOV CSN,R6 LCALL CSNSDISN MOV A,DPL CLR C SUBB A,#02H JNC KA0NEXT1 DEC DPH KA0NEXT1: MOV DPL,A CLR REP0F CLR REP1F CLR REP2F CLR REP3F SETB NEXTSF SETB SECHSTOF RET CASEB1: CJNE A,#01H,CASEB2 INC LDYDSR MOV A,LDYDSR CJNE A,#04H,LDYDSL4 MOV LDYDSR,#00H LDYDSL4: MOV DISNUM0,LDYDSR MOV DISNUM1,#26H RET HCOSPEEDN EQU 12H CASEB2: CJNE A,#02H,CASEB3 MOV A,COSPEEDN CJNE A,#HCOSPEEDN,KA0NEXT4 KA0NEXT4: JNC KA0NEXT5 INC COSPEEDN KA0NEXT5: MOV SPENR,COSPEEDN LCALL SPENSDISN RET CASEB3: CJNE A,#03H,CASEB4 CLR SPEEDF LCALL SPEEDCL RET CASEB4: CJNE A,#04H,CASEB5 CLR TONEF LCALL TONECL RET CASEB5: CJNE A,#05H,CASEB6 CPL LOCF JNB LOCF,KA0NEXT2 MOV DISNUM0,#24H SJMP KA0NEXT3 KA0NEXT2: MOV DISNUM0,#25H KA0NEXT3: MOV DISNUM1,#26H RET CASEB6: CJNE A,#06H,KA0RET CPL CUYFD JNB CUYFD,KA0NEXT6 MOV DISNUM0,#24H SJMP KA0NEXT7 KA0NEXT6: MOV DISNUM0,#25H KA0NEXT7: MOV DISNUM1,#28H KA0RET: RET ;.速度数送显示寄存器 ;---------SPENSDISN(22)---- SPENSDISN:MOV A,SPENR ANL A,#0FH MOV DISNUM0,A MOV A,SPENR SWAP A ANL A,#0FH MOV DISNUM1,A RET ;.速度处理 ;---------SPEEDCL(23)------ HSPEED EQU 02H; LSPEED EQU 50H; SPEEDCL: JB SPEEDF,DNSPEED CJNE R3,#HSPEED,SCLNEXT SCLNEXT: JC SCLNEXT1 DEC R3 SJMP SCLNEXT1 DNSPEED: CJNE R3,#LSPEED,SCLNEXT2 SCLNEXT2: JNC SCLNEXT1 INC R3 SCLNEXT1: LCALL CSBESTOJG JNB CSBESTOF,SCLNEXT3 INC R0 INC R0 MOV @R0,03H SCLNEXT3: LCALL COSPECL MOV SPENR,R1 LCALL SPENSDISN RET ;.音调处理 ;---------TONECL(24)--------- ;LTONE EQU 00 ;C HTONE EQU ;B TONECL: JB TONEF,DNTONE CJNE R2,#HTONE,TCLNEXT0 TCLNEXT0: JNC TCLNEXT INC R2 SJMP TCLNEXT DNTONE: MOV A,R2 JZ TCLNEXT DEC R2 TCLNEXT: LCALL CSBESTOJG JNB CSBESTOF,TCLNEXT1 INC R0 MOV @R0,02H TCLNEXT1: PUSH DPL PUSH DPH MOV DPTR,#T_TONDISC MOV A,R2 RL A MOVC A,@A+DPTR MOV DISNUM1,A MOV A,R2 RL A INC A MOVC A,@A+DPTR MOV DISNUM0,A POP DPH POP DPL RET T_TONDISC:DW 200CH ; C DW 210CH ;#C DW 200DH ; D DW 210DH ;#D DW 200EH ; E DW 200FH ; F DW 210FH ;#F DW 2022H ; G DW 2122H ;#G DW 200AH ; A DW 210AH ;#A DW 200BH ; B ;25.KALT1键处理 ;---------KALT1CL(25)-------- KALT1CL: MOV A,STATU JNZ CASE1 LCALL CSBESTOJG JNB CSBESTOF,KA1NEXT MOV @R0,#00H DEC BUFF0 SJMP KA1NEXT2 KA1NEXT: CJNE R0,#7EH,KA1NEXT1 KA1NEXT1: JNC KA1NEXT2 MOV @R0,CSN INC R0 MOV @R0,02H INC R0 MOV @R0,03H INC BUFF0 KA1NEXT2: LCALL CSNSDISN SETB SECHSTOF RET CASE1: CJNE A,#01H,CASE2 INC RDYDSR MOV A,RDYDSR CJNE A,#04H,RDYDSL4 MOV RDYDSR,#00H RDYDSL4: MOV DISNUM0,RDYDSR MOV DISNUM1,#27H RET CASE2: CJNE A,#02H,CASE3 MOV A,COSPEEDN JZ KA1NEXT5 DEC COSPEEDN KA1NEXT5: MOV SPENR,COSPEEDN LCALL SPENSDISN RET CASE3: CJNE A,#03H,CASE4 SETB SPEEDF LCALL SPEEDCL RET CASE4: CJNE A,#04H,CASE5 SETB TONEF LCALL TONECL RET CASE5: CJNE A,#05H,CASE6 CPL ROCF JNB ROCF,KA1NEXT3 MOV DISNUM0,#24H SJMP KA1NEXT4 KA1NEXT3: MOV DISNUM0,#25H KA1NEXT4: MOV DISNUM1,#27H RET CASE6: CJNE A,#06H,KA1RET MOV DISNUM0,#23H MOV DISNUM1,#06H KA1RET: RET ;========= 乐曲表============ ;---------SONGS-------------- T_SONGS: 乐曲表表首 dw 01ffh,;song1:xiao la ba... dw 0b05h, dw 2504h, dw 2604h, dw 2506h, dw 0002h, dw 2504h, dw 2604h, dw 2506h, dw 0002h, dw 2504h, dw 2604h, dw 2504h, dw 2304h, dw 2204h, dw 2104h, dw 2206h, DW 16FFH;SONG16:Liang Zhi Lao Hu DW 0715H DW 0FF21H ;REP21 DW 0FF01H ;REP01 DW 2102H DW 2202H DW 2302H DW 2102H DW 0FF02H ;REP02 DW 0FF03H ;REP03 DW 2302H DW 2402H DW 2504H DW 2302H DW 2402H DW 2504H DW 0FF11H ;REP11 DW 2501H DW 2601H DW 2501H DW 2401H DW 2302H DW 2102H DW 0FF12H ;REP12 DW 0FF13H ;REP13 DW 2202H DW 1502H DW 2104H DW 2202H DW 1502H DW 2104H DW 0FF22H ;REP22 DW 0FF23H ;REP23 DW 0000H ;乐曲表表尾 END ;=========END================
注:设计者手头有近40首曲子的音乐数据(花了大量时间对简谱进行手工转换!),而每块AT89C51的4KROM种除指令外剩下空间只可放14首左右。
这里给出第一曲和第16曲《两只老虎》作一示例。
参考链接:http://www.picavr.com/news/2008-06/6458.htm
C51汇编语言完整源码的更多相关文章
- 网狐6603 cocos2dx 棋牌、捕鱼、休闲类游戏《李逵捕鱼》手机端完整源码分析及分享
该资源说明: cocos2d 棋牌.捕鱼.休闲类游戏<李逵捕鱼>手机端完整源码,网狐6603配套手机版源码,可以选桌子,适合新手学习参考,小编已亲测试,绝对完整可编译手机端,下载后将文件考 ...
- 在WebBrowser中执行javascript脚本的几种方法整理(execScript/InvokeScript/NavigateScript) 附完整源码
[实例简介] 涵盖了几种常用的 webBrowser执行javascript的方法,详见示例截图以及代码 [实例截图] [核心代码] execScript方式: 1 2 3 4 5 6 7 8 9 1 ...
- ASP.NET CORE小试牛刀:干货(完整源码)
扯淡 .NET Core 的推出让开发者欣喜万分,从封闭到拥抱开源十分振奋人心.对跨平台的支持,也让咱.NET开发者体验了一把 Write once,run any where 的感觉!近期离职后,时 ...
- 支持语音识别、自然语言理解的微信小程序(“遥知之”智能小秘)完整源码分享
记录自己搭建https的silk录音文件语音识别服务的调用过程,所有代码可在文中找链接打包下载 >>>>>>>>>>>>> ...
- 微信小程序中如何使用WebSocket实现长连接(含完整源码)
本文由腾讯云技术团队原创,感谢作者的分享. 1.前言 微信小程序提供了一套在微信上运行小程序的解决方案,有比较完整的框架.组件以及 API,在这个平台上面的想象空间很大.腾讯云研究了一番之后,发现 ...
- Android自定义组合控件详细示例 (附完整源码)
在我们平时的Android开发中,有时候原生的控件无法满足我们的需求,或者经常用到几个控件组合在一起来使用.这个时候,我们就可以根据自己的需求创建自定义的控件了,一般通过继承View或其子类来实现. ...
- 基于spring-boot和docker-java实现对docker容器的动态管理和监控[附完整源码下载]
(我是个封面) docker简介 Docker 是一个开源的应用容器引擎,和传统的虚拟机技术相比,Docker 容器性能开销极低,因此也广受开发者喜爱.随着基于docker的开发者越来越多,doc ...
- 3D游戏《龙心传奇Dragona》全套完整源码
<龙心传奇Dragona>全套完整源码,<Dragona Online>也叫<龙心传奇>是一款3D中古奇幻风格网络游戏,描写叙述一个充满剑.魔法.恶魔和龙的魔法大陆 ...
- Java的三种代理模式&完整源码分析
Java的三种代理模式&完整源码分析 参考资料: 博客园-Java的三种代理模式 简书-JDK动态代理-超详细源码分析 [博客园-WeakCache缓存的实现机制](https://www.c ...
随机推荐
- max key length is 1000 bytes
ALTER TABLE ad_keyword_brand ADD CONSTRAINT w1 UNIQUE (keyword,adasin,brand,page_position,country,ad ...
- 【C++深入探索】Copy-and-swap idiom详解和实现安全自我赋值
分类: C/C++2012-08-30 21:40 2017人阅读 评论(2) 收藏 举报 任何管理某资源的类比如智能指针需要遵循一个规则(The Rule of Three): 如果你需要显式地声明 ...
- 彻底卸载MYSQL,windows版
转自:http://blog.csdn.net/jasonandwho/article/details/7451310 网上搜的总结帖,直接贴过来的... 由于安装MySQL的时候,疏忽没有选择底层编 ...
- 关于js跨域
get方式: 称为jsonp,就是js的跨域通信方式,因为知道有些标签可以跨域获取内容,例如img,script,link...,jsonp就是把动态创建一个script标签,然后配置src属性,后台 ...
- (转)用JS判断ckeditor3.6版本编辑器内容为空的方法
因为编者我还是一个初学入门者,无论是JS还是PHP,都是懂了点皮毛.今天在研究ckeditor编辑器的时候遇到了一些问题,虽然这只是我的个人问题,但觉得可以分享给其他人,或许也有像我这样的初学者也会遇 ...
- Eclipse+maven发布ee项目jar包未发布
背景:在Eclipse中搭建好EE环境后,发布时,出现ClassNotFoundException: XX.XX.ConfigureListener,查看时,对应的jar包都引入了,项目没也没出错,但 ...
- PHP Cookies
PHP Cookies cookie 常用于识别用户. Cookie 是什么? cookie 常用于识别用户.cookie 是一种服务器留在用户计算机上的小文件.每当同一台计算机通过浏览器请求页面时, ...
- 【转】Windows按键消息—虚拟键码
来源:http://c.biancheng.net/cpp/html/1253.html 虚拟键码保存在WM_KEYDOWN.WM_KEYUP.WM_SYSKEYDOWN和WM_SYSKEYUP消息的 ...
- union关键字 与大小端模式
union 关键字(主要用来压缩空间,如果一些数据不可能同一时间同时用到,可是考虑使用union) union关键字声明的变量称之为联合体变量: (1)联合体变量只配置一个足够大的空间来容纳最大长度的 ...
- 高放的c++学习笔记之关联容器
标准库提供8个关联容器 按关键字有序保存有(红黑树实现) set map multset 关键字可重复出现的set multimap 关键字可重复出现的map 无序保存 哈希实现 unorderre ...