comparison code_part1/OSTC_code_asm_part1/menu_reset.asm @ 0:96a35aeda5f2

Initial setup
author heinrichsweikamp
date Tue, 12 Jan 2010 15:05:59 +0100
parents
children 3cf8af30b36e
comparison
equal deleted inserted replaced
-1:000000000000 0:96a35aeda5f2
1
2 ; OSTC - diving computer code
3 ; Copyright (C) 2008 HeinrichsWeikamp GbR
4
5 ; This program is free software: you can redistribute it and/or modify
6 ; it under the terms of the GNU General Public License as published by
7 ; the Free Software Foundation, either version 3 of the License, or
8 ; (at your option) any later version.
9
10 ; This program is distributed in the hope that it will be useful,
11 ; but WITHOUT ANY WARRANTY; without even the implied warranty of
12 ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 ; GNU General Public License for more details.
14
15 ; You should have received a copy of the GNU General Public License
16 ; along with this program. If not, see <http://www.gnu.org/licenses/>.
17
18
19 ; Menu "Reset all"
20 ; written by: Matthias Heinrichs, info@heinrichsweikamp.com
21 ; written: 10/30/05
22 ; last updated: 08/08/31
23 ; known bugs:
24 ; ToDo:
25
26 ; routines to reset external EEPROM (currently inactvated!)
27 ; routines to reset custom function, gases and decompression values
28 ; does not reset clock
29
30 menu_reset:
31 movlw d'1'
32 movwf menupos
33
34 call PLED_ClearScreen
35 call PLED_reset_menu_mask
36
37 menu_reset2:
38 clrf timeout_counter2
39 bcf sleepmode
40 bcf menubit2
41 bcf menubit3
42 bsf menubit
43 bsf cursor
44 call PLED_reset_menu_mask
45 call PLED_menu_cursor
46 bcf switch_left
47 bcf switch_right
48 menu_reset_loop:
49 call check_switches_menu
50 btfsc menubit2
51 bra do_menu_reset ; call submenu
52 btfss menubit
53 bra menu ; exit setup menu and return to main menu
54 btfsc onesecupdate
55 call timeout_surfmode
56 btfsc onesecupdate
57 call set_dive_modes
58 btfsc onesecupdate
59 call test_charger ; check if charger IC is active
60 btfsc onesecupdate
61 call get_battery_voltage ; get battery voltage
62 bcf onesecupdate ; End of one second tasks
63 btfsc sleepmode
64 goto menu
65 btfsc divemode
66 goto restart ; exit menu, restart and enter divemode
67 bra menu_reset_loop
68 do_menu_reset: ; calls submenu
69 dcfsnz menupos,F
70 bra do_menu_reset_exit ; Cancel, exit
71 dcfsnz menupos,F
72 bra do_menu_reset_all ; Reset all settings
73 dcfsnz menupos,F
74 bra do_menu_reset_logbook ; Reset Logbook Memory!
75 dcfsnz menupos,F
76 bra do_menu_reset_reboot ; Reboot OSTC
77 dcfsnz menupos,F
78 bra do_menu_reset_decodata ; Reset Decodata
79 do_menu_reset_exit:
80 movlw d'3'
81 movwf menupos
82 bra menu2 ; exit...
83
84
85 do_menu_reset_reboot:
86 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK!
87 movwf menupos ; Used as temp
88 tstfsz menupos
89 bra do_menu_reset_reboot2 ; Delete now!
90 bra do_menu_reset_exit ; Cancel!
91
92 do_menu_reset_reboot2:
93 call PLED_DisplayOff ; Power-down OLED
94 movlw b'00000000' ; Bit6: PPL Disable
95 movwf OSCTUNE
96 movlw b'01111110' ; 8MHz
97 movwf OSCCON
98 reset
99 goto 0x00000 ; restart to 0x00000
100
101 do_menu_reset_logbook:
102 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK!
103 movwf menupos ; Used as temp
104 tstfsz menupos
105 bra do_menu_reset_logbook2 ; Delete Logbook now!
106 bra do_menu_reset_exit ; Cancel!
107
108 do_menu_reset_logbook2:
109 call PLED_ClearScreen
110 DISPLAYTEXT .25 ; "Reset..."
111 call reset_external_eeprom ; delete profile memory
112 bra do_menu_reset_exit
113
114 do_menu_reset_decodata:
115 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK!
116 movwf menupos ; Used as temp
117 tstfsz menupos
118 bra do_menu_reset_decodata2 ; Reset Deco Data now!
119 bra do_menu_reset_exit ; Cancel!
120
121 do_menu_reset_decodata2:
122 ; reset deco data
123 call PLED_ClearScreen
124 DISPLAYTEXT .25 ; "Reset..."
125 movff amb_pressure+0,int_I_pres_respiration+0 ; copy surface air pressure to deco routine
126 movff amb_pressure+1,int_I_pres_respiration+1
127 call deco_main_clear_tissue ;
128 movlb b'00000001' ; RAM Bank1 selected
129 goto restart ; done. quit to surfmode
130
131 do_menu_reset_all:
132 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK!
133 movwf menupos ; Used as temp
134 tstfsz menupos
135 bra do_menu_reset_all2 ; Reset all now!
136 bra do_menu_reset_exit ; Cancel!
137
138 do_menu_reset_all2:
139 call PLED_ClearScreen
140 DISPLAYTEXT .25 ; "Reset..."
141
142 reset_start:
143 ; reset deco data
144 movff amb_pressure+0,int_I_pres_respiration+0 ; copy surface air pressure to deco routine
145 movff amb_pressure+1,int_I_pres_respiration+1
146 call deco_main_clear_tissue ;
147 movlb b'00000001' ; RAM Bank1 selected
148
149 ; reset gases
150 clrf EEADRH ; EEPROM BANK 0 !
151
152 movlw d'3' ; address of first gas-1
153 movwf EEADR
154 clrf hi ; He part (default for all gases: 0%)
155 movlw d'21' ; O2 part (21%)
156 rcall reset_customfunction ; saves default and current value for gas #1
157 movlw d'21' ; O2 part (21%)
158 rcall reset_customfunction ; saves default and current value for gas #2
159 movlw d'21' ; O2 part (21%)
160 rcall reset_customfunction ; saves default and current value for gas #3
161 movlw d'21' ; O2 part (21%)
162 rcall reset_customfunction ; saves default and current value for gas #4
163 movlw d'21' ; O2 part (21%)
164 rcall reset_customfunction ; saves default and current value for gas #5
165 movlw d'21' ; O2 part (21%)
166 rcall reset_customfunction ; saves default and current value for gas #6
167
168 reset_all_cf:
169 ; resets all customfunctions to the following default values
170 movlw d'1'
171 movwf EEDATA
172 write_int_eeprom d'33' ; reset start gas
173 clrf EEDATA
174 write_int_eeprom d'34' ; reset deco model to ZH-L16
175 clrf EEDATA
176 write_int_eeprom d'35' ; Do not use O2 Sensor in CC Modes
177
178 movlw d'0'
179 clrf EEDATA
180 write_int_eeprom d'39' ; Disable Debugbode
181 clrf EEDATA
182 write_int_eeprom d'90' ; Disable Brightness offset? (Dim=1, Normal = 0)
183 clrf EEDATA
184 write_int_eeprom d'91' ; Reset Date format to MM/DD/YY
185
186 movlw d'100'
187 write_int_eeprom d'26' ; Salinity default: 1.00 kg/l
188
189 movlw b'00011111'
190 movwf EEDATA
191 write_int_eeprom d'27' ; reset active gas flags
192
193 clrf EEDATA
194 write_int_eeprom d'28' ; reset change depth gas #1
195 clrf EEDATA
196 write_int_eeprom d'29' ; reset change depth gas #2
197 clrf EEDATA
198 write_int_eeprom d'30' ; reset change depth gas #3
199 clrf EEDATA
200 write_int_eeprom d'31' ; reset change depth gas #4
201 clrf EEDATA
202 write_int_eeprom d'32' ; reset change depth gas #5
203
204 movlw d'100'
205 movwf EEDATA
206 write_int_eeprom d'36' ; reset mix1 to ppO2=1.00Bar
207 write_int_eeprom d'37' ; reset mix2 to ppO2=1.00Bar
208 write_int_eeprom d'38' ; reset mix3 to ppO2=1.00Bar
209
210 movlw d'1'
211 movwf nofly_time+0 ; Clear nofly time
212 clrf nofly_time+1 ; Clear nofly time
213
214 #DEFINE dive_threshold d'100' ; 8BIT 100cm
215 #DEFINE surf_threshold d'30' ; 8BIT 30cm
216 #DEFINE diveloop_timeout d'240' ; 8BIT 240s
217 #DEFINE surfloop_timeout d'120' ; 8BIT 120s
218 #DEFINE premenu_timeout d'5' ; 8BIT 5s
219
220 #DEFINE minimum_velocity d'7' ; 8BIT 7min/min
221 #DEFINE pressure_offset_divemode d'1160' ; 15BIT 1160mBar
222 #DEFINE max_surfpressure d'1100' ; 15BIT 1100mBar
223 #DEFINE min_gradient_factor d'20' ; 8Bit 20%
224 #DEFINE oxygen_threshold d'20' ; 8Bit 20%
225
226 #DEFINE dive_menu_timeout d'30' ; 8BIT 30s
227 #DEFINE saturation_multiplier d'110' ; 8BIT x1.1
228 #DEFINE desaturation_multiplier d'90' ; 8BIT x0.9
229 #DEFINE nofly_time_ratio d'60' ; 8BIT 60%
230 #DEFINE gradient_factor_alarm1 d'100' ; 8Bit 100%
231
232 #DEFINE gradient_factor_alarm2 d'120' ; 8Bit 120%
233 #DEFINE deco_distance_for_sim d'10' ; 8Bit 1m
234 #DEFINE ppo2_warning_low d'019' ; 8Bit 0.19 Bar
235 #DEFINE ppo2_warning_high d'160' ; 8Bit 1.60 Bar
236 #DEFINE ppo2_display_high d'150' ; 8Bit 1.50 Bar
237
238 #DEFINE sampling_rate d'10' ; 8Bit 10s
239 #DEFINE sampling_divisor_temp d'6' ; 8Bit /6
240 #DEFINE sampling_divisor_deco d'6' ; 8Bit /6
241 #DEFINE sampling_divisor_tank d'0' ; 8Bit never
242 #DEFINE sampling_divisor_ppo2 d'0' ; 8Bit never
243
244 #DEFINE sampling_divisor_deco2 d'12' ; 8Bit /12
245 #DEFINE sampling_divisor_nyu2 d'0' ; 8Bit never
246 #DEFINE cns_display_high d'20' ; 8Bit 20%
247 #DEFINE logbook_offset d'0' ; 15Bit No Offset, but 15Bit value
248 #DEFINE last_deco_depth d'3' ; 8Bit 3m
249 #DEFINE timeout_apnoe_mode d'10' ; 8Bit 10min
250 #DEFINE show_voltage_value d'0' ; 1Bit =1 Show value instead of symbol, =0 Show Symbol
251
252 #DEFINE GF_low_default d'30' ; 8Bit 30%
253 #DEFINE GF_high_default d'90' ; 8Bit 90%
254 #DEFINE color_battery_surface d'223' ; 8Bit Color Battery sign Surfacemode
255 #DEFINE SP_high_HUD_default d'140' ; 8Bit 1.40Bar
256 #DEFINE SP_nom_HUD_default d'120' ; 8Bit 1.20Bar
257 #DEFINE HUD_style d'0' ; 8Bit OSTC Style
258
259 #DEFINE show_seconds_divemode d'0' ; 1Bit =1 Show the seconds in Divemode
260 #DEFINE flip_display_default d'0' ; 1Bit =1 Flip Display
261 #DEFINE use_ppo2_screen_default d'0' ; 1Bit =1 Use alternative outputs for ppO2 sensor
262 #DEFINE replace_temp_with_avr_depth d'0' ; 1Bit =1 Show (resetable) average Depth instead of temperature
263
264 movlw d'127' ; address of low byte of first custom function
265 movwf EEADR
266 clrf hi ; only required once
267 movlw LOW dive_threshold ; 8Bit value
268 rcall reset_customfunction ; saves default and current value
269
270 movlw LOW surf_threshold
271 rcall reset_customfunction ; saves default and current value
272
273 movlw LOW diveloop_timeout
274 rcall reset_customfunction ; saves default and current value
275
276 movlw LOW surfloop_timeout
277 rcall reset_customfunction ; saves default and current value
278
279 movlw LOW premenu_timeout
280 rcall reset_customfunction ; saves default and current value
281
282 movlw LOW minimum_velocity
283 rcall reset_customfunction ; saves default and current value
284
285 movlw HIGH pressure_offset_divemode
286 movwf hi
287 bsf hi,7 ; 15Bit value
288 movlw LOW pressure_offset_divemode
289 rcall reset_customfunction ; saves default and current value
290
291 movlw HIGH max_surfpressure
292 movwf hi
293 bsf hi,7 ; 15Bit value
294 movlw LOW max_surfpressure
295 rcall reset_customfunction ; saves default and current value
296
297 movlw LOW min_gradient_factor
298 rcall reset_customfunction ; saves default and current value
299
300 movlw LOW oxygen_threshold
301 rcall reset_customfunction ; saves default and current value
302
303 movlw LOW dive_menu_timeout
304 rcall reset_customfunction ; saves default and current value
305
306 movlw LOW saturation_multiplier
307 rcall reset_customfunction ; saves default and current value
308
309 movlw LOW desaturation_multiplier
310 rcall reset_customfunction ; saves default and current value
311
312 movlw LOW nofly_time_ratio
313 rcall reset_customfunction ; saves default and current value
314
315 movlw LOW gradient_factor_alarm1
316 rcall reset_customfunction ; saves default and current value
317
318 movlw LOW gradient_factor_alarm2
319 rcall reset_customfunction ; saves default and current value
320
321 movlw LOW deco_distance_for_sim
322 rcall reset_customfunction ; saves default and current value
323
324 movlw LOW ppo2_warning_low
325 rcall reset_customfunction ; saves default and current value
326
327 movlw LOW ppo2_warning_high
328 rcall reset_customfunction ; saves default and current value
329
330 movlw LOW ppo2_display_high
331 rcall reset_customfunction ; saves default and current value
332
333 movlw LOW sampling_rate
334 rcall reset_customfunction ; saves default and current value
335
336 movlw LOW sampling_divisor_temp
337 rcall reset_customfunction ; saves default and current value
338
339 movlw LOW sampling_divisor_deco
340 rcall reset_customfunction ; saves default and current value
341
342 movlw LOW sampling_divisor_tank
343 rcall reset_customfunction ; saves default and current value
344
345 movlw LOW sampling_divisor_ppo2
346 rcall reset_customfunction ; saves default and current value
347
348 movlw LOW sampling_divisor_deco2
349 rcall reset_customfunction ; saves default and current value
350
351 movlw LOW sampling_divisor_nyu2
352 rcall reset_customfunction ; saves default and current value
353
354 movlw LOW cns_display_high
355 rcall reset_customfunction ; saves default and current value
356
357 clrf hi
358 bsf hi,7 ; 15Bit value
359 movlw LOW logbook_offset
360 rcall reset_customfunction ; saves default and current value
361
362 movlw LOW last_deco_depth
363 rcall reset_customfunction ; saves default and current value
364
365 movlw LOW timeout_apnoe_mode
366 rcall reset_customfunction ; saves default and current value
367
368 movlw LOW show_voltage_value
369 rcall reset_customfunction ; saves default and current value
370
371 reset_all_cf_bank1:
372 movlw d'1'
373 movwf EEADRH ; EEPROM BANK 1 !!
374 movlw d'127' ; address of low byte of first custom function
375 movwf EEADR
376 clrf hi ; only required once/bank
377
378 movlw LOW GF_low_default
379 rcall reset_customfunction ; saves default and current value
380
381 movlw LOW GF_high_default
382 rcall reset_customfunction ; saves default and current value
383
384 movlw color_battery_surface
385 rcall reset_customfunction ; saves default and current value
386
387 movlw SP_high_HUD_default
388 rcall reset_customfunction ; saves default and current value
389
390 movlw SP_nom_HUD_default
391 rcall reset_customfunction ; saves default and current value
392
393 movlw HUD_style
394 rcall reset_customfunction ; saves default and current value
395
396 movlw show_seconds_divemode
397 rcall reset_customfunction ; saves default and current value
398
399 movlw flip_display_default
400 rcall reset_customfunction ; saves default and current value
401
402 movlw use_ppo2_screen_default
403 rcall reset_customfunction ; saves default and current value
404
405 movlw replace_temp_with_avr_depth
406 rcall reset_customfunction ; saves default and current value
407
408 movlw d'0'
409 rcall reset_customfunction ; saves default and current value
410 movlw d'0'
411 rcall reset_customfunction ; saves default and current value
412 movlw d'0'
413 rcall reset_customfunction ; saves default and current value
414 movlw d'0'
415 rcall reset_customfunction ; saves default and current value
416 movlw d'0'
417 rcall reset_customfunction ; saves default and current value
418 movlw d'0'
419 rcall reset_customfunction ; saves default and current value
420 movlw d'0'
421 rcall reset_customfunction ; saves default and current value
422 movlw d'0'
423 rcall reset_customfunction ; saves default and current value
424 movlw d'0'
425 rcall reset_customfunction ; saves default and current value
426 movlw d'0'
427 rcall reset_customfunction ; saves default and current value
428 movlw d'0'
429 rcall reset_customfunction ; saves default and current value
430 movlw d'0'
431 rcall reset_customfunction ; saves default and current value
432 movlw d'0'
433 rcall reset_customfunction ; saves default and current value
434 movlw d'0'
435 rcall reset_customfunction ; saves default and current value
436 movlw d'0'
437 rcall reset_customfunction ; saves default and current value
438 movlw d'0'
439 rcall reset_customfunction ; saves default and current value
440 movlw d'0'
441 rcall reset_customfunction ; saves default and current value
442 movlw d'0'
443 rcall reset_customfunction ; saves default and current value
444 movlw d'0'
445 rcall reset_customfunction ; saves default and current value
446 movlw d'0'
447 rcall reset_customfunction ; saves default and current value
448 movlw d'0'
449 rcall reset_customfunction ; saves default and current value
450 movlw d'0'
451 rcall reset_customfunction ; saves default and current value
452
453 clrf EEADRH ; EEPROM BANK 0 !
454
455
456 ;call reset_external_eeprom ; delete profile memory
457 goto restart ; all reset, quit to surfmode
458
459 reset_customfunction:
460 movwf lo
461 incf EEADR,F
462 movff lo, EEDATA ; Lowbyte Defaul value
463 call write_eeprom
464 incf EEADR,F
465 movff hi, EEDATA ; Highbyte default value
466 call write_eeprom
467 incf EEADR,F
468 movff lo, EEDATA ; Lowbyte current value
469 call write_eeprom
470 incf EEADR,F
471 bcf hi,7 ; This bit will only be written for the default value
472 movff hi, EEDATA ; Highbyte current value
473 call write_eeprom
474 clrf hi
475 return
476
477
478 reset_external_eeprom: ; deletes complete external eeprom!
479 clrf eeprom_address+0
480 clrf eeprom_address+1
481
482 movlw d'2'
483 movwf temp3
484 reset_eeprom02:
485 clrf temp4
486 reset_eeprom01:
487 movlw d'64'
488 movwf temp2
489 bcf eeprom_blockwrite ; Blockwrite start
490 reset_eeprom1:
491 setf ext_ee_temp1 ; byte for Blockwrite....
492 movf ext_ee_temp1,W ; So, 1st. Byte of block is fine, too
493 call write_external_eeprom_block
494 decfsz temp2,F ; 64 Byte done
495 bra reset_eeprom1
496 bsf SSPCON2,PEN ; Stop condition
497 call WaitMSSP
498 WAITMS d'7'
499 decfsz temp4,F
500 bra reset_eeprom01 ; do this 256 times
501 decfsz temp3,F
502 bra reset_eeprom02 ; and this all 2 times -> 512 *64Bytes = 32KB
503
504 bcf eeprom_blockwrite ; clear blockwrite flag
505
506 clrf eeprom_address+0
507 clrf eeprom_address+1
508
509 movlw 0xFD ; With these three bytes the OSTC will find the free area in the EEPROM faster
510 call write_external_eeprom
511 movlw 0xFD
512 call write_external_eeprom
513 movlw 0xFE
514 call write_external_eeprom
515
516 clrf eeprom_address+0
517 clrf eeprom_address+1
518 return
519