汇编语言写的播放音乐的程序。
PP EQU 30H
YF EQU 31H
JP EQU 32H
ORG 0000H
AJMP总管
ORG 000BH
JMP时间0
主要:ORG 0050H
MOV TMOD,#01H
MOV IE,82H号
;SETB P3.5
SATR0:MOV PP,#0
下一位:MOV A,PP
MOV·DPTR,#QPM
MOVC A,@ A + DPTR
MOV·R2;R2 MOV
JZ结束0位置
R2 MOV
ANL A,#0FH
MOV太平绅士
R2 MOV
交换一个
ANL A,#0FH
MOV·YF
YF MOV
JNZ星
CLR TR0
AJMP D1
BR/>;明星:MOV·A·YF
MOV·DPTR
;YF MOV
MOVC A,@ A + DPTR
MOV R7,A
R7
YF
MOV DPTR,#TL
MOVC A,@ A + DPTR
MOV R0,A
MOV TL0,R0
SETB TR0
d 1:l呼叫延迟
公司PP
下一个LJMP
END0:CLR TR0
LJMP SATR0
TIM0,R7
MOV TL0,MOV R0
CPL P3.5
雷蒂
延迟:MOV·R6,排名第二
D2:MOV R5,#120
D3:MOV·R4,248号
DJNZ R4,美元
DJNZ R5,D3
D2 DJNZ R6
DJNZ JP,延迟
浸水使柔软
TH:DB 02H,0FCH,0FCH,0FDH,0FDH,0FDH,0FEH,0FBH,0FBH,0FCH,0FEH,0FEH,0FEH
& gt
TL:DB 02H,44H,0ACH,09H,34H,82H,0C8H,06H,04H,90H,0CH,22H,56H,65H,9AH,0C1H
QPM:DB 34H、52H、63H、62H、52H、64H、32H、28H
DB 33H、32H、52H、63H、62H、52H、63H、32H、37H
DB 34H、52H、63H、62H、52H、63H、32H、28H
DB 53H,52H,32H,22H,32H,22H,12H,24H,98H
DB 93H,22H,28H,53H,32H,38H,22H,12H,98H,53H,52H,32H,22H,32H,12H,23H,98H
DB 93H,22H,28H,53H,32H,38H,23H,12H,98H,53H,52H,32H,22H,32H,12H,22H,65H
DB 00H
结束