Mercurial > public > hwos_code

annotate src/menu_tree.asm @ 313:0ce5fa241b8e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
FIX minor comment about deco offset unit...
author jDG
date Wed, 10 Jun 2015 16:03:21 +0200
parents 14719662fb95
children d21b172d5a7a
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:
223579e905c3 Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents: 90
diff changeset
299 MENU_BEGIN tppO2settings, .3
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
223579e905c3 Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents: 90
diff changeset
302 MENU_CALL tExit, do_return_divemode_menu
223579e905c3 Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents: 90
diff changeset
303 MENU_END
223579e905c3 Show a Safety Stop if enabled (Menu "Deco Parameters")
heinrichsweikamp
parents: 90
diff changeset
304
0
heinrichsweikamp
parents:
diff changeset
305 do_return_decoparameters_menu:
heinrichsweikamp
parents:
diff changeset
306 call menu_processor_pop ; drop exit line.
heinrichsweikamp
parents:
diff changeset
307 call menu_processor_pop ; back to setting
heinrichsweikamp
parents:
diff changeset
308 do_decoparameters_menu:
heinrichsweikamp
parents:
diff changeset
309 MENU_BEGIN tDecoparameters, .7
heinrichsweikamp
parents:
diff changeset
310 MENU_OPTION tGF_low, oGF_low, 0
heinrichsweikamp
parents:
diff changeset
311 MENU_OPTION tGF_high, oGF_high, 0
heinrichsweikamp
parents:
diff changeset
312 MENU_CALL taGFMenu, do_aGF_menu
heinrichsweikamp
parents:
diff changeset
313 MENU_OPTION tSaturationMult,osatmult, 0
heinrichsweikamp
parents:
diff changeset
314 MENU_OPTION tDesaturationMult,odesatmult,0
heinrichsweikamp
parents:
diff changeset
315 MENU_OPTION tLastDecostop,oLastDeco, 0
heinrichsweikamp
parents:
diff changeset
316 MENU_CALL tExit, do_return_divemode_menu
heinrichsweikamp
parents:
diff changeset
317 MENU_END
heinrichsweikamp
parents:
diff changeset
318
heinrichsweikamp
parents:
diff changeset
319 do_aGF_menu:
heinrichsweikamp
parents:
diff changeset
320 MENU_BEGIN taGFMenu, .4
heinrichsweikamp
parents:
diff changeset
321 MENU_OPTION taGF_enable,oEnable_aGF, 0
heinrichsweikamp
parents:
diff changeset
322 MENU_OPTION taGF_low, oaGF_low, 0
heinrichsweikamp
parents:
diff changeset
323 MENU_OPTION taGF_high, oaGF_high, 0
heinrichsweikamp
parents:
diff changeset
324 MENU_CALL tExit, do_return_decoparameters_menu
heinrichsweikamp
parents:
diff changeset
325 MENU_END
heinrichsweikamp
parents:
diff changeset
326 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
327 ; Setup Menu
heinrichsweikamp
parents:
diff changeset
328
heinrichsweikamp
parents:
diff changeset
329 do_return_settings:
heinrichsweikamp
parents:
diff changeset
330 bcf settime_setdate ; Clear flag
heinrichsweikamp
parents:
diff changeset
331 call menu_processor_pop ; Drop exit entry
heinrichsweikamp
parents:
diff changeset
332 call menu_processor_pop ; Pop return line.
heinrichsweikamp
parents:
diff changeset
333
heinrichsweikamp
parents:
diff changeset
334 extern compass_calibration_loop
heinrichsweikamp
parents:
diff changeset
335 do_settings_menu:
heinrichsweikamp
parents:
diff changeset
336 MENU_BEGIN tSystSets, .7
heinrichsweikamp
parents:
diff changeset
337 MENU_CALL tInfoMenu, do_info_menu
heinrichsweikamp
parents:
diff changeset
338 MENU_CALL tSetTimeDate, do_date_time_menu
heinrichsweikamp
parents:
diff changeset
339 MENU_CALL tDispSets, do_dispsets_menu
heinrichsweikamp
parents:
diff changeset
340 MENU_OPTION tLanguage, oLanguage, 0
155
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
341 MENU_CALL tResetMenu, do_reset_menu
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
342 MENU_CALL tMore, do_settings_menu_more
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
343 MENU_CALL tExit, do_continue_main_menu
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
344 MENU_END
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
345
220
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
346
155
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
347 do_settings_menu_more:
243
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
348 btfsc rechargeable ; piezo buttons available
269
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
349 bra do_settings_menu_more_piezo
243
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
350 btfsc ble_available ; ble available
269
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
351 bra do_settings_menu_more_ostc3p
220
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
352 MENU_BEGIN tSystSets, .6
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
353 MENU_CALL tCompassMenu, do_compass_menu
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
354 MENU_CALL tLogOffset, do_log_offset_menu
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
355 MENU_OPTION tUnits, oUnits, 0
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
356 MENU_OPTION tSamplingrate,oSamplingRate,0
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
357 MENU_OPTION tDvSalinity,oDiveSalinity, 0
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
358 MENU_CALL tExit, do_return_settings
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
359 MENU_END
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
360
269
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
361 do_settings_menu_more_piezo:
218
8fbd8c5ac51f 1.71beta start
heinrichsweikamp
parents: 200
diff changeset
362 MENU_BEGIN tSystSets, .7
18
4e3f133dfbf4 add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents: 0
diff changeset
363 MENU_CALL tCompassMenu, do_compass_menu
155
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
364 MENU_CALL tLogOffset, do_log_offset_menu
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
365 MENU_OPTION tUnits, oUnits, 0
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
366 MENU_OPTION tSamplingrate,oSamplingRate,0
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
367 MENU_OPTION tDvSalinity,oDiveSalinity, 0
220
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
368 MENU_CALL tMore, do_settings_cr_menu
155
5f71e31bd5b3 CHANGE: Re-arranged Settings Menu, add 180? rotate to menu
heinrichsweikamp
parents: 154
diff changeset
369 MENU_CALL tExit, do_return_settings
0
heinrichsweikamp
parents:
diff changeset
370 MENU_END
heinrichsweikamp
parents:
diff changeset
371
220
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
372 extern comm_mode0
243
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
373
269
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
374 do_settings_cr_menu:
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
375 btfsc ble_available ; ble available
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
376 bra do_settings_menu_more_ostc2
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
377 ; Menu with features only available in cR hardware
220
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
378 MENU_BEGIN tSystSets, .4
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
379 MENU_CALL tUsbTitle, comm_mode0
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
380 MENU_OPTION tButtonleft,ocR_button_left ,0 ; left button sensitivity
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
381 MENU_OPTION tButtonright,ocR_button_right,0 ; right button sensitivity
269
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
382 MENU_CALL tExit, do_settings_menu_more_piezo
220
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
383 MENU_END
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
384
269
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
385 do_settings_menu_more_ostc2:
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
386 ; Menu OSTC2
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
387 MENU_BEGIN tSystSets, .4
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
388 MENU_CALL tBleTitle, comm_mode0
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
389 MENU_OPTION tButtonleft,ocR_button_left ,0 ; left button sensitivity
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
390 MENU_OPTION tButtonright,ocR_button_right,0 ; right button sensitivity
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
391 MENU_CALL tExit, do_settings_menu_more_piezo
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
392 MENU_END
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
393
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
394
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
395 do_settings_menu_more_ostc3p: ; Menu with BLE feature
243
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
396 MENU_BEGIN tSystSets, .7
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
397 MENU_CALL tCompassMenu, do_compass_menu
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
398 MENU_CALL tLogOffset, do_log_offset_menu
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
399 MENU_OPTION tUnits, oUnits, 0
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
400 MENU_OPTION tSamplingrate,oSamplingRate,0
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
401 MENU_OPTION tDvSalinity,oDiveSalinity, 0
269
1207cf9a9408 adjust menu for different hardware versions
heinrichsweikamp
parents: 243
diff changeset
402 MENU_CALL tBleTitle, comm_mode0
243
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
403 MENU_CALL tExit, do_return_settings
ee81f46714cb auto-select correct settings menu
heinrichsweikamp
parents: 240
diff changeset
404 MENU_END
220
effd7259f5a5 make button sensitivity configurable (cR hardware)
heinrichsweikamp
parents: 218
diff changeset
405
18
4e3f133dfbf4 add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents: 0
diff changeset
406 do_compass_menu:
90
3274e87fd027 NEW: automatic compass gain makes calibration quicker
heinrichsweikamp
parents: 78
diff changeset
407 MENU_BEGIN tSystSets, .2
18
4e3f133dfbf4 add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents: 0
diff changeset
408 MENU_CALL tCompassMenu, compass_calibration_loop
90
3274e87fd027 NEW: automatic compass gain makes calibration quicker
heinrichsweikamp
parents: 78
diff changeset
409 ; MENU_OPTION tCompassGain, oCompassGain, 0
18
4e3f133dfbf4 add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents: 0
diff changeset
410 MENU_CALL tExit, do_return_settings
4e3f133dfbf4 add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents: 0
diff changeset
411 MENU_END
4e3f133dfbf4 add new opt_compass_gain option to work with more magnetic battery types
heinrichsweikamp
parents: 0
diff changeset
412
0
heinrichsweikamp
parents:
diff changeset
413 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
414 ; Reset and confirmation menu.
heinrichsweikamp
parents:
diff changeset
415
heinrichsweikamp
parents:
diff changeset
416 do_reset_menu:
63
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
417 MENU_BEGIN tResetMenu, .6
0
heinrichsweikamp
parents:
diff changeset
418 MENU_CALL tExit, do_return_settings
heinrichsweikamp
parents:
diff changeset
419 MENU_CALL tReboot, do_reset_menu2 ; Confirm
heinrichsweikamp
parents:
diff changeset
420 MENU_CALL tResetDeco, do_reset_menu3 ; Confirm
heinrichsweikamp
parents:
diff changeset
421 MENU_CALL tResetSettings, do_reset_menu4 ; Confirm
63
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
422 MENU_CALL tResetLogbook, do_reset_menu5 ; Confirm
0
heinrichsweikamp
parents:
diff changeset
423 MENU_CALL tResetBattery, new_battery_menu ; New Battery submenu
heinrichsweikamp
parents:
diff changeset
424 MENU_END
heinrichsweikamp
parents:
diff changeset
425
heinrichsweikamp
parents:
diff changeset
426 do_reset_menu2:
heinrichsweikamp
parents:
diff changeset
427 MENU_BEGIN tResetMenu2, .2
heinrichsweikamp
parents:
diff changeset
428 MENU_CALL tAbort, do_continue_menu_3stack
heinrichsweikamp
parents:
diff changeset
429 MENU_CALL tReboot, do_reboot ; Reboot
heinrichsweikamp
parents:
diff changeset
430 MENU_END
heinrichsweikamp
parents:
diff changeset
431
heinrichsweikamp
parents:
diff changeset
432 do_reset_menu3:
heinrichsweikamp
parents:
diff changeset
433 MENU_BEGIN tResetMenu2, .2
heinrichsweikamp
parents:
diff changeset
434 MENU_CALL tAbort, do_continue_menu_3stack
heinrichsweikamp
parents:
diff changeset
435 MENU_CALL tResetDeco, do_reset_deco ; Reset Deco
heinrichsweikamp
parents:
diff changeset
436 MENU_END
heinrichsweikamp
parents:
diff changeset
437
heinrichsweikamp
parents:
diff changeset
438 do_reset_menu4:
heinrichsweikamp
parents:
diff changeset
439 MENU_BEGIN tResetMenu2, .2
heinrichsweikamp
parents:
diff changeset
440 MENU_CALL tAbort, do_continue_menu_3stack
heinrichsweikamp
parents:
diff changeset
441 MENU_CALL tResetSettings, do_reset_settings ; Reset all settings
heinrichsweikamp
parents:
diff changeset
442 MENU_END
heinrichsweikamp
parents:
diff changeset
443
63
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
444 do_reset_menu5:
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
445 MENU_BEGIN tResetMenu2, .2
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
446 MENU_CALL tAbort, do_continue_menu_3stack
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
447 MENU_CALL tResetLogbook, do_reset_logbook ; Reset logbook
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
448 MENU_END
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
449
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
450 do_reset_logbook:
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
451 clrf EEADRH ; Make sure to select eeprom bank 0
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
452 clrf EEDATA
78
668b432dcae9 BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents: 76
diff changeset
453 read_int_eeprom .2
668b432dcae9 BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents: 76
diff changeset
454 write_int_eeprom .15
668b432dcae9 BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents: 76
diff changeset
455 read_int_eeprom .3
668b432dcae9 BUGFIX: Reset Logbook did not reset Logbook TOC properly
mh@mh-THINK.localdomain
parents: 76
diff changeset
456 write_int_eeprom .16 ; Copy number of dives
144
b839972db982 1.45 beta release
heinrichsweikamp
parents: 139
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 write_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 .3 ; Clear total dives
63
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
460 write_int_eeprom .4
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
461 write_int_eeprom .5
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
462 write_int_eeprom .6 ; Reset logbook pointers
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
463 call ext_flash_erase_logbook ; And complete logbook (!)
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
464 goto do_continue_main_menu ; back to menu
5c4d4a42e7a0 allow logbook erase from reset menu
heinrichsweikamp
parents: 50
diff changeset
465
0
heinrichsweikamp
parents:
diff changeset
466
heinrichsweikamp
parents:
diff changeset
467 do_reset_deco:
heinrichsweikamp
parents:
diff changeset
468 movlw d'79' ; 79% N2
heinrichsweikamp
parents:
diff changeset
469 movff WREG,char_I_N2_ratio
heinrichsweikamp
parents:
diff changeset
470 movlw d'0'
heinrichsweikamp
parents:
diff changeset
471 movff WREG,char_I_step_is_1min ; 2 second deco mode
heinrichsweikamp
parents:
diff changeset
472 SAFE_2BYTE_COPY amb_pressure,int_I_pres_respiration ; copy for deco routine
heinrichsweikamp
parents:
diff changeset
473 movff int_I_pres_respiration+0,int_I_pres_surface+0 ; copy for desat routine
heinrichsweikamp
parents:
diff changeset
474 movff int_I_pres_respiration+1,int_I_pres_surface+1
heinrichsweikamp
parents:
diff changeset
475
heinrichsweikamp
parents:
diff changeset
476 extern deco_reset
heinrichsweikamp
parents:
diff changeset
477 call deco_reset
heinrichsweikamp
parents:
diff changeset
478 call deco_calc_desaturation_time ; calculate desaturation time
heinrichsweikamp
parents:
diff changeset
479 banksel common
heinrichsweikamp
parents:
diff changeset
480 call deco_calc_wo_deco_step_1_min ; calculate deco in surface mode
heinrichsweikamp
parents:
diff changeset
481 banksel common
heinrichsweikamp
parents:
diff changeset
482 clrf nofly_time+0 ; Reset NoFly
heinrichsweikamp
parents:
diff changeset
483 clrf nofly_time+1
heinrichsweikamp
parents:
diff changeset
484 clrf desaturation_time+0 ; Reset Desat
heinrichsweikamp
parents:
diff changeset
485 clrf desaturation_time+1
heinrichsweikamp
parents:
diff changeset
486 goto do_return_settings ; back to menu
heinrichsweikamp
parents:
diff changeset
487
heinrichsweikamp
parents:
diff changeset
488 do_reset_settings:
139
e0b758865e91 some cleanup
heinrichsweikamp
parents: 113
diff changeset
489 banksel common
0
heinrichsweikamp
parents:
diff changeset
490 extern option_reset_all
heinrichsweikamp
parents:
diff changeset
491 call option_reset_all ; Reset all options to factory default.
76
a5ea132770db 1.21 release
heinrichsweikamp
parents: 66
diff changeset
492 goto restart ; Restart into surfacemode
0
heinrichsweikamp
parents:
diff changeset
493
heinrichsweikamp
parents:
diff changeset
494 do_continue_menu_3stack: ; Return three levels deep
heinrichsweikamp
parents:
diff changeset
495 call menu_processor_pop
heinrichsweikamp
parents:
diff changeset
496 goto do_return_settings
heinrichsweikamp
parents:
diff changeset
497
heinrichsweikamp
parents:
diff changeset
498 do_reboot:
heinrichsweikamp
parents:
diff changeset
499 call ext_flash_enable_protection ; Enables write protection
heinrichsweikamp
parents:
diff changeset
500 reset
heinrichsweikamp
parents:
diff changeset
501
heinrichsweikamp
parents:
diff changeset
502
heinrichsweikamp
parents:
diff changeset
503 do_date_time_menu:
heinrichsweikamp
parents:
diff changeset
504 MENU_BEGIN tSetTimeDate, .4
heinrichsweikamp
parents:
diff changeset
505 MENU_CALL tSetTime, do_time_menu
heinrichsweikamp
parents:
diff changeset
506 MENU_CALL tSetDate, do_date_menu
heinrichsweikamp
parents:
diff changeset
507 MENU_OPTION tDateFormat,oDateFormat, 0
heinrichsweikamp
parents:
diff changeset
508 MENU_CALL tExit, do_return_settings
heinrichsweikamp
parents:
diff changeset
509 MENU_END
heinrichsweikamp
parents:
diff changeset
510
heinrichsweikamp
parents:
diff changeset
511 do_date_menu:
heinrichsweikamp
parents:
diff changeset
512 bsf settime_setdate
heinrichsweikamp
parents:
diff changeset
513 MENU_BEGIN tSetDate, .4
heinrichsweikamp
parents:
diff changeset
514 MENU_OPTION tSetDay, oSetDay, 0
50
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
515 MENU_OPTION tSetMonth, oSetMonth, 0
0
heinrichsweikamp
parents:
diff changeset
516 MENU_OPTION tSetYear, oSetYear, 0
heinrichsweikamp
parents:
diff changeset
517 MENU_CALL tExit, do_continue_menu_3stack
heinrichsweikamp
parents:
diff changeset
518 MENU_END
heinrichsweikamp
parents:
diff changeset
519
heinrichsweikamp
parents:
diff changeset
520
heinrichsweikamp
parents:
diff changeset
521 do_reset_seconds:
heinrichsweikamp
parents:
diff changeset
522 clrf secs
heinrichsweikamp
parents:
diff changeset
523 extern rtc_set_rtc
heinrichsweikamp
parents:
diff changeset
524 call rtc_set_rtc ; writes mins,sec,hours,day,month and year to rtc module
heinrichsweikamp
parents:
diff changeset
525 do_time_menu:
heinrichsweikamp
parents:
diff changeset
526 bsf settime_setdate
heinrichsweikamp
parents:
diff changeset
527 MENU_BEGIN tSetTime, .4
heinrichsweikamp
parents:
diff changeset
528 MENU_OPTION tSetHours, oSetHours, 0
heinrichsweikamp
parents:
diff changeset
529 MENU_OPTION tSetMinutes,oSetMinutes, 0
heinrichsweikamp
parents:
diff changeset
530 MENU_CALL tSetSeconds, do_reset_seconds
heinrichsweikamp
parents:
diff changeset
531 MENU_CALL tExit, do_continue_menu_3stack
heinrichsweikamp
parents:
diff changeset
532 MENU_END
heinrichsweikamp
parents:
diff changeset
533
heinrichsweikamp
parents:
diff changeset
534
heinrichsweikamp
parents:
diff changeset
535 do_toggle_ppo2_max: ; add 0.1bar, with hard-coded max.
heinrichsweikamp
parents:
diff changeset
536 movff opt_ppO2_max,lo ; banksafe
heinrichsweikamp
parents:
diff changeset
537 movlw .10
heinrichsweikamp
parents:
diff changeset
538 addwf lo,F
heinrichsweikamp
parents:
diff changeset
539 movlw ppo2_highest_setting
heinrichsweikamp
parents:
diff changeset
540 cpfsgt lo
heinrichsweikamp
parents:
diff changeset
541 bra do_toggle_ppo2_max2
heinrichsweikamp
parents:
diff changeset
542 movlw .120
heinrichsweikamp
parents:
diff changeset
543 movwf lo
heinrichsweikamp
parents:
diff changeset
544 do_toggle_ppo2_max2:
heinrichsweikamp
parents:
diff changeset
545 movff lo,opt_ppO2_max
heinrichsweikamp
parents:
diff changeset
546 return
heinrichsweikamp
parents:
diff changeset
547
heinrichsweikamp
parents:
diff changeset
548 do_toggle_ppo2_min: ; sub 0.1bar, with hard-coded min.
heinrichsweikamp
parents:
diff changeset
549 movff opt_ppO2_min,lo ; banksafe
heinrichsweikamp
parents:
diff changeset
550 incf lo,F
heinrichsweikamp
parents:
diff changeset
551 movlw .21
heinrichsweikamp
parents:
diff changeset
552 cpfsgt lo
heinrichsweikamp
parents:
diff changeset
553 bra do_toggle_ppo2_min2
heinrichsweikamp
parents:
diff changeset
554 movlw ppo2_lowest_setting
heinrichsweikamp
parents:
diff changeset
555 movwf lo
heinrichsweikamp
parents:
diff changeset
556 do_toggle_ppo2_min2:
heinrichsweikamp
parents:
diff changeset
557 movff lo,opt_ppO2_min
heinrichsweikamp
parents:
diff changeset
558 return
heinrichsweikamp
parents:
diff changeset
559
heinrichsweikamp
parents:
diff changeset
560
heinrichsweikamp
parents:
diff changeset
561 ; Logbook offset sub-menu
heinrichsweikamp
parents:
diff changeset
562 do_log_offset_menu:
heinrichsweikamp
parents:
diff changeset
563 MENU_BEGIN tLogOffset, .6
heinrichsweikamp
parents:
diff changeset
564 MENU_DYNAMIC TFT_LogOffset_Logtitle, 0
heinrichsweikamp
parents:
diff changeset
565 MENU_CALL tLogOffsetp1, do_logoffset_plus1
heinrichsweikamp
parents:
diff changeset
566 MENU_CALL tLogOffsetp10, do_logoffset_plus10
heinrichsweikamp
parents:
diff changeset
567 MENU_CALL tLogOffsetm1, do_logoffset_minus1
heinrichsweikamp
parents:
diff changeset
568 MENU_CALL tLogOffsetm10, do_logoffset_minus10
heinrichsweikamp
parents:
diff changeset
569 MENU_CALL tExit, do_dispsets_menu_3stack
heinrichsweikamp
parents:
diff changeset
570 MENU_END
heinrichsweikamp
parents:
diff changeset
571
heinrichsweikamp
parents:
diff changeset
572
heinrichsweikamp
parents:
diff changeset
573 do_logoffset_minus1:
heinrichsweikamp
parents:
diff changeset
574 call do_logoffset_common_read ; Read into lo:hi
heinrichsweikamp
parents:
diff changeset
575 movlw d'1'
heinrichsweikamp
parents:
diff changeset
576 subwf lo
heinrichsweikamp
parents:
diff changeset
577 movlw d'0'
heinrichsweikamp
parents:
diff changeset
578 subwfb hi
heinrichsweikamp
parents:
diff changeset
579 btfss hi,7 ; <0?
heinrichsweikamp
parents:
diff changeset
580 goto do_logoffset_common_write ; Store and return
heinrichsweikamp
parents:
diff changeset
581 clrf lo
heinrichsweikamp
parents:
diff changeset
582 clrf hi
heinrichsweikamp
parents:
diff changeset
583 goto do_logoffset_common_write ; Store and return
heinrichsweikamp
parents:
diff changeset
584
heinrichsweikamp
parents:
diff changeset
585 do_logoffset_minus10:
heinrichsweikamp
parents:
diff changeset
586 call do_logoffset_common_read ; Read into lo:hi
heinrichsweikamp
parents:
diff changeset
587 movlw d'10'
heinrichsweikamp
parents:
diff changeset
588 subwf lo
heinrichsweikamp
parents:
diff changeset
589 movlw d'0'
heinrichsweikamp
parents:
diff changeset
590 subwfb hi
heinrichsweikamp
parents:
diff changeset
591 btfss hi,7 ; <0?
heinrichsweikamp
parents:
diff changeset
592 goto do_logoffset_common_write ; Store and return
heinrichsweikamp
parents:
diff changeset
593 clrf lo
heinrichsweikamp
parents:
diff changeset
594 clrf hi
heinrichsweikamp
parents:
diff changeset
595 goto do_logoffset_common_write ; Store and return
heinrichsweikamp
parents:
diff changeset
596
heinrichsweikamp
parents:
diff changeset
597 do_logoffset_plus1:
heinrichsweikamp
parents:
diff changeset
598 call do_logoffset_common_read ; Read into lo:hi
148
022b886eddaf some cleanup
heinrichsweikamp
parents: 145
diff changeset
599 infsnz lo,F
022b886eddaf some cleanup
heinrichsweikamp
parents: 145
diff changeset
600 incf hi,F
0
heinrichsweikamp
parents:
diff changeset
601 goto do_logoffset_common_write ; Store and return
heinrichsweikamp
parents:
diff changeset
602
heinrichsweikamp
parents:
diff changeset
603 do_logoffset_plus10:
heinrichsweikamp
parents:
diff changeset
604 call do_logoffset_common_read ; Read into lo:hi
heinrichsweikamp
parents:
diff changeset
605 movlw d'10'
heinrichsweikamp
parents:
diff changeset
606 addwf lo
heinrichsweikamp
parents:
diff changeset
607 movlw d'0'
heinrichsweikamp
parents:
diff changeset
608 addwfc hi
heinrichsweikamp
parents:
diff changeset
609 goto do_logoffset_common_write ; Store and return
heinrichsweikamp
parents:
diff changeset
610
heinrichsweikamp
parents:
diff changeset
611 do_dispsets_menu_3stack:
50
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
612 bcf in_color_menu
0
heinrichsweikamp
parents:
diff changeset
613 call menu_processor_pop
heinrichsweikamp
parents:
diff changeset
614 call menu_processor_pop
heinrichsweikamp
parents:
diff changeset
615
heinrichsweikamp
parents:
diff changeset
616 do_dispsets_menu:
307
14719662fb95 Merged Screen layout work #4 into VSItextv2
Janos Kovacs <kovjanos@gmail.com>
parents: 305
diff changeset
617 MENU_BEGIN tDispSets, .6
303
9b1b0b32e7d5 Add configuration option to control depth warning blinking
janos_kovacs <kovjanos@gmail.com>
parents: 298
diff changeset
618 MENU_OPTION tBright, oBrightness, 0
9b1b0b32e7d5 Add configuration option to control depth warning blinking
janos_kovacs <kovjanos@gmail.com>
parents: 298
diff changeset
619 MENU_CALL tColorScheme, do_color_scheme
9b1b0b32e7d5 Add configuration option to control depth warning blinking
janos_kovacs <kovjanos@gmail.com>
parents: 298
diff changeset
620 MENU_OPTION tFlip, oFlipScreen, 0
307
14719662fb95 Merged Screen layout work #4 into VSItextv2
Janos Kovacs <kovjanos@gmail.com>
parents: 305
diff changeset
621 MENU_OPTION tMODwarning, oMODwarning, 0
14719662fb95 Merged Screen layout work #4 into VSItextv2
Janos Kovacs <kovjanos@gmail.com>
parents: 305
diff changeset
622 MENU_OPTION tVSItextv2, oVSItextv2, 0
303
9b1b0b32e7d5 Add configuration option to control depth warning blinking
janos_kovacs <kovjanos@gmail.com>
parents: 298
diff changeset
623 MENU_CALL tExit, do_return_settings
0
heinrichsweikamp
parents:
diff changeset
624 MENU_END
heinrichsweikamp
parents:
diff changeset
625
50
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
626
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
627 extern oColorSetDive
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
628 do_color_scheme:
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
629 bsf in_color_menu
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
630 MENU_BEGIN tColorScheme, .2
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
631 MENU_OPTION tColorSetDive,oColorSetDive, 0
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
632 MENU_CALL tExit, do_dispsets_menu_3stack
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
633 MENU_END
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
634
ec4d8503ec45 NEW: user-selectable color schemes
heinrichsweikamp
parents: 39
diff changeset
635
0
heinrichsweikamp
parents:
diff changeset
636 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
637
heinrichsweikamp
parents:
diff changeset
638 global new_battery_menu
heinrichsweikamp
parents:
diff changeset
639 new_battery_menu:
heinrichsweikamp
parents:
diff changeset
640 bsf enable_screen_dumps ; To prevent exiting into COMM mode immediately
heinrichsweikamp
parents:
diff changeset
641 call TFT_boot ; Initialize TFT (includes clear screen)
heinrichsweikamp
parents:
diff changeset
642 call TFT_Display_FadeIn ; Show splash
heinrichsweikamp
parents:
diff changeset
643 movlw .100
heinrichsweikamp
parents:
diff changeset
644 movwf batt_percent ; make sure to reset batt_percent
heinrichsweikamp
parents:
diff changeset
645
heinrichsweikamp
parents:
diff changeset
646 ; Default (In cases of timeout or USB): Use old battery
heinrichsweikamp
parents:
diff changeset
647 clrf EEADRH
heinrichsweikamp
parents:
diff changeset
648 read_int_eeprom 0x07
heinrichsweikamp
parents:
diff changeset
649 movff EEDATA,battery_gauge+0
heinrichsweikamp
parents:
diff changeset
650 read_int_eeprom 0x08
heinrichsweikamp
parents:
diff changeset
651 movff EEDATA,battery_gauge+1
heinrichsweikamp
parents:
diff changeset
652 read_int_eeprom 0x09
heinrichsweikamp
parents:
diff changeset
653 movff EEDATA,battery_gauge+2
heinrichsweikamp
parents:
diff changeset
654 read_int_eeprom 0x0A
heinrichsweikamp
parents:
diff changeset
655 movff EEDATA,battery_gauge+3
heinrichsweikamp
parents:
diff changeset
656 read_int_eeprom 0x0B
heinrichsweikamp
parents:
diff changeset
657 movff EEDATA,battery_gauge+4
heinrichsweikamp
parents:
diff changeset
658 read_int_eeprom 0x0C
heinrichsweikamp
parents:
diff changeset
659 movff EEDATA,battery_gauge+5
heinrichsweikamp
parents:
diff changeset
660
76
a5ea132770db 1.21 release
heinrichsweikamp
parents: 66
diff changeset
661 call menu_processor_reset ; restart from first icon.
a5ea132770db 1.21 release
heinrichsweikamp
parents: 66
diff changeset
662
0
heinrichsweikamp
parents:
diff changeset
663 MENU_BEGIN tNewBattTitle, .3
heinrichsweikamp
parents:
diff changeset
664 MENU_CALL tNewBattOld, use_old_batteries
heinrichsweikamp
parents:
diff changeset
665 MENU_CALL tNewBattNew36, use_new_36V_batteries
heinrichsweikamp
parents:
diff changeset
666 MENU_CALL tNewBattNew15, use_new_15V_batteries
heinrichsweikamp
parents:
diff changeset
667 MENU_END
heinrichsweikamp
parents:
diff changeset
668
heinrichsweikamp
parents:
diff changeset
669 global use_old_batteries
heinrichsweikamp
parents:
diff changeset
670 use_old_batteries:
heinrichsweikamp
parents:
diff changeset
671 clrf EEADRH
heinrichsweikamp
parents:
diff changeset
672 read_int_eeprom 0x07
heinrichsweikamp
parents:
diff changeset
673 movff EEDATA,battery_gauge+0
heinrichsweikamp
parents:
diff changeset
674 read_int_eeprom 0x08
heinrichsweikamp
parents:
diff changeset
675 movff EEDATA,battery_gauge+1
heinrichsweikamp
parents:
diff changeset
676 read_int_eeprom 0x09
heinrichsweikamp
parents:
diff changeset
677 movff EEDATA,battery_gauge+2
heinrichsweikamp
parents:
diff changeset
678 read_int_eeprom 0x0A
heinrichsweikamp
parents:
diff changeset
679 movff EEDATA,battery_gauge+3
heinrichsweikamp
parents:
diff changeset
680 read_int_eeprom 0x0B
heinrichsweikamp
parents:
diff changeset
681 movff EEDATA,battery_gauge+4
heinrichsweikamp
parents:
diff changeset
682 read_int_eeprom 0x0C
heinrichsweikamp
parents:
diff changeset
683 movff EEDATA,battery_gauge+5
heinrichsweikamp
parents:
diff changeset
684 movlw .100
heinrichsweikamp
parents:
diff changeset
685 movwf batt_percent ; To have 1,5V batteries right after firmware update
heinrichsweikamp
parents:
diff changeset
686 goto power_on_return
heinrichsweikamp
parents:
diff changeset
687
heinrichsweikamp
parents:
diff changeset
688 use_new_15V_batteries:
heinrichsweikamp
parents:
diff changeset
689 use_new_36V_batteries:
heinrichsweikamp
parents:
diff changeset
690 call reset_battery_pointer ; Resets battery pointer 0x07-0x0C and battery_gauge:5
heinrichsweikamp
parents:
diff changeset
691 goto power_on_return
heinrichsweikamp
parents:
diff changeset
692
heinrichsweikamp
parents:
diff changeset
693 END