Mercurial > public > mk2

annotate code_part1/OSTC_code_asm_part1/customview.asm @ 115:50a06adabc67

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First gas is active, Gauge mode display
author heinrichsweikamp
date Fri, 24 Dec 2010 15:40:27 +0100
parents 9500f431248a
children f24137eb85de
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
98
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
1 ; OSTC - diving computer code
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
2 ; Copyright (C) 2008 HeinrichsWeikamp GbR
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
3
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
4 ; This program is free software: you can redistribute it and/or modify
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
5 ; it under the terms of the GNU General Public License as published by
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
6 ; the Free Software Foundation, either version 3 of the License, or
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
7 ; (at your option) any later version.
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
8
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
9 ; This program is distributed in the hope that it will be useful,
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
10 ; but WITHOUT ANY WARRANTY; without even the implied warranty of
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
11 ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
12 ; GNU General Public License for more details.
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
13
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
14 ; You should have received a copy of the GNU General Public License
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
15 ; along with this program. If not, see <http://www.gnu.org/licenses/>.
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
16
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
17
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
18 ; Customviews for divemode
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
19 ; written by: Matthias Heinrichs, info@heinrichsweikamp.com
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
20 ; written: 101212
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
21 ; last updated: 101212
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
22 ; known bugs:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
23 ; ToDo:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
24
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
25 customview_menu_entry3: ; Show the customview-dependent entry for the divemode menu
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
26 bcf menu3_active ;=1: menu entry three in divemode menu is active
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
27 movff menupos3,temp1 ; copy
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
28 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
29 bra customview_menu3_stopwatch ; Show the stopwatch option in divemode menu
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
30 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
31 bra customview_menu3_marker ; Show the marker option in divemode menu
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
32 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
33 bra customview_menu3_clock ; Show the clock option in divemode menu
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
34 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
35 bra customview_menu3_lead_tiss ; Show the leading tissue option in divemode menu
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
36 ; Menupos3=0, do nothing
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
37 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
38
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
39 customview_menu3_stopwatch:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
40 bsf menu3_active ; Set Flag
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
41 DISPLAYTEXT .33 ; ResetAvr
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
42 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
43
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
44 customview_menu3_marker:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
45 bsf menu3_active ; Set Flag
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
46 DISPLAYTEXT .30 ; Set Marker
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
47 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
48
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
49 customview_menu3_clock: ; No menu entry
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
50 customview_menu3_lead_tiss ; No menu entry
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
51 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
52
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
53 customview_second: ; Do every-second tasks for the custom view area
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
54 movff menupos3,temp1 ; copy
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
55 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
56 bra customview_1sec_stopwatch ; Update the Stopwatch
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
57 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
58 bra customview_1sec_marker ; Update the Marker
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
59 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
60 bra customview_1sec_clock ; Update the Clock
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
61 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
62 bra customview_1sec_lead_tiss ; Update the leading tissue
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
63 ; Menupos3=0, do nothing
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
64 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
65
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
66 customview_1sec_stopwatch:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
67 call PLED_stopwatch_show2 ; Update figures only
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
68 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
69
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
70 customview_1sec_marker: ; Do nothing extra
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
71 customview_1sec_lead_tiss: ; Do nothing extra
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
72 customview_1sec_clock: ; Do nothing extra
98
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
73 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
74
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
75
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
76 customview_minute: ; Do every-minute tasks for the custom view area
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
77 movff menupos3,temp1 ; copy
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
78 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
79 bra customview_minute_stopwatch ; Update the Stopwatch
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
80 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
81 bra customview_minute_marker ; Update the Marker
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
82 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
83 bra customview_minute_clock ; Update the Clock
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
84 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
85 bra customview_minute_lead_tiss ; Update the leading tissue
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
86 ; Menupos3=0, do nothing
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
87 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
88
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
89 customview_minute_clock:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
90 call PLED_diveclock2 ; Update the clock
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
91 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
92
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
93 customview_minute_lead_tiss:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
94 call PLED_show_leading_tissue_2 ; Update the leading tissue
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
95 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
96
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
97 customview_minute_marker: ; Do nothing extra
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
98 customview_minute_stopwatch: ; Do nothing extra
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
99 return
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
100
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
101 customview_toggle: ; Yes, show next customview (and delete this flag)
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
102 incf menupos3,F ; Number of customview to show
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
103 movlw d'4' ; Max number
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
104 cpfsgt menupos3 ; Max reached?
98
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
105 bra customview_mask ; No, show
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
106 clrf menupos3 ; Reset to zero (Zero=no custom view)
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
107 customview_mask:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
108 call PLED_clear_customview_divemode
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
109 movff menupos3,temp1 ; Menupos3 holds number of customview function
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
110 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
111 bra customview_init_stopwatch ; Show the Stopwatch
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
112 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
113 bra customview_init_marker ; Show the Marker-Menu
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
114 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
115 bra customview_init_clock ; Show the clock
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
116 dcfsnz temp1,F
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
117 bra customview_init_lead_tissue ; Show the leading tissue
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
118 ; bra customview_init_nocustomview ; menupos3=0 -> No Customview
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
119 customview_init_nocustomview:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
120 bra customview_toggle_exit
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
121
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
122 customview_init_stopwatch:
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
123 ; Init Stopwatch
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
124 call PLED_stopwatch_show
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
125 bra customview_toggle_exit
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
126
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
127 customview_init_marker: ; Init Marker
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
128 DISPLAYTEXT d'151' ; Set Marker?
98
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
129 bra customview_toggle_exit
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
130
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
131 customview_init_clock: ; Init Clock
98
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
132 call PLED_diveclock
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
133 bra customview_toggle_exit
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
134
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
135 customview_init_lead_tissue: ; Show leading tissue
98
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
136 call PLED_show_leading_tissue
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
137 bra customview_toggle_exit
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
138
6f8e3a08011e 1.73beta rc1 (Added new customview for divemode)
heinrichsweikamp
parents:
diff changeset
139 customview_toggle_exit:
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
140 bcf toggle_customview ; Clear flag
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
141 return
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
142
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
143
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
144
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
145 surfcustomview_toggle: ; Yes, show next customview (and delete this flag)
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
146 incf menupos3,F ; Number of customview to show
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
147 movlw d'4' ; Max number
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
148 cpfsgt menupos3 ; Max reached?
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
149 bra surfcustomview_mask ; No, show
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
150 clrf menupos3 ; Reset to zero (Zero=no custom view)
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
151 surfcustomview_mask:
115
50a06adabc67 First gas is active, Gauge mode display
heinrichsweikamp
parents: 112
diff changeset
152 call PLED_clear_customview_surfmode
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
153 movff menupos3,temp1 ; Menupos3 holds number of customview function
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
154 dcfsnz temp1,F
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
155 bra surfcustomview_init_graphs ; Show the tissue graphs
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
156 dcfsnz temp1,F
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
157 bra surfcustomview_init_gaslist ; Show pre-dive gaslist/setpoint list
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
158 dcfsnz temp1,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
159 bra surfcustomview_init_interval ; Show the interval counter
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
160 dcfsnz temp1,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
161 bra surfcustomview_init_cfview ; Show the interval counter
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
162 ; bra surfcustomview_init_nocustomview ; menupos3=0 -> No Customview
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
163 surfcustomview_init_nocustomview:
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
164 bra surfcustomview_toggle_exit
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
165
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
166 surfcustomview_init_graphs:
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
167 call PLED_tissue_saturation_graph ; Draw the graphs
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
168 bra surfcustomview_toggle_exit
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
169
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
170 surfcustomview_init_gaslist:
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
171 call PLED_pre_dive_screen ; Show the Gaslist/Setpoint list
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
172 bra surfcustomview_toggle_exit
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
173
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
174 surfcustomview_init_interval:
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
175 DISPLAYTEXT d'189' ; Surface
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
176 DISPLAYTEXT d'240' ; Interval:
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
177 call PLED_interval ; Display the interval
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
178 bra surfcustomview_toggle_exit
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
179
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
180 surfcustomview_init_cfview:
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
181 read_int_eeprom d'34' ; Get Decomode
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
182 incf EEDATA,W ; +1 -> WREG
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
183 movwf temp10
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
184 dcfsnz temp10,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
185 call PLED_show_cf11_cf12_cf29 ; =0 (ZH-L16 OC)
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
186 dcfsnz temp10,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
187 bra surfcustomview_toggle_exit ; =1 (Gauge)
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
188 dcfsnz temp10,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
189 call PLED_show_cf11_cf12_cf29 ; =2 (ZH-L16 CC)
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
190 dcfsnz temp10,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
191 bra surfcustomview_toggle_exit ; =3 (Apnoe)
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
192 dcfsnz temp10,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
193 call PLED_show_cf32_cf33_cf29 ; =4 (L16-GF OC)
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
194 dcfsnz temp10,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
195 call PLED_show_cf32_cf33_cf29 ; =5 (L16-GF CC)
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
196 bra surfcustomview_toggle_exit
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
197
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
198 surfcustomview_toggle_exit:
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
199 bcf toggle_customview ; Clear flag
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
200
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
201
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
202
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
203
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
204 surfcustomview_second: ; Do every-second tasks for the custom view area
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
205 movff menupos3,temp1 ; copy
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
206 dcfsnz temp1,F
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
207 bra surfcustomview_1sec_graphs ; Update the Graphs
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
208 dcfsnz temp1,F
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
209 bra surfcustomview_1sec_gaslist ; Update the Gaslist/SetPoint List
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
210 dcfsnz temp1,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
211 bra surfcustomview_1sec_interval ; Update the Interval display
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
212 dcfsnz temp1,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
213 bra surfcustomview_1sec_cfview ; Update the critical cf view
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
214 ; Menupos3=0, do nothing
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
215 return
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
216 surfcustomview_1sec_cfview: ; Do nothing extra
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
217 surfcustomview_1sec_graphs: ; Do nothing extra
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
218 surfcustomview_1sec_gaslist: ; Do nothing extra
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
219 surfcustomview_1sec_interval: ; Do nothing extra
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
220 return
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
221
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
222
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
223 surfcustomview_minute: ; Do every-minute tasks for the custom view area
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
224 movff menupos3,temp1 ; copy
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
225 dcfsnz temp1,F
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
226 bra surfcustomview_minute_graphs ; Update the Graphs
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
227 dcfsnz temp1,F
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
228 bra surfcustomview_minute_gaslist ; Update the Gaslist/SetPoint List
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
229 dcfsnz temp1,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
230 bra surfcustomview_minute_interval ; Update the Interval display
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
231 dcfsnz temp1,F
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
232 bra surfcustomview_minute_cfview ; Update the critical cf view
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
233 ; Menupos3=0, do nothing
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
234 return
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
235
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
236 surfcustomview_minute_graphs:
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
237 call PLED_tissue_saturation_graph ; Draw/Update the graphs
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
238 return
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
239
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
240 surfcustomview_minute_interval:
112
9500f431248a 1.74beta rc2
heinrichsweikamp
parents: 111
diff changeset
241 DISPLAYTEXT d'189' ; Surface
9500f431248a 1.74beta rc2
heinrichsweikamp
parents: 111
diff changeset
242 DISPLAYTEXT d'240' ; Interval:
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
243 call PLED_interval ; Display the interval
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
244 return
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
245
107
a2b9eca1f396 customview for the surfacemode
heinrichsweikamp
parents: 98
diff changeset
246 surfcustomview_minute_gaslist: ; Do nothing extra
111
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
247 surfcustomview_minute_cfview: ; Do nothing extra
ed7826c740a0 1.74beta rc1
heinrichsweikamp
parents: 107
diff changeset
248 return