Mercurial > public > hwos_code

annotate src/customview.asm @ 224:5a4801918be9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
temporally disable "Copy disable flags from digital input" routine
author heinrichsweikamp
date Thu, 29 Jan 2015 18:18:15 +0100
parents 973a0969e0ac
children 94bf757690cf
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
heinrichsweikamp
parents:
diff changeset
1 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
2 ;
heinrichsweikamp
parents:
diff changeset
3 ; File customview.asm
heinrichsweikamp
parents:
diff changeset
4 ;
heinrichsweikamp
parents:
diff changeset
5 ; Customview in Surfacemode and Divemode
heinrichsweikamp
parents:
diff changeset
6 ;
heinrichsweikamp
parents:
diff changeset
7 ; Copyright (c) 2011, JD Gascuel, HeinrichsWeikamp, all right reserved.
heinrichsweikamp
parents:
diff changeset
8 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
9 ; HISTORY
heinrichsweikamp
parents:
diff changeset
10 ; 2011-08-10 : [mH] moving from OSTC code
heinrichsweikamp
parents:
diff changeset
11
heinrichsweikamp
parents:
diff changeset
12 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
13
heinrichsweikamp
parents:
diff changeset
14 #include "ostc3.inc" ; Mandatory header
heinrichsweikamp
parents:
diff changeset
15 #include "tft_outputs.inc"
heinrichsweikamp
parents:
diff changeset
16 #include "strings.inc"
heinrichsweikamp
parents:
diff changeset
17 #include "tft.inc"
heinrichsweikamp
parents:
diff changeset
18 #include "isr.inc"
heinrichsweikamp
parents:
diff changeset
19 #include "wait.inc"
heinrichsweikamp
parents:
diff changeset
20 #include "surfmode.inc"
heinrichsweikamp
parents:
diff changeset
21 #include "convert.inc"
heinrichsweikamp
parents:
diff changeset
22 #include "divemode.inc"
heinrichsweikamp
parents:
diff changeset
23 #include "i2c.inc"
heinrichsweikamp
parents:
diff changeset
24
heinrichsweikamp
parents:
diff changeset
25 gui CODE
heinrichsweikamp
parents:
diff changeset
26
heinrichsweikamp
parents:
diff changeset
27 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
28 ; Do every-second tasks for the custom view area (Dive mode)
heinrichsweikamp
parents:
diff changeset
29
heinrichsweikamp
parents:
diff changeset
30 global customview_second
heinrichsweikamp
parents:
diff changeset
31 customview_second:
heinrichsweikamp
parents:
diff changeset
32 movff menupos3,WREG ; copy
heinrichsweikamp
parents:
diff changeset
33 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
34 bra customview_1sec_view1
heinrichsweikamp
parents:
diff changeset
35 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
36 bra customview_1sec_view2
heinrichsweikamp
parents:
diff changeset
37 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
38 bra customview_1sec_view3
heinrichsweikamp
parents:
diff changeset
39 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
40 bra customview_1sec_view4
heinrichsweikamp
parents:
diff changeset
41 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
42 bra customview_1sec_view5
53
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
43 dcfsnz WREG,F
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
44 bra customview_1sec_view6
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
45 dcfsnz WREG,F
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
46 bra customview_1sec_view7
102
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
47 dcfsnz WREG,F
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
48 bra customview_1sec_view8
123
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
49 dcfsnz WREG,F
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
50 bra customview_1sec_view9
0
heinrichsweikamp
parents:
diff changeset
51 ; Menupos3=0, do nothing
heinrichsweikamp
parents:
diff changeset
52 return
heinrichsweikamp
parents:
diff changeset
53
heinrichsweikamp
parents:
diff changeset
54 customview_1sec_view3:
heinrichsweikamp
parents:
diff changeset
55 call TFT_decoplan ; Show decoplan
heinrichsweikamp
parents:
diff changeset
56 return
heinrichsweikamp
parents:
diff changeset
57 customview_1sec_view2:
heinrichsweikamp
parents:
diff changeset
58 call TFT_update_avr_stopwatch ; Update average depth and stopwatch
heinrichsweikamp
parents:
diff changeset
59 return
heinrichsweikamp
parents:
diff changeset
60 customview_1sec_view1:
192
efe70488a04b voting logic for external monitoring
heinrichsweikamp
parents: 189
diff changeset
61 call TFT_update_ppo2_sensors ; Update Sensor data
0
heinrichsweikamp
parents:
diff changeset
62 return
heinrichsweikamp
parents:
diff changeset
63 customview_1sec_view4:
heinrichsweikamp
parents:
diff changeset
64 call TFT_ead_end_tissues_clock ; Update EAD/END, Tissues and clock
heinrichsweikamp
parents:
diff changeset
65 return
heinrichsweikamp
parents:
diff changeset
66 customview_1sec_view5:
heinrichsweikamp
parents:
diff changeset
67 call TFT_gf_info ; Update GF informations
heinrichsweikamp
parents:
diff changeset
68 return
53
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
69 customview_1sec_view6:
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
70 ; Compass updated seperately (Faster) in divemode
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
71 return
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
72 customview_1sec_view7: ; Dynamic gaslist
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
73 call TFT_dyn_gaslist ; Update the gaslist
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
74 return
102
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
75 customview_1sec_view8: ; Sensor voltages
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
76 call TFT_hud_voltages ; Show HUD details
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
77 return
123
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
78 customview_1sec_view9: ; Ceiling
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
79 call TFT_ceiling ; Show Ceiling
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
80 return
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
81
0
heinrichsweikamp
parents:
diff changeset
82
heinrichsweikamp
parents:
diff changeset
83 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
84 ; Do every-minute tasks for the custom view area
heinrichsweikamp
parents:
diff changeset
85
heinrichsweikamp
parents:
diff changeset
86 global customview_minute
heinrichsweikamp
parents:
diff changeset
87 customview_minute:
heinrichsweikamp
parents:
diff changeset
88 return
heinrichsweikamp
parents:
diff changeset
89 ; movff menupos3,WREG ; copy
heinrichsweikamp
parents:
diff changeset
90 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
91 ; bra customview_1min_view1
heinrichsweikamp
parents:
diff changeset
92 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
93 ; bra customview_1min_view2
heinrichsweikamp
parents:
diff changeset
94 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
95 ; bra customview_1min_view3
heinrichsweikamp
parents:
diff changeset
96 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
97 ; bra customview_1min_view4
heinrichsweikamp
parents:
diff changeset
98 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
99 ; bra customview_1min_view5
heinrichsweikamp
parents:
diff changeset
100 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
101 ; bra customview_1min_view6
heinrichsweikamp
parents:
diff changeset
102 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
103 ; bra customview_1min_view7
heinrichsweikamp
parents:
diff changeset
104 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
105 ; bra customview_1min_view8
heinrichsweikamp
parents:
diff changeset
106 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
107 ; bra customview_1min_view9
heinrichsweikamp
parents:
diff changeset
108 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
109 ; bra customview_1min_view10
heinrichsweikamp
parents:
diff changeset
110 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
111 ; bra customview_1min_view11
heinrichsweikamp
parents:
diff changeset
112 ; ; Menupos3=0, do nothing
heinrichsweikamp
parents:
diff changeset
113 ; return
heinrichsweikamp
parents:
diff changeset
114 ;
heinrichsweikamp
parents:
diff changeset
115 ;customview_1min_view1:
heinrichsweikamp
parents:
diff changeset
116 ;customview_1min_view2:
heinrichsweikamp
parents:
diff changeset
117 ;customview_1min_view3:
heinrichsweikamp
parents:
diff changeset
118 ;customview_1min_view4:
heinrichsweikamp
parents:
diff changeset
119 ;customview_1min_view5:
heinrichsweikamp
parents:
diff changeset
120 ;customview_1min_view6:
heinrichsweikamp
parents:
diff changeset
121 ;customview_1min_view7:
heinrichsweikamp
parents:
diff changeset
122 ;customview_1min_view8:
heinrichsweikamp
parents:
diff changeset
123 ;customview_1min_view9:
heinrichsweikamp
parents:
diff changeset
124 ;customview_1min_view10:
heinrichsweikamp
parents:
diff changeset
125 ;customview_1min_view11:
heinrichsweikamp
parents:
diff changeset
126 ; return
heinrichsweikamp
parents:
diff changeset
127
heinrichsweikamp
parents:
diff changeset
128 global surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
129 surf_customview_toggle:
heinrichsweikamp
parents:
diff changeset
130 bcf switch_right
heinrichsweikamp
parents:
diff changeset
131 incf menupos3,F ; Number of customview to show
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
132 movlw d'7' ; Max number of customsviews in surface mode
0
heinrichsweikamp
parents:
diff changeset
133 cpfsgt menupos3 ; Max reached?
heinrichsweikamp
parents:
diff changeset
134 bra surf_customview_mask ; No, show
heinrichsweikamp
parents:
diff changeset
135 movlw .1
heinrichsweikamp
parents:
diff changeset
136 movwf menupos3 ; Reset to one (Always one custom view visible)
heinrichsweikamp
parents:
diff changeset
137
heinrichsweikamp
parents:
diff changeset
138 global surf_customview_mask
heinrichsweikamp
parents:
diff changeset
139 surf_customview_mask:
48
7c7d7644ca37 Time and Date in normal (Not tiny) font
heinrichsweikamp
parents: 41
diff changeset
140 WIN_BOX_BLACK .50,surf_warning1_row-1, .0, surf_decotype_column-.1 ; top, bottom, left, right
188
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
141 ; Prepare title
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
142 WIN_TINY surf_customview_title_column,surf_customview_title_row
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
143 WIN_COLOR color_greenish
0
heinrichsweikamp
parents:
diff changeset
144 movff menupos3,WREG ; Menupos3 holds number of customview function
heinrichsweikamp
parents:
diff changeset
145 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
146 bra surf_customview_init_view1 ; OC Gas list
heinrichsweikamp
parents:
diff changeset
147 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
148 bra surf_customview_init_view2 ; CC Dil list
heinrichsweikamp
parents:
diff changeset
149 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
150 bra surf_customview_init_view3 ; CC SP list
heinrichsweikamp
parents:
diff changeset
151 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
152 bra surf_customview_init_view4 ; Custom Text
heinrichsweikamp
parents:
diff changeset
153 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
154 bra surf_customview_init_view5 ; Tissue Diagram
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
155 dcfsnz WREG,F
0
heinrichsweikamp
parents:
diff changeset
156 bra surf_customview_init_view6 ; Compass
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
157 dcfsnz WREG,F
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
158 bra surf_customview_init_view7 ; Deco settings
0
heinrichsweikamp
parents:
diff changeset
159
heinrichsweikamp
parents:
diff changeset
160 call I2C_sleep_accelerometer ; Stop accelerometer
heinrichsweikamp
parents:
diff changeset
161 call I2C_sleep_compass ; Stop compass
heinrichsweikamp
parents:
diff changeset
162
heinrichsweikamp
parents:
diff changeset
163 movlw .1
heinrichsweikamp
parents:
diff changeset
164 movwf menupos3 ; Reset to one (Always one custom view visible)
heinrichsweikamp
parents:
diff changeset
165
heinrichsweikamp
parents:
diff changeset
166 surf_customview_init_view1: ; View1: OC Gas list
heinrichsweikamp
parents:
diff changeset
167 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
168 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
169 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
170 bra surf_customview_toggle
188
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
171 btfsc FLAG_ccr_mode
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
172 bra surf_customview_init_view1_bail ; Bailoutversion
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
173 STRCPY_TEXT_PRINT tGaslist ; Title of customview
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
174 call TFT_standard_color
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
175 call TFT_gaslist_surfmode ; Show gas list
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
176 bra customview_toggle_exit ; Done.
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
177
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
178 surf_customview_init_view1_bail:
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
179 STRCPY_TEXT_PRINT tDiveBailout ; Title of customview
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
180 call TFT_standard_color
0
heinrichsweikamp
parents:
diff changeset
181 call TFT_gaslist_surfmode ; Show gas list
heinrichsweikamp
parents:
diff changeset
182 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
183
heinrichsweikamp
parents:
diff changeset
184 surf_customview_init_view2: ; View2: CC Dil list
heinrichsweikamp
parents:
diff changeset
185 btfss FLAG_ccr_mode
heinrichsweikamp
parents:
diff changeset
186 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
187 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
188 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
189 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
190 bra surf_customview_toggle
188
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
191 STRCPY_TEXT_PRINT tGaslistCC ; Title of customview
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
192 call TFT_standard_color
0
heinrichsweikamp
parents:
diff changeset
193 call TFT_dillist_surfmode ; Show diluent list
heinrichsweikamp
parents:
diff changeset
194 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
195
heinrichsweikamp
parents:
diff changeset
196 surf_customview_init_view3: ; View3: CC SP list
heinrichsweikamp
parents:
diff changeset
197 btfss FLAG_ccr_mode
heinrichsweikamp
parents:
diff changeset
198 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
199 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
200 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
201 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
202 bra surf_customview_toggle
188
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
203 STRCPY_TEXT_PRINT tFixedSetpoints ; Title of customview
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
204 call TFT_standard_color
0
heinrichsweikamp
parents:
diff changeset
205 call TFT_splist_surfmode ; Show Setpoint list
heinrichsweikamp
parents:
diff changeset
206 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
207
heinrichsweikamp
parents:
diff changeset
208 surf_customview_init_view4: ; View4: Custom text
188
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
209 call TFT_standard_color
0
heinrichsweikamp
parents:
diff changeset
210 call TFT_custom_text ; Show the custom text
heinrichsweikamp
parents:
diff changeset
211 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
212
heinrichsweikamp
parents:
diff changeset
213 surf_customview_init_view5: ; View5: Tissue Diagram
heinrichsweikamp
parents:
diff changeset
214 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
215 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
216 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
217 bra surf_customview_toggle
188
ebc28381f17d NEW: Show Bailout Gas List in Surface mode (CCR Modes)
heinrichsweikamp
parents: 184
diff changeset
218 call TFT_standard_color
0
heinrichsweikamp
parents:
diff changeset
219 call TFT_surface_tissues ; Show Tissue diagram
heinrichsweikamp
parents:
diff changeset
220 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
221
heinrichsweikamp
parents:
diff changeset
222 surf_customview_init_view6: ; View6: Compass
heinrichsweikamp
parents:
diff changeset
223 call I2C_init_accelerometer ; Start accelerometer
heinrichsweikamp
parents:
diff changeset
224 call I2C_init_compass ; Start compass
heinrichsweikamp
parents:
diff changeset
225 call TFT_surface_compass_mask ; Show compass
heinrichsweikamp
parents:
diff changeset
226 bra customview_toggle_exit ; Done.
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
227 surf_customview_init_view7:
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
228 btfsc FLAG_gauge_mode
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
229 bra surf_customview_toggle
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
230 btfsc FLAG_apnoe_mode
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
231 bra surf_customview_toggle
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
232 extern deco_setup_dive
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
233 call deco_setup_dive
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
234 call TFT_surface_decosettings ; Show all deco settings
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
235 bra customview_toggle_exit ; Done.
0
heinrichsweikamp
parents:
diff changeset
236
heinrichsweikamp
parents:
diff changeset
237 global menuview_toggle
heinrichsweikamp
parents:
diff changeset
238 menuview_toggle: ; Show Menu or the simulator tasks
heinrichsweikamp
parents:
diff changeset
239 movlw divemode_menuview_timeout
heinrichsweikamp
parents:
diff changeset
240 movwf timeout_counter3
heinrichsweikamp
parents:
diff changeset
241 bsf menuview
heinrichsweikamp
parents:
diff changeset
242 bcf switch_left
heinrichsweikamp
parents:
diff changeset
243 incf menupos2,F ; Number of options to show
216
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
244 movlw d'8' ; Max number of options in divemode
0
heinrichsweikamp
parents:
diff changeset
245 cpfsgt menupos2 ; Max reached?
heinrichsweikamp
parents:
diff changeset
246 bra menuview_mask ; No, show
heinrichsweikamp
parents:
diff changeset
247 global menuview_toggle_reset
heinrichsweikamp
parents:
diff changeset
248 menuview_toggle_reset: ; Timeout occured
heinrichsweikamp
parents:
diff changeset
249 clrf menupos2
heinrichsweikamp
parents:
diff changeset
250 bcf menuview
heinrichsweikamp
parents:
diff changeset
251 menuview_mask:
heinrichsweikamp
parents:
diff changeset
252 WIN_BOX_BLACK divemode_simtext_row, divemode_simtext_row+.24, divemode_simtext_column, divemode_simtext_column+.49 ; top, bottom, left, right
heinrichsweikamp
parents:
diff changeset
253 btfss FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
254 bra menuview_mask2
heinrichsweikamp
parents:
diff changeset
255 ; Clear some more in gauge mode
heinrichsweikamp
parents:
diff changeset
256 WIN_BOX_BLACK divemode_simtext_row, divemode_simtext_row+.24, divemode_simtext_column+.50, divemode_simtext_column+.70 ; top, bottom, left, right
heinrichsweikamp
parents:
diff changeset
257 menuview_mask2:
heinrichsweikamp
parents:
diff changeset
258 movlw color_yellow
heinrichsweikamp
parents:
diff changeset
259 call TFT_set_color
189
e79bc535ef9e ignore un-calibrated sensors even if they become valid
heinrichsweikamp
parents: 188
diff changeset
260 bsf win_invert ; Set invert flag
e79bc535ef9e ignore un-calibrated sensors even if they become valid
heinrichsweikamp
parents: 188
diff changeset
261 WIN_SMALL divemode_simtext_column,divemode_simtext_row
0
heinrichsweikamp
parents:
diff changeset
262 movff menupos2,WREG ; Menupos2 holds number of menu option to show
heinrichsweikamp
parents:
diff changeset
263 dcfsnz WREG,F
137
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
264 bra menuview_view_gaschange ; If a better gas is indicated
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
265 dcfsnz WREG,F
0
heinrichsweikamp
parents:
diff changeset
266 bra menuview_view1
heinrichsweikamp
parents:
diff changeset
267 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
268 bra menuview_view2
heinrichsweikamp
parents:
diff changeset
269 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
270 bra menuview_view3
heinrichsweikamp
parents:
diff changeset
271 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
272 bra menuview_view4
heinrichsweikamp
parents:
diff changeset
273 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
274 bra menuview_view5
heinrichsweikamp
parents:
diff changeset
275 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
276 bra menuview_view6
216
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
277 dcfsnz WREG,F
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
278 bra menuview_view7
0
heinrichsweikamp
parents:
diff changeset
279 menuview_exit:
heinrichsweikamp
parents:
diff changeset
280 call TFT_standard_color
189
e79bc535ef9e ignore un-calibrated sensors even if they become valid
heinrichsweikamp
parents: 188
diff changeset
281 bcf win_invert ; Reset invert flag
0
heinrichsweikamp
parents:
diff changeset
282 return ; Menupos2 = 0, Show nothing
137
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
283
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
284
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
285 menuview_view_gaschange:
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
286 extern gaslist_strcat_gas_mod
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
287 btfss better_gas_available ; =1: A better gas is available
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
288 bra menuview_toggle ; No, call next option
138
2852b0bd6391 minor: some extra protection against wrong gas selection
heinrichsweikamp
parents: 137
diff changeset
289 btfsc divemode_gaschange ; Skip if the last gas change is not done yet.
2852b0bd6391 minor: some extra protection against wrong gas selection
heinrichsweikamp
parents: 137
diff changeset
290 bra menuview_toggle
137
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
291 bsf short_gas_decriptions ; =1: Use short versions of gaslist_strcat_gas_mod and gaslist_strcat_setpoint
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
292 movff better_gas_number,PRODL ; number (1-5) of the "better gas" in divemode, =0: no better gas available
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
293 decf PRODL,F
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
294 call gaslist_strcat_gas_mod ; Append gas description of gas #PRODL (0-4) to current string
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
295 movlw .5
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
296 movwf FSR2L ; Point to char 6 (5 chars gas description only)
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
297 STRCAT_PRINT "?"
28b057aa9f75 Simplify gas change
heinrichsweikamp
parents: 136
diff changeset
298 bra menuview_exit ; Done.
0
heinrichsweikamp
parents:
diff changeset
299 menuview_view1:
heinrichsweikamp
parents:
diff changeset
300 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
301 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
302 btfsc FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
303 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
304 STRCPY_TEXT_PRINT tDivePreMenu ; "Menu?"
heinrichsweikamp
parents:
diff changeset
305 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
306 menuview_view2:
heinrichsweikamp
parents:
diff changeset
307 btfss simulatormode_active ; View only for simulator mode
heinrichsweikamp
parents:
diff changeset
308 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
309 STRCPY_TEXT_PRINT tQuitSim ;"Quit Simulation?"
heinrichsweikamp
parents:
diff changeset
310 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
311 menuview_view3:
heinrichsweikamp
parents:
diff changeset
312 btfss simulatormode_active ; View only for simulator mode
heinrichsweikamp
parents:
diff changeset
313 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
314 STRCPY_TEXT_PRINT tDescent1m ; "Descent 1m"
heinrichsweikamp
parents:
diff changeset
315 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
316 menuview_view4:
heinrichsweikamp
parents:
diff changeset
317 btfss simulatormode_active ; View only for simulator mode
heinrichsweikamp
parents:
diff changeset
318 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
319 STRCPY_TEXT_PRINT tAscent1m ; "Ascend 1m"
heinrichsweikamp
parents:
diff changeset
320 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
321 menuview_view5:
heinrichsweikamp
parents:
diff changeset
322 btfss FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
323 bra menuview_toggle ; No, call next option
184
faa06c58e977 BUGFIX: Quit Apnea mode on the surface manually
heinrichsweikamp
parents: 148
diff changeset
324 btfss FLAG_active_descent ; Are we descending?
0
heinrichsweikamp
parents:
diff changeset
325 bra menuview_toggle ; Yes
heinrichsweikamp
parents:
diff changeset
326 ; We are at the surface:
148
022b886eddaf some cleanup
heinrichsweikamp
parents: 138
diff changeset
327 STRCPY_TEXT_PRINT tQuitSim ; "Quit Apnea mode?"
0
heinrichsweikamp
parents:
diff changeset
328 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
329 menuview_view6:
heinrichsweikamp
parents:
diff changeset
330 btfss FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
331 bra menuview_toggle ; No, call next option
heinrichsweikamp
parents:
diff changeset
332 STRCPY_TEXT_PRINT tDivemenu_ResetAvr ; "Reset Avr."
heinrichsweikamp
parents:
diff changeset
333 bra menuview_exit ; Done.
216
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
334 menuview_view7:
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
335 btfss simulatormode_active ; View only for simulator mode
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
336 bra menuview_toggle ; Call next option
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
337 btfsc FLAG_gauge_mode ; In Gauge mode?
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
338 bra menuview_toggle ; Yes, call next option
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
339 btfsc FLAG_apnoe_mode ; In Apnoe mode?
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
340 bra menuview_toggle ; Yes, call next option
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
341 STRCPY_TEXT_PRINT tplus5min ; "Sim:+5mins"
973a0969e0ac NEW: On-board simulator can increase divetime in 5min steps
heinrichsweikamp
parents: 192
diff changeset
342 bra menuview_exit ; Done.
0
heinrichsweikamp
parents:
diff changeset
343
heinrichsweikamp
parents:
diff changeset
344
heinrichsweikamp
parents:
diff changeset
345 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
346 ; Show next customview (and delete this flag)
heinrichsweikamp
parents:
diff changeset
347 global customview_toggle
heinrichsweikamp
parents:
diff changeset
348 customview_toggle:
heinrichsweikamp
parents:
diff changeset
349 bcf switch_right
heinrichsweikamp
parents:
diff changeset
350 incf menupos3,F ; Number of customview to show
123
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
351 movlw d'9' ; Max number of customsviews in divemode
0
heinrichsweikamp
parents:
diff changeset
352 cpfsgt menupos3 ; Max reached?
heinrichsweikamp
parents:
diff changeset
353 bra customview_mask ; No, show
heinrichsweikamp
parents:
diff changeset
354 customview_toggle_reset: ; Timeout occured
heinrichsweikamp
parents:
diff changeset
355 clrf menupos3 ; Reset to zero (Zero=no custom view)
39
e4e91fe8b09d remember last customview in dive and surface mode
mh@mh-THINK.fritz.box
parents: 0
diff changeset
356 global customview_mask
0
heinrichsweikamp
parents:
diff changeset
357 customview_mask:
heinrichsweikamp
parents:
diff changeset
358 call TFT_clear_customview_divemode
heinrichsweikamp
parents:
diff changeset
359 WIN_SMALL divemode_customview_column,divemode_customview_row
heinrichsweikamp
parents:
diff changeset
360 call TFT_standard_color
heinrichsweikamp
parents:
diff changeset
361 movff menupos3,WREG ; Menupos3 holds number of customview function
heinrichsweikamp
parents:
diff changeset
362 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
363 bra customview_init_view1
heinrichsweikamp
parents:
diff changeset
364 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
365 bra customview_init_view2
heinrichsweikamp
parents:
diff changeset
366 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
367 bra customview_init_view3
heinrichsweikamp
parents:
diff changeset
368 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
369 bra customview_init_view4
heinrichsweikamp
parents:
diff changeset
370 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
371 bra customview_init_view5 ; GF informations
heinrichsweikamp
parents:
diff changeset
372 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
373 bra customview_init_view6 ; Compass
53
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
374 dcfsnz WREG,F
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
375 bra customview_init_view7 ; Dynamic gaslist
105
0aaa4877ba25 Show HUD voltages only in CCR mode...
heinrichsweikamp
parents: 102
diff changeset
376 dcfsnz WREG,F
0aaa4877ba25 Show HUD voltages only in CCR mode...
heinrichsweikamp
parents: 102
diff changeset
377 bra customview_init_view8 ; HUD voltages
123
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
378 dcfsnz WREG,F
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
379 bra customview_init_view9 ; Ceiling
0
heinrichsweikamp
parents:
diff changeset
380 customview_init_nocustomview:
heinrichsweikamp
parents:
diff changeset
381 call I2C_sleep_accelerometer ; Stop accelerometer
heinrichsweikamp
parents:
diff changeset
382 call I2C_sleep_compass ; Stop compass
heinrichsweikamp
parents:
diff changeset
383 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
384
heinrichsweikamp
parents:
diff changeset
385 customview_init_view1:
heinrichsweikamp
parents:
diff changeset
386 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
387 bra customview_toggle ; yes, Call next view...
heinrichsweikamp
parents:
diff changeset
388 btfss FLAG_ccr_mode ; In CC mode?
heinrichsweikamp
parents:
diff changeset
389 bra customview_toggle ; no, Call next view...
heinrichsweikamp
parents:
diff changeset
390
heinrichsweikamp
parents:
diff changeset
391 bsf dive_hud1_displayed ; Set display flag
heinrichsweikamp
parents:
diff changeset
392 bsf dive_hud2_displayed ; Set display flag
heinrichsweikamp
parents:
diff changeset
393 bsf dive_hud3_displayed ; Set display flag
heinrichsweikamp
parents:
diff changeset
394 call TFT_hud_mask ; Setup HUD mask
192
efe70488a04b voting logic for external monitoring
heinrichsweikamp
parents: 189
diff changeset
395 call TFT_update_ppo2_sensors ; Update Sensor data
0
heinrichsweikamp
parents:
diff changeset
396 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
397
heinrichsweikamp
parents:
diff changeset
398 customview_init_view2:
heinrichsweikamp
parents:
diff changeset
399 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
400 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
401 call TFT_mask_avr_stopwatch ; Show mask for average depth and stopwatch
heinrichsweikamp
parents:
diff changeset
402 call TFT_update_avr_stopwatch ; Update average depth and stopwatch
heinrichsweikamp
parents:
diff changeset
403 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
404
heinrichsweikamp
parents:
diff changeset
405 customview_init_view3:
heinrichsweikamp
parents:
diff changeset
406 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
407 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
408 btfsc FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
409 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
410 call TFT_decoplan ; Show decoplan
heinrichsweikamp
parents:
diff changeset
411 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
412
heinrichsweikamp
parents:
diff changeset
413 customview_init_view4:
heinrichsweikamp
parents:
diff changeset
414 call TFT_ead_end_tissues_clock_mask ; Setup Mask
heinrichsweikamp
parents:
diff changeset
415 call TFT_ead_end_tissues_clock ; Show EAD/END, Tissues and clock
heinrichsweikamp
parents:
diff changeset
416 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
417
heinrichsweikamp
parents:
diff changeset
418 customview_init_view5:
heinrichsweikamp
parents:
diff changeset
419 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
420 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
421 btfsc FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
422 bra customview_toggle ; Yes, Call next view...
119
2acf3d068fae Do not show "GF info" for non-GF modes
heinrichsweikamp
parents: 105
diff changeset
423
2acf3d068fae Do not show "GF info" for non-GF modes
heinrichsweikamp
parents: 105
diff changeset
424 extern char_I_deco_model
2acf3d068fae Do not show "GF info" for non-GF modes
heinrichsweikamp
parents: 105
diff changeset
425 TSTOSS char_I_deco_model ; 0 = ZH-L16, 1 = ZH-L16-GF
2acf3d068fae Do not show "GF info" for non-GF modes
heinrichsweikamp
parents: 105
diff changeset
426 bra customview_toggle ; No GF info for non-GF modes
2acf3d068fae Do not show "GF info" for non-GF modes
heinrichsweikamp
parents: 105
diff changeset
427
0
heinrichsweikamp
parents:
diff changeset
428 call TFT_gf_mask ; Setup Mask
heinrichsweikamp
parents:
diff changeset
429 call TFT_gf_info ; Show GF informations
heinrichsweikamp
parents:
diff changeset
430 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
431
heinrichsweikamp
parents:
diff changeset
432 customview_init_view6: ; Compass (View 6)
heinrichsweikamp
parents:
diff changeset
433 call I2C_init_accelerometer ; Start accelerometer
heinrichsweikamp
parents:
diff changeset
434 call I2C_init_compass ; Start compass
heinrichsweikamp
parents:
diff changeset
435 call TFT_dive_compass_mask ; Show compass
heinrichsweikamp
parents:
diff changeset
436 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
437
53
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
438 customview_init_view7: ; Dynamic gaslist (View 7)
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
439 btfsc FLAG_apnoe_mode ; In Apnoe mode?
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
440 bra customview_toggle ; Yes, Call next view...
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
441 btfsc FLAG_ccr_mode ; In CC mode?
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
442 bra customview_toggle ; Yes, Call next view...
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
443 call TFT_dyn_gaslist ; Show the dyn gaslist
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
444 bra customview_toggle_exit
2825f1d2262f NEW: Dynamic Gaslist in OC mode (Divemode, Customview 7)
heinrichsweikamp
parents: 48
diff changeset
445
102
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
446 customview_init_view8: ; Sensor millivolts
136
9a637c9bb19a rename Deco Planner to Simulator
heinrichsweikamp
parents: 134
diff changeset
447 btfsc FLAG_gauge_mode ; In Gauge mode?
9a637c9bb19a rename Deco Planner to Simulator
heinrichsweikamp
parents: 134
diff changeset
448 bra customview_toggle ; Yes, Call next view...
102
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
449 btfsc FLAG_apnoe_mode ; In Apnoe mode?
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
450 bra customview_toggle ; yes, Call next view...
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
451 btfss FLAG_ccr_mode ; In CC mode?
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
452 bra customview_toggle ; no, Call next view...
136
9a637c9bb19a rename Deco Planner to Simulator
heinrichsweikamp
parents: 134
diff changeset
453 TSTOSS opt_ccr_mode ; =0: Fixed SP, =1: Sensor
9a637c9bb19a rename Deco Planner to Simulator
heinrichsweikamp
parents: 134
diff changeset
454 bra customview_toggle ; no, Call next view...
102
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
455 call TFT_hud_mask ; Setup HUD mask
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
456 call TFT_hud_voltages ; Show HUD details
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
457 bra customview_toggle_exit
37275e0fa7f5 NEW: Show End-of-Dive time together with clock during deco
heinrichsweikamp
parents: 53
diff changeset
458
123
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
459 customview_init_view9: ; Ceiling
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
460 btfsc FLAG_apnoe_mode ; In Apnoe mode?
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
461 bra customview_toggle ; yes, Call next view...
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
462 btfsc FLAG_gauge_mode ; In Gauge mode?
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
463 bra customview_toggle ; Yes, Call next view...
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
464 call TFT_ceiling_mask ; Setup mask
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
465 call TFT_ceiling ; Show Ceiling
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
466 bra customview_toggle_exit
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
467
d076e9c02438 add ceiling display
heinrichsweikamp
parents: 119
diff changeset
468
0
heinrichsweikamp
parents:
diff changeset
469 customview_toggle_exit:
heinrichsweikamp
parents:
diff changeset
470 call TFT_standard_color
heinrichsweikamp
parents:
diff changeset
471 bcf toggle_customview ; Clear flag
heinrichsweikamp
parents:
diff changeset
472 return
heinrichsweikamp
parents:
diff changeset
473
heinrichsweikamp
parents:
diff changeset
474 global customview_show_change_depth
heinrichsweikamp
parents:
diff changeset
475 customview_show_change_depth: ; Put " lom" or " loft" into Postinc2
heinrichsweikamp
parents:
diff changeset
476 PUTC " "
heinrichsweikamp
parents:
diff changeset
477 TSTOSS opt_units ; 0=m, 1=ft
heinrichsweikamp
parents:
diff changeset
478 bra customview_show_mix_metric
heinrichsweikamp
parents:
diff changeset
479 movf lo,W
heinrichsweikamp
parents:
diff changeset
480 mullw .100 ; convert meters to mbar
heinrichsweikamp
parents:
diff changeset
481 movff PRODL,lo
heinrichsweikamp
parents:
diff changeset
482 movff PRODH,hi
heinrichsweikamp
parents:
diff changeset
483 call convert_mbar_to_feet ; convert value in lo:hi from mbar to feet
heinrichsweikamp
parents:
diff changeset
484 bsf leftbind
heinrichsweikamp
parents:
diff changeset
485 output_16 ; Change depth in lo:hi
heinrichsweikamp
parents:
diff changeset
486 bcf leftbind
heinrichsweikamp
parents:
diff changeset
487 STRCAT_TEXT tFeets
heinrichsweikamp
parents:
diff changeset
488 return
heinrichsweikamp
parents:
diff changeset
489 customview_show_mix_metric:
heinrichsweikamp
parents:
diff changeset
490 output_99 ; Change depth in lo
heinrichsweikamp
parents:
diff changeset
491 STRCAT_TEXT tMeters
heinrichsweikamp
parents:
diff changeset
492 return
heinrichsweikamp
parents:
diff changeset
493
heinrichsweikamp
parents:
diff changeset
494
heinrichsweikamp
parents:
diff changeset
495 global customview_show_mix
heinrichsweikamp
parents:
diff changeset
496 customview_show_mix: ; Put "Nxlo", "Txlo/hi", "Air" or "O2" into Postinc2
heinrichsweikamp
parents:
diff changeset
497 tstfsz hi ; He=0?
heinrichsweikamp
parents:
diff changeset
498 bra customview_show_mix5 ; No, Show a TX
heinrichsweikamp
parents:
diff changeset
499 movlw .21
heinrichsweikamp
parents:
diff changeset
500 cpfseq lo ; Air?
heinrichsweikamp
parents:
diff changeset
501 bra customview_show_mix2 ; No
heinrichsweikamp
parents:
diff changeset
502 STRCAT_TEXT tSelectAir ; Yes, show "Air"
heinrichsweikamp
parents:
diff changeset
503 bra customview_show_mix4b
heinrichsweikamp
parents:
diff changeset
504 customview_show_mix2:
heinrichsweikamp
parents:
diff changeset
505 movlw .100
heinrichsweikamp
parents:
diff changeset
506 cpfseq lo ; O2?
heinrichsweikamp
parents:
diff changeset
507 bra customview_show_mix3 ; No
heinrichsweikamp
parents:
diff changeset
508 STRCAT_TEXT tSelectO2 ; Yes, show "O2"
heinrichsweikamp
parents:
diff changeset
509 bra customview_show_mix4b
heinrichsweikamp
parents:
diff changeset
510
heinrichsweikamp
parents:
diff changeset
511 customview_show_mix3:
heinrichsweikamp
parents:
diff changeset
512 movlw .21
heinrichsweikamp
parents:
diff changeset
513 cpfslt lo ; < Nx21?
heinrichsweikamp
parents:
diff changeset
514 bra customview_show_mix4 ; No
heinrichsweikamp
parents:
diff changeset
515 STRCAT_TEXT tGasErr ; Yes, show "Err"
heinrichsweikamp
parents:
diff changeset
516 output_99 ; O2 ratio is still in "lo"
heinrichsweikamp
parents:
diff changeset
517 bra customview_show_mix4c
heinrichsweikamp
parents:
diff changeset
518
heinrichsweikamp
parents:
diff changeset
519 customview_show_mix4:
heinrichsweikamp
parents:
diff changeset
520 STRCAT_TEXT tSelectNx ; Show "Nx"
heinrichsweikamp
parents:
diff changeset
521 output_99 ; O2 ratio is still in "lo"
heinrichsweikamp
parents:
diff changeset
522 customview_show_mix4b:
heinrichsweikamp
parents:
diff changeset
523 STRCAT " "
heinrichsweikamp
parents:
diff changeset
524 customview_show_mix4c:
heinrichsweikamp
parents:
diff changeset
525 btfsc divemode ; In divemode
heinrichsweikamp
parents:
diff changeset
526 return ; Yes
heinrichsweikamp
parents:
diff changeset
527 STRCAT " "
heinrichsweikamp
parents:
diff changeset
528 return
heinrichsweikamp
parents:
diff changeset
529
heinrichsweikamp
parents:
diff changeset
530 customview_show_mix5:
heinrichsweikamp
parents:
diff changeset
531 btfsc divemode
heinrichsweikamp
parents:
diff changeset
532 bra customview_show_mix6
heinrichsweikamp
parents:
diff changeset
533 STRCAT_TEXT tSelectTx ; Show "Tx"
heinrichsweikamp
parents:
diff changeset
534 customview_show_mix6:
heinrichsweikamp
parents:
diff changeset
535 output_99 ; O2 ratio is still in "lo"
heinrichsweikamp
parents:
diff changeset
536 PUTC "/"
heinrichsweikamp
parents:
diff changeset
537 movff hi,lo
heinrichsweikamp
parents:
diff changeset
538 output_99 ; He ratio
heinrichsweikamp
parents:
diff changeset
539 return
heinrichsweikamp
parents:
diff changeset
540
heinrichsweikamp
parents:
diff changeset
541 END