BSF
STATUS,C
PORTA,DAT
STATUS,C
DATA_IN
BTFSS
BCF
NuꢛꢑL
;
RLF
k
V,ꢜ+
BCF
PORTA,CLK
SHORT_DELAY
BIT_COUNT
RECEIVE_LOOP
B'11111000'
PORTA
;
CLK
CALL
DECFSZ
GOTO
MOVLW
TRIS
RETLW
àæ#e ꢛꢑL
; 8
ÿꢀj
;
"V(9X
RA2(DATA)
0
;*******************************************
;
;*******************************************
"
START
MOVLW
TRIS
B'11111000' ;I/O
PORTA
MOVLW
MOVWF
MOVLW
MOVWF
B'11111001'
PORTA
1i
25MS
0X19
;
TIMER
START_DELAY MOVLW
0XFF
MOVWF
TIMER1
START_DELAY1 DECFSZ
TIMER1
GOTO
DECFSZ
GOTO
MOVLW
CALL
BSF
START_DELAY1
TIMER
START_DELAY
B'10100100'
SEND
aꢛ bc DE
)
;
(
3a V*ꢜ+
; CS
PORTA,CS
;*******************************************
ꢟ$5
;
;*******************************************
¥ꢒàæ`.-<
MAIN
BTFSC
GOTO
MOVLW
CALL
CALL
BSF
PORTA,KEY
MAIN
;
`.-< CN.ODE
;
CN.ODE
;
;
;
B'00010101'
SEND
; N.OꢖÉ
HD7279A
RECEIVE
PORTA,CS
j V*ꢜ+
CS
;*******************************************
ꢀ
ꢀ
ꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢀꢁꢈꢀ
ꢀ
ꢀꢀꢀꢀ ꢀꢁꢂꢃꢄꢅꢆꢇꢂꢈꢉꢊꢋꢌꢍꢎꢏ
ꢀꢁꢁꢂꢃꢄꢄꢅꢅꢅꢆꢇꢈꢁꢉꢊꢋꢌꢆꢉꢊꢍꢆꢉꢎ
ETC [ ETC ]
