Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/isr.asm @ 378:51baf8777b73 64kByte Logbook

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
testing, removing unused stuff
author heinrichsweikamp
date Mon, 13 Jun 2011 11:29:37 +0200
parents be71e563ac09
children cf1023a53d0c
comparison
equal deleted inserted replaced
377:be71e563ac09 378:51baf8777b73
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)
189 cpfslt TMR1H ; Did we miss another 1/16 second?
190 incf timer1int_counter1,F ; Yes, add another extra 1/16 second
191
188 movlw 0x08 ; Timer1 int after 62.5ms (=16/second) 192 movlw 0x08 ; Timer1 int after 62.5ms (=16/second)
189 subwf TMR1H,F 193 subwf TMR1H,F
190 194
191 incf timer1int_counter1,F ; Increase timer1 counter 195 incf timer1int_counter1,F ; Increase timer1 counter
192 196
393 movlw d'23' 397 movlw d'23'
394 cpfsgt hours 398 cpfsgt hours
395 return 399 return
396 clrf hours 400 clrf hours
397 incf day,F 401 incf day,F
398 ; Test for race condition 402 ; test for race condition
399 ; movff time_correction_value,secs ; Correct too slow clock 403 ; movff time_correction_value,secs ; Correct too slow clock
400 404
401 check_date: 405 check_date:
402 movff month,isr_divB ; new month? 406 movff month,isr_divB ; new month?
403 dcfsnz isr_divB,F 407 dcfsnz isr_divB,F