annotate src/menu_tree.asm @ 353:573f2251cf49

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