Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/divemode.asm @ 197:f15e804ff67f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Gas switch delay + New CF#55 for additional delay in decoplan for gas switch. + BUGFIX compute integration at full ascent, not half (or the formula is wrong). + BUGFIX minor typo in 2sec exposition factors.
author JeanDo
date Sun, 13 Feb 2011 17:27:43 +0100
parents 8aced3c7590c
children 2d9af08ed0ac
comparison
equal deleted inserted replaced
196:e185b3b028af 197:f15e804ff67f
450 ;----------------------------------------------------------------------------- 450 ;-----------------------------------------------------------------------------
451 451
452 divemode_prepare_flags_for_deco: 452 divemode_prepare_flags_for_deco:
453 movff amb_pressure+0,int_I_pres_respiration+0 ; lo and copy result to deco routine 453 movff amb_pressure+0,int_I_pres_respiration+0 ; lo and copy result to deco routine
454 movff amb_pressure+1,int_I_pres_respiration+1 ; hi 454 movff amb_pressure+1,int_I_pres_respiration+1 ; hi
455 GETCUSTOM8 d'11' ; Saturation multiplier % 455 GETCUSTOM8 d'11' ; Saturation multiplier %
456 movwf wait_temp 456 movff WREG,char_I_saturation_multiplier
457 movff wait_temp,char_I_saturation_multiplier 457 GETCUSTOM8 d'12' ; Desaturation multiplier %
458 GETCUSTOM8 d'12' ; Desaturation multiplier % 458 movff WREG,char_I_desaturation_multiplier
459 movwf wait_temp 459 GETCUSTOM8 d'16' ; Deco distance to decostop in 1/10 meter for simulation
460 movff wait_temp,char_I_desaturation_multiplier 460 movff WREG,char_I_deco_distance
461 GETCUSTOM8 d'16' ; Deco distance to decostop in 1/10 meter for simulation 461 GETCUSTOM8 d'29' ; Depth Last Deco in meter for simulation
462 movwf wait_temp 462 movff WREG,char_I_depth_last_deco
463 movff wait_temp,char_I_deco_distance 463 goto restart_set_modes_and_flags ; Sets decomode (char_I_deco_model) and flags (again)
464 GETCUSTOM8 d'29' ; Depth Last Deco in meter for simulation
465 movwf wait_temp
466 movff wait_temp,char_I_depth_last_deco
467 call restart_set_modes_and_flags ; Sets decomode (char_I_deco_model) and flags (again)
468 return
469 464
470 calc_deko_divemode3: 465 calc_deko_divemode3:
471 btfss dekostop_active 466 btfss dekostop_active
472 call PLED_display_deko_mask ; clear nostop time, display decodata 467 call PLED_display_deko_mask ; clear nostop time, display decodata
473 bsf dekostop_active ; Set flag 468 bsf dekostop_active ; Set flag
474 469
475 movff char_O_first_deco_depth,decodata+0 ; ceiling 470 movff char_O_first_deco_depth,decodata+0 ; ceiling
476 movff char_O_first_deco_time,decodata+1 ; length of first stop in minues 471 movff char_O_first_deco_time,decodata+1 ; length of first stop in minues
477 472