Mercurial > public > mk2
annotate code_part1/OSTC_code_asm_part1/menu_reset.asm @ 466:67d908f51e80
cleanup
| author | heinrichsweikamp |
|---|---|
| date | Sun, 02 Oct 2011 18:01:24 +0200 |
| parents | 6ad9af3a5771 |
| children | 7779bfa89171 |
| 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 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
159 CF_DEFAULT CF_COLOR, d'224', 0, 0 ; color_warnings Color Warnings: Red |
|
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 |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
171 CF_DEFAULT CF_INT8, d'15', d'7', d'20' ; color_warn_celocity_mmin warn at xx m/min |
| 392 | 172 CF_DEFAULT CF_SEC+CF_NEG,d'0', -d'120' ,d'120' ; time_correction_value_default Adds to Seconds on Midnight |
| 157 | 173 CF_DEFAULT CF_BOOL, d'0', 0, 0 ; CF#49 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 | |
| 224 | 181 CF_DEFAULT CF_DECI, d'200', d'5', 0 ; CF56 Bottom gas usage (l/min or bar/min) |
| 182 | |
| 183 CF_DEFAULT CF_DECI, d'200', d'5', 0 ; CF57 Ascent/deco gas usage (l/min or bar/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] |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
185 CF_DEFAULT CF_INT15, 0, 0, 0 ; UNUSED |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
186 CF_DEFAULT CF_INT15, 0, 0, 0 ; UNUSED |
|
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 | |
| 313 DISPLAYTEXT .25 ; "Reset..." | |
| 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 |
| 0 | 328 |
| 329 reset_all_cf: | |
| 330 movlw d'1' | |
| 331 movwf EEDATA | |
| 332 write_int_eeprom d'33' ; reset start gas | |
| 333 clrf EEDATA | |
| 334 write_int_eeprom d'34' ; reset deco model to ZH-L16 | |
| 335 clrf EEDATA | |
| 309 | 336 write_int_eeprom d'35' ; unused in Mk.2 |
| 0 | 337 |
| 338 clrf EEDATA | |
| 339 write_int_eeprom d'39' ; Disable Debugbode | |
| 340 clrf EEDATA | |
| 341 write_int_eeprom d'90' ; Disable Brightness offset? (Dim=1, Normal = 0) | |
| 140 | 342 |
| 343 movlw d'1' | |
| 157 | 344 movwf EEDATA |
| 140 | 345 write_int_eeprom d'91' ; Reset Date format to DD.MM.YY |
| 0 | 346 |
| 347 movlw d'100' | |
| 157 | 348 movwf EEDATA |
| 0 | 349 write_int_eeprom d'26' ; Salinity default: 1.00 kg/l |
| 350 | |
| 351 movlw b'00011111' | |
| 352 movwf EEDATA | |
| 353 write_int_eeprom d'27' ; reset active gas flags | |
| 354 | |
| 355 clrf EEDATA | |
| 356 write_int_eeprom d'28' ; reset change depth gas #1 | |
| 357 clrf EEDATA | |
| 358 write_int_eeprom d'29' ; reset change depth gas #2 | |
| 359 clrf EEDATA | |
| 360 write_int_eeprom d'30' ; reset change depth gas #3 | |
| 361 clrf EEDATA | |
| 362 write_int_eeprom d'31' ; reset change depth gas #4 | |
| 363 clrf EEDATA | |
| 364 write_int_eeprom d'32' ; reset change depth gas #5 | |
| 365 | |
|
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
|
366 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
|
367 movwf EEDATA |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
368 write_int_eeprom d'36' ; reset mix1 to ppO2=0.80bar |
| 0 | 369 movlw d'100' |
| 370 movwf EEDATA | |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
371 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
|
372 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
|
373 movwf EEDATA |
|
398
ab962c4b19d6
Fixing issue 50, correct "Bar" to "bar" in texts and comments
heinrichsweikamp
parents:
392
diff
changeset
|
374 write_int_eeprom d'38' ; reset mix3 to ppO2=1.20bar |
| 0 | 375 |
|
229
85ea09d3b9d8
Nofly should not be reset after dive simulation (bug BB18).
JeanDo
parents:
224
diff
changeset
|
376 clrf nofly_time+0 ; Clear nofly time |
| 0 | 377 clrf nofly_time+1 ; Clear nofly time |
| 378 | |
| 79 | 379 reset_all_cf_bank0: |
| 380 clrf EEADRH | |
| 0 | 381 movlw d'127' ; address of low byte of first custom function |
| 382 movwf EEADR | |
| 383 | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
384 movlw LOW cf_default_table0 ; Load PROM pointer. |
| 79 | 385 movwf TBLPTRL,A |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
386 movlw HIGH cf_default_table0 |
| 79 | 387 movwf TBLPTRH,A |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
388 movlw UPPER cf_default_table0 |
| 79 | 389 movwf TBLPTRU,A |
| 0 | 390 |
| 79 | 391 cf_bank0_loop: |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
392 ; Did we already read 32 (decimal) words or double-words (with types) ? |
| 79 | 393 movf TBLPTRL,W |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
394 sublw LOW (cf_default_table1) |
| 79 | 395 bz reset_all_cf_bank1 |
| 0 | 396 |
| 397 rcall reset_customfunction ; saves default and current value | |
| 79 | 398 bra cf_bank0_loop |
|
83
3e351e25f5d1
adding anti-aliased fonts frame and merging some patches from Jeando
heinrichsweikamp
parents:
79
diff
changeset
|
399 |
| 0 | 400 reset_all_cf_bank1: |
| 401 movlw d'1' | |
| 402 movwf EEADRH ; EEPROM BANK 1 !! | |
| 403 movlw d'127' ; address of low byte of first custom function | |
| 404 movwf EEADR | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
405 |
| 79 | 406 cf_bank1_loop: |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
407 ; Did we already read another 32 (decimal) words or double-words ? |
| 79 | 408 movf TBLPTRL,W |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
409 sublw LOW (cf_default_table2) |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
410 bz cf_bank1_end |
|
27
29341afd2060
NEW: Depth, CNS, GF, ppO2 and Velocity are Color-coded
heinrichsweikamp
parents:
25
diff
changeset
|
411 |
| 0 | 412 rcall reset_customfunction ; saves default and current value |
| 79 | 413 bra cf_bank1_loop |
| 0 | 414 |
| 79 | 415 cf_bank1_end: |
| 0 | 416 clrf EEADRH ; EEPROM BANK 0 ! |
|
83
3e351e25f5d1
adding anti-aliased fonts frame and merging some patches from Jeando
heinrichsweikamp
parents:
79
diff
changeset
|
417 |
| 0 | 418 ;call reset_external_eeprom ; delete profile memory |
| 419 goto restart ; all reset, quit to surfmode | |
| 420 | |
| 464 | 421 reset_gases: |
| 422 clrf EEADRH ; EEPROM BANK 0 ! | |
| 423 | |
| 424 movlw d'3' ; address of first gas-1 | |
| 425 movwf EEADR | |
| 426 clrf hi ; He part (default for all gases: 0%) | |
| 427 movlw d'21' ; O2 part (21%) | |
| 428 rcall reset_gas ; saves current value for gas #1 | |
| 429 movlw d'21' ; O2 part (21%) | |
| 430 rcall reset_gas ; saves default value for gas #1 | |
| 431 movlw d'21' ; O2 part (21%) | |
| 432 rcall reset_gas ; saves current value for gas #2 | |
| 433 movlw d'21' ; O2 part (21%) | |
| 434 rcall reset_gas ; saves default value for gas #2 | |
| 435 movlw d'21' ; O2 part (21%) | |
| 436 rcall reset_gas ; saves current value for gas #3 | |
| 437 movlw d'21' ; O2 part (21%) | |
| 438 rcall reset_gas ; saves default value for gas #3 | |
| 439 movlw d'21' ; O2 part (21%) | |
| 440 rcall reset_gas ; saves current value for gas #4 | |
| 441 movlw d'21' ; O2 part (21%) | |
| 442 rcall reset_gas ; saves default value for gas #4 | |
| 443 movlw d'21' ; O2 part (21%) | |
| 444 rcall reset_gas ; saves current value for gas #5 | |
| 445 movlw d'21' ; O2 part (21%) | |
| 446 rcall reset_gas ; saves default value for gas #5 | |
| 447 movlw d'21' ; O2 part (21%) | |
| 448 rcall reset_gas ; saves current value for gas #6 | |
| 449 return | |
| 450 | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
451 ; Write WREG:lo twice, w/o any type clearing, pre-incrementing EEADR |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
452 reset_gas: |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
453 movwf lo |
| 459 | 454 incf EEADR,F |
| 464 | 455 movff lo, EEDATA ; O2 Default value |
| 459 | 456 call write_eeprom |
| 457 incf EEADR,F | |
| 464 | 458 movff hi, EEDATA ; He default value |
| 459 | 459 call write_eeprom |
| 460 return | |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
461 |
| 0 | 462 reset_customfunction: |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
463 tblrd*+ |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
464 movff TABLAT, lo ; Low byte in lo, |
|
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, hi ; High byte in hi |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
467 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
468 ifndef NO_CF_TYPES |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
469 tblrd*+ ; Skip advanced min/max values. |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
470 tblrd*+ |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
471 btfss hi,7 ; In EEPROM, just clear all types, |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
472 clrf hi ; to keep external program compat (jdivelog etc.) |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
473 bcf hi,7 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
474 endif |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
475 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
476 ; Manage the default/value tuple |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
477 rcall reset_eeprom_value ; First pair, untouched. |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
478 bcf hi,7 ; Just clear type bit. |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
479 bra reset_eeprom_value ; Second pair, cleared |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
480 |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
481 ; Write the two bytes lo:hi into EEPROM |
|
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
482 reset_eeprom_value: |
| 0 | 483 incf EEADR,F |
|
384
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
484 movff lo, EEDATA ; Lowbyte Default value |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
485 |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
486 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
|
487 cpfslt EEADR ; EEADR > 127? |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
488 call write_eeprom ; Yes, write! |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
489 |
| 0 | 490 incf EEADR,F |
|
86
b40a0a6284da
adding custom functions with limits (jeando)
heinrichsweikamp
parents:
83
diff
changeset
|
491 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
|
492 |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
493 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
|
494 cpfslt EEADR ; EEADR > 127? |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
495 call write_eeprom ; Yes, write! |
|
904863f96582
Work-Around for "Reset all" overwriting 0x00 to 0x04 in EEPROM Bank1
heinrichsweikamp
parents:
374
diff
changeset
|
496 return |
| 0 | 497 |
| 498 reset_external_eeprom: ; deletes complete external eeprom! | |
| 499 clrf eeprom_address+0 | |
| 500 clrf eeprom_address+1 | |
| 501 | |
|
350
7250ca7c8d24
64kByte logbook (Still incompatible to existing PC software)
heinrichsweikamp
parents:
341
diff
changeset
|
502 movlw d'4' |
| 0 | 503 movwf temp3 |
| 504 reset_eeprom02: | |
| 505 clrf temp4 | |
| 506 reset_eeprom01: | |
| 507 movlw d'64' | |
| 508 movwf temp2 | |
| 509 bcf eeprom_blockwrite ; Blockwrite start | |
| 510 reset_eeprom1: | |
| 511 setf ext_ee_temp1 ; byte for Blockwrite.... | |
| 512 movf ext_ee_temp1,W ; So, 1st. Byte of block is fine, too | |
| 513 call write_external_eeprom_block | |
| 514 decfsz temp2,F ; 64 Byte done | |
| 515 bra reset_eeprom1 | |
| 516 bsf SSPCON2,PEN ; Stop condition | |
| 517 call WaitMSSP | |
| 518 WAITMS d'7' | |
| 519 decfsz temp4,F | |
| 520 bra reset_eeprom01 ; do this 256 times | |
| 521 decfsz temp3,F | |
|
350
7250ca7c8d24
64kByte logbook (Still incompatible to existing PC software)
heinrichsweikamp
parents:
341
diff
changeset
|
522 bra reset_eeprom02 ; and this all 4 times -> 1024 *64Bytes = 64KB |
| 0 | 523 |
| 524 bcf eeprom_blockwrite ; clear blockwrite flag | |
| 525 | |
| 526 clrf eeprom_address+0 | |
| 527 clrf eeprom_address+1 | |
| 528 | |
| 529 movlw 0xFD ; With these three bytes the OSTC will find the free area in the EEPROM faster | |
| 530 call write_external_eeprom | |
| 531 movlw 0xFD | |
| 532 call write_external_eeprom | |
| 533 movlw 0xFE | |
| 534 call write_external_eeprom | |
| 535 | |
| 536 clrf eeprom_address+0 | |
| 537 clrf eeprom_address+1 | |
| 538 return | |
| 539 |