annotate src/sleepmode.asm @ 631:185ba2f91f59

3.09 beta 1 release
author heinrichsweikamp
date Fri, 28 Feb 2020 15:45:07 +0100
parents 237931377539
children 4050675965ea
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
heinrichsweikamp
parents:
diff changeset
1 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
2 ;
631
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
3 ; File sleepmode.asm combined next generation V3.08.8
0
heinrichsweikamp
parents:
diff changeset
4 ;
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
5 ; Sleep Mode
0
heinrichsweikamp
parents:
diff changeset
6 ;
heinrichsweikamp
parents:
diff changeset
7 ; Copyright (c) 2011, JD Gascuel, HeinrichsWeikamp, all right reserved.
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
8 ;==============================================================================
0
heinrichsweikamp
parents:
diff changeset
9 ; HISTORY
heinrichsweikamp
parents:
diff changeset
10 ; 2011-08-12 : [mH] moving from OSTC code
heinrichsweikamp
parents:
diff changeset
11
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
12 #include "hwos.inc" ; Mandatory header
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
13 #include "shared_definitions.h" ; Mailbox from/to p2_deco.c
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
14 #include "surfmode.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
15 #include "tft.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
16 #include "start.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
17 #include "adc_lightsensor.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
18 #include "math.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
19 #include "ms5541.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
20 #include "eeprom_rs232.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
21 #include "external_flash.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
22 #include "ghostwriter.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
23 #include "i2c.inc"
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
24 #include "mcp.inc"
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
25 #include "wait.inc"
629
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
26 #include "tft_outputs.inc"
0
heinrichsweikamp
parents:
diff changeset
27
133
939f1e83c4c2 BUGFIX: Surface interval was not displayed correctly in some cases
heinrichsweikamp
parents: 123
diff changeset
28
631
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
29 extern eeprom_deco_data_write
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
30 extern option_check_and_store_all
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
31 extern power_up_switches ; from hwos.asm
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
32
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
33
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
34 ;---- Private local Variables -------------------------------------------------
133
939f1e83c4c2 BUGFIX: Surface interval was not displayed correctly in some cases
heinrichsweikamp
parents: 123
diff changeset
35
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
36 CBLOCK local1 ; max size is 16 Byte !!!
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
37 accel_reference ; acceleration reference value for detecting movement / terminating deep sleep
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
38 sm_timer_10sec ; timer for 10 seconds tasks (pressure check)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
39 sm_timer_10min ; timer for 10 minutes tasks (tissue updating)
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
40 ;sm_timer_15min ; timer for 15 minutes tasks (entering deep sleep)
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
41 sm_10min_counter ; count #of 10 minutes
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
42 loop_counter ; loop counter, used in init_avg_switches routine
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
43 sm_flags ; local flags
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
44 ENDC ; used: 6 byte, remaining: 10 byte
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
45
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
46
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
47 ;---- Private local Flags -----------------------------------------------------
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
48
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
49 #DEFINE deep_sleep sm_flags,0 ; =1: in deep sleep mode, =0: normal sleep
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
50 #DEFINE desat_on_10_mins sm_flags,1 ; =1: calculate desaturation every 10 minutes, =0: every minute
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
51 #DEFINE charge_in_sleep sm_flags,2 ; =1: show charging screen
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
52 ; sm_flags,3 ; unused
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
53 ; sm_flags,4 ; unused
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
54 ; sm_flags,5 ; unused
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
55 ; sm_flags,6 ; unused
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
56 ; sm_flags,7 ; unused
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
57
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
58
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
59 slmode CODE
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
60
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
61 ;==============================================================================
0
heinrichsweikamp
parents:
diff changeset
62
heinrichsweikamp
parents:
diff changeset
63 global sleeploop
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
64 sleeploop:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
65 clrf STKPTR ; clear return addresses stack
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
66 call request_speed_normal ; request CPU speed switch to normal speed
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
67
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
68 bcf LEDg ; turn off green LED / release reset to RX circuitry
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
69 bcf LEDr ; turn off red LED
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
70
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
71 IFDEF _screendump
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
72 bcf screen_dump_avail ; disable screen dump function
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
73 ENDIF
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
74
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
75 bsf sleepmode ; flag being in sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
76 bsf block_sensor_interrupt ; suspend ISR from executing sensor interrupts
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
77
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
78 call disable_ir_s8 ; power-down IR/S8 interrupts
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
79 call mcp_sleep ; power-down RX power supply
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
80
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
81 clrf ADCON0 ; power-down ADC module
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
82 call disable_rs232 ; power-down USB
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
83 call I2C_sleep_compass ; power-down compass
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
84
631
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
85 call eeprom_deco_data_write ; update deco data in EEPROM
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
86 call eeprom_battery_gauge_write ; update battery gauge in EEPROM
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
87
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
88 btfsc options_changed ; do the options need to be stored to EEPROM ?
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
89 call option_check_and_store_all ; YES - check and store all option values in EEPROM
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
90 bcf options_changed ; clear flag
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
91
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
92 call ext_flash_enable_protection ; enable write protection on external flash
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
93
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
94 clrf sm_timer_10sec ; clear 10 seconds timer
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
95 clrf sm_timer_10min ; clear 10 minutes timer
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
96 clrf sm_10min_counter ; clear 10mins counter
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
97 clrf sm_flags ; clear all local flags
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
98
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
99 call TFT_Display_FadeOut ; power-down backlight
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
100 call TFT_DisplayOff ; power-down display
631
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
101
0
heinrichsweikamp
parents:
diff changeset
102 sleeploop_loop:
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
103 btfsc trigger_full_second ; one second in sleep?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
104 rcall one_sec_sleep ; YES - check switches, pressure sensor, etc.
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
105
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
106 btfss sleepmode ; shall terminate sleep mode?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
107 bra sleeploop_exit ; YES
0
heinrichsweikamp
parents:
diff changeset
108
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
109 rcall sleepmode_sleep ; wait at least 35 ms (every 62.5 ms timer7 wakeup)
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
110
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
111 btfss deep_sleep ; shall enter deep sleep?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
112 bra sleeploop_loop ; NO - remain in normal sleep loop
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
113 ;bra deepsleep_pre ; YES - enter deep sleep loop
0
heinrichsweikamp
parents:
diff changeset
114
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
115 deepsleep_pre:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
116 bcf PIE1,0 ; disable timer 1 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
117 bcf PIE2,1 ; disable timer 2 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
118 bcf PIE5,3 ; disable timer 7 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
119 bcf INTCON,4 ; disable INT0 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
120 bcf INTCON3,3 ; disable INT1 interrupt
0
heinrichsweikamp
parents:
diff changeset
121
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
122 bcf power_sw1 ; power-down switch 1
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
123 bcf power_sw2 ; power-down switch 2
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
124
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
125 rcall deepsleep_get_accel ; read accelerometer into WREG
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
126 movwf accel_reference ; store as reference value
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
127 tstfsz accel_reference ; = 0 ?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
128 bra deepsleep_loop ; NO - continue
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
129 bra deepsleep_loop_exit ; YES - no deep sleep (fail-safe)
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
130
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
131 deepsleep_loop:
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
132 btfsc trigger_full_second ; one second in deep sleep?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
133 rcall check_accelerometer ; YES - check accelerometer
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
134
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
135 btfsc trigger_full_second ; one second in deep sleep?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
136 rcall one_sec_sleep ; YES - check switches, check pressure sensor, etc.
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
137
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
138 rcall sleepmode_sleep ; wait at least 35 ms (every 62.5 ms timer7 wakeup)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
139
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
140 btfss sleepmode ; shall leave sleep mode?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
141 bcf deep_sleep ; YES - leave deep sleep mode then, too
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
142
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
143 btfsc deep_sleep ; shall leave deep sleep mode?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
144 bra deepsleep_loop ; NO - loop in deep sleep loop
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
145
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
146 deepsleep_loop_exit:
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
147 bcf deep_sleep ; clear flag (again)
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
148 clrf sm_10min_counter ; clear 10mins counter
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
149 call power_up_switches ; turn on the analog switches
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
150 rcall init_avg_switches ; initialize the averaging system
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
151
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
152 bsf PIE1,0 ; enable timer 1 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
153 bsf PIE2,1 ; enable timer 2 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
154 bsf PIE5,3 ; enable timer 7 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
155 bsf INTCON,4 ; enable INT0 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
156 bsf INTCON3,3 ; enable INT1 interrupt
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
157
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
158 bra sleeploop_loop ; enter normal sleep loop
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
159
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
160
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
161 sleeploop_exit:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
162 bcf switch_left ; eventually clear left button event
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
163 bcf switch_right ; eventually clear right button event
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
164 movlw .0 ; reset ISR sensor state machine
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
165 movff WREG,sensor_state_counter ; ...
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
166 bcf PIR5,TMR7IF ; clear timer 7, driving the ISR sensor interrupts
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
167 bcf block_sensor_interrupt ; re-enable execution of the ISR sensor interrupts
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
168 goto restart ; restart
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
169
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
170
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
171 one_sec_sleep:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
172 ; tasks every second in sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
173 bcf trigger_full_second ; clear trigger flag
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
174
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
175 btfsc switch_left ; left switch pressed?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
176 bcf sleepmode ; YES - terminate sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
177
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
178 btfsc switch_right ; right switch pressed?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
179 bcf sleepmode ; YES - terminate sleep mode
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
180
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
181 btfsc battery_gauge_available ; is a battery gauge IC available?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
182 bra one_sec_sleep_1 ; YES - check for charger
629
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
183 btfsc ble_available ; Skip "USB" check in all Bluetooth models (Required for very old OSTC sport)
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
184 bra one_sec_sleep_2 ; - continue
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
185 btfsc vusb_in ; NO - USB plugged in?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
186 bcf sleepmode ; YES - terminate sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
187 bra one_sec_sleep_2 ; - continue
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
188
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
189 one_sec_sleep_1:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
190 call get_battery_voltage ; check for charger
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
191
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
192 ; Test if charging
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
193 btfss cc_active ; charging?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
194 bra one_sec_sleep_1a ; NO
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
195 btfsc charge_in_sleep ; YES - already showing charge screen?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
196 bra one_sec_sleep_1b ; YES - only update data
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
197
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
198 bsf charge_in_sleep
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
199 bcf deep_sleep ; wake-up from deepsleep
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
200 call TFT_boot ; initialize TFT (includes clear screen)
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
201 movlw .32
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
202 movff WREG,max_CCPR1L ; bank safe
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
203 call TFT_Display_FadeIn ; dim up the display
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
204 one_sec_sleep_1b:
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
205 call TFT_batt_surfmode ; show battery type, voltage and color-coded percentage
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
206 bra one_sec_sleep_2 ; continue
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
207
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
208 one_sec_sleep_1a:
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
209 btfss charge_in_sleep ; was showing charge screen?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
210 bra one_sec_sleep_2 ; NO
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
211
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
212 ; yes, power-down screen
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
213 call TFT_Display_FadeOut ; power-down backlight
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
214 call TFT_DisplayOff ; power-down display
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
215 bcf charge_in_sleep
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
216
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
217
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
218 one_sec_sleep_2:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
219 incf sm_timer_10sec,F ; increment 10 seconds timer
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
220 movlw .10 ; load a 10 into WREG
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
221 cpfslt sm_timer_10sec ; timer < 10 yet?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
222 rcall ten_sec_sleep ; NO - do the every 10 second tasks
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
223
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
224 btfsc trigger_full_minute ; one minute in sleep?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
225 rcall one_min_sleep ; YES - do the every minute tasks
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
226
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
227 btfsc trigger_full_hour ; one hour in sleep?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
228 rcall one_hour_sleep ; YES - do the every hour tasks
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
229
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
230 return ; done
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
231
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
232
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
233 ten_sec_sleep:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
234 ; tasks every 10 seconds in sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
235 clrf sm_timer_10sec ; clear timer
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
236 rcall pressuretest_sleep_fast ; get pressure without averaging (faster)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
237 MOVLI wake_up_from_sleep,sub_a ; load wake-up pressure (1160 mbar) into sub_a
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
238 MOVII pressure_abs, sub_b ; load current absolute pressure into sub_b
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
239 call cmpU16 ; sub_a - sub_b = wake-up pressure - current absolute pressure
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
240 btfsc neg_flag ; is the current absolute pressure > 1160 mbar ?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
241 bcf sleepmode ; YES - terminate sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
242 return ; done
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
243
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
244
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
245 one_min_sleep:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
246 ; tasks every minute in sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
247 bcf trigger_full_minute ; clear flag
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
248
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
249 ; tick the 10 minutes timer
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
250 incf sm_timer_10min,F ; increment 10 minutes timer
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
251 movlw .10 ; load a 10 into WREG
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
252 cpfslt sm_timer_10min ; timer < 10 yet?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
253 rcall ten_min_sleep ; NO - do the every 10 minutes tasks
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
254
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
255 one_min_sleep_1:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
256 ; continue tasks every minute
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
257 btfsc desat_on_10_mins ; shall do desaturation calculation on 10 minute intervals?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
258 return ; YES - that's not here then, so done
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
259 call deco_calc_dive_interval_1min ; NO - calculate 1 minute at surface conditions (C-code)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
260 banksel common ; - back to bank common
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
261 return ; - done
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
262
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
263
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
264 ten_min_sleep:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
265 ; tasks every 10 minutes in sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
266 clrf sm_timer_10min ; reset timer to 0
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
267
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
268 call sample_surface_pressure ; sample surface pressure and update ISR and deco engine
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
269
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
270 btfss analog_switches ; OSTC with analog switches?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
271 bra ten_min_sleep_0 ; NO - no analog switches, no deep sleep required
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
272
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
273 ; check if we need to enter deep sleep
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
274 incf sm_10min_counter,F ; count
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
275 movlw deep_sleep_10mins ; threshold
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
276 cpfseq sm_10min_counter ; threshold reached?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
277 bra ten_min_sleep_0 ; NO - threshold not reached yet
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
278
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
279 decf sm_10min_counter,F ; -1 to re-trigger every 10mins (in case of charging)
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
280
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
281 btfss cc_active ; charging?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
282 bsf deep_sleep ; NO - activate deep-sleep mode
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
283
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
284 ten_min_sleep_0:
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
285 btfss desat_on_10_mins ; shall do desaturation calculation on 10 minute intervals?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
286 bra ten_min_sleep_1 ; NO - continue checking if schedule can be switched to 10 minutes
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
287 call deco_calc_dive_interval_10min ; YES - calculate 10 minutes at surface conditions (C-code)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
288 banksel common ; - back to bank common
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
289 return ; - done
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
290
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
291 ten_min_sleep_1:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
292 movff int_O_lead_supersat+0,WREG ; get leading tissue's supersaturation (only the lower byte is used for the value)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
293 bsf desat_on_10_mins ; switch to 10 minute intervals by default
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
294 tstfsz WREG ; gradient factor = 0 ?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
295 bcf desat_on_10_mins ; NO - stay on 1 minute intervals
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
296 return ; done
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
297
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
298
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
299 one_hour_sleep:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
300 ; tasks every hour in sleep mode mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
301 bcf trigger_full_hour ; clear one hour flag
631
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
302 call eeprom_deco_data_write ; update deco data into EEPROM
185ba2f91f59 3.09 beta 1 release
heinrichsweikamp
parents: 629
diff changeset
303 call eeprom_battery_gauge_write ; update battery gauge into EEPROM
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
304 return ; done
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
305
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
306
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
307 init_avg_switches:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
308 ; pause 4 seconds using CPU sleep mode to conserve on battery
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
309 movlw .4 ; time to pause
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
310 movwf loop_counter ; initialize loop counter
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
311 bcf trigger_full_second ; clear 'one second elapsed' flag
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
312 activate_switches_1:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
313 rcall sleepmode_sleep ; wait at least 35 ms (every 62.5 ms timer7 wakeup)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
314 btfss trigger_full_second ; did 1 second elapsed meanwhile?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
315 bra activate_switches_1 ; NO - loop
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
316 bcf trigger_full_second ; YES - clear flag
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
317 decfsz loop_counter,F ; - decrement loop counter, done?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
318 bra activate_switches_1 ; NO - loop
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
319
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
320 ; initialize the averaging system
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
321 movlw .32 ; number of readout cycles
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
322 movwf loop_counter ; initialize loop counter
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
323 activate_switches_2:
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
324 call get_analog_switches ; do a analog switch readout
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
325 decfsz loop_counter,F ; decrement loop counter, done?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
326 bra activate_switches_2 ; NO - loop
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
327
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
328 ; clear all button events that may have intermediately occurred
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
329 bcf PIR1,TMR1IF ; clear button-hold-down timer
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
330 bcf INTCON,INT0IF ; clear right button activity
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
331 bcf INTCON3,INT1IF ; clear left button activity
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
332 bcf analog_sw1_pressed ; clear analog switch 1 activity
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
333 bcf analog_sw2_pressed ; clear analog switch 2 activity
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
334 bcf switch_right ; clear right button event
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
335 bcf switch_left ; clear left button event
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
336
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
337 ; done
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
338 return
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
339
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
340
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
341 check_accelerometer:
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
342 rcall deepsleep_get_accel ; read accelerometer into WREG
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
343 subwf accel_reference,W ; reference value - accel_DZ+0 -> WREG
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
344 btfsc STATUS,N ; result negative?
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
345 negf WREG ; YES - negate it
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
346 movwf lo ; save as change of acceleration in Z-axis
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
347 movlw .100 ; load threshold (mg)
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
348 cpfslt lo ; change of acceleration > threshold ?
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
349 bcf deep_sleep ; YES - terminate deep sleep mode
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
350 return ; done
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
351
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
352
490
8dfb93e80338 NEW: Deep Sleep mode for OSTC Plus and OSTC 2 (2017) (Entered automatically)
heinrichsweikamp
parents: 448
diff changeset
353 deepsleep_get_accel:
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
354 call I2C_init_compass ; start compass
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
355 rcall sleepmode_sleep ; wait a little bit
604
ca4556fb60b9 bump to 2.99beta, work on 3.00 stable
heinrichsweikamp
parents: 582
diff changeset
356 call I2C_RX_accelerometer ; read accelerometer
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
357 call I2C_RX_accelerometer ; read accelerometer
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
358 call I2C_sleep_compass ; shut down compass
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
359 movff accel_DZ+0,WREG ; transfer result to WREG
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
360 return ; done
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
361
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
362
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
363 pressuretest_sleep_fast: ; get pressure without averaging (faster to save some power in sleep mode)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
364 banksel isr_backup ; select bank ISR data
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
365
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
366 CLRI pressure_abs_avg ; clear pressure average register
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
367 CLRI temperature_avg ; clear temperature average register
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
368
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
369 call get_temperature_start ; start temperature integration (73.5 us)
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
370
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
371 rcall sleepmode_sleep ; wait at least 35 ms (every 62.5 ms timer7 wakeup)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
372 rcall sleepmode_sleep ; wait at least 35 ms (every 62.5 ms timer7 wakeup)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
373
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
374 call get_temperature_value ; state 1: get temperature
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
375 call get_pressure_start ; start pressure integration
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
376
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
377 rcall sleepmode_sleep ; wait at least 35 ms (every 62.5 ms timer7 wakeup)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
378 rcall sleepmode_sleep ; wait at least 35 ms (every 62.5 ms timer7 wakeup)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
379
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
380 call get_pressure_value ; state2: get pressure (51 us)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
381 call calculate_compensation ; calculate temperature compensated pressure (27 us)
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
382
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
383 MOVII pressure_abs_avg,pressure_abs ; get result, bypassing the averaging
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
384
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
385 banksel common ; back to bank common
582
b455b31ce022 work on 2.97 stable
heinrichsweikamp
parents: 560
diff changeset
386 return
0
heinrichsweikamp
parents:
diff changeset
387
heinrichsweikamp
parents:
diff changeset
388
heinrichsweikamp
parents:
diff changeset
389 sleepmode_sleep:
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
390 movff BSR,BSR_backup ; backup BSR
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
391
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
392 banksel common
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
393 btfsc charge_in_sleep ; already showing charge screen?
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
394 bra sleepmode_sleepwalk ; YES - skip the actual sleep (But wait)
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
395
629
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
396 ; banksel T7GCON ; switch bank, T7* is outside access RAM
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
397 ; clrf T7GCON ; reset timer7 gate control register
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
398 ; movlw b'10001101' ; 1:1 prescaler -> 2 seconds @ 32768 Hz, not synced
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
399 ; movwf T7CON
0
heinrichsweikamp
parents:
diff changeset
400 sleep
198
c511dc403d7e (Slightly) reduce current consumption in Eco and sleep mode
heinrichsweikamp
parents: 134
diff changeset
401 sleep
629
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
402 ; clrf T7GCON ; reset timer7 gate control register
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
403 ; movlw b'10001001' ; 1:1 prescaler -> 2 seconds @ 32768 Hz, synced
237931377539 3.07 stable release
heinrichsweikamp
parents: 628
diff changeset
404 ; movwf T7CON
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
405 sleepmode_sleep_1:
623
c40025d8e750 3.03 beta released
heinrichsweikamp
parents: 604
diff changeset
406 movff BSR_backup,BSR ; restore BSR
0
heinrichsweikamp
parents:
diff changeset
407 return
heinrichsweikamp
parents:
diff changeset
408
628
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
409
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
410 sleepmode_sleepwalk:
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
411 WAITMS d'65'
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
412 bra sleepmode_sleep_1
cd58f7fc86db 3.05 stable work
heinrichsweikamp
parents: 623
diff changeset
413
0
heinrichsweikamp
parents:
diff changeset
414 END