Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode_menu.asm @ 666:3282581fe178

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Allow gf switch
author heinrichsweikamp
date Sun, 02 Dec 2012 19:19:11 +0100
parents 259e4c1bf3c2
children 7e651625d4c0
comparison
equal deleted inserted replaced
665:259e4c1bf3c2 666:3282581fe178
215 bra divemode_menu3_nothing ; END/EAD in divemode 215 bra divemode_menu3_nothing ; END/EAD in divemode
216 dcfsnz WREG,F 216 dcfsnz WREG,F
217 bra divemode_menu3_nothing ; Future TTS... 217 bra divemode_menu3_nothing ; Future TTS...
218 dcfsnz WREG,F 218 dcfsnz WREG,F
219 bra toggle_stopwatch ; Cave bailout prediction. 219 bra toggle_stopwatch ; Cave bailout prediction.
220 dcfsnz WREG,F
221 bra divemode_menu3_nothing ; pSCR info
222 dcfsnz WREG,F
223 bra toggle_gradient_factors ; Toggle gradient factors
220 224
221 divemode_menu3_nothing: 225 divemode_menu3_nothing:
222 bra timeout_divemenu2 ; Quit divemode menu 226 bra timeout_divemenu2 ; Quit divemode menu
227
228 toggle_gradient_factors:
229 btg use_aGF ; Toggle GF selector bit
230 bsf decoplan_invalid ; The decoplan needs to updated
231 clrf WREG
232 movff WREG,char_O_deco_status ; Restart decoplan computation mH
233 btfss use_aGF
234 bra toggle_gradient_factors2 ; Use aGf
235 ; Use normal GF
236 ; Load GF values into RAM
237 GETCUSTOM8 d'32' ; GF low
238 movff EEDATA,char_I_GF_Low_percentage
239 GETCUSTOM8 d'33' ; GF high
240 movff EEDATA,char_I_GF_High_percentage
241 bra timeout_divemenu2 ; quit menu!
242 toggle_gradient_factors2: ; Use aGf
243 ; Load GF values into RAM
244 GETCUSTOM8 d'67' ; aGF low
245 movff EEDATA,char_I_GF_Low_percentage
246 GETCUSTOM8 d'68' ; aGF high
247 movff EEDATA,char_I_GF_High_percentage
248 bra timeout_divemenu2 ; quit menu!
223 249
224 set_marker: 250 set_marker:
225 movlw d'6' ; Type of Alarm (Manual Marker) 251 movlw d'6' ; Type of Alarm (Manual Marker)
226 movwf AlarmType ; Copy to Alarm Register 252 movwf AlarmType ; Copy to Alarm Register
227 bsf event_occured ; Set Event Flag 253 bsf event_occured ; Set Event Flag