diff options
author | Christian Pointner <equinox@mur.at> | 2011-07-30 00:26:22 +0000 |
---|---|---|
committer | Christian Pointner <equinox@mur.at> | 2011-07-30 00:26:22 +0000 |
commit | fc6abe82fbb37bdc15db18c86b48393fecccc1d1 (patch) | |
tree | 06bc3b7654aad55106141c4cf29b3ec09807fa5a /software/ihu/ihu.asm | |
parent | added get time function (diff) |
added time output
git-svn-id: https://svn.spreadspace.org/mur.sat@78 7de4ea59-55d0-425e-a1af-a3118ea81d4c
Diffstat (limited to 'software/ihu/ihu.asm')
-rw-r--r-- | software/ihu/ihu.asm | 61 |
1 files changed, 59 insertions, 2 deletions
diff --git a/software/ihu/ihu.asm b/software/ihu/ihu.asm index 93780f7..97a36b3 100644 --- a/software/ihu/ihu.asm +++ b/software/ihu/ihu.asm @@ -226,8 +226,7 @@ init ;; ------------------------------------- ;; TABLES - - ;; TODO: add lookup tables if needed + include "tables.inc" ;; ------------------------------------- ;; SUBROUTINES @@ -272,6 +271,64 @@ main movlw BUF movwf FSR call rtc_get_time + + swapf BUF+2,w + andlw b'00000011' + call digit + movwf TXREG + movlw .1 + call wait_ms + + movf BUF+2,w + andlw b'00001111' + call digit + movwf TXREG + movlw .1 + call wait_ms + + movlw ':' + movwf TXREG + movlw .1 + call wait_ms + + swapf BUF+1,w + andlw b'00000111' + call digit + movwf TXREG + movlw .1 + call wait_ms + + movf BUF+1,w + andlw b'00001111' + call digit + movwf TXREG + movlw .1 + call wait_ms + + movlw ':' + movwf TXREG + movlw .1 + call wait_ms + + swapf BUF,w + andlw b'00000111' + call digit + movwf TXREG + movlw .1 + call wait_ms + + movf BUF,w + andlw b'00001111' + call digit + movwf TXREG + movlw .1 + call wait_ms + + movlw '\r' + movwf TXREG + movlw .1 + call wait_ms + clrf TMP goto main |