Mercurial > public > hwos_code

comparison src/menu_tree.asm @ 656:8af5aefbcdaf default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update to 3.31 beta
author heinrichsweikamp
date Thu, 27 Nov 2025 18:32:58 +0100
parents 75e90cd0c2c3
children
comparison
equal deleted inserted replaced
655:c7b7b8a358cd 656:8af5aefbcdaf
162 ; CCR / pSCR Setup - 1st Level 162 ; CCR / pSCR Setup - 1st Level
163 ; 163 ;
164 do_menu_ccr: 164 do_menu_ccr:
165 call option_cleanup_oCCRMode ; in pSCR mode, revert AutoSP (2) to calculated SP (0) 165 call option_cleanup_oCCRMode ; in pSCR mode, revert AutoSP (2) to calculated SP (0)
166 166
167 IFDEF _external_sensor 167 IFDEF _external_sensor_eccr
168 168
169 bcf imprint_sensor_mv ; stop imprinting of live O2 sensor mV data 169 bcf imprint_sensor_mv ; stop imprinting of live O2 sensor mV data
170 btfss ext_input_s8_ana ; S8/analog sensor input available? 170 btfss ext_input_s8_ana ; S8/analog sensor input available?
171 bra do_menu_ccr_2 ; NO - do OSTC 2 menu 171 bra do_menu_ccr_2 ; NO - do OSTC 2 menu
172 ;bra do_menu_ccr_cR ; YES - do OSTC cR menu 172 ;bra do_menu_ccr_cR ; YES - do OSTC cR menu
179 MENU_CALL tFixedSetpoints, do_menu_setpoints 179 MENU_CALL tFixedSetpoints, do_menu_setpoints
180 MENU_CALL tMore, do_menu_ccr_more 180 MENU_CALL tMore, do_menu_ccr_more
181 MENU_CALL tBack, do_return_main_menu 181 MENU_CALL tBack, do_return_main_menu
182 MENU_END 182 MENU_END
183 183
184 ENDIF ; _external_sensor 184 ENDIF ; _external_sensor_eccr
185 185
186 do_menu_ccr_2: 186 do_menu_ccr_2:
187 MENU_BEGIN tCCRSetup, .5 ; OSTC 2 menu 187 MENU_BEGIN tCCRSetup, .5 ; OSTC 2 menu
188 MENU_OPT_INC tCCRMode, oCCRMode 188 MENU_OPT_INC tCCRMode, oCCRMode
189 MENU_CALL tDiluentSetup, do_menu_diluent 189 MENU_CALL tDiluentSetup, do_menu_diluent
195 195
196 ;----------------------------------------------------------------------------- 196 ;-----------------------------------------------------------------------------
197 ; CCR / pSCR Setup - 2nd Level 197 ; CCR / pSCR Setup - 2nd Level
198 ; 198 ;
199 do_menu_ccr_more: 199 do_menu_ccr_more:
200 IFDEF _external_sensor 200 IFDEF _external_sensor_eccr
201 MENU_BEGIN tCCRSetup, .7 ; CCR/pSCR more menu 201 MENU_BEGIN tCCRSetup, .7 ; CCR/pSCR more menu
202 MENU_OPT_INC tS8Mode, oS8Mode 202 MENU_OPT_INC tS8Mode, oS8Mode
203 MENU_OPT_INC tCCmaxFracO2, oCCmaxFracO2 203 MENU_OPT_INC tCCmaxFracO2, oCCmaxFracO2
204 MENU_OPT_INC tDilppO2Check, oDilppO2Check 204 MENU_OPT_INC tDilppO2Check, oDilppO2Check
205 MENU_OPT_INC tGasDensityCheck, oGasDensityCheck 205 MENU_OPT_INC tGasDensityCheck, oGasDensityCheck
214 MENU_OPT_INC tGasDensityCheck, oGasDensityCheck 214 MENU_OPT_INC tGasDensityCheck, oGasDensityCheck
215 MENU_OPT_INC tPSCR_O2_drop, oPSCR_drop 215 MENU_OPT_INC tPSCR_O2_drop, oPSCR_drop
216 MENU_OPT_INC tPSCR_lungratio, oPSCR_lungratio 216 MENU_OPT_INC tPSCR_lungratio, oPSCR_lungratio
217 MENU_CALL tBack, do_return_menu_ccr 217 MENU_CALL tBack, do_return_menu_ccr
218 MENU_END 218 MENU_END
219 ENDIF ; _external_sensor 219 ENDIF ; _external_sensor_eccr
220 220
221 ENDIF ; _ccr_pscr 221 ENDIF ; _ccr_pscr
222 222
223 223
224 IFDEF _external_sensor 224 IFDEF _external_sensor_eccr
225 225
226 ;----------------------------------------------------------------------------- 226 ;-----------------------------------------------------------------------------
227 ; Calibration Menu 227 ; Calibration Menu
228 ; 228 ;
229 do_menu_calibrate: 229 do_menu_calibrate:
248 WAITMS d'250' ; wait for HUD v3 248 WAITMS d'250' ; wait for HUD v3
249 movlw .9 ; load index of sensor mV custom view 249 movlw .9 ; load index of sensor mV custom view
250 movff WREG,customview_surfmode ; show this custom view when back in surface mode 250 movff WREG,customview_surfmode ; show this custom view when back in surface mode
251 bra do_restart ; exit menu 251 bra do_restart ; exit menu
252 252
253 ENDIF ; _external_sensor 253 ENDIF ; _external_sensor_eccr
254 254
255 255
256 IFDEF _ccr_pscr 256 IFDEF _ccr_pscr
257 257
258 ;----------------------------------------------------------------------------- 258 ;-----------------------------------------------------------------------------
805 805
806 ;----------------------------------------------------------------------------- 806 ;-----------------------------------------------------------------------------
807 ; Dive Settings Menu - 1st Layer 807 ; Dive Settings Menu - 1st Layer
808 ; 808 ;
809 do_menu_dive: 809 do_menu_dive:
810 btfsc dn_flag ; force menu all caps in dn hardware
811 bsf force_all_caps
810 MENU_BEGIN tDiveModeMenu, .6 812 MENU_BEGIN tDiveModeMenu, .6
811 MENU_CALL tDiveSetup, do_menu_dive_dive ; dive setup 813 MENU_CALL tDiveSetup, do_menu_dive_dive ; dive setup
812 MENU_CALL tDecoSetup, do_menu_dive_deco ; deco setup 814 MENU_CALL tDecoSetup, do_menu_dive_deco ; deco setup
813 MENU_CALL tSACSetup, do_menu_dive_SAC ; SAC setup 815 MENU_CALL tSACSetup, do_menu_dive_SAC ; SAC setup
814 MENU_CALL tppO2Setup, do_menu_dive_ppO2 ; ppO2 limits 816 MENU_CALL tppO2Setup, do_menu_dive_ppO2 ; ppO2 limits
954 MENU_DYNAMIC dyn_ppo2_max_deco, do_toggle_ppO2_max_deco ; max deco 956 MENU_DYNAMIC dyn_ppo2_max_deco, do_toggle_ppO2_max_deco ; max deco
955 MENU_DYNAMIC dyn_ppo2_min, do_toggle_ppO2_min ; min OC 957 MENU_DYNAMIC dyn_ppo2_min, do_toggle_ppO2_min ; min OC
956 MENU_OPT_INC tIBCDwarning, oEnable_IBCD ; IBCD warning 958 MENU_OPT_INC tIBCDwarning, oEnable_IBCD ; IBCD warning
957 MENU_CALL tBack, do_return_menu_dive 959 MENU_CALL tBack, do_return_menu_dive
958 ELSE 960 ELSE
961 btfsc dn_flag ; force menu all caps in dn hardware
962 bsf force_all_caps
959 MENU_BEGIN tppO2Setup, .4 963 MENU_BEGIN tppO2Setup, .4
960 MENU_DYNAMIC dyn_ppo2_max, do_toggle_ppO2_max_work ; max work 964 MENU_DYNAMIC dyn_ppo2_max, do_toggle_ppO2_max_work ; max work
961 MENU_DYNAMIC dyn_ppo2_max_deco, do_toggle_ppO2_max_deco ; max deco 965 MENU_DYNAMIC dyn_ppo2_max_deco, do_toggle_ppO2_max_deco ; max deco
962 MENU_DYNAMIC dyn_ppo2_min, do_toggle_ppO2_min ; min OC 966 MENU_DYNAMIC dyn_ppo2_min, do_toggle_ppO2_min ; min OC
963 MENU_CALL tBack, do_return_menu_dive 967 MENU_CALL tBack, do_return_menu_dive
1136 1140
1137 ;----------------------------------------------------------------------------- 1141 ;-----------------------------------------------------------------------------
1138 ; Settings Menu - 1st Layer 1142 ; Settings Menu - 1st Layer
1139 ; 1143 ;
1140 do_menu_settings: 1144 do_menu_settings:
1145 btfsc dual_comm ; Dual comm hardware (USB and BLE-only)?
1146 bra do_menu_settings_dual_comm ; Use this menu here on the first layer
1147
1141 IFDEF _hwos_sport 1148 IFDEF _hwos_sport
1142 bsf ble_available ; required for very old OSTC sport 1149 bsf ble_available ; required for very old OSTC sport
1143 ENDIF 1150 ENDIF
1144 btfsc ble_available ; BT available? 1151 btfsc ble_available ; BT available?
1145 bra do_menu_settings_bt ; YES - do BT menu 1152 bra do_menu_settings_bt ; YES - do BT menu
1177 MENU_CALL tDispSets, do_menu_dispsets 1184 MENU_CALL tDispSets, do_menu_dispsets
1178 MENU_CALL tSysSets, do_menu_syssets 1185 MENU_CALL tSysSets, do_menu_syssets
1179 MENU_CALL tBack, do_return_main_menu 1186 MENU_CALL tBack, do_return_main_menu
1180 MENU_END 1187 MENU_END
1181 1188
1189 do_menu_settings_dual_comm:
1190 MENU_BEGIN tSystSets, .7
1191 MENU_CALL tInfoMenu, do_menu_info
1192 MENU_CALL tBleTitle, do_comm_mode_bt
1193 MENU_CALL tUsbTitle, do_comm_mode_usb
1194 MENU_CALL tSetTimeDate, do_menu_date_time
1195 MENU_CALL tDispSets, do_menu_dispsets
1196 MENU_CALL tSysSets, do_menu_syssets
1197 MENU_CALL tBack, do_return_main_menu
1198 MENU_END
1199
1182 1200
1183 ;----------------------------------------------------------------------------- 1201 ;-----------------------------------------------------------------------------
1184 ; Call Functions - start Communication Mode (BT and USB) 1202 ; Call Functions - start Communication Mode (BT and USB)
1185 ; 1203 ;
1186 do_comm_mode_bt: 1204 do_comm_mode_bt:
1292 ;----------------------------------------------------------------------------- 1310 ;-----------------------------------------------------------------------------
1293 ; Settings Menu - 2nd Layer - System Infos - Page 2 1311 ; Settings Menu - 2nd Layer - System Infos - Page 2
1294 ; 1312 ;
1295 do_menu_info2: 1313 do_menu_info2:
1296 IFNDEF _comm_debug 1314 IFNDEF _comm_debug
1297 MENU_BEGIN tInfoMenu, .6 1315 MENU_BEGIN tInfoMenu, .7
1298 MENU_DYNAMIC dyn_show_battery_volts, 0 1316 MENU_DYNAMIC dyn_show_battery_volts, 0
1299 MENU_DYNAMIC dyn_show_battery_cycles, 0 1317 MENU_DYNAMIC dyn_show_battery_cycles, 0
1300 MENU_DYNAMIC dyn_show_config, 0 1318 MENU_DYNAMIC dyn_show_config, 0
1319 MENU_DYNAMIC dyn_show_config2, 0
1301 MENU_DYNAMIC dyn_show_sensor_calib, 0 1320 MENU_DYNAMIC dyn_show_sensor_calib, 0
1302 MENU_DYNAMIC dyn_show_sensor_offset, 0 1321 MENU_DYNAMIC dyn_show_sensor_offset, 0
1303 MENU_CALL tBack, do_return_menu_settings_deeper 1322 MENU_CALL tBack, do_return_menu_settings_deeper
1304 MENU_END 1323 MENU_END
1305 ELSE 1324 ELSE
1353 PUTC "-" ; print a separator 1372 PUTC "-" ; print a separator
1354 movlw FW_CONF ; get firmware configuration 1373 movlw FW_CONF ; get firmware configuration
1355 output_hex ; print as hex 1374 output_hex ; print as hex
1356 call get_cpu_version ; get CPU version 1375 call get_cpu_version ; get CPU version
1357 output_hex ; print as hex 1376 output_hex ; print as hex
1358 btfss less_io_cpu ; =1: OSTC has a CPU with less I/O pins
1359 return ; Done. 1377 return ; Done.
1360 PUTC "*" 1378
1379 dyn_show_config2:
1380 STRCAT_TEXT tHardware ; print text
1381 movf HW_variants2,W ; copy hardware variants2 to WREG
1382 output_hex ; print as hex
1383 movf HW_variants3,W ; copy hardware variants3 to WREG
1384 output_hex ; print as hex
1385 PUTC "/" ; print a separator
1386 movff i2c_error_counter+1,WREG
1387 output_hex ; print as hex
1388 movff i2c_error_counter+0,WREG
1389 output_hex ; print as hex
1361 return ; Less I/O CPU done. 1390 return ; Less I/O CPU done.
1362
1363 1391
1364 ;----------------------------------------------------------------------------- 1392 ;-----------------------------------------------------------------------------
1365 ; dynamic Title - show Pressure Sensor Calibration Data C1 and C5 1393 ; dynamic Title - show Pressure Sensor Calibration Data C1 and C5
1366 ; 1394 ;
1367 dyn_show_sensor_calib: 1395 dyn_show_sensor_calib:
1596 1624
1597 ;----------------------------------------------------------------------------- 1625 ;-----------------------------------------------------------------------------
1598 ; Settings Menu - 3rd Layer - Display Settings - Brightness 1626 ; Settings Menu - 3rd Layer - Display Settings - Brightness
1599 ; 1627 ;
1600 do_menu_Brightness: 1628 do_menu_Brightness:
1629 btfss ambient_sensor
1630 bra do_menu_Brightness2
1631
1601 MENU_BEGIN tBright, .4 1632 MENU_BEGIN tBright, .4
1602 MENU_OPT_INC tBrightDive, oBrightness_dive 1633 MENU_OPT_INC tBrightDive, oBrightness_dive
1603 MENU_OPT_INC tBrightSurface, oBrightness_surface 1634 MENU_OPT_INC tBrightSurface, oBrightness_surface
1604 MENU_OPT_INC tUseAmbientSensor, oUseAmbientSensor 1635 MENU_OPT_INC tUseAmbientSensor, oUseAmbientSensor
1605 MENU_CALL tBack, do_return_dispsets_menu 1636 MENU_CALL tBack, do_return_dispsets_menu
1606 MENU_END 1637 MENU_END
1607 1638
1639 do_menu_Brightness2:
1640 MENU_BEGIN tBright, .3
1641 MENU_OPT_INC tBrightDive, oBrightness_dive
1642 MENU_OPT_INC tBrightSurface, oBrightness_surface
1643 MENU_CALL tBack, do_return_dispsets_menu
1644 MENU_END
1608 1645
1609 ;----------------------------------------------------------------------------- 1646 ;-----------------------------------------------------------------------------
1610 ; Settings Menu - 3rd Layer - Display Settings - Color Schemes 1647 ; Settings Menu - 3rd Layer - Display Settings - Color Schemes
1611 ; 1648 ;
1612 do_menu_color_scheme: 1649 do_menu_color_scheme:
1632 MENU_OPT_INC t2ndDepth, o2ndDepthDisp 1669 MENU_OPT_INC t2ndDepth, o2ndDepthDisp
1633 MENU_OPT_INC tTissueGraphics, oTissueGraphics 1670 MENU_OPT_INC tTissueGraphics, oTissueGraphics
1634 MENU_CALL tBack, do_return_menu_settings_deeper 1671 MENU_CALL tBack, do_return_menu_settings_deeper
1635 MENU_END 1672 MENU_END
1636 ELSE 1673 ELSE
1674 btfsc dn_flag ; force menu all caps in dn hardware
1675 bsf force_all_caps
1637 MENU_BEGIN tDispSets, .6 1676 MENU_BEGIN tDispSets, .6
1638 MENU_OPT_INC tVSIgraph, oVSIgraph 1677 MENU_OPT_INC tVSIgraph, oVSIgraph
1639 MENU_OPT_INC tVSItext2, oVSItext 1678 MENU_OPT_INC tVSItext2, oVSItext
1640 MENU_OPT_INC tShowppO2, oShowppO2 1679 MENU_OPT_INC tShowppO2, oShowppO2
1641 MENU_OPT_INC tDepthWarning, oDepthWarn 1680 MENU_OPT_INC tDepthWarning, oDepthWarn
1673 1712
1674 ;----------------------------------------------------------------------------- 1713 ;-----------------------------------------------------------------------------
1675 ; Settings Menu - 2nd Layer - System Settings 1714 ; Settings Menu - 2nd Layer - System Settings
1676 ; 1715 ;
1677 do_menu_syssets: 1716 do_menu_syssets:
1717 btfsc dn_flag ; dn hardware?
1718 bra do_menu_syssets_dn ; YES
1719 btfsc dual_comm ; Dual comm hardware?
1720 bra do_menu_syssets_dual_comm ; YES
1678 btfsc battery_gauge_available ; piezo buttons available? 1721 btfsc battery_gauge_available ; piezo buttons available?
1679 bra do_menu_syssets_piezo ; YES 1722 bra do_menu_syssets_piezo ; YES
1680 1723
1724 do_menu_syssets_dual_comm:
1725 do_menu_syssets_mechanical:
1681 IFDEF _compass 1726 IFDEF _compass
1682 MENU_BEGIN tSystSets, .4 ; All MENU_CALLs in this menu 1727 MENU_BEGIN tSystSets, .4 ; All MENU_CALLs in this menu
1683 MENU_CALL tCompassMenu, do_menu_compass ; need to stay together on this 1728 MENU_CALL tCompassMenu, do_menu_compass ; need to stay together on this
1684 MENU_CALL tLogOffset, do_menu_log_offset ; menu level in order to not 1729 MENU_CALL tLogOffset, do_menu_log_offset ; menu level in order to not
1685 MENU_CALL tResetMenu, do_menu_reset ; mess up the menu stack on doing 1730 MENU_CALL tResetMenu, do_menu_reset ; mess up the menu stack on doing
1691 MENU_CALL tResetMenu, do_menu_reset ; 1736 MENU_CALL tResetMenu, do_menu_reset ;
1692 MENU_CALL tBack, do_return_menu_settings ; 1737 MENU_CALL tBack, do_return_menu_settings ;
1693 MENU_END 1738 MENU_END
1694 ENDIF ; _compass 1739 ENDIF ; _compass
1695 1740
1741
1742 do_menu_syssets_dn:
1743 IFDEF _compass
1744 MENU_BEGIN tSystSets, .5 ; All MENU_CALLs in this menu
1745 MENU_CALL tCompassMenu, do_menu_compass ; need to stay together on this
1746 MENU_CALL tLogOffset, do_menu_log_offset ; menu level in order to not
1747 MENU_CALL tResetMenu, do_menu_reset ; mess up the menu stack on doing
1748 MENU_OPT_INC tBLE_Compatibility, oBLE_Compatibility ; BLE Compatibility mode
1749 MENU_CALL tBack, do_return_menu_settings ; the do_return_menu_settings !
1750 MENU_END
1751 ELSE
1752 MENU_BEGIN tSystSets, .4 ; see above
1753 MENU_CALL tLogOffset, do_menu_log_offset ;
1754 MENU_CALL tResetMenu, do_menu_reset ;
1755 MENU_OPT_INC tBLE_Compatibility, oBLE_Compatibility ; BLE Compatibility mode
1756 MENU_CALL tBack, do_return_menu_settings ;
1757 MENU_END
1758 ENDIF ; _compass
1759
1760
1696 do_menu_syssets_piezo: 1761 do_menu_syssets_piezo:
1697 IFDEF _compass 1762 IFDEF _compass
1698 MENU_BEGIN tSystSets, .5 1763 MENU_BEGIN tSystSets, .5
1699 MENU_CALL tCompassMenu, do_menu_compass ; see above 1764 MENU_CALL tCompassMenu, do_menu_compass ; see above
1700 MENU_CALL tLogOffset, do_menu_log_offset ; 1765 MENU_CALL tLogOffset, do_menu_log_offset ;
1895 1960
1896 ;----------------------------------------------------------------------------- 1961 ;-----------------------------------------------------------------------------
1897 ; Settings Menu - 3rd Layer - System Settings - Reset Menus 1962 ; Settings Menu - 3rd Layer - System Settings - Reset Menus
1898 ; 1963 ;
1899 do_menu_reset: 1964 do_menu_reset:
1965 btfsc dn_flag
1966 bra do_menu_reset_dn
1900 MENU_BEGIN tResetMenu, .7 1967 MENU_BEGIN tResetMenu, .7
1901 MENU_CALL tBack, do_return_menu_syssets_more 1968 MENU_CALL tBack, do_return_menu_syssets_more
1902 MENU_CALL tReboot, do_menu_reset_reboot ; confirm 1969 MENU_CALL tReboot, do_menu_reset_reboot ; confirm
1903 MENU_CALL tResetDeco, do_menu_reset_deco ; confirm 1970 MENU_CALL tResetDeco, do_menu_reset_deco ; confirm
1904 MENU_CALL tResetSettings, do_menu_reset_settings ; confirm 1971 MENU_CALL tResetSettings, do_menu_reset_settings ; confirm
1905 MENU_CALL tResetLogbook, do_menu_reset_logbook ; confirm 1972 MENU_CALL tResetLogbook, do_menu_reset_logbook ; confirm
1906 MENU_CALL tResetBattery, do_menu_reset_battery ; confirm 1973 MENU_CALL tResetBattery, do_menu_reset_battery ; confirm
1907 MENU_CALL tResetBLE2, do_menu_reset_ble2 ; Configure the new BLE module 1974 MENU_CALL tResetBLE2, do_menu_reset_ble2 ; (Re-) Configure the new BLE module
1975 MENU_END
1976
1977 do_menu_reset_dn: ; no reset battery for dn
1978 MENU_BEGIN tResetMenu, .6
1979 MENU_CALL tBack, do_return_menu_syssets_more
1980 MENU_CALL tReboot, do_menu_reset_reboot ; confirm
1981 MENU_CALL tResetDeco, do_menu_reset_deco ; confirm
1982 MENU_CALL tResetSettings, do_menu_reset_settings ; confirm
1983 MENU_CALL tResetLogbook, do_menu_reset_logbook ; confirm
1984 MENU_CALL tResetBLE2, do_menu_reset_ble2 ; (Re-) Configure the new BLE module
1908 MENU_END 1985 MENU_END
1909 1986
1910 1987
1911 ;----------------------------------------------------------------------------- 1988 ;-----------------------------------------------------------------------------
1912 ; Settings Menu - 4th Layer - System Settings - Reset - Reboot / FW Recovery 1989 ; Settings Menu - 4th Layer - System Settings - Reset - Reboot / FW Recovery
2153 ; 0x52: BLE and ambient sensor and low volt core ---> OSTC Sport (BLE model) YES NO 1.5V 3.6V disposable 3.6V rechargeable 2230 ; 0x52: BLE and ambient sensor and low volt core ---> OSTC Sport (BLE model) YES NO 1.5V 3.6V disposable 3.6V rechargeable
2154 2231
2155 btfsc dn_flag 2232 btfsc dn_flag
2156 bra use_404050_battery 2233 bra use_404050_battery
2157 2234
2235 btfsc dual_comm
2236 bra use_404050_battery
2237
2158 movlw 0x11 ; OSTC 2 (2015 model) 2238 movlw 0x11 ; OSTC 2 (2015 model)
2159 cpfseq HW_descriptor 2239 cpfseq HW_descriptor
2160 bra $+4 2240 bra $+4
2161 bra use_18650_battery 2241 bra use_18650_battery
2162 2242
2336 2416
2337 ;----------------------------------------------------------------------------- 2417 ;-----------------------------------------------------------------------------
2338 ; Helper Function - finish Battery Selection 2418 ; Helper Function - finish Battery Selection
2339 ; 2419 ;
2340 use_batt_exit: 2420 use_batt_exit:
2341 call reset_battery_gauge_and_lt2942 ; reset battery hard- and software gauge 2421 call reset_battery_gauge_and_lt2942 ; reset battery hard- and software gauge
2342 2422
2343 use_batt_exit_1: 2423 use_batt_exit_1:
2344 IFNDEF _screendump 2424 IFNDEF _screendump
2345 bcf comm_mode_disabled ; re-enable COMM mode again 2425 bcf comm_mode_disabled ; re-enable COMM mode again
2346 ENDIF 2426 ENDIF
2401 2481
2402 ; rechargeable user-changeable 3.7 Volt Lithium-ion 2482 ; rechargeable user-changeable 3.7 Volt Lithium-ion
2403 setup_new_panasonic: 2483 setup_new_panasonic:
2404 bcf charge_disable ; release charging-inhibit signal 2484 bcf charge_disable ; release charging-inhibit signal
2405 bsf charge_enable ; tristate charging-inhibit signal 2485 bsf charge_enable ; tristate charging-inhibit signal
2406 MOVLI capacity_panasonic_internal, battery_capacity_internal 2486 MOVLI capacity_14500_internal, battery_capacity_internal
2407 MOVLI capacity_panasonic, battery_capacity 2487 MOVLI capacity_14500, battery_capacity
2408 MOVLI offset_panasonic, battery_offset 2488 MOVLI offset_14500, battery_offset
2409 movlw .2 2489 movlw .2
2410 movwf battery_type 2490 movwf battery_type
2411 return 2491 return
2412 2492
2413 ; rechargeable internal Lithium-ion 2493 ; rechargeable internal Lithium-ion
2438 2518
2439 ; rechargeable internal Lithium-ion 404050 2519 ; rechargeable internal Lithium-ion 404050
2440 setup_new_404050: 2520 setup_new_404050:
2441 bcf charge_disable ; release charging-inhibit signal 2521 bcf charge_disable ; release charging-inhibit signal
2442 bsf charge_enable ; tristate charging-inhibit signal 2522 bsf charge_enable ; tristate charging-inhibit signal
2523
2443 CLRI battery_capacity_internal 2524 CLRI battery_capacity_internal
2444 MOVLI capacity_404050, battery_capacity 2525 MOVLI capacity_404050, battery_capacity
2445 MOVLI offset_404050, battery_offset 2526 MOVLI offset_404050, battery_offset
2446 movlw .5 2527 movlw .5
2447 movwf battery_type 2528 movwf battery_type