发布者:  未知     来源：网络

COUN EQU 35H
COUN1 EQU 36H
ORG 0000H
AJMP START
ORG 30H
START: MOV SP,#5FH
MOV COUN,#0
MOV COUN1,#0
MUSIC: CPL P3.2 ;定义声音输出脚
MOV R3,#2FH ;(当晶振为24MHZ时,R3=2FH ),(当晶振为12MHZ时,R3=15H)
LCALL DELAY
INC COUN
LJMP MUSIC
DELAY: NOP
D1: MOV R4,#2
D2: NOP
DJNZ R4,D2
NOP
DJNZ R3,D1
MOV A,COUN
CJNE A,#250,D5
MOV COUN,#0
MOV R2,#2
MOV R4,#200 ;(当晶振为24MHZ,R4=200 ),(当晶振为12MHZ,R4=40)
D4: mov R3,#200
DJNZ R3,$
DJNZ R4,D4
DJNZ R2,D4
INC COUN1
MOV A,COUN1
CJNE A,#4,D5
MOV COUN1,#0
MOV R2,#6
MOV R4,#250
D8: mov R3,#250
DJNZ R3,$
DJNZ R4,D8
DJNZ R2,D8
D5:
RET

END