语音.asm

开发平台,任一MCS-51单片机上,很多程序,如键盘,显示,液晶驱动

ORG 00H
LJMP SPEAKL

SPEAKL:SETB P1.5
       CLR P1.5   ;其他键按下响
       MOV R4,#03H
SPEAK1:LCALL TIME
       DJNZ R4,SPEAK1
       SETB P1.5
RET        
      
SPEAKE:SETB P1.5
         CLR P1.5     ;;数据输入键按下响
       MOV R4,#06H
SPEAK1:LCALL TIME
       DJNZ R4,SPEAK1
       SETB P1.5
RET


 ;;;;;;;;;;;;;;;;;;;;
 TIME:  MOV A,R5
      PUSH A
      MOV B,R6
      PUSH B
      MOV R5,#15           ;延时0.303S的子程序
TIME3:MOV R6,#200
TIME2:MOV R7,#125
TIME1:DJNZ R7,TIME1
      DJNZ R6,TIME2
      DJNZ R5,TIME3
       POP B
      MOV R6,B
      POP A
      MOV R5,A
RET
;;;;;;;;;;;;;;;;;
END