START_DELAY: MOV
TIMER1,#255
START_DELAY1:DJNZ
TIMER1,START_DELAY1
TIMER,START_DELAY
DATA_OUT,#10100100B ;
SEND
DJNZ
MOV
aꢛ bc DE
)
(
CALL
SETB
3a V*ꢜ+
CS
;
CS
¥ꢒàæ`.-<
MAIN:
JB
KEY,MAIN
;
`.-< CN.ODE
MOV
CALL
CALL
SETB
MOV
MOV
DIV
MOV
MOV
DATA_OUT,#00010101B ;
SEND
RECEIVE
j V*ꢜ+
; CS
CS
Ûꢆ
;16
ÉU#
BCD
B,#10
A,DATA_IN
AB
TEN,A
ꢁª«DE dÎꢉꢊ
DATA_OUT,#10100001B ; 2
ÀÁª« þ9ꢛZꢉꢊꢀ
,
;
;
ꢑL
CDEf
; HD7279A
CALL
MOV
SEND
DATA_OUT,#10100001B
SEND
CALL
MOV
<ÅꢑLÆÈÉDE ® ꢛ
DATA_OUT,#10000001B ; 2 )
(
CALL
MOV
SEND
CÜꢛꢑHf
; HD7279A
DATA_OUT,TEN
SEND
CALL
MOV
<ÅꢑLÆÈÉDE ®
(
DATA_OUT,#10000000B ;
1
ꢛ
;
)
CALL
MOV
SEND
C£ꢛꢑHf
DATA_OUT,B
SEND
;
;
HD7279A
CALL
SETB
JNB
CS
p4-.ç
WAIT:
KEY,WAIT
MAIN
JMP
;*******************************************
C £HIf *ꢛ¢Î
;
1
HD7279
;*******************************************
jäꢛꢑꢁ
=8
SEND:
MOV
BIT_COUNT,#8
CS
;
;
;
j V,ꢜ+
CS
CLR
r1
CALL
LONG_DELAY
ꢀ
ꢀ
ꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢁꢄꢀ
ꢀ
ꢀꢀꢀꢀ ꢀꢁꢂꢃꢄꢅꢆꢇꢂꢈꢉꢊꢋꢌꢍꢎꢏ
ꢀꢁꢁꢂꢃꢄꢄꢅꢅꢅꢆꢇꢈꢁꢉꢊꢋꢌꢆꢉꢊꢍꢆꢉꢎ
ETC [ ETC ]
