HT47蜂鸣器应用-EDA365

嵌入式 > 技术百科 > 详情

HT47蜂鸣器应用

发布时间：

标签:
蜂鸣器
HT47

HT47蜂鸣器应用

include ht47c20.inc

data .section 'data'
count1 db ?
count2 db ?
;****************************
code .section at 0 'code'
org 00h
jmp start

;****************************
org 20h
start: clr iNTC0
clr intc1
loop: clr pa.1
clr pa.0
call delay
set pa.1
call delay
set pa.0
call delay
jmp loop
;****************************
delay proc
MOV a,0a0h
MOV count1,a
MOV count2,a
d: sdz count1
jmp d
sdz count2
jmp d
ret
delay endp