summaryrefslogtreecommitdiff
path: root/software/pic.bootloader/com-16f1847-spi.inc
diff options
context:
space:
mode:
authorChristian Pointner <equinox@mur.at>2013-07-26 15:10:14 +0000
committerChristian Pointner <equinox@mur.at>2013-07-26 15:10:14 +0000
commitafc62937c6602ccce0ae1d1c49c85d3f3e5505a7 (patch)
tree3a83f9af7d1bd55624602b37acd5ec1ae86f4f62 /software/pic.bootloader/com-16f1847-spi.inc
parentyet another downloader update (diff)
updated to new PIC bootloader with support for SPI and 16F1847
git-svn-id: https://svn.spreadspace.org/mur.sat@811 7de4ea59-55d0-425e-a1af-a3118ea81d4c
Diffstat (limited to 'software/pic.bootloader/com-16f1847-spi.inc')
-rw-r--r--software/pic.bootloader/com-16f1847-spi.inc78
1 files changed, 78 insertions, 0 deletions
diff --git a/software/pic.bootloader/com-16f1847-spi.inc b/software/pic.bootloader/com-16f1847-spi.inc
new file mode 100644
index 0000000..c8c3f1d
--- /dev/null
+++ b/software/pic.bootloader/com-16f1847-spi.inc
@@ -0,0 +1,78 @@
+ ;;
+ ;; spreadspace pic utils
+ ;;
+ ;;
+ ;; Copyright (C) 2011-2013 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
+ movlb .4
+ movwf SSP1BUF
+ movlb .0
+ bcf INTPIN
+ xorwf csum,f
+com_tx_byte_wait1
+ btfsc PORTB,5
+ goto com_tx_byte_wait1
+com_tx_byte_wait2
+ btfss PORTB,5
+ goto com_tx_byte_wait2
+ movlb .4
+ movf SSP1BUF,w
+ movlb .0
+ bsf INTPIN
+ return
+
+ ;; ---- wait for byte to be received
+com_rx_byte
+ movlb .4
+ btfsc SSP1STAT,BF
+ goto com_rx_got_byte
+ btfss SSP1CON1,SSPOV
+ goto com_rx_byte
+ movf SSP1BUF,w
+ bcf SSP1CON1,SSPOV
+ goto com_rx_byte
+
+com_rx_got_byte
+ movf SSP1BUF,w
+ movlb .0
+ return
+
+ ;; ----- initialize com (this is called by bootmacro, it's not a subroutine - no return at the end)
+com_init
+ movlb .3
+ bcf ANSELB,ANSB1 ; SDI as digital input
+ bcf ANSELB,ANSB4 ; SCK as digital input
+
+ movlb .1
+ movlw b'01110000' ; set internal OSC to 8MHz
+ movwf OSCCON
+ bcf TRISB,2 ; RB2(SDO) = out
+ bcf INTPIN ; interrupt line to master
+
+ movlb .4
+ movlw b'01000000' ; SMP=0,CKE=1
+ movwf SSP1STAT
+ movlw b'00100100' ; SSPEN=1,CKP=0,SSPM=0100(SPI Slave with SS)
+ movwf SSP1CON1
+ bcf SSP1CON3,BOEN
+
+ movlb .0
+ bsf INTPIN