HT47定時(shí)器應(yīng)用

include ht47c20.inc
data .section 'data'
int_count db ?
io_count db ?
code .section at 0 'code'
 org 00h
 jmp start
 org 04h
 reti
 org 08h
 reti
 org 0ch
 reti
 org 10h
 jmp timer_int
;---------------------------------
 org 20h
start:
 clr intc0
 clr intc1
 clr adcr.1
 set tmrc.5   ;系統(tǒng)時(shí)鐘
 MOV a,0ah
 MOV int_count,a
 clr io_count
 MOV a,LOW(65536-12000) ;0.1秒產(chǎn)生中斷
 MOV tmral,a
 MOV tmrbl,a
 MOV a,HIGH(65536-12000)
 MOV tmrah,a
 MOV tmrbh,a
 set tmrc.4
 set intc1.0
 set intc0.0
 jmp $
;---------------------------------
timer_int:
 sdz int_count
 reti
 inc io_count
 swapa io_count
 cpl acc
 MOV pa,a
 MOV a,0ah
 MOV int_count,a
 reti
;*************************************************

;*************************************************

include ht47c20.inc
data .section 'data'
count db ?
code .section at 0 'code'
 org 00h
 jmp start
 org 04h
 reti
 org 08h
 reti
 org 0ch
 reti
 org 10h
 jmp timer_int
;---------------------------------
start: clr intc0
 clr intc1
 clr adcr.1  ;定時(shí)/計(jì)數(shù)器允許
 set tmrc.7  ;計(jì)數(shù)外部時(shí)鐘
 clr count
 MOV a,LOW(65536-1000);定時(shí)/計(jì)數(shù)器初值 
 MOV tmral,a
 MOV tmrbl,a
 MOV a,HIGH(65536-1000)
 MOV tmrah,a
 MOV tmrbh,a
 set tmrc.4  ;打開(kāi)定時(shí)/計(jì)數(shù)器
 set intc1.0  ;定時(shí)/計(jì)數(shù)器中斷允許
 set intc0.0  ;總中斷允許
 jmp $
;---------------------------------
timer_int:
 inc count
 swapa count
 cpl acc
 MOV pa,a
 reti
;************************************************

;************************************************

include ht47c20.inc
data .section 'data'
count db ?

code .section at 0 'code'
 org 00h
 jmp start
 org 04h
 reti
 org 08h
 reti
 org 0ch
 reti
 org 10h
 jmp timer_int
;---------------------------------
start: clr intc0
 clr intc1
 clr adcr.1
 set tmrc.5
 set tmrc.7
 clr count
 MOV a,LOW(65536-60000)
 MOV tmral,a
 MOV tmrbl,a
 MOV a,HIGH(65536-60000)
 MOV tmrah,a
 MOV tmrbh,a
 set tmrc.4
 set intc1.0
 set intc0.0
 jmp $
;---------------------------------
timer_int:
 inc count
 swapa count
 cpl acc
 MOV pa,a
 reti
;*********************************************