Mercurial > public > mk2
view code_part1/OSTC_code_asm_part1/spbrgselect.inc @ 312:b7e4e74c0e17 @5 variant
New @5 variant: compute TTS if staying some extra time (CF58) at current depth.
* Added extra deco_status, and sim_extra_time() in p2_deco.c
* Launched by setting char_O_deco_state to 6, result in int_O_extra_ascenttime
* Added 8th divemode customview
* Auto stole every other cycles
* CF58 menu updated (EN,FR,DE,SP)
author | JeanDo |
---|---|
date | Tue, 03 May 2011 00:52:42 +0200 |
parents | 96a35aeda5f2 |
children |
line wrap: on
line source
RoundResult SET 0 ; Rounding function. RoundResult = Round(aa/bb) Round macro aa,bb LOCAL rr = aa/bb LOCAL d1 = aa - rr*bb LOCAL d2 = (rr+1)*bb - aa RoundResult = rr if d1 >= d2 RoundResult++ endif endm AbsResult SET 0 Abs macro nr if nr>=0 AbsResult = nr else AbsResult = -nr endif endm Round xtal,(16*baud) spbrg_value EQU RoundResult-1 Round xtal,(16*(spbrg_value+1)) baud_real EQU RoundResult Abs(baud_real-baud) errpercent EQU AbsResult*100/baud if errpercent > 4 ERROR big error in baudrate: #v(errpercent)% endif if errpercent >= 2 messg baudrate not exact: #v(errpercent)% endif