Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/start.asm @ 236:3dbeacf42e9e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
BUGFIX missing deko init in reboot code. + Typo in ppN2 name.
author JeanDo
date Sat, 19 Mar 2011 15:15:17 +0100
parents ade0848c8b8b
children 3ed240d60341
comparison
equal deleted inserted replaced
235:ade0848c8b8b 236:3dbeacf42e9e
71 ifdef TESTING 71 ifdef TESTING
72 call do_menu_reset_all2 72 call do_menu_reset_all2
73 endif 73 endif
74 74
75 ; reset deco data 75 ; reset deco data
76 ostc_debug '0' ; Sends debug-information to screen if debugmode active
77
78 movlw d'79' ; 79% N2
79 movff WREG,char_I_N2_ratio ; No He at the Surface
76 clrf WREG ; Use as buffer 80 clrf WREG ; Use as buffer
77 movff WREG,char_I_He_ratio ; No He at the Surface 81 movff WREG,char_I_He_ratio ; No He at the Surface
78 movlw d'79' ; 79% N2 82 movff WREG,char_I_step_is_1min ; 2 second deco mode
79 movff WREG,char_I_N2_ratio ; No He at the Surface 83 GETCUSTOM8 d'11' ; Saturation multiplier %
80 movff amb_pressure+0,int_I_pres_respiration+0 ; copy surface air pressure to deco routine 84 movff WREG,char_I_saturation_multiplier
85 GETCUSTOM8 d'12' ; Desaturation multiplier %
86 movff WREG,char_I_desaturation_multiplier
87 movff amb_pressure+0,int_I_pres_respiration+0 ; copy for deco routine
81 movff amb_pressure+1,int_I_pres_respiration+1 88 movff amb_pressure+1,int_I_pres_respiration+1
82 89 movff amb_pressure+0,int_I_pres_surface+0 ; copy for desat routine
83 clrf WREG 90 movff amb_pressure+1,int_I_pres_surface+1
84 movff WREG,char_I_step_is_1min ; 2 second deco mode 91
85 call deco_clear_tissue ; 92 call deco_clear_tissue ;
86 call deco_calc_desaturation_time ; calculate desaturation time 93 call deco_calc_desaturation_time ; calculate desaturation time
87 call deco_clear_CNS_fraction ; clear CNS 94 call deco_clear_CNS_fraction ; clear CNS
88 call calc_deko_surfmode ; calculate desaturation every minute 95 call calc_deko_surfmode ; calculate desaturation every minute
89 call deco_calc_wo_deco_step_1_min ; calculate deco in surface mode 96 call deco_calc_wo_deco_step_1_min ; calculate deco in surface mode