Ûꢆ
; 16
ÉU#
BCD
;*******************************************
CLRF
MOVLW
SUBWF
SKPC
GOTO
MOVWF
INCF
GOTO
TEN
GET_DEC
D'10'
DATA_IN,W
OVER
DATA_IN
TEN
GET_DEC
;*******************************************
C-.Y Éf
;
BCD
HD7279
;*******************************************
ꢁª«DE dÎꢉꢊÀÁª«
;
2
þ9ꢛZꢉꢊꢀꢑL
;
ª«DE
OVER
MOVLW
CALL
MOVLW
CALL
MOVLW
CALL
MOVFW
CALL
MOVLW
CALL
MOVFW
CALL
BSF
B'10100001'
SEND
;
;
;
;
;
;
CDEf
ª«DE
HD7279A
B'10100001'
SEND
CDEf
HD7279A
<ÅꢑLÆÈÉDE ® ꢛ
2
B'10000001'
SEND
(
)
CDEf
HD7279A
TEN
CÜꢛꢑHf
HD7279A
SEND
;
;
;
<ÅꢑLÆÈÉDE ® ꢛ
1
B'10000000'
SEND
(
)
CDEf
HD7279A
DATA_IN
SEND
C£ꢛꢑHf
;
HD7279A
PORTA,CS
PORTA,KEY
WAIT
p4-.ç
;
WAIT
BTFSS
GOTO
GOTO
MAIN
END
ꢀ
ꢀ
ꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢁꢉꢀ
ꢀ
ꢀꢀꢀꢀ ꢀꢁꢂꢃꢄꢅꢆꢇꢂꢈꢉꢊꢋꢌꢍꢎꢏ
ꢀꢁꢁꢂꢃꢄꢄꢅꢅꢅꢆꢇꢈꢁꢉꢊꢋꢌꢆꢉꢊꢍꢆꢉꢎ
ETC [ ETC ]
