做自律的😜阿瀦
chenwenke789
签名是一种态度，我想我可以更酷...
关注数: 0
粉丝数: 40
发帖数: 2,392
关注贴吧数: 24
大佬们，帮我改一下吧。十分感谢 网上找的一个蜂鸣器播放音乐的程序，能帮我改一下吗。 有点看不懂，那个NEXT到底是啥呀，又SETB又JB的，晕了。 还有几个子程序我也找不到。。。 其实我的目的只是想在我的彩灯里加一段音乐播放 NEXT BIT 10H ORG 0000H JMP MAIN ORG 000BH JMP TONE ORG 001BH JMP BEAT ORG 0100H MAIN: MOV TMOD,#11H MOV TH0,R2 MOV TL0,R3 MOV TH1,#3CH MOV TL1,#0B0H MOV R4,#00H MOV DPTR,#TAB YD: MOV A,R4 ; 取音调数据 MOVC A,@A+DPTR MOV R2,A XRL A,#00H JNZ JP ;直接取节拍 INC R4 CALL PD ; 判断指针是否溢出 MOV A,R4 MOVC A,@A+DPTR MOV R3,A XRL A,#0FFH JZ JP MOV A,R2 XRL A,#0FFH JNZ MAIN JP: INC R4 ; 取节拍数据 CALL PD MOV A,R4 MOVC A,@A+DPTR MOV R5,A L1: SETB EA SETB ET0 SETB ET1 SETB TR0 SETB TR1 SETB NEXT JB NEXT,$ INC R4 CALL PD JMP YD MOV A,R4 CJNE A,#00H,L1 INC DPH RET ; 音调产生子程序 TONE: CPL P2.0 MOV TH0,R2 MOV TL0,R3 RETI ; 节拍产生子程序 BEAT: DJNZ R5,L2 MOV TH1,#3CH MOV TL1,#0B0H L3: RETI L2: CLR TR0 CLR TR1 CLR NEXT JMP L3 ; TAB: DB 0FBH,0F9H,08H,0FCH,066H,08H,0FCH,0C7H,08H,0FBH,0F9H,08H DB 0FBH,0F9H,08H,0FCH,066H,08H,0FCH,0C7H,08H,0FBH,0F9H,08H DB 0FCH,0C7H,08H,0FCH,0F3H,08H,0FDH,4AH,10H,0FCH,0C7H,08H DB 0FCH,0F3H,08H,0FDH,4AH,08H,0FDH,4AH,04H,0FDH,95H,04H DB 0FDH,4AH,04H,0FCH,0F3H,04H,0FCH,0C7H,08H,0FBH,0F9H,08H DB 0FDH,4AH,04H,0FDH,95H,04H,0FDH,4AH,04H,0FCH,0F3H,04H DB 0FCH,0C7H,08H,0FBH,0F9H,08H,0FCH,66H,08H,0FAH,93H,08H DB 0FBH,0F9H,08H,00H,08H,0FCH,66H,04H,0FAH,93H,08H DB 0FBH,0F9H,08H,00H,10H,0FFH,0FFH END
1
下一页
