Mercurial > public > mk2
annotate code_part1/OSTC_code_asm_part1/menu_reset.asm @ 513:c9f19a546e64
BUGFIX MISSING movlb for gaslist (simulator).
| author | JeanDo |
|---|---|
| date | Sun, 04 Dec 2011 17:46:08 +0100 |
| parents | ed51a7a89d9a |
| children | b498245da3f1 |
| rev | line source |
|---|---|
| 0 | 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 | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
22 ; last updated: 10/12/08 by JD Gascuel at free.fr |
| 0 | 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 | |
| 79 | 30 ;============================================================================= |
| 31 ; CF default values | |
| 32 ; | |
| 33 | |
| 34 ; Macro to check values, and construct PROM CF default table. | |
| 35 ; If in types mode, set flags into hi. If not, clear it. | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
36 CF_DEFAULT macro type, default, min, max |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
37 noexpand |
| 99 | 38 CFn set 1+CFn |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
39 if (type) == CF_INT15 |
| 99 | 40 if HIGH (default) > .127 |
| 41 error CF#v(CFn) "15bit default too big: ", default | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
42 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
43 if (min)>0 && (max>min) |
| 99 | 44 error CF#v(CFn) "15bit defaults cannot have both MIN & MAX flags" |
| 45 endif | |
| 46 if HIGH(min) > .127 | |
| 47 error CF#v(CFn) "15bit MIN value too big: ", min | |
| 48 endif | |
| 49 if HIGH(max) > .127 | |
| 50 error CF#v(CFn) "15bit MAX value too big: ", max | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
51 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
52 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
53 ifdef NO_CF_TYPES |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
54 DB LOW (default), HIGH(default) + 0x80 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
55 else |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
56 DB LOW (default), HIGH(default) + 0x80 |
| 99 | 57 if (max) > (min) |
| 58 DB LOW(max), HIGH(max) + 0x80 | |
| 59 else | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
60 DB LOW(min), HIGH(min) |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
61 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
62 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
63 else |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
64 ; Basic sanity check for 8bit values: |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
65 if HIGH(default) > 0 |
| 99 | 66 error CF#v(CFn) "8bit default too big: ", default |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
67 endif |
| 355 | 68 if type & CF_NEG |
| 69 if HIGH(-min) != 0 | |
| 70 error CF#v(CFn) "8bit negativ min too big: ", min | |
| 71 endif | |
| 72 else | |
| 73 if HIGH(min) != 0 | |
| 74 error CF#v(CFn) "8bit min too big: ", min | |
| 75 endif | |
| 76 endif | |
| 77 if HIGH(max) != 0 | |
| 99 | 78 error CF#v(CFn) "8bit max too big: ", max |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
79 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
80 if ((type)==CF_BOOL) && ( (default)>1 ) |
| 99 | 81 error CF#v(CFn) "BOOL default too big: ", default |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
82 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
83 if ((type)==CF_BOOL) && ( (min)>0 || (max)>0 ) |
| 99 | 84 error CF#v(CFn) "BOOL cannot have min/max" |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
85 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
86 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
87 ifdef NO_CF_TYPES |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
88 DB LOW(default), 0 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
89 else |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
90 local typeFlags |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
91 typeFlags set type |
| 355 | 92 if (min)!=0 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
93 typeFlags set type + CF_MIN |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
94 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
95 if (max)>(min) |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
96 typeFlags set typeFlags + CF_MAX |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
97 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
98 DB LOW(default), (typeFlags), LOW(min), LOW(max) |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
99 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
100 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
101 expand |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
102 endm |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
103 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
104 ; Starting at CF0 |
| 99 | 105 CFn set -1 |
| 79 | 106 |
| 107 ; resets all customfunctions to the following default values | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
108 cf_default_table0: |
| 79 | 109 ;---- BANK0 custom function defaults ------------------------------------- |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
110 ; DEFAULT MIN MAX |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
111 CF_DEFAULT CF_CENTI, d'100', d'50', d'250' ; dive_threshold 100cm |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
112 CF_DEFAULT CF_CENTI, d'30', d'10', d'100' ; surf_threshold 30cm |
|
352
544a96faa9f3
New "Quit sim" option in simulated dive mode, CF02 now allows more then 240seconds, Bugfix with runtime=1min in runtime simulator
Heinrichsweikamp
parents:
350
diff
changeset
|
113 CF_DEFAULT CF_INT15, d'240', d'0', d'600' ; diveloop_timeout 240s |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
114 CF_DEFAULT CF_SEC, d'120', d'30', d'240' ; surfloop_timeout 120s |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
115 CF_DEFAULT CF_SEC, d'5', d'1', d'30' ; premenu_timeout 5s |
| 79 | 116 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
117 CF_DEFAULT CF_INT8, d'7', d'3', d'18' ; minimum_velocity 7min/min |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
118 CF_DEFAULT CF_INT15, d'1160',d'950', 0 ; pressure_offset_divemode 1160mbar |
|
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
119 CF_DEFAULT CF_INT15, d'1080',d'1080', 0 ; max_surfpressure 1080mbar |
| 105 | 120 CF_DEFAULT CF_PERCENT, d'20', d'1', d'99' ; min_gradient_factor 20% |
| 173 | 121 CF_DEFAULT CF_PERCENT, d'20', d'1', d'22' ; oxygen_threshold 22% |
| 79 | 122 |
| 306 | 123 CF_DEFAULT CF_SEC, d'45', d'5', d'60' ; dive_menu_timeout 45s |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
124 CF_DEFAULT CF_PERCENT, d'110', d'110', d'200' ; saturation_multiplier x1.10 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
125 CF_DEFAULT CF_PERCENT, d'90', d'50', d'90' ; desaturation_multiplier x0.90 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
126 CF_DEFAULT CF_PERCENT, d'60', d'60', d'100' ; nofly_time_ratio 60% |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
127 CF_DEFAULT CF_PERCENT, d'100', d'50', d'100' ; gradient_factor_alarm1 100% |
| 79 | 128 |
| 105 | 129 CF_DEFAULT CF_PERCENT, d'10', d'0', d'100' ; cns_display_surface 10% |
|
98
6f8e3a08011e
1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
86
diff
changeset
|
130 CF_DEFAULT CF_DECI, d'10', d'0', d'10' ; deco_distance_for_sim 1m |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
131 CF_DEFAULT CF_CENTI, d'019', d'19', d'021' ; ppo2_warning_low 0.19 bar |
|
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
132 CF_DEFAULT CF_CENTI, d'160', d'0', d'160' ; ppo2_warning_high 1.60 bar |
|
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
133 CF_DEFAULT CF_CENTI, d'140', d'0', d'150' ; ppo2_display_high 1.40 bar |
| 79 | 134 |
| 105 | 135 CF_DEFAULT CF_INT8, d'10', d'1', d'120' ; sampling_rate 10s |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
136 CF_DEFAULT CF_INT8, d'6', d'0', d'15' ; sampling_divisor_temp /6 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
137 CF_DEFAULT CF_INT8, d'6', d'0', d'15' ; sampling_divisor_deco /6 |
| 374 | 138 CF_DEFAULT CF_INT8, d'6', d'0', d'15' ; sampling_divisor_gf /6 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
139 CF_DEFAULT CF_INT8, d'0', d'0', d'15' ; sampling_divisor_ppo2 never |
| 79 | 140 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
141 CF_DEFAULT CF_INT8, d'0', d'0', d'15' ; sampling_divisor_deco2 never |
| 374 | 142 CF_DEFAULT CF_INT8, d'12', d'0', d'15' ; sampling_divisor_cns /12 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
143 CF_DEFAULT CF_PERCENT, d'20', d'5', d'75' ; cns_display_high 20% |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
144 CF_DEFAULT CF_INT15, d'0', d'0', 0 ; logbook_offset No Offset, but 15Bit value |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
145 CF_DEFAULT CF_INT8, d'3', d'2', d'6' ; last_deco_depth 3m |
| 79 | 146 |
| 128 | 147 CF_DEFAULT CF_SEC, d'10', d'1', d'15' ; timeout_apnoe_mode 10min |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
148 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; show_voltage_value =1 Show value instead of symbol, =0 Show Symbol |
| 79 | 149 |
| 150 ;---- BANK1 custom function defaults ------------------------------------- | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
151 cf_default_table1: |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
152 ; DEFAULT MIN MAX |
| 157 | 153 CF_DEFAULT CF_PERCENT, d'30', d'5', d'90' ; GF_low_default 30% |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
154 CF_DEFAULT CF_PERCENT, d'90', d'30', d'95' ; GF_high_default 90% |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
155 CF_DEFAULT CF_COLOR, d'199', 0, 0 ; color_battery_surface Color Battery sign: Deep blue |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
156 CF_DEFAULT CF_COLOR, d'255', 0, 0 ; color_standard1 Color Standard: White |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
157 CF_DEFAULT CF_COLOR, d'62', 0, 0 ; color_divemask Color Divemask: Light green |
| 99 | 158 |
|
492
19b9e19ea4da
+CHANGE: Velocity display updated every second
heinrichsweikamp
parents:
478
diff
changeset
|
159 CF_DEFAULT CF_COLOR, d'224', 0, 0 ; CF37 color_warnings Color Warnings: Red |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
160 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; show_seconds_divemode =1 Show the seconds in Divemode |
| 138 | 161 CF_DEFAULT CF_BOOL, 0, 0, 0 ; Adjust SetPoint if Diluent ppO2 > SetPoint |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
162 CF_DEFAULT CF_BOOL, d'1', 0, 0 ; warn_ceiling_divemode =1 Warn ceiling violation in divemode |
|
121
e0f29e20bd24
Mix-type icons: check apnoe/gauge/CF#41, depth=0, and first gas. Changed colors.
JeanDo
parents:
116
diff
changeset
|
163 CF_DEFAULT CF_BOOL, d'1', 0, 0 ; Show mix type is surfmode |
| 128 | 164 |
| 306 | 165 CF_DEFAULT CF_BOOL, d'1', 0, 0 ; blink_gas_divemode =1 blink better gas |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
166 CF_DEFAULT CF_INT15, d'13000', 0, d'13000' ; color_warn_depth_mbar Warn depths |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
167 CF_DEFAULT CF_PERCENT, d'101', d'50', d'101' ; color_warn_cns_percent Warn-% |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
168 CF_DEFAULT CF_PERCENT, d'101', d'50', d'101' ; color_warn_gf_percent Warn-% |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
169 CF_DEFAULT CF_CENTI, d'161', d'100', d'161' ; color_warn_ppo2_cbar ppO2 warn |
| 128 | 170 |
|
492
19b9e19ea4da
+CHANGE: Velocity display updated every second
heinrichsweikamp
parents:
478
diff
changeset
|
171 CF_DEFAULT CF_INT8, d'15', d'7', d'20' ; CF47 color_warn_celocity_mmin warn at xx m/min |
|
19b9e19ea4da
+CHANGE: Velocity display updated every second
heinrichsweikamp
parents:
478
diff
changeset
|
172 CF_DEFAULT CF_SEC+CF_NEG,d'0', -d'120' ,d'120' ; CF48 time_correction_value_default Adds to Seconds on Midnight |
| 476 | 173 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; CF49 Show Altimeter in surface mode |
|
129
06c4899ddb4b
Custom views in dive mode configrable (New CF50-CF53)
Heinrichsweikamp
parents:
125
diff
changeset
|
174 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; CF50 Show Log-Marker |
|
06c4899ddb4b
Custom views in dive mode configrable (New CF50-CF53)
Heinrichsweikamp
parents:
125
diff
changeset
|
175 CF_DEFAULT CF_BOOL, d'1', 0, 0 ; CF51 Show Stopwatch |
| 79 | 176 |
| 324 | 177 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; CF52 Show Tissue Graph in Divemode |
|
129
06c4899ddb4b
Custom views in dive mode configrable (New CF50-CF53)
Heinrichsweikamp
parents:
125
diff
changeset
|
178 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; CF53 Show Laeding Tissue in Divemode |
| 197 | 179 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; CF54 Display shallowest stop first |
| 180 CF_DEFAULT CF_INT8, d'0', d'0', d'10' ; GF55 Gas switch additional delay | |
|
478
fd8266b511cc
New SAC (CF56/CF57) in 5..50 l/min range (no more decimal).
JeanDo
parents:
476
diff
changeset
|
181 CF_DEFAULT CF_INT8, d'20', d'5', d'50' ; CF56 Bottom gas usage (SAC l/min) |
| 224 | 182 |
|
478
fd8266b511cc
New SAC (CF56/CF57) in 5..50 l/min range (no more decimal).
JeanDo
parents:
476
diff
changeset
|
183 CF_DEFAULT CF_INT8, d'20', d'5', d'50' ; CF57 Ascent/deco gas usage (SAC l/min) |
|
312
b7e4e74c0e17
New @5 variant: compute TTS if staying some extra time (CF58) at current depth.
JeanDo
parents:
309
diff
changeset
|
184 CF_DEFAULT CF_INT8, d'0', d'0', d'10' ; CF58 TTS for extra time at current depth [min] |
| 476 | 185 CF_DEFAULT CF_INT15, d'0', d'0', d'7000' ; CF59 Cave conso warning [l] |
|
492
19b9e19ea4da
+CHANGE: Velocity display updated every second
heinrichsweikamp
parents:
478
diff
changeset
|
186 CF_DEFAULT CF_BOOL, 0, 0, 0 ; CF60 Show Graphical ascend speed indicator |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
187 CF_DEFAULT CF_INT15, 0, 0, 0 ; UNUSED |
| 79 | 188 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
189 CF_DEFAULT CF_INT15, 0, 0, 0 ; UNUSED |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
190 CF_DEFAULT CF_INT15, 0, 0, 0 ; UNUSED |
| 99 | 191 CF_DEFAULT CF_INT15, 0, 0, 0 ; UNUSED |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
192 cf_default_table2: |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
193 |
| 79 | 194 ;============================================================================= |
| 195 | |
| 0 | 196 menu_reset: |
| 197 movlw d'1' | |
| 198 movwf menupos | |
| 199 | |
| 200 call PLED_ClearScreen | |
| 201 call PLED_reset_menu_mask | |
| 202 | |
| 203 menu_reset2: | |
| 204 clrf timeout_counter2 | |
| 205 bcf sleepmode | |
| 206 bcf menubit2 | |
| 207 bcf menubit3 | |
| 208 bsf menubit | |
| 209 bsf cursor | |
| 210 call PLED_reset_menu_mask | |
| 211 call PLED_menu_cursor | |
| 212 bcf switch_left | |
| 213 bcf switch_right | |
| 214 menu_reset_loop: | |
| 215 call check_switches_menu | |
| 216 btfsc menubit2 | |
| 217 bra do_menu_reset ; call submenu | |
| 218 btfss menubit | |
| 219 bra menu ; exit setup menu and return to main menu | |
| 220 btfsc onesecupdate | |
| 221 call timeout_surfmode | |
| 222 btfsc onesecupdate | |
| 223 call set_dive_modes | |
| 224 btfsc onesecupdate | |
| 225 call test_charger ; check if charger IC is active | |
| 226 btfsc onesecupdate | |
| 227 call get_battery_voltage ; get battery voltage | |
| 228 bcf onesecupdate ; End of one second tasks | |
| 229 btfsc sleepmode | |
| 230 goto menu | |
| 231 btfsc divemode | |
| 232 goto restart ; exit menu, restart and enter divemode | |
| 233 bra menu_reset_loop | |
| 234 do_menu_reset: ; calls submenu | |
| 235 dcfsnz menupos,F | |
| 236 bra do_menu_reset_exit ; Cancel, exit | |
| 237 dcfsnz menupos,F | |
| 238 bra do_menu_reset_all ; Reset all settings | |
| 239 dcfsnz menupos,F | |
| 240 bra do_menu_reset_logbook ; Reset Logbook Memory! | |
| 241 dcfsnz menupos,F | |
| 242 bra do_menu_reset_reboot ; Reboot OSTC | |
| 243 dcfsnz menupos,F | |
| 244 bra do_menu_reset_decodata ; Reset Decodata | |
| 245 do_menu_reset_exit: | |
| 246 movlw d'3' | |
| 247 movwf menupos | |
| 248 bra menu2 ; exit... | |
| 249 | |
| 250 | |
| 251 do_menu_reset_reboot: | |
| 252 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK! | |
| 253 movwf menupos ; Used as temp | |
| 254 tstfsz menupos | |
| 255 bra do_menu_reset_reboot2 ; Delete now! | |
| 256 bra do_menu_reset_exit ; Cancel! | |
| 257 | |
| 258 do_menu_reset_reboot2: | |
| 259 call PLED_DisplayOff ; Power-down OLED | |
| 260 movlw b'00000000' ; Bit6: PPL Disable | |
| 261 movwf OSCTUNE | |
| 262 movlw b'01111110' ; 8MHz | |
| 263 movwf OSCCON | |
| 264 reset | |
| 265 goto 0x00000 ; restart to 0x00000 | |
| 266 | |
| 267 do_menu_reset_logbook: | |
| 268 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK! | |
| 269 movwf menupos ; Used as temp | |
| 270 tstfsz menupos | |
| 271 bra do_menu_reset_logbook2 ; Delete Logbook now! | |
| 272 bra do_menu_reset_exit ; Cancel! | |
| 273 | |
| 274 do_menu_reset_logbook2: | |
| 275 call PLED_ClearScreen | |
| 123 | 276 setf win_color1 ; Make sure to display in white color. |
| 277 setf win_color2 | |
| 278 DISPLAYTEXT .25 ; "Reset..." | |
| 0 | 279 call reset_external_eeprom ; delete profile memory |
| 280 bra do_menu_reset_exit | |
| 281 | |
| 282 do_menu_reset_decodata: | |
| 283 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK! | |
| 284 movwf menupos ; Used as temp | |
| 285 tstfsz menupos | |
| 286 bra do_menu_reset_decodata2 ; Reset Deco Data now! | |
| 287 bra do_menu_reset_exit ; Cancel! | |
| 288 | |
| 289 do_menu_reset_decodata2: | |
| 290 ; reset deco data | |
| 291 call PLED_ClearScreen | |
| 425 | 292 DISPLAYTEXT .25 ; "Reset..." |
|
411
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
293 |
|
341
2144f19fa1eb
BUGFIX protect against ISR changing pressure/temperature while reading it.
JeanDo
parents:
324
diff
changeset
|
294 SAFE_2BYTE_COPY amb_pressure,int_I_pres_respiration ; copy surface air pressure to deco routine |
|
411
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
295 call deco_clear_tissue ; Reset Decodata |
|
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
296 call deco_calc_desaturation_time ; calculate desaturation time |
|
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
297 call deco_clear_CNS_fraction ; clear CNS |
|
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
298 movlb b'00000001' ; select ram bank 1 |
| 412 | 299 clrf nofly_time+0 ; Reset NoFly |
| 300 clrf nofly_time+1 ; Reset NoFly | |
| 301 bcf nofly_active ; Clear flag | |
| 422 | 302 goto restart ; done. quit to surfmode |
| 0 | 303 |
| 304 do_menu_reset_all: | |
| 305 call PLED_confirmbox ; Returns WREG=0 for Cancel (Or Timeout) and WREG=1 for OK! | |
| 306 movwf menupos ; Used as temp | |
| 307 tstfsz menupos | |
| 308 bra do_menu_reset_all2 ; Reset all now! | |
| 309 bra do_menu_reset_exit ; Cancel! | |
| 310 | |
| 311 do_menu_reset_all2: | |
| 312 call PLED_ClearScreen | |
| 507 | 313 DISPLAYTEXT .25 ; "Reset..." |
| 0 | 314 |
| 315 reset_start: | |
| 316 ; reset deco data | |
|
341
2144f19fa1eb
BUGFIX protect against ISR changing pressure/temperature while reading it.
JeanDo
parents:
324
diff
changeset
|
317 SAFE_2BYTE_COPY amb_pressure,int_I_pres_respiration ; copy surface air pressure to deco routine |
|
411
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
318 call deco_clear_tissue ; Reset Decodata |
|
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
319 call deco_calc_desaturation_time ; calculate desaturation time |
|
e6e1b89b7c3e
BUGFIX: CNS was not cleared with a "Reset Deco"
heinrichsweikamp
parents:
398
diff
changeset
|
320 call deco_clear_CNS_fraction ; clear CNS |
| 422 | 321 movlb b'00000001' ; select ram bank 1 |
| 412 | 322 clrf nofly_time+0 ; Reset NoFly |
| 323 clrf nofly_time+1 ; Reset NoFly | |
| 324 bcf nofly_active ; Clear flag | |
| 0 | 325 |
| 326 ; reset gases | |
| 464 | 327 rcall reset_gases |
| 507 | 328 rcall reset_all_cf |
| 329 goto restart ; all reset, quit to surfmode | |
| 0 | 330 |
| 331 reset_all_cf: | |
| 332 movlw d'1' | |
| 333 movwf EEDATA | |
| 334 write_int_eeprom d'33' ; reset start gas | |
| 335 clrf EEDATA | |
| 336 write_int_eeprom d'34' ; reset deco model to ZH-L16 | |
| 337 clrf EEDATA | |
| 309 | 338 write_int_eeprom d'35' ; unused in Mk.2 |
| 0 | 339 |
| 340 clrf EEDATA | |
| 341 write_int_eeprom d'39' ; Disable Debugbode | |
| 342 clrf EEDATA | |
| 343 write_int_eeprom d'90' ; Disable Brightness offset? (Dim=1, Normal = 0) | |
| 140 | 344 |
| 345 movlw d'1' | |
| 157 | 346 movwf EEDATA |
| 140 | 347 write_int_eeprom d'91' ; Reset Date format to DD.MM.YY |
| 0 | 348 |
| 349 movlw d'100' | |
| 157 | 350 movwf EEDATA |
| 0 | 351 write_int_eeprom d'26' ; Salinity default: 1.00 kg/l |
| 352 | |
| 353 movlw b'00011111' | |
| 354 movwf EEDATA | |
| 355 write_int_eeprom d'27' ; reset active gas flags | |
| 356 | |
| 357 clrf EEDATA | |
| 358 write_int_eeprom d'28' ; reset change depth gas #1 | |
| 359 clrf EEDATA | |
| 360 write_int_eeprom d'29' ; reset change depth gas #2 | |
| 361 clrf EEDATA | |
| 362 write_int_eeprom d'30' ; reset change depth gas #3 | |
| 363 clrf EEDATA | |
| 364 write_int_eeprom d'31' ; reset change depth gas #4 | |
| 365 clrf EEDATA | |
| 366 write_int_eeprom d'32' ; reset change depth gas #5 | |
| 367 | |
|
255
1efd59d689f8
small change in the set time menu, default setpoints set to 0.8, 1.0 and 1.2Bar
heinrichsweikamp
parents:
229
diff
changeset
|
368 movlw d'80' |
|
1efd59d689f8
small change in the set time menu, default setpoints set to 0.8, 1.0 and 1.2Bar
heinrichsweikamp
parents:
229
diff
changeset
|
369 movwf EEDATA |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
370 write_int_eeprom d'36' ; reset mix1 to ppO2=0.80bar |
| 0 | 371 movlw d'100' |
| 372 movwf EEDATA | |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
373 write_int_eeprom d'37' ; reset mix2 to ppO2=1.00bar |
|
255
1efd59d689f8
small change in the set time menu, default setpoints set to 0.8, 1.0 and 1.2Bar
heinrichsweikamp
parents:
229
diff
changeset
|
374 movlw d'120' |
|
1efd59d689f8
small change in the set time menu, default setpoints set to 0.8, 1.0 and 1.2Bar
heinrichsweikamp
parents:
229
diff
changeset
|
375 movwf EEDATA |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
376 write_int_eeprom d'38' ; reset mix3 to ppO2=1.20bar |
| 0 | 377 |
|
229
85ea09d3b9d8
Nofly should not be reset after dive simulation (bug BB18).
JeanDo
parents:
224
diff
changeset
|
378 clrf nofly_time+0 ; Clear nofly time |
| 0 | 379 clrf nofly_time+1 ; Clear nofly time |
| 380 | |
| 79 | 381 reset_all_cf_bank0: |
| 382 clrf EEADRH | |
| 0 | 383 movlw d'127' ; address of low byte of first custom function |
| 384 movwf EEADR | |
| 385 | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
386 movlw LOW cf_default_table0 ; Load PROM pointer. |
| 79 | 387 movwf TBLPTRL,A |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
388 movlw HIGH cf_default_table0 |
| 79 | 389 movwf TBLPTRH,A |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
390 movlw UPPER cf_default_table0 |
| 79 | 391 movwf TBLPTRU,A |
| 0 | 392 |
| 79 | 393 cf_bank0_loop: |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
394 ; Did we already read 32 (decimal) words or double-words (with types) ? |
| 79 | 395 movf TBLPTRL,W |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
396 sublw LOW (cf_default_table1) |
| 79 | 397 bz reset_all_cf_bank1 |
| 0 | 398 |
| 399 rcall reset_customfunction ; saves default and current value | |
| 79 | 400 bra cf_bank0_loop |
|
83
3e351e25f5d1
adding anti-aliased fonts frame and merging some patches from Jeando
heinrichsweikamp
parents:
79
diff
changeset
|
401 |
| 0 | 402 reset_all_cf_bank1: |
| 403 movlw d'1' | |
| 404 movwf EEADRH ; EEPROM BANK 1 !! | |
| 405 movlw d'127' ; address of low byte of first custom function | |
| 406 movwf EEADR | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
407 |
| 79 | 408 cf_bank1_loop: |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
409 ; Did we already read another 32 (decimal) words or double-words ? |
| 79 | 410 movf TBLPTRL,W |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
411 sublw LOW (cf_default_table2) |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
412 bz cf_bank1_end |
|
27
29341afd2060
NEW: Depth, CNS, GF, ppO2 and Velocity are Color-coded
heinrichsweikamp
parents:
25
diff
changeset
|
413 |
| 0 | 414 rcall reset_customfunction ; saves default and current value |
| 79 | 415 bra cf_bank1_loop |
| 0 | 416 |
| 79 | 417 cf_bank1_end: |
| 0 | 418 clrf EEADRH ; EEPROM BANK 0 ! |
|
83
3e351e25f5d1
adding anti-aliased fonts frame and merging some patches from Jeando
heinrichsweikamp
parents:
79
diff
changeset
|
419 |
| 0 | 420 ;call reset_external_eeprom ; delete profile memory |
| 507 | 421 return |
| 0 | 422 |
| 464 | 423 reset_gases: |
| 424 clrf EEADRH ; EEPROM BANK 0 ! | |
| 425 | |
| 426 movlw d'3' ; address of first gas-1 | |
| 427 movwf EEADR | |
| 428 clrf hi ; He part (default for all gases: 0%) | |
| 429 movlw d'21' ; O2 part (21%) | |
| 430 rcall reset_gas ; saves current value for gas #1 | |
| 431 movlw d'21' ; O2 part (21%) | |
| 432 rcall reset_gas ; saves default value for gas #1 | |
| 433 movlw d'21' ; O2 part (21%) | |
| 434 rcall reset_gas ; saves current value for gas #2 | |
| 435 movlw d'21' ; O2 part (21%) | |
| 436 rcall reset_gas ; saves default value for gas #2 | |
| 437 movlw d'21' ; O2 part (21%) | |
| 438 rcall reset_gas ; saves current value for gas #3 | |
| 439 movlw d'21' ; O2 part (21%) | |
| 440 rcall reset_gas ; saves default value for gas #3 | |
| 441 movlw d'21' ; O2 part (21%) | |
| 442 rcall reset_gas ; saves current value for gas #4 | |
| 443 movlw d'21' ; O2 part (21%) | |
| 444 rcall reset_gas ; saves default value for gas #4 | |
| 445 movlw d'21' ; O2 part (21%) | |
| 446 rcall reset_gas ; saves current value for gas #5 | |
| 447 movlw d'21' ; O2 part (21%) | |
| 448 rcall reset_gas ; saves default value for gas #5 | |
| 449 movlw d'21' ; O2 part (21%) | |
| 450 rcall reset_gas ; saves current value for gas #6 | |
| 451 return | |
| 452 | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
453 ; Write WREG:lo twice, w/o any type clearing, pre-incrementing EEADR |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
454 reset_gas: |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
455 movwf lo |
| 459 | 456 incf EEADR,F |
| 464 | 457 movff lo, EEDATA ; O2 Default value |
| 459 | 458 call write_eeprom |
| 459 incf EEADR,F | |
| 464 | 460 movff hi, EEDATA ; He default value |
| 459 | 461 call write_eeprom |
| 462 return | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
463 |
| 0 | 464 reset_customfunction: |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
465 tblrd*+ |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
466 movff TABLAT, lo ; Low byte in lo, |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
467 tblrd*+ |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
468 movff TABLAT, hi ; High byte in hi |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
469 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
470 ifndef NO_CF_TYPES |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
471 tblrd*+ ; Skip advanced min/max values. |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
472 tblrd*+ |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
473 btfss hi,7 ; In EEPROM, just clear all types, |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
474 clrf hi ; to keep external program compat (jdivelog etc.) |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
475 bcf hi,7 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
476 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
477 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
478 ; Manage the default/value tuple |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
479 rcall reset_eeprom_value ; First pair, untouched. |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
480 bcf hi,7 ; Just clear type bit. |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
481 bra reset_eeprom_value ; Second pair, cleared |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
482 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
483 ; Write the two bytes lo:hi into EEPROM |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
484 reset_eeprom_value: |
| 0 | 485 incf EEADR,F |
|
384
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
486 movff lo, EEDATA ; Lowbyte Default value |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
487 |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
488 movlw d'127' ; Work-around to prevent writing at EEPROM 0x00 to 0x04 |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
489 cpfslt EEADR ; EEADR > 127? |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
490 call write_eeprom ; Yes, write! |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
491 |
| 0 | 492 incf EEADR,F |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
493 movff hi, EEDATA ; Highbyte default value |
|
384
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
494 |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
495 movlw d'127' ; Work-around to prevent writing at EEPROM 0x00 to 0x04 |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
496 cpfslt EEADR ; EEADR > 127? |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
497 call write_eeprom ; Yes, write! |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
498 return |
| 0 | 499 |
| 500 reset_external_eeprom: ; deletes complete external eeprom! | |
| 501 clrf eeprom_address+0 | |
| 502 clrf eeprom_address+1 | |
| 503 | |
|
350
7250ca7c8d24
64kByte logbook (Still incompatible to existing PC software)
heinrichsweikamp
parents:
341
diff
changeset
|
504 movlw d'4' |
| 0 | 505 movwf temp3 |
| 506 reset_eeprom02: | |
| 507 clrf temp4 | |
| 508 reset_eeprom01: | |
| 509 movlw d'64' | |
| 510 movwf temp2 | |
| 511 bcf eeprom_blockwrite ; Blockwrite start | |
| 512 reset_eeprom1: | |
| 513 setf ext_ee_temp1 ; byte for Blockwrite.... | |
| 514 movf ext_ee_temp1,W ; So, 1st. Byte of block is fine, too | |
| 515 call write_external_eeprom_block | |
| 516 decfsz temp2,F ; 64 Byte done | |
| 517 bra reset_eeprom1 | |
| 518 bsf SSPCON2,PEN ; Stop condition | |
| 519 call WaitMSSP | |
| 520 WAITMS d'7' | |
| 521 decfsz temp4,F | |
| 522 bra reset_eeprom01 ; do this 256 times | |
| 523 decfsz temp3,F | |
|
350
7250ca7c8d24
64kByte logbook (Still incompatible to existing PC software)
heinrichsweikamp
parents:
341
diff
changeset
|
524 bra reset_eeprom02 ; and this all 4 times -> 1024 *64Bytes = 64KB |
| 0 | 525 |
| 526 bcf eeprom_blockwrite ; clear blockwrite flag | |
| 527 | |
| 528 clrf eeprom_address+0 | |
| 529 clrf eeprom_address+1 | |
| 530 | |
| 531 movlw 0xFD ; With these three bytes the OSTC will find the free area in the EEPROM faster | |
| 532 call write_external_eeprom | |
| 533 movlw 0xFD | |
| 534 call write_external_eeprom | |
| 535 movlw 0xFE | |
| 536 call write_external_eeprom | |
| 537 | |
| 538 clrf eeprom_address+0 | |
| 539 clrf eeprom_address+1 | |
| 540 return | |
| 541 |