Составители:
13
movwf Cnt
movlw Buf1
movwf FSR
Tra movf INDF,w
call Transm
incf FSR,f
decfsz Cnt,f
goto Tra
goto Priem
ConstInit
bsf STATUS,RP0
bcf TRISA,1 ; диод
movlw b’10000011'
movwf OPTION_REG
movlw d’129'
movwf SPBRG
movlw b’00100100'
movwf TXSTA
bcf STATUS,RP0
clrf INTCON
clrf PORTC
movlw b’10010000'
movwf RCSTA
return
Receiv ; прием байта в RxBuf
RecA btfss PIR1,RCIF ; check for received data
goto RecA
RecB movf RCREG,w
movwf RxBuf
return
Transm ; выдача байта из W
movwf TXREG ; transmit byte to PC
bcf PIR1,TXIF
tr3 btfss PIR1,TXIF
goto tr3
return
end
Страницы
- « первая
- ‹ предыдущая
- …
- 11
- 12
- 13
- 14
- 15
- …
- следующая ›
- последняя »