diff options
author | Christian Pointner <equinox@mur.at> | 2011-07-23 11:40:58 +0000 |
---|---|---|
committer | Christian Pointner <equinox@mur.at> | 2011-07-23 11:40:58 +0000 |
commit | 9be6c5e0829ef6fd8011a0576ef4a9e21449b962 (patch) | |
tree | 9d8b01fa453edd842fafc271e66445d2b40bcddd | |
parent | ttx cleanup (diff) |
beaconcnt should be working now
git-svn-id: https://svn.spreadspace.org/mur.sat@42 7de4ea59-55d0-425e-a1af-a3118ea81d4c
-rw-r--r-- | software/ttx/ttx.asm | 24 |
1 files changed, 14 insertions, 10 deletions
diff --git a/software/ttx/ttx.asm b/software/ttx/ttx.asm index 06a56a9..6fe1cf6 100644 --- a/software/ttx/ttx.asm +++ b/software/ttx/ttx.asm @@ -44,7 +44,7 @@ ESPACE EQU DOT CSPACE EQU DASH WSPACE EQU .256 - .203 ENABLE_TIME EQU DOT -BCONINT_DEF EQU .10 ; *2 = Beacon Interval in seconds +BCONINT_DEF EQU .7 ; *2 = Beacon Interval in seconds ;; I/O Pins CWENABLE EQU GP0 @@ -537,6 +537,18 @@ caseend goto case0 ;; ------------------------------------- +send_cnt + rlf BEACONCNTL,w + movwf BUF+1 + rlf BEACONCNTH,w + movwf BUF + movlw BUF + movwf FSR + movlw .3 + call send_base32 + return + + ;; ------------------------------------- send_parity movf PARITY,w btfsc PARITY,5 @@ -553,24 +565,16 @@ send_beacon call dottime clrf PARITY - ;; CALLSIGN call send_callsign - ;; ------- movlw WSPACE call dottime - ;; BEACON CNT - movlw BEACONCNTH - movwf FSR - movlw .3 - call send_base32 + call send_cnt - ;; ------- movlw WSPACE call dottime - ;; PARITY call send_parity incfsz BEACONCNTL,f |