Mercurial > public > hwos_code

annotate src/customview.asm @ 48:7c7d7644ca37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Time and Date in normal (Not tiny) font
author heinrichsweikamp
date Mon, 23 Sep 2013 20:47:18 +0200
parents 5041477eee79
children 2825f1d2262f
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
heinrichsweikamp
parents:
diff changeset
43 ; Menupos3=0, do nothing
heinrichsweikamp
parents:
diff changeset
44 return
heinrichsweikamp
parents:
diff changeset
45
heinrichsweikamp
parents:
diff changeset
46 customview_1sec_view3:
heinrichsweikamp
parents:
diff changeset
47 call TFT_decoplan ; Show decoplan
heinrichsweikamp
parents:
diff changeset
48 return
heinrichsweikamp
parents:
diff changeset
49 customview_1sec_view2:
heinrichsweikamp
parents:
diff changeset
50 call TFT_update_avr_stopwatch ; Update average depth and stopwatch
heinrichsweikamp
parents:
diff changeset
51 return
heinrichsweikamp
parents:
diff changeset
52 customview_1sec_view1:
heinrichsweikamp
parents:
diff changeset
53 call TFT_update_hud ; Update HUD data
heinrichsweikamp
parents:
diff changeset
54 return
heinrichsweikamp
parents:
diff changeset
55 customview_1sec_view4:
heinrichsweikamp
parents:
diff changeset
56 call TFT_ead_end_tissues_clock ; Update EAD/END, Tissues and clock
heinrichsweikamp
parents:
diff changeset
57 return
heinrichsweikamp
parents:
diff changeset
58 customview_1sec_view5:
heinrichsweikamp
parents:
diff changeset
59 call TFT_gf_info ; Update GF informations
heinrichsweikamp
parents:
diff changeset
60 return
heinrichsweikamp
parents:
diff changeset
61
heinrichsweikamp
parents:
diff changeset
62 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
63 ; Do every-minute tasks for the custom view area
heinrichsweikamp
parents:
diff changeset
64
heinrichsweikamp
parents:
diff changeset
65 global customview_minute
heinrichsweikamp
parents:
diff changeset
66 customview_minute:
heinrichsweikamp
parents:
diff changeset
67 return
heinrichsweikamp
parents:
diff changeset
68 ; movff menupos3,WREG ; copy
heinrichsweikamp
parents:
diff changeset
69 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
70 ; bra customview_1min_view1
heinrichsweikamp
parents:
diff changeset
71 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
72 ; bra customview_1min_view2
heinrichsweikamp
parents:
diff changeset
73 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
74 ; bra customview_1min_view3
heinrichsweikamp
parents:
diff changeset
75 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
76 ; bra customview_1min_view4
heinrichsweikamp
parents:
diff changeset
77 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
78 ; bra customview_1min_view5
heinrichsweikamp
parents:
diff changeset
79 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
80 ; bra customview_1min_view6
heinrichsweikamp
parents:
diff changeset
81 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
82 ; bra customview_1min_view7
heinrichsweikamp
parents:
diff changeset
83 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
84 ; bra customview_1min_view8
heinrichsweikamp
parents:
diff changeset
85 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
86 ; bra customview_1min_view9
heinrichsweikamp
parents:
diff changeset
87 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
88 ; bra customview_1min_view10
heinrichsweikamp
parents:
diff changeset
89 ; dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
90 ; bra customview_1min_view11
heinrichsweikamp
parents:
diff changeset
91 ; ; Menupos3=0, do nothing
heinrichsweikamp
parents:
diff changeset
92 ; return
heinrichsweikamp
parents:
diff changeset
93 ;
heinrichsweikamp
parents:
diff changeset
94 ;customview_1min_view1:
heinrichsweikamp
parents:
diff changeset
95 ;customview_1min_view2:
heinrichsweikamp
parents:
diff changeset
96 ;customview_1min_view3:
heinrichsweikamp
parents:
diff changeset
97 ;customview_1min_view4:
heinrichsweikamp
parents:
diff changeset
98 ;customview_1min_view5:
heinrichsweikamp
parents:
diff changeset
99 ;customview_1min_view6:
heinrichsweikamp
parents:
diff changeset
100 ;customview_1min_view7:
heinrichsweikamp
parents:
diff changeset
101 ;customview_1min_view8:
heinrichsweikamp
parents:
diff changeset
102 ;customview_1min_view9:
heinrichsweikamp
parents:
diff changeset
103 ;customview_1min_view10:
heinrichsweikamp
parents:
diff changeset
104 ;customview_1min_view11:
heinrichsweikamp
parents:
diff changeset
105 ; return
heinrichsweikamp
parents:
diff changeset
106
heinrichsweikamp
parents:
diff changeset
107 global surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
108 surf_customview_toggle:
heinrichsweikamp
parents:
diff changeset
109 bcf switch_right
heinrichsweikamp
parents:
diff changeset
110 incf menupos3,F ; Number of customview to show
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
111 movlw d'7' ; Max number of customsviews in surface mode
0
heinrichsweikamp
parents:
diff changeset
112 cpfsgt menupos3 ; Max reached?
heinrichsweikamp
parents:
diff changeset
113 bra surf_customview_mask ; No, show
heinrichsweikamp
parents:
diff changeset
114 movlw .1
heinrichsweikamp
parents:
diff changeset
115 movwf menupos3 ; Reset to one (Always one custom view visible)
heinrichsweikamp
parents:
diff changeset
116
heinrichsweikamp
parents:
diff changeset
117 global surf_customview_mask
heinrichsweikamp
parents:
diff changeset
118 surf_customview_mask:
48
7c7d7644ca37 Time and Date in normal (Not tiny) font
heinrichsweikamp
parents: 41
diff changeset
119 WIN_BOX_BLACK .50,surf_warning1_row-1, .0, surf_decotype_column-.1 ; top, bottom, left, right
0
heinrichsweikamp
parents:
diff changeset
120 call TFT_standard_color
heinrichsweikamp
parents:
diff changeset
121 movff menupos3,WREG ; Menupos3 holds number of customview function
heinrichsweikamp
parents:
diff changeset
122 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
123 bra surf_customview_init_view1 ; OC Gas list
heinrichsweikamp
parents:
diff changeset
124 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
125 bra surf_customview_init_view2 ; CC Dil list
heinrichsweikamp
parents:
diff changeset
126 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
127 bra surf_customview_init_view3 ; CC SP list
heinrichsweikamp
parents:
diff changeset
128 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
129 bra surf_customview_init_view4 ; Custom Text
heinrichsweikamp
parents:
diff changeset
130 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
131 bra surf_customview_init_view5 ; Tissue Diagram
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
132 dcfsnz WREG,F
0
heinrichsweikamp
parents:
diff changeset
133 bra surf_customview_init_view6 ; Compass
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
134 dcfsnz WREG,F
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
135 bra surf_customview_init_view7 ; Deco settings
0
heinrichsweikamp
parents:
diff changeset
136
heinrichsweikamp
parents:
diff changeset
137 call I2C_sleep_accelerometer ; Stop accelerometer
heinrichsweikamp
parents:
diff changeset
138 call I2C_sleep_compass ; Stop compass
heinrichsweikamp
parents:
diff changeset
139
heinrichsweikamp
parents:
diff changeset
140 movlw .1
heinrichsweikamp
parents:
diff changeset
141 movwf menupos3 ; Reset to one (Always one custom view visible)
heinrichsweikamp
parents:
diff changeset
142
heinrichsweikamp
parents:
diff changeset
143 surf_customview_init_view1: ; View1: OC Gas list
heinrichsweikamp
parents:
diff changeset
144 btfsc FLAG_ccr_mode
heinrichsweikamp
parents:
diff changeset
145 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
146 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
147 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
148 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
149 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
150 call TFT_gaslist_surfmode ; Show gas list
heinrichsweikamp
parents:
diff changeset
151 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
152
heinrichsweikamp
parents:
diff changeset
153 surf_customview_init_view2: ; View2: CC Dil list
heinrichsweikamp
parents:
diff changeset
154 btfss FLAG_ccr_mode
heinrichsweikamp
parents:
diff changeset
155 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
156 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
157 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
158 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
159 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
160 call TFT_dillist_surfmode ; Show diluent list
heinrichsweikamp
parents:
diff changeset
161 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
162
heinrichsweikamp
parents:
diff changeset
163 surf_customview_init_view3: ; View3: CC SP list
heinrichsweikamp
parents:
diff changeset
164 btfss FLAG_ccr_mode
heinrichsweikamp
parents:
diff changeset
165 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
166 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
167 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
168 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
169 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
170 call TFT_splist_surfmode ; Show Setpoint list
heinrichsweikamp
parents:
diff changeset
171 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
172
heinrichsweikamp
parents:
diff changeset
173 surf_customview_init_view4: ; View4: Custom text
heinrichsweikamp
parents:
diff changeset
174 call TFT_custom_text ; Show the custom text
heinrichsweikamp
parents:
diff changeset
175 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
176
heinrichsweikamp
parents:
diff changeset
177 surf_customview_init_view5: ; View5: Tissue Diagram
heinrichsweikamp
parents:
diff changeset
178 btfsc FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
179 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
180 btfsc FLAG_apnoe_mode
heinrichsweikamp
parents:
diff changeset
181 bra surf_customview_toggle
heinrichsweikamp
parents:
diff changeset
182 call TFT_surface_tissues ; Show Tissue diagram
heinrichsweikamp
parents:
diff changeset
183 bra customview_toggle_exit ; Done.
heinrichsweikamp
parents:
diff changeset
184
heinrichsweikamp
parents:
diff changeset
185 surf_customview_init_view6: ; View6: Compass
heinrichsweikamp
parents:
diff changeset
186 call I2C_init_accelerometer ; Start accelerometer
heinrichsweikamp
parents:
diff changeset
187 call I2C_init_compass ; Start compass
heinrichsweikamp
parents:
diff changeset
188 call TFT_surface_compass_mask ; Show compass
heinrichsweikamp
parents:
diff changeset
189 bra customview_toggle_exit ; Done.
41
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
190 surf_customview_init_view7:
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
191 btfsc FLAG_gauge_mode
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
192 bra surf_customview_toggle
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
193 btfsc FLAG_apnoe_mode
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
194 bra surf_customview_toggle
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
195 extern deco_setup_dive
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
196 call deco_setup_dive
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
197 call TFT_surface_decosettings ; Show all deco settings
5041477eee79 Surface customview with important deco settings
mh@mh-THINK
parents: 39
diff changeset
198 bra customview_toggle_exit ; Done.
0
heinrichsweikamp
parents:
diff changeset
199
heinrichsweikamp
parents:
diff changeset
200 global menuview_toggle
heinrichsweikamp
parents:
diff changeset
201 menuview_toggle: ; Show Menu or the simulator tasks
heinrichsweikamp
parents:
diff changeset
202 movlw divemode_menuview_timeout
heinrichsweikamp
parents:
diff changeset
203 movwf timeout_counter3
heinrichsweikamp
parents:
diff changeset
204 bsf menuview
heinrichsweikamp
parents:
diff changeset
205 bcf switch_left
heinrichsweikamp
parents:
diff changeset
206 incf menupos2,F ; Number of options to show
heinrichsweikamp
parents:
diff changeset
207 movlw d'6' ; Max number of options in divemode
heinrichsweikamp
parents:
diff changeset
208 cpfsgt menupos2 ; Max reached?
heinrichsweikamp
parents:
diff changeset
209 bra menuview_mask ; No, show
heinrichsweikamp
parents:
diff changeset
210 global menuview_toggle_reset
heinrichsweikamp
parents:
diff changeset
211 menuview_toggle_reset: ; Timeout occured
heinrichsweikamp
parents:
diff changeset
212 clrf menupos2
heinrichsweikamp
parents:
diff changeset
213 bcf menuview
heinrichsweikamp
parents:
diff changeset
214 menuview_mask:
heinrichsweikamp
parents:
diff changeset
215 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
216 btfss FLAG_gauge_mode
heinrichsweikamp
parents:
diff changeset
217 bra menuview_mask2
heinrichsweikamp
parents:
diff changeset
218 ; Clear some more in gauge mode
heinrichsweikamp
parents:
diff changeset
219 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
220 menuview_mask2:
heinrichsweikamp
parents:
diff changeset
221 movlw color_yellow
heinrichsweikamp
parents:
diff changeset
222 call TFT_set_color
heinrichsweikamp
parents:
diff changeset
223 WIN_SMALL_INVERT divemode_simtext_column,divemode_simtext_row
heinrichsweikamp
parents:
diff changeset
224 movff menupos2,WREG ; Menupos2 holds number of menu option to show
heinrichsweikamp
parents:
diff changeset
225 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
226 bra menuview_view1
heinrichsweikamp
parents:
diff changeset
227 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
228 bra menuview_view2
heinrichsweikamp
parents:
diff changeset
229 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
230 bra menuview_view3
heinrichsweikamp
parents:
diff changeset
231 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
232 bra menuview_view4
heinrichsweikamp
parents:
diff changeset
233 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
234 bra menuview_view5
heinrichsweikamp
parents:
diff changeset
235 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
236 bra menuview_view6
heinrichsweikamp
parents:
diff changeset
237 menuview_exit:
heinrichsweikamp
parents:
diff changeset
238 call TFT_standard_color
heinrichsweikamp
parents:
diff changeset
239 WIN_INVERT .0
heinrichsweikamp
parents:
diff changeset
240 return ; Menupos2 = 0, Show nothing
heinrichsweikamp
parents:
diff changeset
241 menuview_view1:
heinrichsweikamp
parents:
diff changeset
242 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
243 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
244 btfsc FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
245 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
246 STRCPY_TEXT_PRINT tDivePreMenu ; "Menu?"
heinrichsweikamp
parents:
diff changeset
247 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
248 menuview_view2:
heinrichsweikamp
parents:
diff changeset
249 btfss simulatormode_active ; View only for simulator mode
heinrichsweikamp
parents:
diff changeset
250 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
251 STRCPY_TEXT_PRINT tQuitSim ;"Quit Simulation?"
heinrichsweikamp
parents:
diff changeset
252 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
253 menuview_view3:
heinrichsweikamp
parents:
diff changeset
254 btfss simulatormode_active ; View only for simulator mode
heinrichsweikamp
parents:
diff changeset
255 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
256 STRCPY_TEXT_PRINT tDescent1m ; "Descent 1m"
heinrichsweikamp
parents:
diff changeset
257 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
258 menuview_view4:
heinrichsweikamp
parents:
diff changeset
259 btfss simulatormode_active ; View only for simulator mode
heinrichsweikamp
parents:
diff changeset
260 bra menuview_toggle ; Call next option
heinrichsweikamp
parents:
diff changeset
261 STRCPY_TEXT_PRINT tAscent1m ; "Ascend 1m"
heinrichsweikamp
parents:
diff changeset
262 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
263 menuview_view5:
heinrichsweikamp
parents:
diff changeset
264 btfss FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
265 bra menuview_toggle ; No, call next option
heinrichsweikamp
parents:
diff changeset
266 btfsc FLAG_active_descent ; Are we descending?
heinrichsweikamp
parents:
diff changeset
267 bra menuview_toggle ; Yes
heinrichsweikamp
parents:
diff changeset
268 ; We are at the surface:
heinrichsweikamp
parents:
diff changeset
269 STRCPY_TEXT_PRINT tQuitApnea ; "Quit Apnea mode?"
heinrichsweikamp
parents:
diff changeset
270 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
271 menuview_view6:
heinrichsweikamp
parents:
diff changeset
272 btfss FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
273 bra menuview_toggle ; No, call next option
heinrichsweikamp
parents:
diff changeset
274 STRCPY_TEXT_PRINT tDivemenu_ResetAvr ; "Reset Avr."
heinrichsweikamp
parents:
diff changeset
275 bra menuview_exit ; Done.
heinrichsweikamp
parents:
diff changeset
276
heinrichsweikamp
parents:
diff changeset
277
heinrichsweikamp
parents:
diff changeset
278 ;=============================================================================
heinrichsweikamp
parents:
diff changeset
279 ; Show next customview (and delete this flag)
heinrichsweikamp
parents:
diff changeset
280 global customview_toggle
heinrichsweikamp
parents:
diff changeset
281 customview_toggle:
heinrichsweikamp
parents:
diff changeset
282 bcf switch_right
heinrichsweikamp
parents:
diff changeset
283 incf menupos3,F ; Number of customview to show
heinrichsweikamp
parents:
diff changeset
284 movlw d'6' ; Max number of customsviews in divemode
heinrichsweikamp
parents:
diff changeset
285 cpfsgt menupos3 ; Max reached?
heinrichsweikamp
parents:
diff changeset
286 bra customview_mask ; No, show
heinrichsweikamp
parents:
diff changeset
287 customview_toggle_reset: ; Timeout occured
heinrichsweikamp
parents:
diff changeset
288 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
289 global customview_mask
0
heinrichsweikamp
parents:
diff changeset
290 customview_mask:
heinrichsweikamp
parents:
diff changeset
291 call TFT_clear_customview_divemode
heinrichsweikamp
parents:
diff changeset
292 WIN_SMALL divemode_customview_column,divemode_customview_row
heinrichsweikamp
parents:
diff changeset
293 call TFT_standard_color
heinrichsweikamp
parents:
diff changeset
294 movff menupos3,WREG ; Menupos3 holds number of customview function
heinrichsweikamp
parents:
diff changeset
295 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
296 bra customview_init_view1
heinrichsweikamp
parents:
diff changeset
297 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
298 bra customview_init_view2
heinrichsweikamp
parents:
diff changeset
299 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
300 bra customview_init_view3
heinrichsweikamp
parents:
diff changeset
301 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
302 bra customview_init_view4
heinrichsweikamp
parents:
diff changeset
303 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
304 bra customview_init_view5 ; GF informations
heinrichsweikamp
parents:
diff changeset
305 dcfsnz WREG,F
heinrichsweikamp
parents:
diff changeset
306 bra customview_init_view6 ; Compass
heinrichsweikamp
parents:
diff changeset
307 customview_init_nocustomview:
heinrichsweikamp
parents:
diff changeset
308 call I2C_sleep_accelerometer ; Stop accelerometer
heinrichsweikamp
parents:
diff changeset
309 call I2C_sleep_compass ; Stop compass
heinrichsweikamp
parents:
diff changeset
310 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
311
heinrichsweikamp
parents:
diff changeset
312 customview_init_view1:
heinrichsweikamp
parents:
diff changeset
313 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
314 bra customview_toggle ; yes, Call next view...
heinrichsweikamp
parents:
diff changeset
315 btfss FLAG_ccr_mode ; In CC mode?
heinrichsweikamp
parents:
diff changeset
316 bra customview_toggle ; no, Call next view...
heinrichsweikamp
parents:
diff changeset
317
heinrichsweikamp
parents:
diff changeset
318 bsf dive_hud1_displayed ; Set display flag
heinrichsweikamp
parents:
diff changeset
319 bsf dive_hud2_displayed ; Set display flag
heinrichsweikamp
parents:
diff changeset
320 bsf dive_hud3_displayed ; Set display flag
heinrichsweikamp
parents:
diff changeset
321 call TFT_hud_mask ; Setup HUD mask
heinrichsweikamp
parents:
diff changeset
322 call TFT_update_hud ; Update HUD data
heinrichsweikamp
parents:
diff changeset
323 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
324
heinrichsweikamp
parents:
diff changeset
325 customview_init_view2:
heinrichsweikamp
parents:
diff changeset
326 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
327 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
328 call TFT_mask_avr_stopwatch ; Show mask for average depth and stopwatch
heinrichsweikamp
parents:
diff changeset
329 call TFT_update_avr_stopwatch ; Update average depth and stopwatch
heinrichsweikamp
parents:
diff changeset
330 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
331
heinrichsweikamp
parents:
diff changeset
332 customview_init_view3:
heinrichsweikamp
parents:
diff changeset
333 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
334 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
335 btfsc FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
336 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
337 call TFT_decoplan ; Show decoplan
heinrichsweikamp
parents:
diff changeset
338 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
339
heinrichsweikamp
parents:
diff changeset
340 customview_init_view4:
heinrichsweikamp
parents:
diff changeset
341 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
342 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
343 btfsc FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
344 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
345 call TFT_ead_end_tissues_clock_mask ; Setup Mask
heinrichsweikamp
parents:
diff changeset
346 call TFT_ead_end_tissues_clock ; Show EAD/END, Tissues and clock
heinrichsweikamp
parents:
diff changeset
347 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
348
heinrichsweikamp
parents:
diff changeset
349 customview_init_view5:
heinrichsweikamp
parents:
diff changeset
350 btfsc FLAG_apnoe_mode ; In Apnoe mode?
heinrichsweikamp
parents:
diff changeset
351 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
352 btfsc FLAG_gauge_mode ; In Gauge mode?
heinrichsweikamp
parents:
diff changeset
353 bra customview_toggle ; Yes, Call next view...
heinrichsweikamp
parents:
diff changeset
354 call TFT_gf_mask ; Setup Mask
heinrichsweikamp
parents:
diff changeset
355 call TFT_gf_info ; Show GF informations
heinrichsweikamp
parents:
diff changeset
356 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
357
heinrichsweikamp
parents:
diff changeset
358 customview_init_view6: ; Compass (View 6)
heinrichsweikamp
parents:
diff changeset
359 call I2C_init_accelerometer ; Start accelerometer
heinrichsweikamp
parents:
diff changeset
360 call I2C_init_compass ; Start compass
heinrichsweikamp
parents:
diff changeset
361 call TFT_dive_compass_mask ; Show compass
heinrichsweikamp
parents:
diff changeset
362 bra customview_toggle_exit
heinrichsweikamp
parents:
diff changeset
363
heinrichsweikamp
parents:
diff changeset
364 customview_toggle_exit:
heinrichsweikamp
parents:
diff changeset
365 call TFT_standard_color
heinrichsweikamp
parents:
diff changeset
366 bcf toggle_customview ; Clear flag
heinrichsweikamp
parents:
diff changeset
367 return
heinrichsweikamp
parents:
diff changeset
368
heinrichsweikamp
parents:
diff changeset
369 global customview_show_change_depth
heinrichsweikamp
parents:
diff changeset
370 customview_show_change_depth: ; Put " lom" or " loft" into Postinc2
heinrichsweikamp
parents:
diff changeset
371 PUTC " "
heinrichsweikamp
parents:
diff changeset
372 TSTOSS opt_units ; 0=m, 1=ft
heinrichsweikamp
parents:
diff changeset
373 bra customview_show_mix_metric
heinrichsweikamp
parents:
diff changeset
374 movf lo,W
heinrichsweikamp
parents:
diff changeset
375 mullw .100 ; convert meters to mbar
heinrichsweikamp
parents:
diff changeset
376 movff PRODL,lo
heinrichsweikamp
parents:
diff changeset
377 movff PRODH,hi
heinrichsweikamp
parents:
diff changeset
378 call convert_mbar_to_feet ; convert value in lo:hi from mbar to feet
heinrichsweikamp
parents:
diff changeset
379 bsf leftbind
heinrichsweikamp
parents:
diff changeset
380 output_16 ; Change depth in lo:hi
heinrichsweikamp
parents:
diff changeset
381 bcf leftbind
heinrichsweikamp
parents:
diff changeset
382 STRCAT_TEXT tFeets
heinrichsweikamp
parents:
diff changeset
383 return
heinrichsweikamp
parents:
diff changeset
384 customview_show_mix_metric:
heinrichsweikamp
parents:
diff changeset
385 output_99 ; Change depth in lo
heinrichsweikamp
parents:
diff changeset
386 STRCAT_TEXT tMeters
heinrichsweikamp
parents:
diff changeset
387 return
heinrichsweikamp
parents:
diff changeset
388
heinrichsweikamp
parents:
diff changeset
389
heinrichsweikamp
parents:
diff changeset
390 global customview_show_mix
heinrichsweikamp
parents:
diff changeset
391 customview_show_mix: ; Put "Nxlo", "Txlo/hi", "Air" or "O2" into Postinc2
heinrichsweikamp
parents:
diff changeset
392 tstfsz hi ; He=0?
heinrichsweikamp
parents:
diff changeset
393 bra customview_show_mix5 ; No, Show a TX
heinrichsweikamp
parents:
diff changeset
394 movlw .21
heinrichsweikamp
parents:
diff changeset
395 cpfseq lo ; Air?
heinrichsweikamp
parents:
diff changeset
396 bra customview_show_mix2 ; No
heinrichsweikamp
parents:
diff changeset
397 STRCAT_TEXT tSelectAir ; Yes, show "Air"
heinrichsweikamp
parents:
diff changeset
398 bra customview_show_mix4b
heinrichsweikamp
parents:
diff changeset
399 customview_show_mix2:
heinrichsweikamp
parents:
diff changeset
400 movlw .100
heinrichsweikamp
parents:
diff changeset
401 cpfseq lo ; O2?
heinrichsweikamp
parents:
diff changeset
402 bra customview_show_mix3 ; No
heinrichsweikamp
parents:
diff changeset
403 STRCAT_TEXT tSelectO2 ; Yes, show "O2"
heinrichsweikamp
parents:
diff changeset
404 bra customview_show_mix4b
heinrichsweikamp
parents:
diff changeset
405
heinrichsweikamp
parents:
diff changeset
406 customview_show_mix3:
heinrichsweikamp
parents:
diff changeset
407 movlw .21
heinrichsweikamp
parents:
diff changeset
408 cpfslt lo ; < Nx21?
heinrichsweikamp
parents:
diff changeset
409 bra customview_show_mix4 ; No
heinrichsweikamp
parents:
diff changeset
410 STRCAT_TEXT tGasErr ; Yes, show "Err"
heinrichsweikamp
parents:
diff changeset
411 output_99 ; O2 ratio is still in "lo"
heinrichsweikamp
parents:
diff changeset
412 bra customview_show_mix4c
heinrichsweikamp
parents:
diff changeset
413
heinrichsweikamp
parents:
diff changeset
414 customview_show_mix4:
heinrichsweikamp
parents:
diff changeset
415 STRCAT_TEXT tSelectNx ; Show "Nx"
heinrichsweikamp
parents:
diff changeset
416 output_99 ; O2 ratio is still in "lo"
heinrichsweikamp
parents:
diff changeset
417 customview_show_mix4b:
heinrichsweikamp
parents:
diff changeset
418 STRCAT " "
heinrichsweikamp
parents:
diff changeset
419 customview_show_mix4c:
heinrichsweikamp
parents:
diff changeset
420 btfsc divemode ; In divemode
heinrichsweikamp
parents:
diff changeset
421 return ; Yes
heinrichsweikamp
parents:
diff changeset
422 STRCAT " "
heinrichsweikamp
parents:
diff changeset
423 return
heinrichsweikamp
parents:
diff changeset
424
heinrichsweikamp
parents:
diff changeset
425 customview_show_mix5:
heinrichsweikamp
parents:
diff changeset
426 btfsc divemode
heinrichsweikamp
parents:
diff changeset
427 bra customview_show_mix6
heinrichsweikamp
parents:
diff changeset
428 STRCAT_TEXT tSelectTx ; Show "Tx"
heinrichsweikamp
parents:
diff changeset
429 customview_show_mix6:
heinrichsweikamp
parents:
diff changeset
430 output_99 ; O2 ratio is still in "lo"
heinrichsweikamp
parents:
diff changeset
431 PUTC "/"
heinrichsweikamp
parents:
diff changeset
432 movff hi,lo
heinrichsweikamp
parents:
diff changeset
433 output_99 ; He ratio
heinrichsweikamp
parents:
diff changeset
434 return
heinrichsweikamp
parents:
diff changeset
435
heinrichsweikamp
parents:
diff changeset
436 END