Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/isr.asm @ 379:cf1023a53d0c 64kByte Logbook

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
clean up
author heinrichsweikamp
date Tue, 14 Jun 2011 19:25:09 +0200
parents 51baf8777b73
children a847f416e67e
comparison
equal deleted inserted replaced
378:51baf8777b73 379:cf1023a53d0c
183 183
184 movlw 0x08 ; Timer1 int after 62.5ms (=16/second) 184 movlw 0x08 ; Timer1 int after 62.5ms (=16/second)
185 cpfslt TMR1H ; Did we miss a 1/16 second? 185 cpfslt TMR1H ; Did we miss a 1/16 second?
186 incf timer1int_counter1,F ; Yes, add extra 1/16 second 186 incf timer1int_counter1,F ; Yes, add extra 1/16 second
187 187
188 movlw 0x10 ; Timer1 int after 62.5ms (=16/second) 188 ; movlw 0x10 ; Timer1 int after 62.5ms (=16/second)
189 cpfslt TMR1H ; Did we miss another 1/16 second? 189 ; cpfslt TMR1H ; Did we miss another 1/16 second?
190 incf timer1int_counter1,F ; Yes, add another extra 1/16 second 190 ; incf timer1int_counter1,F ; Yes, add another extra 1/16 second
191 191
192 movlw 0x08 ; Timer1 int after 62.5ms (=16/second) 192 movlw 0x08 ; Timer1 int after 62.5ms (=16/second)
193 subwf TMR1H,F 193 subwf TMR1H,F
194 194
195 incf timer1int_counter1,F ; Increase timer1 counter 195 incf timer1int_counter1,F ; Increase timer1 counter
397 movlw d'23' 397 movlw d'23'
398 cpfsgt hours 398 cpfsgt hours
399 return 399 return
400 clrf hours 400 clrf hours
401 incf day,F 401 incf day,F
402 ; test for race condition 402 movff time_correction_value,secs ; Correct too slow clock
403 ; movff time_correction_value,secs ; Correct too slow clock
404 403
405 check_date: 404 check_date:
406 movff month,isr_divB ; new month? 405 movff month,isr_divB ; new month?
407 dcfsnz isr_divB,F 406 dcfsnz isr_divB,F
408 movlw .31 407 movlw .31