Mercurial > public > hwos_code
comparison src/divemenu_tree.asm @ 181:32c17df38423
BUGFIX: END/EAD updated when adjusting current gas during the dive
author | heinrichsweikamp |
---|---|
date | Thu, 09 Oct 2014 11:18:56 +0200 |
parents | 87cc1adfe4da |
children | 93023d78812e |
comparison
equal
deleted
inserted
replaced
180:abc429e8b46a | 181:32c17df38423 |
---|---|
157 movlw .101 | 157 movlw .101 |
158 cpfslt temp_bankx400 ; O2+He<101? | 158 cpfslt temp_bankx400 ; O2+He<101? |
159 decf char_I_O2_ratio,F ; O2-- (Unchanged) | 159 decf char_I_O2_ratio,F ; O2-- (Unchanged) |
160 ; bra do_divemode_gaslist_more_common | 160 ; bra do_divemode_gaslist_more_common |
161 do_divemode_gaslist_more_common: | 161 do_divemode_gaslist_more_common: |
162 movf char_I_O2_ratio,W ; Add O2... | |
163 addwf char_I_He_ratio,W ; ...and He... | |
164 sublw .100 ; ...subtract both from 100 | |
165 movwf char_I_N2_ratio ; -> N2! | |
162 banksel common | 166 banksel common |
163 bsf gas6_changed ; Set flag | 167 bsf gas6_changed ; Set flag |
164 bra do_divemode_gaslist_more | 168 bra do_divemode_gaslist_more |
165 | 169 |
166 do_dive_mO2: | 170 do_dive_mO2: |
181 addwf char_I_O2_ratio,W | 185 addwf char_I_O2_ratio,W |
182 movwf lo | 186 movwf lo |
183 movlw .101 | 187 movlw .101 |
184 cpfslt lo ; O2+He<101? | 188 cpfslt lo ; O2+He<101? |
185 decf char_I_He_ratio,F ; Yes, He-- (Unchanged) | 189 decf char_I_He_ratio,F ; Yes, He-- (Unchanged) |
186 banksel common | |
187 bra do_divemode_gaslist_more_common | 190 bra do_divemode_gaslist_more_common |
188 | 191 |
189 do_dive_mHe: | 192 do_dive_mHe: |
190 banksel char_I_O2_ratio | 193 banksel char_I_O2_ratio |
191 decf char_I_He_ratio,F ; He-- | 194 decf char_I_He_ratio,F ; He-- |