Mercurial > public > hwos_code
annotate src/menu_tree.asm @ 530:d36f9fca10ae
2.20beta release
BUGFIX: Minor dive mode layout fixes in CCR Mode
CHANGE: Minor German language fixes
NEW: Warning for Diluent beeing out of safe ppO2 range in CCR modes
NEW: New Customview 9 in OSTC cR or OSTC3 shows mV readings after Sensor calibration
author | heinrichsweikamp |
---|---|
date | Thu, 17 Aug 2017 13:20:03 +0200 |
parents | 08d7eb26665c |
children | 64a45f203144 |
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" | |
505
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
15 #include "start.inc" |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
16 #include "comm.inc" |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
17 #include "logbook.inc" |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
18 #include "tft.inc" |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
19 #include "eeprom_rs232.inc" |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
20 #include "external_flash.inc" |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
21 #include "shared_definitions.h" ; Mailbox from/to p2_deco.c |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
22 #include "isr.inc" |
bef07a837a60
BUGFIX: Reset to MOD in Diluent Menu did reset Setpoint change depth
heinrichsweikamp
parents:
502
diff
changeset
|
23 #include "ghostwriter.inc" |
0 | 24 #include "adc_lightsensor.inc" |
355 | 25 #include "wait.inc" |
457 | 26 #include "i2c.inc" |
0 | 27 |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
28 CBLOCK tmp+0x40 ; Keep space for menu processor |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
29 gaslist_gas ; Check ram position in gaslist.asm, too! |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
30 ENDC |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
31 |
0 | 32 gui CODE |
33 ;============================================================================= | |
34 ; Main Menu | |
66
00636132cca6
BUGFIX: Maintain last selected customview in surface mode
heinrichsweikamp
parents:
64
diff
changeset
|
35 global do_main_menu,do_main_menu2 |
0 | 36 do_main_menu: |
39
e4e91fe8b09d
remember last customview in dive and surface mode
mh@mh-THINK.fritz.box
parents:
23
diff
changeset
|
37 movff menupos3,customview_surfmode; save last customview |
66
00636132cca6
BUGFIX: Maintain last selected customview in surface mode
heinrichsweikamp
parents:
64
diff
changeset
|
38 do_main_menu2: |
502
0910c227018f
BUGFIX: PSCR mode showed bailout gaslist instead of diluent gaslist
heinrichsweikamp
parents:
481
diff
changeset
|
39 call TFT_boot |
0 | 40 bcf sleepmode ; for timeout |
41 call menu_processor_reset ; restart from first icon. | |
42 | |
43 do_continue_main_menu: | |
428 | 44 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 45 |
46 extern do_demo_divemode, restart | |
47 MENU_BEGIN tMainMenu, .7 | |
48 MENU_CALL tLogbook, logbook | |
49 MENU_CALL tGasSetup, do_gas_menu | |
50 MENU_CALL tCCRSetup, do_ccr_menu | |
51 MENU_CALL tPlan, do_planner_menu_reset | |
52 MENU_CALL tDiveModeMenu, do_divemode_menu | |
53 MENU_CALL tSystSets, do_settings_menu | |
54 MENU_CALL tExit, restart | |
55 MENU_END | |
56 | |
57 do_info_menu: | |
453
b4f28ab23b87
NEW: Show Uptime (Time since last firmware boot) in information menu
heinrichsweikamp
parents:
451
diff
changeset
|
58 MENU_BEGIN tInfoMenu, .6 |
0 | 59 MENU_DYNAMIC info_menu_serial, 0 |
60 MENU_DYNAMIC info_menu_firmware, 0 | |
61 MENU_DYNAMIC info_menu_total_dives, 0 | |
62 | 62 MENU_DYNAMIC info_menu_battery_volts,0 |
453
b4f28ab23b87
NEW: Show Uptime (Time since last firmware boot) in information menu
heinrichsweikamp
parents:
451
diff
changeset
|
63 MENU_DYNAMIC info_menu_uptime,0 |
0 | 64 MENU_CALL tExit, do_return_settings |
65 MENU_END | |
66 | |
67 ;============================================================================= | |
68 ; CCR Setup | |
69 | |
70 return_ccr_menu: | |
428 | 71 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 72 |
73 do_ccr_menu: | |
113 | 74 bcf menu_show_sensors ; Clear flag |
75 bcf menu_show_sensors2 ; Clear flag | |
236 | 76 btfsc analog_o2_input |
240 | 77 bra do_ccr_menu_cR |
78 btfss optical_input | |
79 bra do_ccr_menu_ostc2 | |
80 | |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
81 MENU_BEGIN tCCRSetup, .6 ; OSTC3 menu |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
82 MENU_OPTION tCCRMode, oCCRMode, 0 |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
83 MENU_CALL tCCRSensor, do_ccr_sensor |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
84 MENU_CALL tDiluentSetup, do_diluent_setup |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
85 MENU_CALL tFixedSetpoints, do_fixed_setpoints |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
86 MENU_CALL tPSCRMenu, do_PSCR_menu |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
87 MENU_CALL tExit, do_continue_main_menu |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
88 MENU_END |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
89 |
240 | 90 do_ccr_menu_cR: ; cR menu |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
91 MENU_BEGIN tCCRSetup, .7 |
0 | 92 MENU_OPTION tCCRMode, oCCRMode, 0 |
93 MENU_CALL tCCRSensor, do_ccr_sensor | |
113 | 94 MENU_CALL tCalibrateMenu, do_calibrate_menu |
0 | 95 MENU_CALL tDiluentSetup, do_diluent_setup |
96 MENU_CALL tFixedSetpoints, do_fixed_setpoints | |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
97 MENU_CALL tPSCRMenu, do_PSCR_menu |
0 | 98 MENU_CALL tExit, do_continue_main_menu |
99 MENU_END | |
100 | |
240 | 101 do_ccr_menu_ostc2: |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
102 MENU_BEGIN tCCRSetup, .5 ; ostc2 menu |
359 | 103 MENU_OPTION tCCRMode, oCCRMode, 0 |
240 | 104 MENU_CALL tDiluentSetup, do_diluent_setup |
105 MENU_CALL tFixedSetpoints, do_fixed_setpoints | |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
106 MENU_CALL tPSCRMenu, do_PSCR_menu |
240 | 107 MENU_CALL tExit, do_continue_main_menu |
108 MENU_END | |
109 | |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
110 do_PSCR_menu: |
481 | 111 MENU_BEGIN tPSCRMenu, .3 ; PSCR Menu |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
112 MENU_OPTION tPSCR_O2_drop, oPSCR_drop, 0 |
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
113 MENU_OPTION tPSCR_lungratio,oPSCR_lungratio, 0 |
523
8e75aecb3290
BUGFIX: Menu tree cleaned up (Exited to CCR menu from simulator settings)
heinrichsweikamp
parents:
507
diff
changeset
|
114 MENU_CALL tExit, return_ccr_menu |
480
ad8acade5567
NEW: PSCR mode (Passive semi-closed rebreather)
heinrichsweikamp
parents:
477
diff
changeset
|
115 MENU_END |
240 | 116 |
113 | 117 do_calibrate_menu: |
187
669b5d00706d
CHANGE: Longer timeout (4 min) for calibration menu
heinrichsweikamp
parents:
174
diff
changeset
|
118 call enable_ir_s8 ; Enable IR/S8-Port |
113 | 119 bsf menu_show_sensors2 ; Set flag |
120 do_calibrate_menu2: | |
121 MENU_BEGIN tCalibrateMenu, .6 | |
122 MENU_CALL tDiveHudMask1, 0 | |
123 MENU_CALL tDiveHudMask2, 0 | |
124 MENU_CALL tDiveHudMask3, 0 | |
125 MENU_OPTION tCalibrationGas,oCalGasO2, 0 | |
126 MENU_CALL tCalibrate, do_calibrate_mix | |
127 MENU_CALL tExit, return_ccr_menu | |
128 MENU_END | |
129 | |
130 do_calibrate_mix: | |
131 extern calibrate_mix | |
132 call calibrate_mix ; Calibrate with opt_calibration_O2_ratio, also calibrate S8 HUD if connected | |
355 | 133 WAITMS d'250' ; Wait for HUD v3 |
530 | 134 movlw .9 |
135 movwf customview_surfmode ; show sensor mV custom view after restart | |
524 | 136 goto restart ; Restart into surface mode |
113 | 137 |
0 | 138 do_ccr_sensor: |
187
669b5d00706d
CHANGE: Longer timeout (4 min) for calibration menu
heinrichsweikamp
parents:
174
diff
changeset
|
139 call enable_ir_s8 ; Enable IR/S8-Port |
0 | 140 bsf menu_show_sensors ; Set flag |
145
e3ac5b2021bc
NEW: Setpoint-Fallback option for external O2 sensor failure
heinrichsweikamp
parents:
144
diff
changeset
|
141 MENU_BEGIN tCCRSensor, .5 |
0 | 142 MENU_CALL tDiveHudMask1, 0 |
143 MENU_CALL tDiveHudMask2, 0 | |
144 MENU_CALL tDiveHudMask3, 0 | |
145
e3ac5b2021bc
NEW: Setpoint-Fallback option for external O2 sensor failure
heinrichsweikamp
parents:
144
diff
changeset
|
145 MENU_OPTION tSensorFallback,oSensorFallback, 0 |
0 | 146 MENU_CALL tExit, return_ccr_menu |
147 MENU_END | |
148 | |
149 do_diluent_setup: | |
150 bsf ccr_diluent_setup ; =1: Setting up Diluents ("Gas6-10") | |
139 | 151 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint |
0 | 152 call gaslist_cleanup_list ; Takes care that only one gas can be first and first has 0m change depth |
153 MENU_BEGIN tDiluentSetup, .6 | |
154 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
155 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
156 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
157 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
158 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
159 MENU_CALL tExit, return_ccr_menu | |
160 MENU_END | |
161 | |
162 do_return_fixed_setpoints: | |
428 | 163 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 164 |
165 do_fixed_setpoints: | |
139 | 166 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint |
0 | 167 MENU_BEGIN tFixedSetpoints, .6 |
168 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
169 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
170 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
171 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
172 MENU_DYNAMIC gaslist_strcat_setpoint, do_edit_sp_menu | |
173 MENU_CALL tExit, return_ccr_menu | |
174 MENU_END | |
175 | |
176 do_edit_sp_menu: | |
177 call gaslist_setSP ; Save current item. | |
178 MENU_BEGIN tFixedSetpoints, .5 | |
179 MENU_DYNAMIC gaslist_strcat_setpoint_0,0 | |
180 MENU_CALL tSPPlus, gaslist_spplus | |
181 MENU_CALL tDepthPlus, gaslist_spdepthplus | |
182 MENU_CALL tDepthMinus, gaslist_spdepthminus | |
183 MENU_CALL tExit, do_return_fixed_setpoints | |
184 MENU_END | |
185 | |
186 ;============================================================================= | |
187 ; OC Gas Setup | |
188 | |
189 return_gas_menu: | |
428 | 190 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 191 |
192 btfsc ccr_diluent_setup ; Return to CCR-Menu? | |
193 bra do_diluent_setup ; Yes. | |
194 do_gas_menu: | |
195 bcf ccr_diluent_setup ; =1: Setting up Diluents ("Gas6-10") | |
139 | 196 bcf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint |
0 | 197 call gaslist_cleanup_list ; Takes care that only one gas can be first and first has 0m change depth |
198 MENU_BEGIN tGaslist, .6 | |
199 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
200 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
201 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
202 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
203 MENU_DYNAMIC gaslist_strcat_gas_mod, do_edit_gas_menu | |
204 MENU_CALL tExit, do_continue_main_menu | |
205 MENU_END | |
206 | |
207 return_gas_depth: | |
428 | 208 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 209 bra do_edit_gas_menu_1 |
210 | |
211 do_edit_gas_menu: | |
212 call gaslist_setgas ; Save current item. | |
213 do_edit_gas_menu_1: ; Keep current gas. | |
214 MENU_BEGIN tGasEdit, .6 | |
215 MENU_DYNAMIC gaslist_gastitle, 0 | |
216 MENU_DYNAMIC gaslist_MOD_END, 0 | |
217 MENU_DYNAMIC gaslist_show_type, gaslist_toggle_type | |
218 MENU_CALL tSetup_mix, do_setup_mix | |
219 MENU_CALL tGasDepth, do_gas_depth_menu | |
220 MENU_CALL tExit, return_gas_menu | |
221 MENU_END | |
222 | |
223 do_setup_mix: | |
224 MENU_BEGIN tGasEdit, .7 | |
225 MENU_DYNAMIC gaslist_gastitle, 0 | |
226 MENU_DYNAMIC gaslist_MOD_END, 0 | |
227 MENU_CALL tO2Plus, gaslist_pO2 | |
228 MENU_CALL tO2Minus, gaslist_mO2 | |
229 MENU_CALL tHePlus, gaslist_pHe | |
230 MENU_CALL tHeMinus, gaslist_mHe | |
231 MENU_CALL tExit, return_gas_depth | |
232 MENU_END | |
233 | |
428 | 234 menu_tree_double_pop: |
235 call menu_processor_pop ; drop exit line. | |
236 goto menu_processor_pop ; back to last gas and return | |
237 | |
238 | |
0 | 239 global do_gas_depth_menu |
240 do_gas_depth_menu: | |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
241 movff gaslist_gas,WREG |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
242 lfsr FSR1,opt_gas_type ; Read opt_gas_type[WREG] |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
243 movff PLUSW1,lo ; Used as temp |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
244 movlw .3 ; 3=Deco |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
245 btfsc ccr_diluent_setup ; =1: Setting up Diluents ("Gas6-10") |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
246 movlw .2 ; 2=Normal |
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
247 cpfseq lo |
524 | 248 bra return_gas_depth ; Non-Deco gas or "Normal" Diluent, Return! |
174
932e91074bdb
CHANGE: Clarify Travel Gases with "---" as change depth
heinrichsweikamp
parents:
155
diff
changeset
|
249 |
154
afa31c815f24
NEW: Show ppO2 for change depth during gas setup
heinrichsweikamp
parents:
148
diff
changeset
|
250 MENU_BEGIN tGasEdit, .7 |
0 | 251 MENU_DYNAMIC gaslist_gastitle, 0 |
252 MENU_DYNAMIC gaslist_MOD_END, 0 | |
154
afa31c815f24
NEW: Show ppO2 for change depth during gas setup
heinrichsweikamp
parents:
148
diff
changeset
|
253 MENU_DYNAMIC gaslist_ppo2, 0 ; ppO2 at change depth |
0 | 254 MENU_CALL tDepthPlus, gaslist_pDepth |
255 MENU_CALL tDepthMinus, gaslist_mDepth | |
256 MENU_DYNAMIC gaslist_reset_mod_title,gaslist_reset_mod | |
257 MENU_CALL tExit, return_gas_depth | |
258 MENU_END | |
259 | |
260 ;============================================================================= | |
261 ; Simulator menus | |
262 | |
263 global do_planner_menu | |
264 | |
265 do_planner_menu_reset: | |
266 extern option_save_all | |
267 call option_save_all | |
268 ;---- Reset dive time/depth to default values | |
269 extern option_reset | |
270 lfsr FSR0,odiveInterval | |
271 call option_reset | |
272 lfsr FSR0,obottomTime | |
273 call option_reset | |
274 lfsr FSR0,obottomDepth | |
275 call option_reset | |
276 | |
277 do_planner_menu: | |
278 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
|
279 MENU_BEGIN tPlan, .7 |
0 | 280 MENU_CALL tInter, do_demo_divemode |
281 MENU_OPTION tIntvl, odiveInterval, 0 | |
282 MENU_OPTION tBtTm, obottomTime, 0 | |
283 MENU_OPTION tMxDep, obottomDepth, 0 | |
284 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
|
285 MENU_CALL tSystSets, do_planner_config |
0 | 286 MENU_CALL tExit, do_continue_main_menu |
287 MENU_END | |
288 | |
298
2fe34fc0e2ae
new submenu for gas consumption, show actual mix instead of GAS1-GAS5 in deco planner
heinrichsweikamp
parents:
275
diff
changeset
|
289 do_planner_config: |
2fe34fc0e2ae
new submenu for gas consumption, show actual mix instead of GAS1-GAS5 in deco planner
heinrichsweikamp
parents:
275
diff
changeset
|
290 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
|
291 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
|
292 MENU_OPTION tSetDecoUse, odeco_usage, 0 |
524 | 293 MENU_CALL tExit, do_planner_menu |
298
2fe34fc0e2ae
new submenu for gas consumption, show actual mix instead of GAS1-GAS5 in deco planner
heinrichsweikamp
parents:
275
diff
changeset
|
294 MENU_END |
524 | 295 |
298
2fe34fc0e2ae
new submenu for gas consumption, show actual mix instead of GAS1-GAS5 in deco planner
heinrichsweikamp
parents:
275
diff
changeset
|
296 |
0 | 297 ;============================================================================= |
298 ; Divemode menu | |
299 | |
300 do_return_divemode_menu: | |
428 | 301 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 302 |
303 do_divemode_menu: | |
304 MENU_BEGIN tDiveModeMenu, .7 | |
305 MENU_OPTION tDvMode, oDiveMode, 0 | |
306 MENU_OPTION tDkMode, oDecoMode, 0 | |
104
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
307 MENU_CALL tppO2settings, do_ppo2_menu |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
308 MENU_OPTION tsafetystopmenu,oSafetyStop, 0 |
0 | 309 MENU_OPTION tFTTSMenu, oExtraTime,0 |
310 MENU_CALL tDecoparameters, do_decoparameters_menu | |
311 MENU_CALL tExit, do_continue_main_menu | |
312 MENU_END | |
313 | |
104
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
314 do_ppo2_menu: |
507
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
315 MENU_BEGIN tppO2settings, .5 |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
316 MENU_DYNAMIC divesets_ppo2_max, do_toggle_ppo2_max |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
317 MENU_DYNAMIC divesets_ppo2_max_deco, do_toggle_ppo2_max_deco |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
318 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
|
319 MENU_OPTION tShowppO2, oShowppO2, 0 |
104
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
320 MENU_CALL tExit, do_return_divemode_menu |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
321 MENU_END |
223579e905c3
Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents:
90
diff
changeset
|
322 |
0 | 323 do_return_decoparameters_menu: |
428 | 324 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 325 do_decoparameters_menu: |
326 MENU_BEGIN tDecoparameters, .7 | |
327 MENU_OPTION tGF_low, oGF_low, 0 | |
328 MENU_OPTION tGF_high, oGF_high, 0 | |
329 MENU_CALL taGFMenu, do_aGF_menu | |
330 MENU_OPTION tSaturationMult,osatmult, 0 | |
331 MENU_OPTION tDesaturationMult,odesatmult,0 | |
332 MENU_OPTION tLastDecostop,oLastDeco, 0 | |
333 MENU_CALL tExit, do_return_divemode_menu | |
334 MENU_END | |
335 | |
336 do_aGF_menu: | |
337 MENU_BEGIN taGFMenu, .4 | |
338 MENU_OPTION taGF_enable,oEnable_aGF, 0 | |
339 MENU_OPTION taGF_low, oaGF_low, 0 | |
340 MENU_OPTION taGF_high, oaGF_high, 0 | |
341 MENU_CALL tExit, do_return_decoparameters_menu | |
342 MENU_END | |
343 ;============================================================================= | |
344 ; Setup Menu | |
345 | |
346 do_return_settings: | |
347 bcf settime_setdate ; Clear flag | |
428 | 348 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 349 |
350 extern compass_calibration_loop | |
351 do_settings_menu: | |
345 | 352 btfsc ble_available ; ble available |
353 bra do_settings_menu_ble ; Yes. | |
354 MENU_BEGIN tSystSets, .6 | |
0 | 355 MENU_CALL tInfoMenu, do_info_menu |
356 MENU_CALL tSetTimeDate, do_date_time_menu | |
357 MENU_CALL tDispSets, do_dispsets_menu | |
358 MENU_OPTION tLanguage, oLanguage, 0 | |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
359 MENU_CALL tMore, do_settings_menu_more |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
360 MENU_CALL tExit, do_continue_main_menu |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
361 MENU_END |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
362 |
345 | 363 do_settings_menu_ble: |
364 MENU_BEGIN tSystSets, .7 | |
365 MENU_CALL tInfoMenu, do_info_menu | |
366 MENU_CALL tBleTitle, comm_mode0 | |
367 MENU_CALL tSetTimeDate, do_date_time_menu | |
368 MENU_CALL tDispSets, do_dispsets_menu | |
369 MENU_OPTION tLanguage, oLanguage, 0 | |
370 MENU_CALL tMore, do_settings_menu_more | |
371 MENU_CALL tExit, do_continue_main_menu | |
372 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
|
373 |
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
|
374 do_return_settings_more: |
428 | 375 rcall menu_tree_double_pop ; drop exit line and back to last line |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
376 |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
377 do_settings_menu_more: |
448 | 378 btfsc battery_gauge_available ; piezo buttons available |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
379 bra do_settings_menu_more_piezo |
243 | 380 btfsc ble_available ; ble available |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
381 bra do_settings_menu_more_ostc3p |
345 | 382 MENU_BEGIN tSystSets, .7 |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
383 MENU_CALL tCompassMenu, do_compass_menu |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
384 MENU_CALL tLogOffset, do_log_offset_menu |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
385 MENU_OPTION tUnits, oUnits, 0 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
386 MENU_OPTION tSamplingrate,oSamplingRate,0 |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
387 MENU_OPTION tDvSalinity,oDiveSalinity, 0 |
345 | 388 MENU_CALL tResetMenu, do_reset_menu |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
389 MENU_CALL tExit, do_return_settings |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
390 MENU_END |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
391 |
375
a9e35c1327aa
1.88 release, BUGFIX: Start with Sensor use from sleep (cR only), CHANGE: Apply button settings when button menu is closed, NEW: Reset button settings on a magnet reset (cR and OSTC 2)
heinrichsweikamp
parents:
359
diff
changeset
|
392 do_settings_menu_more_piezo_exit: |
a9e35c1327aa
1.88 release, BUGFIX: Start with Sensor use from sleep (cR only), CHANGE: Apply button settings when button menu is closed, NEW: Reset button settings on a magnet reset (cR and OSTC 2)
heinrichsweikamp
parents:
359
diff
changeset
|
393 call TFT_ClearScreen |
a9e35c1327aa
1.88 release, BUGFIX: Start with Sensor use from sleep (cR only), CHANGE: Apply button settings when button menu is closed, NEW: Reset button settings on a magnet reset (cR and OSTC 2)
heinrichsweikamp
parents:
359
diff
changeset
|
394 extern piezo_config |
a9e35c1327aa
1.88 release, BUGFIX: Start with Sensor use from sleep (cR only), CHANGE: Apply button settings when button menu is closed, NEW: Reset button settings on a magnet reset (cR and OSTC 2)
heinrichsweikamp
parents:
359
diff
changeset
|
395 call piezo_config ; Configure buttons |
524 | 396 |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
397 do_settings_menu_more_piezo: |
218 | 398 MENU_BEGIN tSystSets, .7 |
18
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
399 MENU_CALL tCompassMenu, do_compass_menu |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
400 MENU_CALL tLogOffset, do_log_offset_menu |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
401 MENU_OPTION tUnits, oUnits, 0 |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
402 MENU_OPTION tSamplingrate,oSamplingRate,0 |
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
403 MENU_OPTION tDvSalinity,oDiveSalinity, 0 |
345 | 404 MENU_CALL tMore, do_settings_piezo_menu |
155
5f71e31bd5b3
CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents:
154
diff
changeset
|
405 MENU_CALL tExit, do_return_settings |
0 | 406 MENU_END |
407 | |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
408 extern comm_mode0 |
243 | 409 |
345 | 410 do_settings_piezo_menu: |
411 ; Menu with features only available in piezo button hardware | |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
412 MENU_BEGIN tSystSets, .4 |
345 | 413 MENU_CALL tResetMenu, do_reset_menu |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
414 MENU_OPTION tButtonleft,ocR_button_left ,0 ; left button sensitivity |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
415 MENU_OPTION tButtonright,ocR_button_right,0 ; right button sensitivity |
375
a9e35c1327aa
1.88 release, BUGFIX: Start with Sensor use from sleep (cR only), CHANGE: Apply button settings when button menu is closed, NEW: Reset button settings on a magnet reset (cR and OSTC 2)
heinrichsweikamp
parents:
359
diff
changeset
|
416 MENU_CALL tExit, do_settings_menu_more_piezo_exit |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
417 MENU_END |
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
418 |
269
1207cf9a9408
adjust menu for different hardware versions
heinrichsweikamp
parents:
243
diff
changeset
|
419 do_settings_menu_more_ostc3p: ; Menu with BLE feature |
243 | 420 MENU_BEGIN tSystSets, .7 |
421 MENU_CALL tCompassMenu, do_compass_menu | |
422 MENU_CALL tLogOffset, do_log_offset_menu | |
423 MENU_OPTION tUnits, oUnits, 0 | |
424 MENU_OPTION tSamplingrate,oSamplingRate,0 | |
425 MENU_OPTION tDvSalinity,oDiveSalinity, 0 | |
345 | 426 MENU_CALL tResetMenu, do_reset_menu |
243 | 427 MENU_CALL tExit, do_return_settings |
428 MENU_END | |
220
effd7259f5a5
make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents:
218
diff
changeset
|
429 |
18
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
430 do_compass_menu: |
90
3274e87fd027
NEW: automatic compass gain makes calibration quicker
heinrichsweikamp
parents:
78
diff
changeset
|
431 MENU_BEGIN tSystSets, .2 |
18
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
432 MENU_CALL tCompassMenu, compass_calibration_loop |
90
3274e87fd027
NEW: automatic compass gain makes calibration quicker
heinrichsweikamp
parents:
78
diff
changeset
|
433 ; 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
|
434 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
|
435 MENU_END |
4e3f133dfbf4
add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents:
0
diff
changeset
|
436 |
0 | 437 ;============================================================================= |
438 ; Reset and confirmation menu. | |
439 | |
440 do_reset_menu: | |
63 | 441 MENU_BEGIN tResetMenu, .6 |
0 | 442 MENU_CALL tExit, do_return_settings |
529 | 443 MENU_CALL tReboot, do_reset_menu2 ; Confirm |
444 MENU_CALL tResetDeco, do_reset_menu3 ; Confirm | |
445 MENU_CALL tResetSettings, do_reset_menu4 ; Confirm | |
63 | 446 MENU_CALL tResetLogbook, do_reset_menu5 ; Confirm |
0 | 447 MENU_CALL tResetBattery, new_battery_menu ; New Battery submenu |
448 MENU_END | |
449 | |
450 do_reset_menu2: | |
451 MENU_BEGIN tResetMenu2, .2 | |
452 MENU_CALL tAbort, do_continue_menu_3stack | |
453 MENU_CALL tReboot, do_reboot ; Reboot | |
454 MENU_END | |
455 | |
456 do_reset_menu3: | |
457 MENU_BEGIN tResetMenu2, .2 | |
458 MENU_CALL tAbort, do_continue_menu_3stack | |
459 MENU_CALL tResetDeco, do_reset_deco ; Reset Deco | |
460 MENU_END | |
461 | |
462 do_reset_menu4: | |
463 MENU_BEGIN tResetMenu2, .2 | |
464 MENU_CALL tAbort, do_continue_menu_3stack | |
465 MENU_CALL tResetSettings, do_reset_settings ; Reset all settings | |
466 MENU_END | |
467 | |
63 | 468 do_reset_menu5: |
469 MENU_BEGIN tResetMenu2, .2 | |
470 MENU_CALL tAbort, do_continue_menu_3stack | |
471 MENU_CALL tResetLogbook, do_reset_logbook ; Reset logbook | |
472 MENU_END | |
473 | |
474 do_reset_logbook: | |
475 clrf EEADRH ; Make sure to select eeprom bank 0 | |
476 clrf EEDATA | |
78
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
477 read_int_eeprom .2 |
396
61984f91174a
place total dives backup counter in eeprom 16:17
heinrichsweikamp
parents:
375
diff
changeset
|
478 write_int_eeprom .16 |
78
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
479 read_int_eeprom .3 |
396
61984f91174a
place total dives backup counter in eeprom 16:17
heinrichsweikamp
parents:
375
diff
changeset
|
480 write_int_eeprom .17 ; Copy number of dives |
144 | 481 clrf EEDATA |
78
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
482 write_int_eeprom .2 |
668b432dcae9
BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents:
76
diff
changeset
|
483 write_int_eeprom .3 ; Clear total dives |
63 | 484 write_int_eeprom .4 |
485 write_int_eeprom .5 | |
486 write_int_eeprom .6 ; Reset logbook pointers | |
487 call ext_flash_erase_logbook ; And complete logbook (!) | |
524 | 488 goto do_continue_main_menu ; back to menu |
63 | 489 |
0 | 490 |
491 do_reset_deco: | |
492 movlw d'79' ; 79% N2 | |
493 movff WREG,char_I_N2_ratio | |
494 movlw d'0' | |
495 movff WREG,char_I_step_is_1min ; 2 second deco mode | |
496 SAFE_2BYTE_COPY amb_pressure,int_I_pres_respiration ; copy for deco routine | |
497 movff int_I_pres_respiration+0,int_I_pres_surface+0 ; copy for desat routine | |
498 movff int_I_pres_respiration+1,int_I_pres_surface+1 | |
499 | |
500 extern deco_reset | |
501 call deco_reset | |
502 call deco_calc_desaturation_time ; calculate desaturation time | |
503 banksel common | |
504 call deco_calc_wo_deco_step_1_min ; calculate deco in surface mode | |
505 banksel common | |
506 clrf nofly_time+0 ; Reset NoFly | |
507 clrf nofly_time+1 | |
508 clrf desaturation_time+0 ; Reset Desat | |
509 clrf desaturation_time+1 | |
524 | 510 goto do_return_settings ; back to menu |
0 | 511 |
512 do_reset_settings: | |
470
81faca166e1b
minor: clear screen while resetting settings
heinrichsweikamp
parents:
464
diff
changeset
|
513 call TFT_ClearScreen ; Clear screen |
139 | 514 banksel common |
0 | 515 extern option_reset_all |
516 call option_reset_all ; Reset all options to factory default. | |
524 | 517 goto restart ; Restart into surfacemode |
0 | 518 |
519 do_continue_menu_3stack: ; Return three levels deep | |
520 call menu_processor_pop | |
524 | 521 goto do_return_settings |
0 | 522 |
523 do_reboot: | |
524 call ext_flash_enable_protection ; Enables write protection | |
525 reset | |
526 | |
527 | |
528 do_date_time_menu: | |
529 MENU_BEGIN tSetTimeDate, .4 | |
530 MENU_CALL tSetTime, do_time_menu | |
531 MENU_CALL tSetDate, do_date_menu | |
532 MENU_OPTION tDateFormat,oDateFormat, 0 | |
533 MENU_CALL tExit, do_return_settings | |
534 MENU_END | |
535 | |
536 do_date_menu: | |
537 bsf settime_setdate | |
538 MENU_BEGIN tSetDate, .4 | |
539 MENU_OPTION tSetDay, oSetDay, 0 | |
50 | 540 MENU_OPTION tSetMonth, oSetMonth, 0 |
0 | 541 MENU_OPTION tSetYear, oSetYear, 0 |
542 MENU_CALL tExit, do_continue_menu_3stack | |
543 MENU_END | |
544 | |
545 | |
546 do_reset_seconds: | |
547 clrf secs | |
548 extern rtc_set_rtc | |
549 call rtc_set_rtc ; writes mins,sec,hours,day,month and year to rtc module | |
550 do_time_menu: | |
551 bsf settime_setdate | |
552 MENU_BEGIN tSetTime, .4 | |
553 MENU_OPTION tSetHours, oSetHours, 0 | |
554 MENU_OPTION tSetMinutes,oSetMinutes, 0 | |
555 MENU_CALL tSetSeconds, do_reset_seconds | |
556 MENU_CALL tExit, do_continue_menu_3stack | |
557 MENU_END | |
558 | |
559 | |
560 do_toggle_ppo2_max: ; add 0.1bar, with hard-coded max. | |
561 movff opt_ppO2_max,lo ; banksafe | |
562 movlw .10 | |
563 addwf lo,F | |
564 movlw ppo2_highest_setting | |
565 cpfsgt lo | |
566 bra do_toggle_ppo2_max2 | |
567 movlw .120 | |
568 movwf lo | |
569 do_toggle_ppo2_max2: | |
570 movff lo,opt_ppO2_max | |
571 return | |
572 | |
507
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
573 do_toggle_ppo2_max_deco: ; add 0.1bar, with hard-coded max. |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
574 movff opt_ppO2_max_deco,lo ; banksafe |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
575 movlw .10 |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
576 addwf lo,F |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
577 movlw ppo2_highest_setting_deco |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
578 cpfsgt lo |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
579 bra do_toggle_ppo2_max_deco2 |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
580 movlw .120 |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
581 movwf lo |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
582 do_toggle_ppo2_max_deco2: |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
583 movff lo,opt_ppO2_max_deco |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
584 return |
4e6f5c36f4cc
NEW: Two ppO2 max settings. One for travel/bottom and one for deco gases
heinrichsweikamp
parents:
505
diff
changeset
|
585 |
0 | 586 do_toggle_ppo2_min: ; sub 0.1bar, with hard-coded min. |
587 movff opt_ppO2_min,lo ; banksafe | |
588 incf lo,F | |
589 movlw .21 | |
590 cpfsgt lo | |
591 bra do_toggle_ppo2_min2 | |
592 movlw ppo2_lowest_setting | |
593 movwf lo | |
594 do_toggle_ppo2_min2: | |
595 movff lo,opt_ppO2_min | |
596 return | |
597 | |
598 | |
599 ; Logbook offset sub-menu | |
600 do_log_offset_menu: | |
601 MENU_BEGIN tLogOffset, .6 | |
602 MENU_DYNAMIC TFT_LogOffset_Logtitle, 0 | |
603 MENU_CALL tLogOffsetp1, do_logoffset_plus1 | |
604 MENU_CALL tLogOffsetp10, do_logoffset_plus10 | |
605 MENU_CALL tLogOffsetm1, do_logoffset_minus1 | |
606 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
|
607 MENU_CALL tExit, do_return_settings_more |
0 | 608 MENU_END |
609 | |
610 | |
611 do_logoffset_minus1: | |
612 call do_logoffset_common_read ; Read into lo:hi | |
613 movlw d'1' | |
614 subwf lo | |
615 movlw d'0' | |
616 subwfb hi | |
617 btfss hi,7 ; <0? | |
618 goto do_logoffset_common_write ; Store and return | |
619 clrf lo | |
620 clrf hi | |
621 goto do_logoffset_common_write ; Store and return | |
622 | |
623 do_logoffset_minus10: | |
624 call do_logoffset_common_read ; Read into lo:hi | |
625 movlw d'10' | |
626 subwf lo | |
627 movlw d'0' | |
628 subwfb hi | |
629 btfss hi,7 ; <0? | |
630 goto do_logoffset_common_write ; Store and return | |
631 clrf lo | |
632 clrf hi | |
633 goto do_logoffset_common_write ; Store and return | |
634 | |
635 do_logoffset_plus1: | |
636 call do_logoffset_common_read ; Read into lo:hi | |
148 | 637 infsnz lo,F |
638 incf hi,F | |
0 | 639 goto do_logoffset_common_write ; Store and return |
640 | |
641 do_logoffset_plus10: | |
642 call do_logoffset_common_read ; Read into lo:hi | |
643 movlw d'10' | |
644 addwf lo | |
645 movlw d'0' | |
646 addwfc hi | |
647 goto do_logoffset_common_write ; Store and return | |
648 | |
649 do_dispsets_menu_3stack: | |
50 | 650 bcf in_color_menu |
428 | 651 rcall menu_tree_double_pop ; drop exit line and back to last line |
0 | 652 |
653 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
|
654 MENU_BEGIN tDispSets, .5 |
303
9b1b0b32e7d5
Add configuration option to control depth warning blinking
janos_kovacs <kovjanos@gmail.com>
parents:
298
diff
changeset
|
655 MENU_OPTION tBright, oBrightness, 0 |
9b1b0b32e7d5
Add configuration option to control depth warning blinking
janos_kovacs <kovjanos@gmail.com>
parents:
298
diff
changeset
|
656 MENU_CALL tColorScheme, do_color_scheme |
9b1b0b32e7d5
Add configuration option to control depth warning blinking
janos_kovacs <kovjanos@gmail.com>
parents:
298
diff
changeset
|
657 MENU_OPTION tFlip, oFlipScreen, 0 |
335
3d43da7acfe1
Always show ppO2 (warning position, standard color) option
janos_kovacs <kovjanos@gmail.com>
parents:
333
diff
changeset
|
658 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
|
659 MENU_CALL tExit, do_return_settings |
3d43da7acfe1
Always show ppO2 (warning position, standard color) option
janos_kovacs <kovjanos@gmail.com>
parents:
333
diff
changeset
|
660 MENU_END |
3d43da7acfe1
Always show ppO2 (warning position, standard color) option
janos_kovacs <kovjanos@gmail.com>
parents:
333
diff
changeset
|
661 |
3d43da7acfe1
Always show ppO2 (warning position, standard color) option
janos_kovacs <kovjanos@gmail.com>
parents:
333
diff
changeset
|
662 do_dispsets_menu_more: |
448 | 663 MENU_BEGIN tDispSets, .5 |
337
508d7fb98b34
cleanup menu, add "Auto SP" option (Not working yet), minor layout change in compass menu
heinrichsweikamp
parents:
335
diff
changeset
|
664 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
|
665 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
|
666 MENU_OPTION tVSIgraph, oVSIgraph, 0 |
448 | 667 MENU_OPTION tTimeoutDive, oDiveTimeout, 0 |
335
3d43da7acfe1
Always show ppO2 (warning position, standard color) option
janos_kovacs <kovjanos@gmail.com>
parents:
333
diff
changeset
|
668 MENU_CALL tExit, do_dispsets_menu_3stack |
0 | 669 MENU_END |
670 | |
50 | 671 extern oColorSetDive |
672 do_color_scheme: | |
673 bsf in_color_menu | |
674 MENU_BEGIN tColorScheme, .2 | |
675 MENU_OPTION tColorSetDive,oColorSetDive, 0 | |
676 MENU_CALL tExit, do_dispsets_menu_3stack | |
677 MENU_END | |
678 | |
679 | |
0 | 680 ;============================================================================= |
681 | |
682 global new_battery_menu | |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
683 extern surfloop |
0 | 684 new_battery_menu: |
685 bsf enable_screen_dumps ; To prevent exiting into COMM mode immediately | |
686 call TFT_boot ; Initialize TFT (includes clear screen) | |
687 call TFT_Display_FadeIn ; Show splash | |
688 movlw .100 | |
689 movwf batt_percent ; make sure to reset batt_percent | |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
690 |
0 | 691 ; Default (In cases of timeout or USB): Use old battery |
692 clrf EEADRH | |
693 read_int_eeprom 0x07 | |
694 movff EEDATA,battery_gauge+0 | |
695 read_int_eeprom 0x08 | |
696 movff EEDATA,battery_gauge+1 | |
697 read_int_eeprom 0x09 | |
698 movff EEDATA,battery_gauge+2 | |
699 read_int_eeprom 0x0A | |
700 movff EEDATA,battery_gauge+3 | |
701 read_int_eeprom 0x0B | |
702 movff EEDATA,battery_gauge+4 | |
703 read_int_eeprom 0x0C | |
704 movff EEDATA,battery_gauge+5 | |
705 | |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
706 call menu_processor_reset ; restart from first icon. |
474 | 707 |
708 MENU_BEGIN tNewBattTitle, .1 | |
709 MENU_CALL tEnter, new_battery_menu2 | |
710 MENU_END | |
711 | |
712 new_battery_menu2: | |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
713 ; hardware_flag: |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
714 ; 3: 0x0A or 0x13 (2016) |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
715 ; cR: 0x05 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
716 ; 2 with BLE: 0x11 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
717 ; Sport: 0x12 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
718 ; 3 with BLE: 0x1A |
76 | 719 |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
720 movlw 0x0A |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
721 cpfseq hardware_flag |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
722 bra $+4 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
723 bra menu_new_battery_AA |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
724 movlw 0x13 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
725 cpfseq hardware_flag |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
726 bra $+4 |
474 | 727 bra menu_new_battery_AA_16650 |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
728 movlw 0x12 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
729 cpfseq hardware_flag |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
730 bra $+4 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
731 bra menu_new_battery_AA |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
732 movlw 0x1A |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
733 cpfseq hardware_flag |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
734 bra $+4 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
735 bra menu_new_battery_AA |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
736 movlw 0x11 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
737 cpfseq hardware_flag |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
738 bra $+4 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
739 bra menu_new_battery_18650 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
740 movlw 0x05 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
741 cpfseq hardware_flag |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
742 bra $+4 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
743 bra menu_new_battery_18650 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
744 bra use_old_batteries ; any unsupported value |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
745 |
474 | 746 menu_new_battery_AA_16650: |
747 MENU_BEGIN tNewBattTitle, .5 | |
748 MENU_CALL tNewBattOld, use_old_batteries | |
749 MENU_CALL tNewBattNew36, use_new_36V_batteries | |
750 MENU_CALL tNewBattNew15, use_new_15V_batteries | |
751 MENU_CALL tNewBattAccu, use_36V_rechargeable | |
752 MENU_CALL tNew16650, use_16650_battery | |
753 MENU_END | |
754 | |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
755 menu_new_battery_AA: |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
756 MENU_BEGIN tNewBattTitle, .4 |
448 | 757 MENU_CALL tNewBattOld, use_old_batteries |
0 | 758 MENU_CALL tNewBattNew36, use_new_36V_batteries |
759 MENU_CALL tNewBattNew15, use_new_15V_batteries | |
448 | 760 MENU_CALL tNewBattAccu, use_36V_rechargeable |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
761 MENU_END |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
762 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
763 menu_new_battery_18650: |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
764 MENU_BEGIN tNewBattTitle, .2 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
765 MENU_CALL tNewBattOld, use_old_batteries |
448 | 766 MENU_CALL tNew18650, use_18650_battery |
0 | 767 MENU_END |
768 | |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
769 |
457 | 770 global use_old_prior_209 |
771 use_old_prior_209: | |
772 clrf EEADRH | |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
773 read_int_eeprom 0x0F ; =0:1.5V, =1:3,6V Saft, =2:LiIon 3,7V/0.8Ah, =3:LiIon 3,7V/3.1Ah, =4: LiIon 3,7V/2.3Ah |
457 | 774 incfsz EEDATA,F ; Was 0xFF? |
477
44b8a826b314
NEW: Show battery type in surface mode next to battery voltage
heinrichsweikamp
parents:
474
diff
changeset
|
775 return ; No, done. |
44b8a826b314
NEW: Show battery type in surface mode next to battery voltage
heinrichsweikamp
parents:
474
diff
changeset
|
776 |
457 | 777 call lt2942_get_status ; Check for gauge IC |
778 movlw .3 ; Assume a 18650 | |
779 btfss battery_gauge_available ; cR/2 hardware? | |
780 movlw .1 ; Assume a Saft | |
781 movwf EEDATA | |
782 write_int_eeprom 0x0F ; Store the new battery type into EEPROM | |
783 return | |
784 | |
0 | 785 global use_old_batteries |
786 use_old_batteries: | |
787 clrf EEADRH | |
788 read_int_eeprom 0x07 | |
789 movff EEDATA,battery_gauge+0 | |
790 read_int_eeprom 0x08 | |
791 movff EEDATA,battery_gauge+1 | |
792 read_int_eeprom 0x09 | |
793 movff EEDATA,battery_gauge+2 | |
794 read_int_eeprom 0x0A | |
795 movff EEDATA,battery_gauge+3 | |
796 read_int_eeprom 0x0B | |
797 movff EEDATA,battery_gauge+4 | |
798 read_int_eeprom 0x0C | |
799 movff EEDATA,battery_gauge+5 | |
448 | 800 read_int_eeprom 0x0F |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
801 movff EEDATA,battery_type; =0:1.5V, =1:3,6V Saft, =2:LiIon 3,7V/0.8Ah, =3:LiIon 3,7V/3.1Ah, =4: LiIon 3,7V/2.3Ah |
448 | 802 |
450 | 803 rcall setup_new_saft ; Any other value |
477
44b8a826b314
NEW: Show battery type in surface mode next to battery voltage
heinrichsweikamp
parents:
474
diff
changeset
|
804 incf EEDATA,F ; 1 ... 5 |
450 | 805 dcfsnz EEDATA,F |
448 | 806 rcall setup_new_15v ;=0 |
450 | 807 dcfsnz EEDATA,F |
448 | 808 rcall setup_new_saft ;=1 |
450 | 809 dcfsnz EEDATA,F |
448 | 810 rcall setup_new_panasonic ;=2 |
477
44b8a826b314
NEW: Show battery type in surface mode next to battery voltage
heinrichsweikamp
parents:
474
diff
changeset
|
811 dcfsnz EEDATA,F |
448 | 812 rcall setup_new_18650 ;=3 |
477
44b8a826b314
NEW: Show battery type in surface mode next to battery voltage
heinrichsweikamp
parents:
474
diff
changeset
|
813 dcfsnz EEDATA,F |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
814 rcall setup_new_16650 ;=4 |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
815 |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
816 bcf use_old_batt_flag ; clear flag |
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
817 goto surfloop ; Jump to Surfaceloop! |
0 | 818 |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
819 setup_new_15v: |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
820 bsf charge_disable |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
821 bcf TRISE,2 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
822 movlw .100 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
823 movwf batt_percent ; To have 1,5V batteries right after firmware update |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
824 movlw .0 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
825 movff WREG,battery_type |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
826 return |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
827 |
448 | 828 setup_new_saft: |
829 banksel battery_capacity | |
830 movlw LOW internal_saft_capacity | |
831 movwf internal_battery_capacity+0 | |
832 movlw HIGH internal_saft_capacity | |
833 movwf internal_battery_capacity+1 | |
834 movlw LOW saft_capacity | |
835 movwf battery_capacity+0 | |
836 movlw HIGH saft_capacity | |
837 movwf battery_capacity+1 | |
838 movlw LOW saft_offset | |
839 movwf battery_offset+0 | |
840 movlw HIGH saft_offset | |
841 movwf battery_offset+1 | |
842 banksel common | |
843 bsf charge_disable | |
844 bcf TRISE,2 | |
845 movlw .1 | |
846 movff WREG,battery_type | |
847 return | |
848 | |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
849 setup_new_panasonic: |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
850 banksel battery_capacity |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
851 movlw LOW internal_panasonic_capacity |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
852 movwf internal_battery_capacity+0 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
853 movlw HIGH internal_panasonic_capacity |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
854 movwf internal_battery_capacity+1 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
855 movlw LOW panasonic_capacity |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
856 movwf battery_capacity+0 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
857 movlw HIGH panasonic_capacity |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
858 movwf battery_capacity+1 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
859 movlw LOW panasonic_offset |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
860 movwf battery_offset+0 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
861 movlw HIGH panasonic_offset |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
862 movwf battery_offset+1 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
863 banksel common |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
864 bcf charge_disable |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
865 bsf TRISE,2 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
866 movlw .2 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
867 movff WREG,battery_type |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
868 return |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
869 |
448 | 870 setup_new_18650: |
871 banksel battery_capacity | |
872 clrf internal_battery_capacity+0 | |
873 clrf internal_battery_capacity+1 | |
874 movlw LOW ncr18650_capacity | |
875 movwf battery_capacity+0 | |
876 movlw HIGH ncr18650_capacity | |
877 movwf battery_capacity+1 | |
878 movlw LOW ncr18650_offset | |
879 movwf battery_offset+0 | |
880 movlw HIGH ncr18650_offset | |
881 movwf battery_offset+1 | |
882 banksel common | |
883 bcf charge_disable | |
884 bsf TRISE,2 | |
885 movlw .3 | |
886 movff WREG,battery_type | |
887 return | |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
888 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
889 setup_new_16650: |
448 | 890 banksel battery_capacity |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
891 clrf internal_battery_capacity+0 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
892 clrf internal_battery_capacity+1 |
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
893 movlw LOW ur16650_capacity |
448 | 894 movwf battery_capacity+0 |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
895 movlw HIGH ur16650_capacity |
448 | 896 movwf battery_capacity+1 |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
897 movlw LOW ur16650_offset |
448 | 898 movwf battery_offset+0 |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
899 movlw HIGH ur16650_offset |
448 | 900 movwf battery_offset+1 |
901 banksel common | |
902 bcf charge_disable | |
903 bsf TRISE,2 | |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
904 movlw .4 |
448 | 905 movff WREG,battery_type |
906 return | |
472
4fdf6886004b
CHANGE: Show warnings either in Customview (If active) _or_ next to warning sign
heinrichsweikamp
parents:
470
diff
changeset
|
907 |
474 | 908 use_16650_battery: |
909 rcall setup_new_16650 | |
910 bra use_new_36V_2 | |
448 | 911 use_18650_battery: |
912 rcall setup_new_18650 | |
913 bra use_new_36V_2 | |
0 | 914 use_new_36V_batteries: |
448 | 915 rcall setup_new_saft |
916 bra use_new_36V_2 | |
917 use_new_15V_batteries: | |
918 rcall setup_new_15v | |
919 use_new_36V_2: | |
0 | 920 call reset_battery_pointer ; Resets battery pointer 0x07-0x0C and battery_gauge:5 |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
921 goto surfloop ; Jump to Surfaceloop! |
448 | 922 use_36V_rechargeable: |
923 rcall setup_new_panasonic | |
924 call reset_battery_internal_only | |
464
0491a84fd0b8
CHANGE: Easier to understand "New Battery" menu (OSTC model dependent)
heinrichsweikamp
parents:
457
diff
changeset
|
925 goto surfloop ; Jump to Surfaceloop! |
0 | 926 |
927 END |