diff options
author | Christian Pointner <equinox@mur.at> | 2011-12-10 20:11:53 +0000 |
---|---|---|
committer | Christian Pointner <equinox@mur.at> | 2011-12-10 20:11:53 +0000 |
commit | b866a8ca1f93e270316685d230767d6171cf7892 (patch) | |
tree | f3d6cf4bf6446c2f134c25d8acee8dd9fa3fb5fd /software/ihu/ihu.asm | |
parent | filter out 'bad' values (diff) |
added solar adc code
git-svn-id: https://svn.spreadspace.org/mur.sat@219 7de4ea59-55d0-425e-a1af-a3118ea81d4c
Diffstat (limited to 'software/ihu/ihu.asm')
-rw-r--r-- | software/ihu/ihu.asm | 78 |
1 files changed, 78 insertions, 0 deletions
diff --git a/software/ihu/ihu.asm b/software/ihu/ihu.asm index 72ecc32..434ddfb 100644 --- a/software/ihu/ihu.asm +++ b/software/ihu/ihu.asm @@ -99,6 +99,18 @@ DTMF_CS EQU H'0036' BUF EQU H'0040' BUF_END EQU H'004F' +ADC_SOLAR_C0 EQU H'0050' +ADC_SOLAR_C1 EQU H'0051' +ADC_SOLAR_C2 EQU H'0052' +ADC_SOLAR_C3 EQU H'0053' +ADC_SOLAR_C4 EQU H'0054' +ADC_SOLAR_C5 EQU H'0055' +ADC_SOLAR_C6 EQU H'0056' +ADC_SOLAR_C7 EQU H'0057' +ADC_SOLAR_C8 EQU H'0058' +ADC_SOLAR_C9 EQU H'0059' +ADC_SOLAR_V EQU H'005A' + ;; variables ;; page 2 only CALC_ACC0 EQU H'0110' @@ -203,6 +215,8 @@ init bsf STATUS,RP1 movlw b'00000000' movwf BAUDCTL + movlw b'11111111' + movwf ANSEL movlw b'00000111' movwf ANSELH @@ -226,6 +240,9 @@ init movwf TRISC movlw b'10001111' movwf TRISD + movlw b'11111111' + movwf TRISE + clrf ADCON1 movlw b'00100100' movwf TXSTA movlw .12 @@ -238,6 +255,8 @@ init ;; bank 0 bcf STATUS,RP0 bcf STATUS,RP1 + movlw b'01000001' + movwf ADCON0 movlw b'10010000' movwf RCSTA movlw B'01010000' @@ -306,8 +325,67 @@ uart_rx_fe include "temp.inc" ;; ------------------------------------- + include "adc.inc" + + ;; ------------------------------------- ;; MAINLOOP main + ;; ADC Test + ;; call adc_get_solar + + ;; movf ADC_SOLAR_C0,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_C1,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_C2,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_C3,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_C4,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_C5,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_C6,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_C7,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movf ADC_SOLAR_V,w + ;; movwf TXREG + ;; movlw .1 + ;; call wait_ms + + ;; movlw .255 + ;; movwf TXREG + ;; movlw .11 + ;; call wait_ms + + ;; goto main + + ;; DTMF Test program movf TMP,f btfsc STATUS,Z goto main |