蜂鸣器控制高级程序

;程序名字：蜂鸣器
;这是一个非常好的一个控制蜂鸣器的程序，用到了定时器中断方式来定时，且弄能够用程序状态字中的CY标志位来进行运算，
;并且用到了CJNE中的比的不够CY为1，比大的话，为0来进行运算，使程序更加丰富

INTR_CNT EQU30H;作为定时器中断的计数值使用

MS10 EQU9217; 对于11.0592的晶振来说，相当于10ms的计数
BUZZER EQUP1.0
;
ORG0000H
JMPSTART
ORG0003H
RETI
ORG000BH
JMPT0_ISR;只设置了定时器timer0方式一中断

ORG0013H
RETI
ORG001BH
RETI
ORG0023H
RETI

;
ORG0030H
START:MOVR0,#00H;初始化程序
DJNZR0,$
MOVSP,#60H
MOV P1,#0FFH
MOVINTR_CNT,#00H
CLRBUZZER
ACALLSET_TMR0
LOOP:SJMPLOOP

;
;定时器中断处理函数
T0_ISR: MOVTH0,#HIGH(65536-MS10)
MOVTL0,#LOW(65536-MS10)
PUSHPSW
PUSHACC

MOVA,INTR_CNT
CJNEA,#10,L1
L1:NCL2 ;标志位CY为0则转移指令 ，如果上面A的值没10大的话，cy为1，即不执行这条跳转程序
SETBBUZZER ;意思是如果没到10ms的时候，蜂鸣器不响
SJMPL3
L2: CLRBUZZER ;到100ms（10*10ms）了，蜂鸣器响，可是响的有时间限制
L3: MOVA,INTR_CNT
INC A
MOVINTR_CNT,A
CJNEA,#100,T0_END ;从100ms响到100*10ms，也就是1s，从这看出1s中响了0.9s，不响0.1s
MOVINTR_CNT,#00H

T0_END:POPACC
POPPSW
RETI
;启动定时器中断
SET_TMR0:
MOVTMOD,#01H
MOVTH0,#HIGH(65536-MS10)
MOVTL0,#LOW(65536-MS10)
CLRTF0
SETBTR0
SETBET0
SETBEA
RET

END