精品国产成人一区二区三区-女子十八毛片-欧洲性猛交-无码不卡一区二区三区在线观看-www.四虎在线-伊人网国产-国精产品自偷自偷综合下载-不卡av网站-俄罗斯黄色大片-一本久久知道综合久久-国产精品日韩一区二区-日韩精品色-免费人成网ww555kkk在线-黄色在线观看免费-日韩在线免费-久久久久99人妻一区二区三区-十八禁真人啪啪免费网站

HT47蜂鳴器應(yīng)用

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