Mercurial > public > hwos_code
annotate src/menu_tree.asm @ 281:eb758a5b44eb
BUGFIX: Fix download issue for dives made with 1.80 firmware
author | heinrichsweikamp |
---|---|
date | Tue, 26 May 2015 17:40:13 +0200 |
parents | 653a3ab08062 |
children | 2fe34fc0e2ae |
rev | line source |
---|---|
0 | 1 ;============================================================================= |
2 ; | |
3 ; File menu_tree.asm | |
4 ; | |
275 | 5 ; OSTC menus |
0 | 6 ; |
7 ; Copyright (c) 2011, JD Gascuel, HeinrichsWeikamp, all right reserved. | |
8 ;============================================================================= | |
9 ; HISTORY | |
10 ; 2011-07-11 : [jDG] Creation. | |
11 | |
275 | 12 #include "hwos.inc" ; Mandatory header |
0 | 13 #include "gaslist.inc" |
14 #include "menu_processor.inc" | |
15 #include "start.inc" | |
16 #include "comm.inc" | |
17 #include "logbook.inc" | |
18 #include "tft.inc" | |
19 #include "eeprom_rs232.inc" | |
20 #include "external_flash.inc" | |
21 #include "shared_definitions.h" ; Mailbox from/to p2_deco.c | |
22 #include "isr.inc" | |
23 #include "ghostwriter.inc" | |
24 #include "adc_lightsensor.inc" | |
25 | |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
26 CBLOCK tmp+0x40 ; Keep space for menu processor |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
27 gaslist_gas ; Check ram position in gaslist.asm, too! |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
28 ENDC |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
29 |
0 | 30 gui CODE |
31 ;============================================================================= | |
32 ; Main Menu | |
66
00636132cca6
BUGFIX: Maintain last selected customview in surface mode
heinrichsweikamp
parents:
64
diff
changeset
|
33 global do_main_menu,do_main_menu2 |
0 | 34 do_main_menu: |
39
e4e91fe8b09d
remember last customview in dive and surface mode
mh@mh-THINK.fritz.box
parents:
23
diff
changeset
|
35 movff menupos3,customview_surfmode; save last customview |
66
00636132cca6
BUGFIX: Maintain last selected customview in surface mode
heinrichsweikamp
parents:
64
diff
changeset
|
36 do_main_menu2: |
0 | 37 bcf sleepmode ; for timeout |
38 call menu_processor_reset ; restart from first icon. | |
39 | |
40 do_continue_main_menu: | |
41 call menu_processor_pop ; drop exit line. | |
42 call menu_processor_pop ; back to last icon. | |
43 | |
44 extern do_demo_divemode, restart | |
45 MENU_BEGIN tMainMenu, .7 | |
46 MENU_CALL tLogbook, logbook | |
47 MENU_CALL tGasSetup, do_gas_menu | |
48 MENU_CALL tCCRSetup, do_ccr_menu | |
49 MENU_CALL tPlan, do_planner_menu_reset | |
50 MENU_CALL tDiveModeMenu, do_divemode_menu | |
51 MENU_CALL tSystSets, do_settings_menu | |
52 MENU_CALL tExit, restart | |
53 MENU_END | |
54 | |
55 do_info_menu: | |
62 | 56 MENU_BEGIN tInfoMenu, .5 |
0 | 57 MENU_DYNAMIC info_menu_serial, 0 |
58 MENU_DYNAMIC info_menu_firmware, 0 | |
59 MENU_DYNAMIC info_menu_total_dives, 0 | |
62 | 60 MENU_DYNAMIC info_menu_battery_volts,0 |
0 | 61 MENU_CALL tExit, do_return_settings |
62 MENU_END | |
63 | |
64 ;============================================================================= | |
65 ; CCR Setup | |
66 | |
67 return_ccr_menu: | |
68 call menu_processor_pop ; drop exit line. | |
69 call menu_processor_pop ; back to last gas. | |
70 | |
71 do_ccr_menu: | |
113 | 72 bcf menu_show_sensors ; Clear flag |
73 bcf menu_show_sensors2 ; Clear flag | |
236 | 74 btfsc analog_o2_input |
240 | 75 bra do_ccr_menu_cR |
76 btfss optical_input | |
77 bra do_ccr_menu_ostc2 | |
78 | |
79 MENU_BEGIN tCCRSetup, .5 ; OSTC3 menu | |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
80 MENU_OPTION tCCRMode, oCCRMode, 0 |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
81 MENU_CALL tCCRSensor, do_ccr_sensor |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
82 MENU_CALL tDiluentSetup, do_diluent_setup |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
83 MENU_CALL tFixedSetpoints, do_fixed_setpoints |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
84 MENU_CALL tExit, do_continue_main_menu |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
85 MENU_END |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
86 |
240 | 87 do_ccr_menu_cR: ; cR menu |
113 | 88 MENU_BEGIN tCCRSetup, .6 |
0 | 89 MENU_OPTION tCCRMode, oCCRMode, 0 |
90 MENU_CALL tCCRSensor, do_ccr_sensor | |
113 | 91 MENU_CALL tCalibrateMenu, do_calibrate_menu |
0 | 92 MENU_CALL tDiluentSetup, do_diluent_setup |
93 MENU_CALL tFixedSetpoints, do_fixed_setpoints | |
94 MENU_CALL tExit, do_continue_main_menu | |
95 MENU_END | |
96 | |
240 | 97 do_ccr_menu_ostc2: |
98 MENU_BEGIN tCCRSetup, .3 ; ostc2 menu | |
99 MENU_CALL tDiluentSetup, do_diluent_setup | |
100 MENU_CALL tFixedSetpoints, do_fixed_setpoints | |
101 MENU_CALL tExit, do_continue_main_menu | |
102 MENU_END | |
103 | |
104 | |
113 | 105 do_calibrate_menu: |
187
669b5d00706d
CHANGE: Longer timeout (4 min) for calibration menu
heinrichsweikamp
parents:
174
diff
changeset
|
106 call enable_ir_s8 ; Enable IR/S8-Port |
113 | 107 bsf menu_show_sensors2 ; Set flag |
108 do_calibrate_menu2: | |
109 MENU_BEGIN tCalibrateMenu, .6 | |
110 MENU_CALL tDiveHudMask1, 0 | |
111 MENU_CALL tDiveHudMask2, 0 | |
112 MENU_CALL tDiveHudMask3, 0 | |
113 MENU_OPTION tCalibrationGas,oCalGasO2, 0 | |
114 MENU_CALL tCalibrate, do_calibrate_mix | |
115 MENU_CALL tExit, return_ccr_menu | |
116 MENU_END | |
117 | |
118 do_calibrate_mix: | |
119 extern calibrate_mix | |
120 call calibrate_mix ; Calibrate with opt_calibration_O2_ratio, also calibrate S8 HUD if connected | |
121 goto restart ; Restart into surface mode | |
122 | |
0 | 123 do_ccr_sensor: |
187
669b5d00706d
CHANGE: Longer timeout (4 min) for calibration menu
heinrichsweikamp
parents:
174
diff
changeset
|
124 call enable_ir_s8 ; Enable IR/S8-Port |
0 | 125 bsf menu_show_sensors ; Set flag |
145
e3ac5b2021bc
NEW: Setpoint-Fallback option for external O2 sensor failure
heinrichsweikamp
parents:
144
diff
changeset
|
126 MENU_BEGIN tCCRSensor, .5 |
0 | 127 MENU_CALL tDiveHudMask1, 0 |
128 MENU_CALL tDiveHudMask2, 0 | |
129 MENU_CALL tDiveHudMask3, 0 | |
145
e3ac5b2021bc
NEW: Setpoint-Fallback option for external O2 sensor failure
heinrichsweikamp
parents:
144
diff
changeset
|
130 MENU_OPTION tSensorFallback,oSensorFallback, 0 |
0 | 131 MENU_CALL tExit, return_ccr_menu |
132 MENU_END | |
133 | |
134 do_diluent_setup: | |
135 bsf ccr_diluent_setup ; =1: Setting up Diluents ("Gas6-10") | |
139 | 136 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint |
0 | 137 call gaslist_cleanup_list ; Takes care that only one gas can be first and first has 0m change depth |
138 MENU_BEGIN tDiluentSetup, .6 | |
139 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
140 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
141 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
142 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
143 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
144 MENU_CALL tExit, return_ccr_menu | |
145 MENU_END | |
146 | |
147 do_return_fixed_setpoints: | |
148 call menu_processor_pop ; drop exit line. | |
149 call menu_processor_pop ; back to last gas. | |
150 | |
151 do_fixed_setpoints: | |
139 | 152 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint |
0 | 153 MENU_BEGIN tFixedSetpoints, .6 |
154 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
155 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
156 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
157 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
158 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
159 MENU_CALL tExit, return_ccr_menu | |
160 MENU_END | |
161 | |
162 do_edit_sp_menu: | |
163 call gaslist_setSP ; Save current item. | |
164 MENU_BEGIN tFixedSetpoints, .5 | |
165 MENU_DYNAMIC gaslist_strcat_setpoint_0,0 | |
166 MENU_CALL tSPPlus, gaslist_spplus | |
167 MENU_CALL tDepthPlus, gaslist_spdepthplus | |
168 MENU_CALL tDepthMinus, gaslist_spdepthminus | |
169 MENU_CALL tExit, do_return_fixed_setpoints | |
170 MENU_END | |
171 | |
172 ;============================================================================= | |
173 ; OC Gas Setup | |
174 | |
175 return_gas_menu: | |
176 call menu_processor_pop ; drop exit line. | |
177 call menu_processor_pop ; back to last gas. | |
178 | |
179 btfsc ccr_diluent_setup ; Return to CCR-Menu? | |
180 bra do_diluent_setup ; Yes. | |
181 do_gas_menu: | |
182 bcf ccr_diluent_setup ; =1: Setting up Diluents ("Gas6-10") | |
139 | 183 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint |
0 | 184 call gaslist_cleanup_list ; Takes care that only one gas can be first and first has 0m change depth |
185 MENU_BEGIN tGaslist, .6 | |
186 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
187 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
188 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
189 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
190 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
191 MENU_CALL tExit, do_continue_main_menu | |
192 MENU_END | |
193 | |
194 return_gas_depth: | |
195 call menu_processor_pop ; drop exit line. | |
196 call menu_processor_pop ; back to last gas. | |
197 bra do_edit_gas_menu_1 | |
198 | |
199 do_edit_gas_menu: | |
200 call gaslist_setgas ; Save current item. | |
201 do_edit_gas_menu_1: ; Keep current gas. | |
202 MENU_BEGIN tGasEdit, .6 | |
203 MENU_DYNAMIC gaslist_gastitle, 0 | |
204 MENU_DYNAMIC gaslist_MOD_END, 0 | |
205 MENU_DYNAMIC gaslist_show_type, gaslist_toggle_type | |
206 MENU_CALL tSetup_mix, do_setup_mix | |
207 MENU_CALL tGasDepth, do_gas_depth_menu | |
208 MENU_CALL tExit, return_gas_menu | |
209 MENU_END | |
210 | |
211 do_setup_mix: | |
212 MENU_BEGIN tGasEdit, .7 | |
213 MENU_DYNAMIC gaslist_gastitle, 0 | |
214 MENU_DYNAMIC gaslist_MOD_END, 0 | |
215 MENU_CALL tO2Plus, gaslist_pO2 | |
216 MENU_CALL tO2Minus, gaslist_mO2 | |
217 MENU_CALL tHePlus, gaslist_pHe | |
218 MENU_CALL tHeMinus, gaslist_mHe | |
219 MENU_CALL tExit, return_gas_depth | |
220 MENU_END | |
221 | |
222 global do_gas_depth_menu | |
223 do_gas_depth_menu: | |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
224 movff gaslist_gas,WREG |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
225 lfsr FSR1,opt_gas_type ; Read opt_gas_type[WREG] |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
226 movff PLUSW1,lo ; Used as temp |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
227 movlw .3 ; 3=Deco |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
228 btfsc ccr_diluent_setup ; =1: Setting up Diluents ("Gas6-10") |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
229 movlw .2 ; 2=Normal |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
230 cpfseq lo |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
231 bra return_gas_depth ; Non-Deco gas or "Normal" Diluent, Return! |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
232 |
154
afa31c815f24
NEW: Show ppO2 for change depth during gas setup
heinrichsweikamp
parents:
148
diff
changeset
|
233 MENU_BEGIN tGasEdit, .7 |
0 | 234 MENU_DYNAMIC gaslist_gastitle, 0 |
235 MENU_DYNAMIC gaslist_MOD_END, 0 | |
154
afa31c815f24
NEW: Show ppO2 for change depth during gas setup
heinrichsweikamp
parents:
148
diff
changeset
|
236 MENU_DYNAMIC gaslist_ppo2, 0 ; ppO2 at change depth |
0 | 237 MENU_CALL tDepthPlus, gaslist_pDepth |
238 MENU_CALL tDepthMinus, gaslist_mDepth | |
239 MENU_DYNAMIC gaslist_reset_mod_title,gaslist_reset_mod | |
240 MENU_CALL tExit, return_gas_depth | |
241 MENU_END | |
242 | |
243 ;============================================================================= | |
244 ; Simulator menus | |
245 | |
246 global do_planner_menu | |
247 | |
248 do_planner_menu_reset: | |
249 extern option_save_all | |
250 call option_save_all | |
251 ;---- Reset dive time/depth to default values | |
252 extern option_reset | |
253 lfsr FSR0,odiveInterval | |
254 call option_reset | |
255 lfsr FSR0,obottomTime | |
256 call option_reset | |
257 lfsr FSR0,obottomDepth | |
258 call option_reset | |
259 | |
260 do_planner_menu: | |
261 extern do_demo_planner | |
262 MENU_BEGIN tPlan, .6 | |
263 MENU_CALL tInter, do_demo_divemode | |
264 MENU_OPTION tIntvl, odiveInterval, 0 | |
265 MENU_OPTION tBtTm, obottomTime, 0 | |
266 MENU_OPTION tMxDep, obottomDepth, 0 | |
267 MENU_CALL tDeco, do_demo_planner | |
268 MENU_CALL tExit, do_continue_main_menu | |
269 MENU_END | |
270 | |
271 ;============================================================================= | |
272 ; Divemode menu | |
273 | |
274 do_return_divemode_menu: | |
275 call menu_processor_pop ; drop exit line. | |
276 call menu_processor_pop ; back to last gas. | |
277 | |
278 do_divemode_menu: | |
279 MENU_BEGIN tDiveModeMenu, .7 | |
280 MENU_OPTION tDvMode, oDiveMode, 0 | |
281 MENU_OPTION tDkMode, oDecoMode, 0 | |
104
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
282 MENU_CALL tppO2settings, do_ppo2_menu |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
283 MENU_OPTION tsafetystopmenu,oSafetyStop, 0 |
0 | 284 MENU_OPTION tFTTSMenu, oExtraTime,0 |
285 MENU_CALL tDecoparameters, do_decoparameters_menu | |
286 MENU_CALL tExit, do_continue_main_menu | |
287 MENU_END | |
288 | |
104
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
289 do_ppo2_menu: |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
290 MENU_BEGIN tppO2settings, .3 |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
291 MENU_DYNAMIC divesets_ppo2_max, do_toggle_ppo2_max |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
292 MENU_DYNAMIC divesets_ppo2_min, do_toggle_ppo2_min |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
293 MENU_CALL tExit, do_return_divemode_menu |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
294 MENU_END |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
295 |
0 | 296 do_return_decoparameters_menu: |
297 call menu_processor_pop ; drop exit line. | |
298 call menu_processor_pop ; back to setting | |
299 do_decoparameters_menu: | |
300 MENU_BEGIN tDecoparameters, .7 | |
301 MENU_OPTION tGF_low, oGF_low, 0 | |
302 MENU_OPTION tGF_high, oGF_high, 0 | |
303 MENU_CALL taGFMenu, do_aGF_menu | |
304 MENU_OPTION tSaturationMult,osatmult, 0 | |
305 MENU_OPTION tDesaturationMult,odesatmult,0 | |
306 MENU_OPTION tLastDecostop,oLastDeco, 0 | |
307 MENU_CALL tExit, do_return_divemode_menu | |
308 MENU_END | |
309 | |
310 do_aGF_menu: | |
311 MENU_BEGIN taGFMenu, .4 | |
312 MENU_OPTION taGF_enable,oEnable_aGF, 0 | |
313 MENU_OPTION taGF_low, oaGF_low, 0 | |
314 MENU_OPTION taGF_high, oaGF_high, 0 | |
315 MENU_CALL tExit, do_return_decoparameters_menu | |
316 MENU_END | |
317 ;============================================================================= | |
318 ; Setup Menu | |
319 | |
320 do_return_settings: | |
321 bcf settime_setdate ; Clear flag | |
322 call menu_processor_pop ; Drop exit entry | |
323 call menu_processor_pop ; Pop return line. | |
324 | |
325 extern compass_calibration_loop | |
326 do_settings_menu: | |
327 MENU_BEGIN tSystSets, .7 | |
328 MENU_CALL tInfoMenu, do_info_menu | |
329 MENU_CALL tSetTimeDate, do_date_time_menu | |
330 MENU_CALL tDispSets, do_dispsets_menu | |
331 MENU_OPTION tLanguage, oLanguage, 0 | |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
332 MENU_CALL tResetMenu, do_reset_menu |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
333 MENU_CALL tMore, do_settings_menu_more |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
334 MENU_CALL tExit, do_continue_main_menu |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
335 MENU_END |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
336 |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
337 |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
338 do_settings_menu_more: |
243 | 339 btfsc rechargeable ; piezo buttons available |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
340 bra do_settings_menu_more_piezo |
243 | 341 btfsc ble_available ; ble available |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
342 bra do_settings_menu_more_ostc3p |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
343 MENU_BEGIN tSystSets, .6 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
344 MENU_CALL tCompassMenu, do_compass_menu |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
345 MENU_CALL tLogOffset, do_log_offset_menu |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
346 MENU_OPTION tUnits, oUnits, 0 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
347 MENU_OPTION tSamplingrate,oSamplingRate,0 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
348 MENU_OPTION tDvSalinity,oDiveSalinity, 0 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
349 MENU_CALL tExit, do_return_settings |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
350 MENU_END |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
351 |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
352 do_settings_menu_more_piezo: |
218 | 353 MENU_BEGIN tSystSets, .7 |
18
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
354 MENU_CALL tCompassMenu, do_compass_menu |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
355 MENU_CALL tLogOffset, do_log_offset_menu |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
356 MENU_OPTION tUnits, oUnits, 0 |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
357 MENU_OPTION tSamplingrate,oSamplingRate,0 |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
358 MENU_OPTION tDvSalinity,oDiveSalinity, 0 |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
359 MENU_CALL tMore, do_settings_cr_menu |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
360 MENU_CALL tExit, do_return_settings |
0 | 361 MENU_END |
362 | |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
363 extern comm_mode0 |
243 | 364 |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
365 do_settings_cr_menu: |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
366 btfsc ble_available ; ble available |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
367 bra do_settings_menu_more_ostc2 |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
368 ; Menu with features only available in cR hardware |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
369 MENU_BEGIN tSystSets, .4 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
370 MENU_CALL tUsbTitle, comm_mode0 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
371 MENU_OPTION tButtonleft,ocR_button_left ,0 ; left button sensitivity |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
372 MENU_OPTION tButtonright,ocR_button_right,0 ; right button sensitivity |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
373 MENU_CALL tExit, do_settings_menu_more_piezo |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
374 MENU_END |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
375 |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
376 do_settings_menu_more_ostc2: |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
377 ; Menu OSTC2 |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
378 MENU_BEGIN tSystSets, .4 |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
379 MENU_CALL tBleTitle, comm_mode0 |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
380 MENU_OPTION tButtonleft,ocR_button_left ,0 ; left button sensitivity |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
381 MENU_OPTION tButtonright,ocR_button_right,0 ; right button sensitivity |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
382 MENU_CALL tExit, do_settings_menu_more_piezo |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
383 MENU_END |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
384 |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
385 |
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
386 do_settings_menu_more_ostc3p: ; Menu with BLE feature |
243 | 387 MENU_BEGIN tSystSets, .7 |
388 MENU_CALL tCompassMenu, do_compass_menu | |
389 MENU_CALL tLogOffset, do_log_offset_menu | |
390 MENU_OPTION tUnits, oUnits, 0 | |
391 MENU_OPTION tSamplingrate,oSamplingRate,0 | |
392 MENU_OPTION tDvSalinity,oDiveSalinity, 0 | |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
393 MENU_CALL tBleTitle, comm_mode0 |
243 | 394 MENU_CALL tExit, do_return_settings |
395 MENU_END | |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
396 |
18
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
397 do_compass_menu: |
90
3274e87fd027
NEW: automatic compass gain makes calibration quicker
heinrichsweikamp
parents:
78
diff
changeset
|
398 MENU_BEGIN tSystSets, .2 |
18
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
399 MENU_CALL tCompassMenu, compass_calibration_loop |
90
3274e87fd027
NEW: automatic compass gain makes calibration quicker
heinrichsweikamp
parents:
78
diff
changeset
|
400 ; MENU_OPTION tCompassGain, oCompassGain, 0 |
18
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
401 MENU_CALL tExit, do_return_settings |
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
402 MENU_END |
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
403 |
0 | 404 ;============================================================================= |
405 ; Reset and confirmation menu. | |
406 | |
407 do_reset_menu: | |
63 | 408 MENU_BEGIN tResetMenu, .6 |
0 | 409 MENU_CALL tExit, do_return_settings |
410 MENU_CALL tReboot, do_reset_menu2 ; Confirm | |
411 MENU_CALL tResetDeco, do_reset_menu3 ; Confirm | |
412 MENU_CALL tResetSettings, do_reset_menu4 ; Confirm | |
63 | 413 MENU_CALL tResetLogbook, do_reset_menu5 ; Confirm |
0 | 414 MENU_CALL tResetBattery, new_battery_menu ; New Battery submenu |
415 MENU_END | |
416 | |
417 do_reset_menu2: | |
418 MENU_BEGIN tResetMenu2, .2 | |
419 MENU_CALL tAbort, do_continue_menu_3stack | |
420 MENU_CALL tReboot, do_reboot ; Reboot | |
421 MENU_END | |
422 | |
423 do_reset_menu3: | |
424 MENU_BEGIN tResetMenu2, .2 | |
425 MENU_CALL tAbort, do_continue_menu_3stack | |
426 MENU_CALL tResetDeco, do_reset_deco ; Reset Deco | |
427 MENU_END | |
428 | |
429 do_reset_menu4: | |
430 MENU_BEGIN tResetMenu2, .2 | |
431 MENU_CALL tAbort, do_continue_menu_3stack | |
432 MENU_CALL tResetSettings, do_reset_settings ; Reset all settings | |
433 MENU_END | |
434 | |
63 | 435 do_reset_menu5: |
436 MENU_BEGIN tResetMenu2, .2 | |
437 MENU_CALL tAbort, do_continue_menu_3stack | |
438 MENU_CALL tResetLogbook, do_reset_logbook ; Reset logbook | |
439 MENU_END | |
440 | |
441 do_reset_logbook: | |
442 clrf EEADRH ; Make sure to select eeprom bank 0 | |
443 clrf EEDATA | |
78
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
444 read_int_eeprom .2 |
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
445 write_int_eeprom .15 |
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
446 read_int_eeprom .3 |
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
447 write_int_eeprom .16 ; Copy number of dives |
144 | 448 clrf EEDATA |
78
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
449 write_int_eeprom .2 |
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
450 write_int_eeprom .3 ; Clear total dives |
63 | 451 write_int_eeprom .4 |
452 write_int_eeprom .5 | |
453 write_int_eeprom .6 ; Reset logbook pointers | |
454 call ext_flash_erase_logbook ; And complete logbook (!) | |
455 goto do_continue_main_menu ; back to menu | |
456 | |
0 | 457 |
458 do_reset_deco: | |
459 movlw d'79' ; 79% N2 | |
460 movff WREG,char_I_N2_ratio | |
461 movlw d'0' | |
462 movff WREG,char_I_step_is_1min ; 2 second deco mode | |
463 SAFE_2BYTE_COPY amb_pressure,int_I_pres_respiration ; copy for deco routine | |
464 movff int_I_pres_respiration+0,int_I_pres_surface+0 ; copy for desat routine | |
465 movff int_I_pres_respiration+1,int_I_pres_surface+1 | |
466 | |
467 extern deco_reset | |
468 call deco_reset | |
469 call deco_calc_desaturation_time ; calculate desaturation time | |
470 banksel common | |
471 call deco_calc_wo_deco_step_1_min ; calculate deco in surface mode | |
472 banksel common | |
473 clrf nofly_time+0 ; Reset NoFly | |
474 clrf nofly_time+1 | |
475 clrf desaturation_time+0 ; Reset Desat | |
476 clrf desaturation_time+1 | |
477 goto do_return_settings ; back to menu | |
478 | |
479 do_reset_settings: | |
139 | 480 banksel common |
0 | 481 extern option_reset_all |
482 call option_reset_all ; Reset all options to factory default. | |
76 | 483 goto restart ; Restart into surfacemode |
0 | 484 |
485 do_continue_menu_3stack: ; Return three levels deep | |
486 call menu_processor_pop | |
487 goto do_return_settings | |
488 | |
489 do_reboot: | |
490 call ext_flash_enable_protection ; Enables write protection | |
491 reset | |
492 | |
493 | |
494 do_date_time_menu: | |
495 MENU_BEGIN tSetTimeDate, .4 | |
496 MENU_CALL tSetTime, do_time_menu | |
497 MENU_CALL tSetDate, do_date_menu | |
498 MENU_OPTION tDateFormat,oDateFormat, 0 | |
499 MENU_CALL tExit, do_return_settings | |
500 MENU_END | |
501 | |
502 do_date_menu: | |
503 bsf settime_setdate | |
504 MENU_BEGIN tSetDate, .4 | |
505 MENU_OPTION tSetDay, oSetDay, 0 | |
50 | 506 MENU_OPTION tSetMonth, oSetMonth, 0 |
0 | 507 MENU_OPTION tSetYear, oSetYear, 0 |
508 MENU_CALL tExit, do_continue_menu_3stack | |
509 MENU_END | |
510 | |
511 | |
512 do_reset_seconds: | |
513 clrf secs | |
514 extern rtc_set_rtc | |
515 call rtc_set_rtc ; writes mins,sec,hours,day,month and year to rtc module | |
516 do_time_menu: | |
517 bsf settime_setdate | |
518 MENU_BEGIN tSetTime, .4 | |
519 MENU_OPTION tSetHours, oSetHours, 0 | |
520 MENU_OPTION tSetMinutes,oSetMinutes, 0 | |
521 MENU_CALL tSetSeconds, do_reset_seconds | |
522 MENU_CALL tExit, do_continue_menu_3stack | |
523 MENU_END | |
524 | |
525 | |
526 do_toggle_ppo2_max: ; add 0.1bar, with hard-coded max. | |
527 movff opt_ppO2_max,lo ; banksafe | |
528 movlw .10 | |
529 addwf lo,F | |
530 movlw ppo2_highest_setting | |
531 cpfsgt lo | |
532 bra do_toggle_ppo2_max2 | |
533 movlw .120 | |
534 movwf lo | |
535 do_toggle_ppo2_max2: | |
536 movff lo,opt_ppO2_max | |
537 return | |
538 | |
539 do_toggle_ppo2_min: ; sub 0.1bar, with hard-coded min. | |
540 movff opt_ppO2_min,lo ; banksafe | |
541 incf lo,F | |
542 movlw .21 | |
543 cpfsgt lo | |
544 bra do_toggle_ppo2_min2 | |
545 movlw ppo2_lowest_setting | |
546 movwf lo | |
547 do_toggle_ppo2_min2: | |
548 movff lo,opt_ppO2_min | |
549 return | |
550 | |
551 | |
552 ; Logbook offset sub-menu | |
553 do_log_offset_menu: | |
554 MENU_BEGIN tLogOffset, .6 | |
555 MENU_DYNAMIC TFT_LogOffset_Logtitle, 0 | |
556 MENU_CALL tLogOffsetp1, do_logoffset_plus1 | |
557 MENU_CALL tLogOffsetp10, do_logoffset_plus10 | |
558 MENU_CALL tLogOffsetm1, do_logoffset_minus1 | |
559 MENU_CALL tLogOffsetm10, do_logoffset_minus10 | |
560 MENU_CALL tExit, do_dispsets_menu_3stack | |
561 MENU_END | |
562 | |
563 | |
564 do_logoffset_minus1: | |
565 call do_logoffset_common_read ; Read into lo:hi | |
566 movlw d'1' | |
567 subwf lo | |
568 movlw d'0' | |
569 subwfb hi | |
570 btfss hi,7 ; <0? | |
571 goto do_logoffset_common_write ; Store and return | |
572 clrf lo | |
573 clrf hi | |
574 goto do_logoffset_common_write ; Store and return | |
575 | |
576 do_logoffset_minus10: | |
577 call do_logoffset_common_read ; Read into lo:hi | |
578 movlw d'10' | |
579 subwf lo | |
580 movlw d'0' | |
581 subwfb hi | |
582 btfss hi,7 ; <0? | |
583 goto do_logoffset_common_write ; Store and return | |
584 clrf lo | |
585 clrf hi | |
586 goto do_logoffset_common_write ; Store and return | |
587 | |
588 do_logoffset_plus1: | |
589 call do_logoffset_common_read ; Read into lo:hi | |
148 | 590 infsnz lo,F |
591 incf hi,F | |
0 | 592 goto do_logoffset_common_write ; Store and return |
593 | |
594 do_logoffset_plus10: | |
595 call do_logoffset_common_read ; Read into lo:hi | |
596 movlw d'10' | |
597 addwf lo | |
598 movlw d'0' | |
599 addwfc hi | |
600 goto do_logoffset_common_write ; Store and return | |
601 | |
602 do_dispsets_menu_3stack: | |
50 | 603 bcf in_color_menu |
0 | 604 call menu_processor_pop |
605 call menu_processor_pop | |
606 | |
607 do_dispsets_menu: | |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
608 MENU_BEGIN tDispSets, .4 |
0 | 609 MENU_OPTION tBright, oBrightness, 0 |
50 | 610 MENU_CALL tColorScheme, do_color_scheme |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
611 MENU_OPTION tFlip, oFlipScreen, 0 |
0 | 612 MENU_CALL tExit, do_return_settings |
613 MENU_END | |
614 | |
50 | 615 |
616 extern oColorSetDive | |
617 do_color_scheme: | |
618 bsf in_color_menu | |
619 MENU_BEGIN tColorScheme, .2 | |
620 MENU_OPTION tColorSetDive,oColorSetDive, 0 | |
621 MENU_CALL tExit, do_dispsets_menu_3stack | |
622 MENU_END | |
623 | |
624 | |
0 | 625 ;============================================================================= |
626 | |
627 global new_battery_menu | |
628 new_battery_menu: | |
629 bsf enable_screen_dumps ; To prevent exiting into COMM mode immediately | |
630 call TFT_boot ; Initialize TFT (includes clear screen) | |
631 call TFT_Display_FadeIn ; Show splash | |
632 movlw .100 | |
633 movwf batt_percent ; make sure to reset batt_percent | |
634 | |
635 ; Default (In cases of timeout or USB): Use old battery | |
636 clrf EEADRH | |
637 read_int_eeprom 0x07 | |
638 movff EEDATA,battery_gauge+0 | |
639 read_int_eeprom 0x08 | |
640 movff EEDATA,battery_gauge+1 | |
641 read_int_eeprom 0x09 | |
642 movff EEDATA,battery_gauge+2 | |
643 read_int_eeprom 0x0A | |
644 movff EEDATA,battery_gauge+3 | |
645 read_int_eeprom 0x0B | |
646 movff EEDATA,battery_gauge+4 | |
647 read_int_eeprom 0x0C | |
648 movff EEDATA,battery_gauge+5 | |
649 | |
76 | 650 call menu_processor_reset ; restart from first icon. |
651 | |
0 | 652 MENU_BEGIN tNewBattTitle, .3 |
653 MENU_CALL tNewBattOld, use_old_batteries | |
654 MENU_CALL tNewBattNew36, use_new_36V_batteries | |
655 MENU_CALL tNewBattNew15, use_new_15V_batteries | |
656 MENU_END | |
657 | |
658 global use_old_batteries | |
659 use_old_batteries: | |
660 clrf EEADRH | |
661 read_int_eeprom 0x07 | |
662 movff EEDATA,battery_gauge+0 | |
663 read_int_eeprom 0x08 | |
664 movff EEDATA,battery_gauge+1 | |
665 read_int_eeprom 0x09 | |
666 movff EEDATA,battery_gauge+2 | |
667 read_int_eeprom 0x0A | |
668 movff EEDATA,battery_gauge+3 | |
669 read_int_eeprom 0x0B | |
670 movff EEDATA,battery_gauge+4 | |
671 read_int_eeprom 0x0C | |
672 movff EEDATA,battery_gauge+5 | |
673 movlw .100 | |
674 movwf batt_percent ; To have 1,5V batteries right after firmware update | |
675 goto power_on_return | |
676 | |
677 use_new_15V_batteries: | |
678 use_new_36V_batteries: | |
679 call reset_battery_pointer ; Resets battery pointer 0x07-0x0C and battery_gauge:5 | |
680 goto power_on_return | |
681 | |
682 END |