summaryrefslogtreecommitdiff
path: root/bootloader/com-887-uart.inc
diff options
context:
space:
mode:
authorChristian Pointner <equinox@spreadspace.org>2013-07-10 02:44:34 +0000
committerChristian Pointner <equinox@spreadspace.org>2013-07-10 02:44:34 +0000
commita50be01eb4442e10064b39f9291c9f140d0d5b5c (patch)
tree98f12210ce79c64b6216d73556eb95f2052c0dad /bootloader/com-887-uart.inc
parentcleanup (diff)
rename com uart for 16f887
git-svn-id: https://svn.spreadspace.org/pic/trunk@68 a09c6847-51d9-44de-8ef2-e725cf50f3c7
Diffstat (limited to 'bootloader/com-887-uart.inc')
-rw-r--r--bootloader/com-887-uart.inc75
1 files changed, 0 insertions, 75 deletions
diff --git a/bootloader/com-887-uart.inc b/bootloader/com-887-uart.inc
deleted file mode 100644
index b9d05b2..0000000
--- a/bootloader/com-887-uart.inc
+++ /dev/null
@@ -1,75 +0,0 @@
- ;;
- ;; spreadspace pic utils
- ;;
- ;;
- ;; Copyright (C) 2011 Christian Pointner <equinox@spreadspace.org>
- ;;
- ;; This file is part of spreadspace pic utils.
- ;;
- ;; spreadspace pic utils is free software: you can redistribute it and/or modify
- ;; it under the terms of the GNU General Public License as published by
- ;; the Free Software Foundation, either version 3 of the License, or
- ;; any later version.
- ;;
- ;; spreadspace pic utils is distributed in the hope that it will be useful,
- ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
- ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- ;; GNU General Public License for more details.
- ;;
- ;; You should have received a copy of the GNU General Public License
- ;; along with spreadspace pic utils. If not, see <http://www.gnu.org/licenses/>.
- ;;
-
- ;; --- transmit byte and add it to csum
-com_tx_byte
- btfss PIR1,TXIF
- goto com_tx_byte
- movwf TXREG
- xorwf csum,f
- return
-
- ;; ---- wait for byte to be received
-com_rx_byte
- btfsc RCSTA,OERR
- goto uart_rx_oe
- btfss PIR1,RCIF
- goto com_rx_byte
- btfsc RCSTA,FERR
- goto uart_rx_fe
- movf RCREG,w
- return
-
-uart_rx_oe ; recover from overflow
- bcf RCSTA,CREN
- bsf RCSTA,CREN
- goto com_rx_byte
-
-uart_rx_fe ; recover from framing error
- movf RCREG,w
- goto com_rx_byte
-
- ;; ----- initialize com (not a subroutine, com_init is called by generic_init
-com_init
- ;; bank 3
- bsf STATUS,RP0
- bsf STATUS,RP1
- movlw b'00001000' ; TX non-inverted, 16bit Baudrate, no auto baud detect
- ;; movlw b'00011000' ; TX inverted, 16bit Baudrate, no auto baud detect
- movwf BAUDCTL
-
- ;; bank 1
- bcf STATUS,RP1
- movlw b'01110000' ; set internal OSC to 8MHz
- movwf OSCCON
- movlw b'00100100' ; Baudrate = High Speed, async mode, transmit enabled, 8bit
- movwf TXSTA
- movlw .34 ; Baudrate = 57600 (@ 8MHz) -> -0,79 % Error
- ;; movlw .51 ; Baudrate = 38400 (@ 8MHz) -> -0,002 % Error
- ;; movlw .103 ; Baudrate = 19200 (@ 8MHz) -> 0,16 % Error
- movwf SPBRG
- clrf SPBRGH
-
- ;; bank 0
- bcf STATUS,RP0
- movlw b'10010000' ; enable Serial Port, 8bit, enable continues receive, disable address detection
- movwf RCSTA