rvtr/ctr_mcu
1
Fork 0
mirror of https://github.com/rvtr/ctr_mcu.git synced 2025-10-31 13:51:10 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity
dc469bd4c6
ctr_mcu/branches/0.10(X3)/pedo_alg_thre_det2.prn
N2232 dc469bd4c6 0.10のX3対応版を登録 
git-svn-id: file:///Volumes/Transfer/gigaleak_20231201/2020-05-23%20-%20ctr.7z%20+%20svn_v1.068.zip/ctr/svn/ctr_mcu@193 013db118-44a6-b54f-8bf7-843cb86687b1
2010-06-23 07:16:15 +00:00

1754 lines
138 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

78K0R Assembler W1.31 Date:13 Jun 2010 Page: 1
Command: -c9F0104 -yC:\Program Files\NEC Electronics Tools\DEV -_msgoff inter_asm\pedo_alg_thre_det2.asm
Para-file:
In-file: inter_asm\pedo_alg_thre_det2.asm
Obj-file: pedo_alg_thre_det2.rel
Prn-file: pedo_alg_thre_det2.prn
Assemble list
ALNO STNO ADRS OBJECT M I SOURCE STATEMENT
1 1 ; 78K0R C Compiler V2.10 Assembler Source Date:13 Jun 2010 Time:19:31:25
2 2
3 3 ; Command : -c9F0104 -yC:\Program Files\NEC Electronics Tools\DEV -_msgoff -i
4 4 ; renge -iC:\Program Files\NEC Electronics Tools\FSL78K0R_Type02ES\
5 5 ; V1.20\inc78k0r -ms -qvjl3wt -sainter_asm -zp -no pedo_alg_thre_de
6 6 ; t2.c
7 7 ; In-file : pedo_alg_thre_det2.c
8 8 ; Asm-file : inter_asm\pedo_alg_thre_det2.asm
9 9 ; Para-file :
10 10
11 11 $PROCESSOR(9F0104)
12 12 $DEBUG
13 13 $NODEBUGA
14 14 $KANJICODE SJIS
15 15 $TOL_INF 03FH, 0210H, 02H, 00H, 00H, 00H, 00H
16 16
17 17 $DGS FIL_NAM, .file, 0EEH, 0FFFEH, 03FH, 067H, 01H, 00H
18 18 $DGS AUX_FIL, pedo_alg_thre_det2.c
19 19 $DGS MOD_NAM, pedo_alg_thre_det2, 00H, 0FFFEH, 00H, 077H, 00H, 00H
20 20 $DGS SEC_NAM, @@BITS, U, U, 00H, 078H, 00H, 00H
21 21 $DGS SEC_NAM, @@CNST, U, U, 00H, 078H, 00H, 00H
22 22 $DGS SEC_NAM, @@R_INIT, U, U, 00H, 078H, 00H, 00H
23 23 $DGS SEC_NAM, @@INIT, U, U, 00H, 078H, 00H, 00H
24 24 $DGS SEC_NAM, @@DATA, U, U, 00H, 078H, 00H, 00H
25 25 $DGS SEC_NAM, @@R_INIS, U, U, 00H, 078H, 00H, 00H
26 26 $DGS SEC_NAM, @@INIS, U, U, 00H, 078H, 00H, 00H
27 27 $DGS SEC_NAM, @@DATS, U, U, 00H, 078H, 00H, 00H
28 28 $DGS SEC_NAM, @@CNSTL, U, U, 00H, 078H, 00H, 00H
29 29 $DGS SEC_NAM, @@RLINIT, U, U, 00H, 078H, 00H, 00H
30 30 $DGS SEC_NAM, @@INITL, U, U, 00H, 078H, 00H, 00H
31 31 $DGS SEC_NAM, @@DATAL, U, U, 00H, 078H, 00H, 00H
32 32 $DGS SEC_NAM, @@CALT, U, U, 00H, 078H, 00H, 00H
33 33 $DGS SEC_NAM, ROM_CODE, U, U, 00H, 078H, 00H, 00H
34 34 $DGS SEC_NAM, @@CODEL, U, U, 00H, 078H, 00H, 00H
35 35 $DGS SEC_NAM, @@BASE, U, U, 00H, 078H, 00H, 00H
36 36 $DGS LAB_SYM, bs_S0099, U, U, 00H, 06H, 00H, 00H
37 37 $DGS LAB_SYM, es_S0099, U, U, 00H, 06H, 00H, 00H
38 38 $DGS LAB_SYM, bs_F0097, U, U, 00H, 06H, 00H, 00H
39 39 $DGS LAB_SYM, es_F0097, U, U, 00H, 06H, 00H, 00H
40 40 $DGS LAB_SYM, bs_S0098, U, U, 00H, 06H, 00H, 00H
41 41 $DGS LAB_SYM, es_S0098, U, U, 00H, 06H, 00H, 00H
42 42 $DGS LAB_SYM, bs_S0096, U, U, 00H, 06H, 00H, 00H
43 43 $DGS LAB_SYM, es_S0096, U, U, 00H, 06H, 00H, 00H
44 44 $DGS STA_SYM, _lpf_coeff, U, U, 05002H, 03H, 01H, 03H
45 45 $DGS AUX_STR, 00H, 00H, 02FH, 02FH, 00H, 00H, 00H, 00H
46 46 $DGS GLV_SYM, _pedometer, U, U, 01H, 026H, 01H, 02H
47 47 $DGS AUX_FUN, 00H, U, U, 06BH, 00H, 00H
48 48 $DGS BEG_FUN, ??bf_pedometer, U, U, 00H, 065H, 01H, 00H
49 49 $DGS AUX_BEG, 01EH, 024H, 039H
50 50 $DGS STA_SYM, _th_H, ?L0003, U, 03H, 03H, 00H, 00H
51 51 $DGS STA_SYM, _th_L, ?L0004, U, 03H, 03H, 00H, 00H
52 52 $DGS STA_SYM, _acc_norm, ?L0005, U, 0DH, 03H, 01H, 03H
53 53 $DGS AUX_STR, 00H, 00H, 06H, 03H, 00H, 00H, 00H, 00H
54 54 $DGS STA_SYM, _acc_norm_temp, ?L0006, U, 0DH, 03H, 00H, 00H
55 55 $DGS STA_SYM, _interval_hh, ?L0007, U, 0CH, 03H, 00H, 00H
56 56 $DGS STA_SYM, _time_l, ?L0008, U, 0CH, 03H, 00H, 00H
57 57 $DGS STA_SYM, _peak_l, ?L0009, U, 0DH, 03H, 00H, 00H
58 58 $DGS STA_SYM, _peak_h, ?L0010, U, 0DH, 03H, 00H, 00H
59 59 $DGS STA_SYM, _norm_hist, ?L0011, U, 0DH, 03H, 01H, 03H
60 60 $DGS AUX_STR, 00H, 00H, 080H, 040H, 00H, 00H, 00H, 00H
61 61 $DGS STA_SYM, _hist_indx, ?L0012, U, 0CH, 03H, 00H, 00H
62 62 $DGS STA_SYM, _t_rise, ?L0013, U, 0CH, 03H, 00H, 00H
63 63 $DGS AUT_VAR, _filterd, 020H, 0FFFFH, 05H, 01H, 00H, 00H
64 64 $DGS AUT_VAR, _i, 01FH, 0FFFFH, 0CH, 01H, 00H, 00H
65 65 $DGS AUT_VAR, _temp1, 01AH, 0FFFFH, 05H, 01H, 00H, 00H
66 66 $DGS AUT_VAR, _temp2, 016H, 0FFFFH, 05H, 01H, 00H, 00H
67 67 $DGS AUT_VAR, _temp3, 012H, 0FFFFH, 05H, 01H, 00H, 00H
68 68 $DGS AUT_VAR, _temp4, 0EH, 0FFFFH, 05H, 01H, 00H, 00H
69 69 $DGS AUT_VAR, _temp5, 0AH, 0FFFFH, 05H, 01H, 00H, 00H
70 70 $DGS AUT_VAR, _temp6, 06H, 0FFFFH, 05H, 01H, 00H, 00H
71 71 $DGS AUT_VAR, _sx16, 04H, 0FFFFH, 0DH, 01H, 00H, 00H
72 72 $DGS AUT_VAR, _sy16, 02H, 0FFFFH, 0DH, 01H, 00H, 00H
73 73 $DGS AUT_VAR, _sz16, 00H, 0FFFFH, 0DH, 01H, 00H, 00H
74 74 $DGS BEG_BLK, ??bb00_pedometer, U, U, 00H, 064H, 01H, 00H
75 75 $DGS AUX_BEG, 02CH, 00H, 03DH
76 76 $DGS END_BLK, ??eb00_pedometer, U, U, 00H, 064H, 01H, 00H
77 77 $DGS AUX_END, 02EH
78 78 $DGS BEG_BLK, ??bb01_pedometer, U, U, 00H, 064H, 01H, 00H
79 79 $DGS AUX_BEG, 03FH, 00H, 041H
80 80 $DGS END_BLK, ??eb01_pedometer, U, U, 00H, 064H, 01H, 00H
81 81 $DGS AUX_END, 043H
82 82 $DGS BEG_BLK, ??bb02_pedometer, U, U, 00H, 064H, 01H, 00H
83 83 $DGS AUX_BEG, 048H, 00H, 043H
84 84 $DGS BEG_BLK, ??bb03_pedometer, U, U, 00H, 064H, 01H, 00H
85 85 $DGS AUX_BEG, 04BH, 00H, 045H
86 86 $DGS BEG_BLK, ??bb04_pedometer, U, U, 00H, 064H, 01H, 00H
87 87 $DGS AUX_BEG, 04EH, 00H, 047H
88 88 $DGS BEG_BLK, ??bb05_pedometer, U, U, 00H, 064H, 01H, 00H
89 89 $DGS AUX_BEG, 04FH, 00H, 04FH
90 90 $DGS END_BLK, ??eb05_pedometer, U, U, 00H, 064H, 01H, 00H
91 91 $DGS AUX_END, 052H
92 92 $DGS END_BLK, ??eb04_pedometer, U, U, 00H, 064H, 01H, 00H
93 93 $DGS AUX_END, 053H
94 94 $DGS END_BLK, ??eb03_pedometer, U, U, 00H, 064H, 01H, 00H
95 95 $DGS AUX_END, 055H
96 96 $DGS BEG_BLK, ??bb06_pedometer, U, U, 00H, 064H, 01H, 00H
97 97 $DGS AUX_BEG, 057H, 00H, 053H
98 98 $DGS END_BLK, ??eb06_pedometer, U, U, 00H, 064H, 01H, 00H
99 99 $DGS AUX_END, 059H
100 100 $DGS BEG_BLK, ??bb07_pedometer, U, U, 00H, 064H, 01H, 00H
101 101 $DGS AUX_BEG, 05BH, 00H, 059H
102 102 $DGS END_BLK, ??eb07_pedometer, U, U, 00H, 064H, 01H, 00H
103 103 $DGS AUX_END, 05DH
104 104 $DGS END_BLK, ??eb02_pedometer, U, U, 00H, 064H, 01H, 00H
105 105 $DGS AUX_END, 05EH
106 106 $DGS BEG_BLK, ??bb08_pedometer, U, U, 00H, 064H, 01H, 00H
107 107 $DGS AUX_BEG, 060H, 00H, 05DH
108 108 $DGS END_BLK, ??eb08_pedometer, U, U, 00H, 064H, 01H, 00H
109 109 $DGS AUX_END, 062H
110 110 $DGS BEG_BLK, ??bb09_pedometer, U, U, 00H, 064H, 01H, 00H
111 111 $DGS AUX_BEG, 067H, 00H, 061H
112 112 $DGS END_BLK, ??eb09_pedometer, U, U, 00H, 064H, 01H, 00H
113 113 $DGS AUX_END, 06BH
114 114 $DGS BEG_BLK, ??bb0A_pedometer, U, U, 00H, 064H, 01H, 00H
115 115 $DGS AUX_BEG, 06DH, 00H, 065H
116 116 $DGS END_BLK, ??eb0A_pedometer, U, U, 00H, 064H, 01H, 00H
117 117 $DGS AUX_END, 06FH
118 118 $DGS BEG_BLK, ??bb0B_pedometer, U, U, 00H, 064H, 01H, 00H
119 119 $DGS AUX_BEG, 071H, 00H, 00H
120 120 $DGS END_BLK, ??eb0B_pedometer, U, U, 00H, 064H, 01H, 00H
121 121 $DGS AUX_END, 086H
122 122 $DGS END_FUN, ??ef_pedometer, U, U, 00H, 065H, 01H, 00H
123 123 $DGS AUX_END, 087H
124 124 $DGS STA_SYM, _hosu_increment, U, U, 01H, 03H, 01H, 02H
125 125 $DGS AUX_FUN, 00H, U, U, 0A8H, 00H, 00H
126 126 $DGS BEG_FUN, ??bf_hosu_increment, U, U, 00H, 065H, 01H, 00H
127 127 $DGS AUX_BEG, 0B7H, 06H, 070H
128 128 $DGS STA_SYM, _last_hour_fny, ?L0039, U, 0DH, 03H, 00H, 00H
129 129 $DGS BEG_BLK, ??bb00_hosu_increment, U, U, 00H, 064H, 01H, 00H
130 130 $DGS AUX_BEG, 07H, 00H, 072H
131 131 $DGS BEG_BLK, ??bb01_hosu_increment, U, U, 00H, 064H, 01H, 00H
132 132 $DGS AUX_BEG, 09H, 00H, 074H
133 133 $DGS BEG_BLK, ??bb02_hosu_increment, U, U, 00H, 064H, 01H, 00H
134 134 $DGS AUX_BEG, 0AH, 00H, 07CH
135 135 $DGS END_BLK, ??eb02_hosu_increment, U, U, 00H, 064H, 01H, 00H
136 136 $DGS AUX_END, 0EH
137 137 $DGS END_BLK, ??eb01_hosu_increment, U, U, 00H, 064H, 01H, 00H
138 138 $DGS AUX_END, 0FH
139 139 $DGS END_BLK, ??eb00_hosu_increment, U, U, 00H, 064H, 01H, 00H
140 140 $DGS AUX_END, 010H
141 141 $DGS BEG_BLK, ??bb03_hosu_increment, U, U, 00H, 064H, 01H, 00H
142 142 $DGS AUX_BEG, 012H, 00H, 082H
143 143 $DGS AUT_VAR, _now_hour, 04H, 0FFFFH, 0DH, 01H, 01H, 00H
144 144 $DGS AUX_STR, 00H, 015H, 02H, 00H, 00H, 00H, 00H, 00H
145 145 $DGS AUT_VAR, _now_year, 03H, 0FFFFH, 0CH, 01H, 01H, 00H
146 146 $DGS AUX_STR, 00H, 016H, 01H, 00H, 00H, 00H, 00H, 00H
147 147 $DGS BEG_BLK, ??bb04_hosu_increment, U, U, 00H, 064H, 01H, 00H
148 148 $DGS AUX_BEG, 01BH, 00H, 086H
149 149 $DGS END_BLK, ??eb04_hosu_increment, U, U, 00H, 064H, 01H, 00H
150 150 $DGS AUX_END, 01BH
151 151 $DGS BEG_BLK, ??bb05_hosu_increment, U, U, 00H, 064H, 01H, 00H
152 152 $DGS AUX_BEG, 026H, 00H, 088H
153 153 $DGS BEG_BLK, ??bb06_hosu_increment, U, U, 00H, 064H, 01H, 00H
154 154 $DGS AUX_BEG, 028H, 00H, 08EH
155 155 $DGS END_BLK, ??eb06_hosu_increment, U, U, 00H, 064H, 01H, 00H
156 156 $DGS AUX_END, 02AH
157 157 $DGS END_BLK, ??eb05_hosu_increment, U, U, 00H, 064H, 01H, 00H
158 158 $DGS AUX_END, 02BH
159 159 $DGS BEG_BLK, ??bb07_hosu_increment, U, U, 00H, 064H, 01H, 00H
160 160 $DGS AUX_BEG, 02DH, 00H, 094H
161 161 $DGS AUT_VAR, _temp_hours, 00H, 0FFFFH, 0DH, 01H, 01H, 00H
162 162 $DGS AUX_STR, 00H, 02FH, 02H, 00H, 00H, 00H, 00H, 00H
163 163 $DGS END_BLK, ??eb07_hosu_increment, U, U, 00H, 064H, 01H, 00H
164 164 $DGS AUX_END, 031H
165 165 $DGS BEG_BLK, ??bb08_hosu_increment, U, U, 00H, 064H, 01H, 00H
166 166 $DGS AUX_BEG, 033H, 00H, 098H
167 167 $DGS END_BLK, ??eb08_hosu_increment, U, U, 00H, 064H, 01H, 00H
168 168 $DGS AUX_END, 036H
169 169 $DGS BEG_BLK, ??bb09_hosu_increment, U, U, 00H, 064H, 01H, 00H
170 170 $DGS AUX_BEG, 038H, 00H, 09CH
171 171 $DGS END_BLK, ??eb09_hosu_increment, U, U, 00H, 064H, 01H, 00H
172 172 $DGS AUX_END, 03BH
173 173 $DGS BEG_BLK, ??bb0A_hosu_increment, U, U, 00H, 064H, 01H, 00H
174 174 $DGS AUX_BEG, 041H, 00H, 0A0H
175 175 $DGS END_BLK, ??eb0A_hosu_increment, U, U, 00H, 064H, 01H, 00H
176 176 $DGS AUX_END, 043H
177 177 $DGS BEG_BLK, ??bb0B_hosu_increment, U, U, 00H, 064H, 01H, 00H
178 178 $DGS AUX_BEG, 045H, 00H, 00H
179 179 $DGS END_BLK, ??eb0B_hosu_increment, U, U, 00H, 064H, 01H, 00H
180 180 $DGS AUX_END, 047H
181 181 $DGS END_BLK, ??eb03_hosu_increment, U, U, 00H, 064H, 01H, 00H
182 182 $DGS AUX_END, 048H
183 183 $DGS END_FUN, ??ef_hosu_increment, U, U, 00H, 065H, 01H, 00H
184 184 $DGS AUX_END, 049H
185 185 $DGS GLV_SYM, _fill_hosu_hist_hours, U, U, 01H, 026H, 01H, 02H
186 186 $DGS AUX_FUN, 00H, U, U, 0B7H, 00H, 00H
187 187 $DGS BEG_FUN, ??bf_fill_hosu_hist_hours, U, U, 00H, 065H, 01H, 00H
188 188 $DGS AUX_BEG, 0108H, 02H, 0ADH
189 189 $DGS REG_PAR, _hours, 0103H, 0FFFFH, 010DH, 011H, 00H, 00H
190 190 $DGS BEG_BLK, ??bb00_fill_hosu_hist_hours, U, U, 00H, 064H, 01H, 00H
191 191 $DGS AUX_BEG, 03H, 00H, 0B1H
192 192 $DGS END_BLK, ??eb00_fill_hosu_hist_hours, U, U, 00H, 064H, 01H, 00H
193 193 $DGS AUX_END, 05H
194 194 $DGS BEG_BLK, ??bb01_fill_hosu_hist_hours, U, U, 00H, 064H, 01H, 00H
195 195 $DGS AUX_BEG, 09H, 00H, 00H
196 196 $DGS END_BLK, ??eb01_fill_hosu_hist_hours, U, U, 00H, 064H, 01H, 00H
197 197 $DGS AUX_END, 0DH
198 198 $DGS END_FUN, ??ef_fill_hosu_hist_hours, U, U, 00H, 065H, 01H, 00H
199 199 $DGS AUX_END, 0FH
200 200 $DGS GLV_SYM, _clear_hosu_hist, U, U, 01H, 026H, 01H, 02H
201 201 $DGS AUX_FUN, 00H, U, U, 0C2H, 00H, 00H
202 202 $DGS BEG_FUN, ??bf_clear_hosu_hist, U, U, 00H, 065H, 01H, 00H
203 203 $DGS AUX_BEG, 011FH, 02H, 0BCH
204 204 $DGS REG_VAR, _hours, 06H, 0FFFFH, 010CH, 04H, 00H, 00H
205 205 $DGS BEG_BLK, ??bb00_clear_hosu_hist, U, U, 00H, 064H, 01H, 00H
206 206 $DGS AUX_BEG, 05H, 00H, 00H
207 207 $DGS END_BLK, ??eb00_clear_hosu_hist, U, U, 00H, 064H, 01H, 00H
208 208 $DGS AUX_END, 08H
209 209 $DGS END_FUN, ??ef_clear_hosu_hist, U, U, 00H, 065H, 01H, 00H
210 210 $DGS AUX_END, 0DH
211 211 $DGS GLV_SYM, _hosu_read_end, U, U, 01H, 026H, 01H, 02H
212 212 $DGS AUX_FUN, 00H, U, U, 0C8H, 00H, 00H
213 213 $DGS BEG_FUN, ??bf_hosu_read_end, U, U, 00H, 065H, 01H, 00H
214 214 $DGS AUX_BEG, 0136H, 00H, 0C8H
215 215 $DGS END_FUN, ??ef_hosu_read_end, U, U, 00H, 065H, 01H, 00H
216 216 $DGS AUX_END, 03H
217 217 $DGS GLV_SYM, _hosu_read, U, U, 0CH, 026H, 01H, 02H
218 218 $DGS AUX_FUN, 00H, U, U, 0DDH, 00H, 00H
219 219 $DGS BEG_FUN, ??bf_hosu_read, U, U, 00H, 065H, 01H, 00H
220 220 $DGS AUX_BEG, 0140H, 04H, 0CFH
221 221 $DGS AUT_VAR, _dat, 03H, 0FFFFH, 0CH, 01H, 00H, 00H
222 222 $DGS AUT_VAR, _temp, 00H, 0FFFFH, 0DH, 01H, 00H, 00H
223 223 $DGS STA_SYM, _p_record_buffer, ?L0078, U, 0CH, 03H, 00H, 00H
224 224 $DGS BEG_BLK, ??bb00_hosu_read, U, U, 00H, 064H, 01H, 00H
225 225 $DGS AUX_BEG, 06H, 00H, 0D1H
226 226 $DGS BEG_BLK, ??bb01_hosu_read, U, U, 00H, 064H, 01H, 00H
227 227 $DGS AUX_BEG, 023H, 00H, 0D5H
228 228 $DGS END_BLK, ??eb01_hosu_read, U, U, 00H, 064H, 01H, 00H
229 229 $DGS AUX_END, 025H
230 230 $DGS BEG_BLK, ??bb02_hosu_read, U, U, 00H, 064H, 01H, 00H
231 231 $DGS AUX_BEG, 027H, 00H, 00H
232 232 $DGS END_BLK, ??eb02_hosu_read, U, U, 00H, 064H, 01H, 00H
233 233 $DGS AUX_END, 02AH
234 234 $DGS END_BLK, ??eb00_hosu_read, U, U, 00H, 064H, 01H, 00H
235 235 $DGS AUX_END, 02DH
236 236 $DGS END_FUN, ??ef_hosu_read, U, U, 00H, 065H, 01H, 00H
237 237 $DGS AUX_END, 02EH
238 238 $DGS STA_SYM, _DAYS_FROM_HNY, U, U, 0500DH, 03H, 01H, 03H
239 239 $DGS AUX_STR, 00H, 00H, 01AH, 0DH, 00H, 00H, 00H, 00H
240 240 $DGS GLV_SYM, _get_long_hour, U, U, 0DH, 026H, 01H, 02H
241 241 $DGS AUX_FUN, 00H, U, U, 0EEH, 00H, 00H
242 242 $DGS BEG_FUN, ??bf_get_long_hour, U, U, 00H, 065H, 01H, 00H
243 243 $DGS AUX_BEG, 017DH, 06H, 0E8H
244 244 $DGS AUT_VAR, _long_hour, 04H, 0FFFFH, 0DH, 01H, 00H, 00H
245 245 $DGS AUT_VAR, _year_hex, 03H, 0FFFFH, 0CH, 01H, 00H, 00H
246 246 $DGS AUT_VAR, _month_hex, 02H, 0FFFFH, 0CH, 01H, 00H, 00H
247 247 $DGS AUT_VAR, _day_hex, 01H, 0FFFFH, 0CH, 01H, 00H, 00H
248 248 $DGS AUT_VAR, _hour_hex, 00H, 0FFFFH, 0CH, 01H, 00H, 00H
249 249 $DGS BEG_BLK, ??bb00_get_long_hour, U, U, 00H, 064H, 01H, 00H
250 250 $DGS AUX_BEG, 014H, 00H, 00H
251 251 $DGS END_BLK, ??eb00_get_long_hour, U, U, 00H, 064H, 01H, 00H
252 252 $DGS AUX_END, 017H
253 253 $DGS END_FUN, ??ef_get_long_hour, U, U, 00H, 065H, 01H, 00H
254 254 $DGS AUX_END, 01EH
255 255 $DGS GLV_SYM, _p_record, U, U, 0CH, 026H, 00H, 00H
256 256 $DGS GLV_SYM, _last_hour, U, U, 0CH, 026H, 00H, 00H
257 257 $DGS GLV_SYM, _last_day, U, U, 0CH, 026H, 00H, 00H
258 258 $DGS GLV_SYM, _last_month, U, U, 0CH, 026H, 00H, 00H
259 259 $DGS GLV_SYM, _last_year, U, U, 0CH, 026H, 00H, 00H
260 260 $DGS GLV_SYM, _record_read_msb_lsb, U, U, 034CH, 027H, 00H, 00H
261 261 $DGS GLV_SYM, _@RTARG0, U, U, 00H, 02H, 00H, 00H
262 262 $DGS GLV_SYM, _@RTARG2, U, U, 00H, 02H, 00H, 00H
263 263 $DGS GLV_SYM, _abs, U, U, 04H, 02H, 01H, 02H
264 264 $DGS AUX_FUN, 00H, U, U, 00H, 00H, 00H
265 265 $DGS GLV_SYM, _@RTARG4, U, U, 00H, 02H, 00H, 00H
266 266 $DGS GLV_SYM, _@RTARG6, U, U, 00H, 02H, 00H, 00H
267 267 $DGS GLV_SYM, @@lsmul, U, U, 00H, 02H, 00H, 00H
268 268 $DGS GLV_SYM, _vreg_ctr, U, U, 0CH, 02H, 01H, 03H
269 269 $DGS AUX_STR, 00H, 00H, 01H, 01H, 00H, 00H, 00H, 00H
270 270 $DGS GLV_SYM, @@lsadd, U, U, 00H, 02H, 00H, 00H
271 271 $DGS GLV_SYM, @@lstof, U, U, 00H, 02H, 00H, 00H
272 272 $DGS GLV_SYM, _sqrt, U, U, 07H, 02H, 01H, 02H
273 273 $DGS AUX_FUN, 00H, U, U, 00H, 01H, 00H
274 274 $DGS GLV_SYM, _@RTARG3, U, U, 00H, 02H, 00H, 00H
275 275 $DGS GLV_SYM, @@ftolu, U, U, 00H, 02H, 00H, 00H
276 276 $DGS GLV_SYM, @@ftols, U, U, 00H, 02H, 00H, 00H
277 277 $DGS GLV_SYM, @@lsdiv, U, U, 00H, 02H, 00H, 00H
278 278 $DGS GLV_SYM, @@lsband, U, U, 00H, 02H, 00H, 00H
279 279 $DGS GLV_SYM, @@bcdtob, U, U, 00H, 02H, 00H, 00H
280 280 $DGS GLV_SYM, _pool, U, U, 0DH, 02H, 01H, 03H
281 281 $DGS AUX_STR, 00H, 00H, 02H, 01H, 00H, 00H, 00H, 00H
282 282 $DGS GLV_SYM, _iic_burst_state, U, U, 0CH, 02H, 00H, 00H
283 283 $DGS GLV_SYM, @@bbcd, U, U, 00H, 02H, 00H, 00H
284 284
285 285 EXTRN _@RTARG0
286 286 EXTRN _@RTARG2
287 287 EXTRN _abs
288 288 EXTRN _@RTARG4
289 289 EXTRN _@RTARG6
290 290 EXTRN @@lsmul
291 291 EXTRN _vreg_ctr
292 292 EXTRN @@lsadd
293 293 EXTRN @@lstof
294 294 EXTRN _sqrt
295 295 EXTRN _@RTARG3
296 296 EXTRN @@ftolu
297 297 EXTRN @@ftols
298 298 EXTRN @@lsdiv
299 299 EXTRN @@lsband
300 300 EXTRN @@bcdtob
301 301 EXTRN _pool
302 302 EXTRN _iic_burst_state
303 303 EXTRN @@bbcd
304 304 PUBLIC _pedometer
305 305 PUBLIC _p_record
306 306 PUBLIC _last_hour
307 307 PUBLIC _last_day
308 308 PUBLIC _last_month
309 309 PUBLIC _last_year
310 310 PUBLIC _fill_hosu_hist_hours
311 311 PUBLIC _clear_hosu_hist
312 312 PUBLIC _record_read_msb_lsb
313 313 PUBLIC _hosu_read_end
314 314 PUBLIC _hosu_read
315 315 PUBLIC _get_long_hour
316 316
317 317 ----- @@BITS BSEG
318 318 00000.0 _record_read_msb_lsb DBIT
319 319
320 320 ----- @@CNST CSEG MIRRORP
321 321 00000 01 _lpf_coeff: DB 01H ; 1
322 322 00001 02 DB 02H ; 2
323 323 00002 02 DB 02H ; 2
324 324 00003 03 DB 03H ; 3
325 325 00004 03 DB 03H ; 3
326 326 00005 02 DB 02H ; 2
327 327 00006 00 DB 00H ; 0
328 328 00007 FE DB 0FEH ; 254
329 329 00008 FB DB 0FBH ; 251
330 330 00009 F7 DB 0F7H ; 247
331 331 0000A F3 DB 0F3H ; 243
332 332 0000B F0 DB 0F0H ; 240
333 333 0000C F0 DB 0F0H ; 240
334 334 0000D F3 DB 0F3H ; 243
335 335 0000E FA DB 0FAH ; 250
336 336 0000F 04 DB 04H ; 4
337 337 00010 12 DB 012H ; 18
338 338 00011 25 DB 025H ; 37
339 339 00012 38 DB 038H ; 56
340 340 00013 4D DB 04DH ; 77
341 341 00014 5F DB 05FH ; 95
342 342 00015 6E DB 06EH ; 110
343 343 00016 77 DB 077H ; 119
344 344 00017 7A DB 07AH ; 122
345 345 00018 77 DB 077H ; 119
346 346 00019 6E DB 06EH ; 110
347 347 0001A 5F DB 05FH ; 95
348 348 0001B 4D DB 04DH ; 77
349 349 0001C 38 DB 038H ; 56
350 350 0001D 25 DB 025H ; 37
351 351 0001E 12 DB 012H ; 18
352 352 0001F 04 DB 04H ; 4
353 353 00020 FA DB 0FAH ; 250
354 354 00021 F3 DB 0F3H ; 243
355 355 00022 F0 DB 0F0H ; 240
356 356 00023 F0 DB 0F0H ; 240
357 357 00024 F3 DB 0F3H ; 243
358 358 00025 F7 DB 0F7H ; 247
359 359 00026 FB DB 0FBH ; 251
360 360 00027 FE DB 0FEH ; 254
361 361 00028 00 DB 00H ; 0
362 362 00029 02 DB 02H ; 2
363 363 0002A 03 DB 03H ; 3
364 364 0002B 03 DB 03H ; 3
365 365 0002C 02 DB 02H ; 2
366 366 0002D 02 DB 02H ; 2
367 367 0002E 01 DB 01H ; 1
368 368 0002F 00 DB (1)
369 369 00030 0000 _DAYS_FROM_HNY: DW 00H ; 0
370 370 00032 0000 DW 00H ; 0
371 371 00034 1F00 DW 01FH ; 31
372 372 00036 3B00 DW 03BH ; 59
373 373 00038 5A00 DW 05AH ; 90
374 374 0003A 7800 DW 078H ; 120
375 375 0003C 9700 DW 097H ; 151
376 376 0003E B500 DW 0B5H ; 181
377 377 00040 D400 DW 0D4H ; 212
378 378 00042 F300 DW 0F3H ; 243
379 379 00044 1101 DW 0111H ; 273
380 380 00046 3001 DW 0130H ; 304
381 381 00048 4E01 DW 014EH ; 334
382 382
383 383 ----- @@R_INIT CSEG UNIT64KP
384 384 00000 983A DW 03A98H ; 15000
385 385 00002 F82A DW 02AF8H ; 11000
386 386 00004 23 DB 023H ; 35
387 387 00005 30 DB 030H ; 48
388 388 00006 12 DB 012H ; 18
389 389 00007 99 DB 099H ; 153
390 390
391 391 ----- @@INIT DSEG BASEP
392 392 00000 ?L0003: DS (2)
393 393 00002 ?L0004: DS (2)
394 394 00004 _last_hour: DS (1)
395 395 00005 _last_day: DS (1)
396 396 00006 _last_month: DS (1)
397 397 00007 _last_year: DS (1)
398 398
399 399 ----- @@DATA DSEG BASEP
400 400 00000 ?L0005: DS (6)
401 401 00006 ?L0006: DS (2)
402 402 00008 ?L0007: DS (1)
403 403 00009 ?L0008: DS (1)
404 404 0000A ?L0009: DS (2)
405 405 0000C ?L0010: DS (2)
406 406 0000E ?L0011: DS (128)
407 407 0008E ?L0012: DS (1)
408 408 0008F ?L0013: DS (1)
409 409 00090 _p_record: DS (1)
410 410 00091 DS (1)
411 411 00092 ?L0039: DS (2)
412 412 00094 ?L0078: DS (1)
413 413 00095 DS (1)
414 414
415 415 ----- @@R_INIS CSEG UNIT64KP
416 416
417 417 ----- @@INIS DSEG SADDRP
418 418
419 419 ----- @@DATS DSEG SADDRP
420 420
421 421 ----- @@CNSTL CSEG PAGE64KP
422 422
423 423 ----- @@RLINIT CSEG UNIT64KP
424 424
425 425 ----- @@INITL DSEG UNIT64KP
426 426
427 427 ----- @@DATAL DSEG UNIT64KP
428 428
429 429 ----- @@CALT CSEG CALLT0
430 430
431 431 ; Sub-Routines created by CC78K0R
432 432
433 433 ----- ROM_CODE CSEG BASE
434 434 00000 bs_S0099:
435 435 00000 RBD00 movw _@RTARG0,ax ;[INF] 2, 1
436 436 00002 F6 clrw ax ;[INF] 1, 1
437 437 00003 RBD00 movw _@RTARG2,ax ;[INF] 2, 1
438 438 00005 D7 ret ;[INF] 1, 6
439 439 00006 es_S0099:
440 440
441 441 ----- ROM_CODE CSEG BASE
442 442 00006 bs_F0097:
443 443 00006 F3 clrb b ;[INF] 1, 1
444 444 00007 03 addw ax,bc ;[INF] 1, 1
445 445 00008 RFD0000 call !_abs ;[INF] 3, 3
446 446 0000B 13 movw ax,bc ;[INF] 1, 1
447 447 0000C D7 ret ;[INF] 1, 6
448 448 0000D es_F0097:
449 449
450 450 ----- ROM_CODE CSEG BASE
451 451 0000D bs_S0098:
452 452 0000D RAD00 movw ax,_@RTARG0 ;[INF] 2, 1
453 453 0000F RBD00 movw _@RTARG4,ax ;[INF] 2, 1
454 454 00011 RAD00 movw ax,_@RTARG2 ;[INF] 2, 1
455 455 00013 RBD00 movw _@RTARG6,ax ;[INF] 2, 1
456 456 00015 D7 ret ;[INF] 1, 6
457 457 00016 es_S0098:
458 458
459 459 ----- ROM_CODE CSEG BASE
460 460 00016 bs_S0096:
461 461 00016 RDA00 movw bc,_@RTARG6 ;[INF] 2, 1
462 462 00018 C3 push bc ;[INF] 1, 1
463 463 00019 RBD00 movw _@RTARG4,ax ;[INF] 2, 1
464 464 0001B F6 clrw ax ;[INF] 1, 1
465 465 0001C RBD00 movw _@RTARG6,ax ;[INF] 2, 1
466 466 0001E RFD0000 call !@@lsmul ;[INF] 3, 3
467 467 00021 C0 pop ax ;[INF] 1, 1
468 468 00022 RBD00 movw _@RTARG6,ax ;[INF] 2, 1
469 469 00024 D7 ret ;[INF] 1, 6
470 470 00025 es_S0096:
471 471
472 472 ; *** Sub-Routine Information ***
473 473 ;
474 474 ; $SUB bs_S0096
475 475 ; CODE SIZE= 15 bytes
476 476 ;
477 477 ; $SUB bs_F0097
478 478 ; CODE SIZE= 7 bytes
479 479 ;
480 480 ; $SUB bs_S0098
481 481 ; CODE SIZE= 9 bytes
482 482 ;
483 483 ; $SUB bs_S0099
484 484 ; CODE SIZE= 6 bytes
485 485
486 486 ; End of Sub-Routines
487 487
488 488 ; line 1 : /* ********************************************************
489 489 ; line 2 :
490 490 ; line 3 :
491 491 ; line 4 :
492 492 ; line 5 :
493 493 ; line 6 : ********************************************************* */
494 494 ; line 7 : #pragma MUL
495 495 ; line 8 : #pragma BCD
496 496 ; line 9 :
497 497 ; line 10 : #include "incs.h"
498 498 ; line 11 : #include <math.h>
499 499 ; line 12 :
500 500 ; line 13 : #include "accero.h"
501 501 ; line 14 : #include "pedometer.h"
502 502 ; line 15 :
503 503 ; line 16 :
504 504 ; line 17 : static void hosu_increment();
505 505 ; line 18 : u16 get_long_hour();
506 506 ; line 19 :
507 507 ; line 20 :
508 508 ; line 21 :
509 509 ; line 22 : extern u16 pool[];
510 510 ; line 23 :
511 511 ; line 24 :
512 512 ; line 25 :
513 513 ; line 26 : /*=========================================================
514 514 ; line 27 : <20>@<40><><EFBFBD><EFBFBD><EFBFBD>v
515 515 ; line 28 : ========================================================*/
516 516 ; line 29 : void pedometer()
517 517 ; line 30 : {
518 518
519 519 ----- ROM_CODE CSEG BASE
520 520 00025 _pedometer:
521 521 $DGL 1,29
522 522 00025 C7 push hl ;[INF] 1, 1
523 523 00026 2024 subw sp,#024H ;[INF] 2, 1
524 524 00028 FBF8FF movw hl,sp ;[INF] 3, 1
525 525 0002B ??bf_pedometer:
526 526 ; line 31 : static s16 th_H = 15000; // 臒l<E88792>B<EFBFBD>b<EFBFBD><62><EFBFBD>B<EFBFBD><42><EFBFBD>I<EFBFBD>ύX<CF8D>Ƃ<EFBFBD><C682><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>c
527 527 ; <20>̂ŕϐ<C595>
528 528 ; line 32 : static s16 th_L = 11000;
529 529 ; line 33 : static u16 acc_norm[3]; // <20><><EFBFBD><EFBFBD><EFBFBD>x<EFBFBD>̑傫<CC91><E582AB><EFBFBD>̃q<CC83>X<EFBFBD>g<EFBFBD><67><EFBFBD>B<EFBFBD><42><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
530 530 ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Â<EFBFBD>
531 531 ; line 34 : static u16 acc_norm_temp;
532 532 ; line 35 : static u8 interval_hh; // <20>R-<2D>R<EFBFBD>Ԃ̎<D482><CC8E>ԁB<D481>Z<EFBFBD>߂<EFBFBD><DF82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͂<EFBFBD><CD82><EFBFBD><EFBFBD>B
533 533 ; line 36 : static u8 time_l; // <20>O<EFBFBD><4F><EFBFBD>̋ɏ<CC8B><C98F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̌o<CC8C>ߎ<EFBFBD><DF8E><EFBFBD>
534 534 ; line 37 : static u16 peak_l; // <20>J<EFBFBD>̐[<5B><>
535 535 ; line 38 : static u16 peak_h; // <20>R<EFBFBD>̍<EFBFBD><CC8D><EFBFBD>
536 536 ; line 39 : static u16 norm_hist[TAP];
537 537 ; line 40 :
538 538 ; line 41 : static u8 hist_indx;
539 539 ; line 42 : static u8 t_rise;
540 540 ; line 43 :
541 541 ; line 44 : signed long filterd;
542 542 ; line 45 :
543 543 ; line 46 : u8 i;
544 544 ; line 47 :
545 545 ; line 48 : signed long temp1,temp2,temp3;
546 546 ; line 49 : signed long temp4,temp5,temp6;
547 547 ; line 50 :
548 548 ; line 51 : u16 sx16 = abs( (u16)vreg_ctr[VREG_C_ACC_XH] * 256 + vreg_ct
549 549 ; r[VREG_C_ACC_XL] );
550 550 $DGL 0,22
551 551 0002B R8F4600 mov a,!_vreg_ctr+70 ;[INF] 3, 1
552 552 0002E F0 clrb x ;[INF] 1, 1
553 553 0002F RF94500 mov c,!_vreg_ctr+69 ;[INF] 3, 1
554 554 00032 RFD0600 call !bs_F0097 ;[INF] 3, 3
555 555 00035 BC04 movw [hl+4],ax ; sx16 ;[INF] 2, 1
556 556 ; line 52 : u16 sy16 = abs( (u16)vreg_ctr[VREG_C_ACC_YH] * 256 + vreg_ct
557 557 ; r[VREG_C_ACC_YL] );
558 558 $DGL 0,23
559 559 00037 R8F4800 mov a,!_vreg_ctr+72 ;[INF] 3, 1
560 560 0003A F0 clrb x ;[INF] 1, 1
561 561 0003B RF94700 mov c,!_vreg_ctr+71 ;[INF] 3, 1
562 562 0003E RFD0600 call !bs_F0097 ;[INF] 3, 3
563 563 00041 BC02 movw [hl+2],ax ; sy16 ;[INF] 2, 1
564 564 ; line 53 : u16 sz16 = abs( (u16)vreg_ctr[VREG_C_ACC_ZH] * 256 + vreg_ct
565 565 ; r[VREG_C_ACC_ZL] );
566 566 $DGL 0,24
567 567 00043 R8F4A00 mov a,!_vreg_ctr+74 ;[INF] 3, 1
568 568 00046 F0 clrb x ;[INF] 1, 1
569 569 00047 RF94900 mov c,!_vreg_ctr+73 ;[INF] 3, 1
570 570 0004A RFD0600 call !bs_F0097 ;[INF] 3, 3
571 571 0004D BB movw [hl],ax ; sz16 ;[INF] 1, 1
572 572 ; line 54 :
573 573 ; line 55 : // <20>x<EFBFBD>N<EFBFBD>g<EFBFBD><67><EFBFBD>̃m<CC83><6D><EFBFBD><EFBFBD>
574 574 ; line 56 : #ifdef _mcu_
575 575 ; line 57 : norm_hist[ hist_indx & TAP-1 ] = sqrt( (long)sx16 * ( sx16 /
576 576 ; 2 ) +
577 577 ; line 58 : (long)sy16 * ( sy16 /
578 578 ; 2 ) +
579 579 ; line 59 : (long)sz16 * ( sz16 /
580 580 ; 2 )
581 581 ; line 60 : );
582 582 $DGL 0,31
583 583 0004E AC04 movw ax,[hl+4] ; sx16 ;[INF] 2, 1
584 584 00050 RFD0000 call !bs_S0099 ;[INF] 3, 3
585 585 00053 AC04 movw ax,[hl+4] ; sx16 ;[INF] 2, 1
586 586 00055 311E shrw ax,1 ;[INF] 2, 1
587 587 00057 RBD00 movw _@RTARG4,ax ;[INF] 2, 1
588 588 00059 F6 clrw ax ;[INF] 1, 1
589 589 0005A RBD00 movw _@RTARG6,ax ;[INF] 2, 1
590 590 0005C RFD0000 call !@@lsmul ;[INF] 3, 3
591 591 0005F RFD0D00 call !bs_S0098 ;[INF] 3, 3
592 592 00062 AC02 movw ax,[hl+2] ; sy16 ;[INF] 2, 1
593 593 00064 RFD0000 call !bs_S0099 ;[INF] 3, 3
594 594 00067 AC02 movw ax,[hl+2] ; sy16 ;[INF] 2, 1
595 595 00069 311E shrw ax,1 ;[INF] 2, 1
596 596 0006B RDA00 movw bc,_@RTARG4 ;[INF] 2, 1
597 597 0006D C3 push bc ;[INF] 1, 1
598 598 0006E RFD1600 call !bs_S0096 ;[INF] 3, 3
599 599 00071 C0 pop ax ;[INF] 1, 1
600 600 00072 RBD00 movw _@RTARG4,ax ;[INF] 2, 1
601 601 00074 RAD00 movw ax,_@RTARG6 ;[INF] 2, 1
602 602 00076 RFD0000 call !@@lsadd ;[INF] 3, 3
603 603 00079 RFD0D00 call !bs_S0098 ;[INF] 3, 3
604 604 0007C AB movw ax,[hl] ; sz16 ;[INF] 1, 1
605 605 0007D RFD0000 call !bs_S0099 ;[INF] 3, 3
606 606 00080 AB movw ax,[hl] ; sz16 ;[INF] 1, 1
607 607 00081 311E shrw ax,1 ;[INF] 2, 1
608 608 00083 RDA00 movw bc,_@RTARG4 ;[INF] 2, 1
609 609 00085 C3 push bc ;[INF] 1, 1
610 610 00086 RFD1600 call !bs_S0096 ;[INF] 3, 3
611 611 00089 C0 pop ax ;[INF] 1, 1
612 612 0008A RBD00 movw _@RTARG4,ax ;[INF] 2, 1
613 613 0008C RAD00 movw ax,_@RTARG6 ;[INF] 2, 1
614 614 0008E RFD0000 call !@@lsadd ;[INF] 3, 3
615 615 00091 RFD0000 call !@@lstof ;[INF] 3, 3
616 616 00094 RDA00 movw bc,_@RTARG2 ;[INF] 2, 1
617 617 00096 RAD00 movw ax,_@RTARG0 ;[INF] 2, 1
618 618 00098 RFC000000 call !!_sqrt ;[INF] 4, 3
619 619 0009C C3 push bc ;[INF] 1, 1
620 620 0009D C5 push de ;[INF] 1, 1
621 621 0009E R8F8E00 mov a,!?L0012 ; hist_indx ;[INF] 3, 1
622 622 000A1 5C3F and a,#03FH ; 63 ;[INF] 2, 1
623 623 000A3 F0 clrb x ;[INF] 1, 1
624 624 000A4 317E shrw ax,7 ;[INF] 2, 1
625 625 000A6 R040E00 addw ax,#loww (?L0011) ; norm_hist ;[INF] 3, 1
626 626 000A9 14 movw de,ax ;[INF] 1, 1
627 627 000AA C2 pop bc ;[INF] 1, 1
628 628 000AB C0 pop ax ;[INF] 1, 1
629 629 000AC RBD00 movw _@RTARG0,ax ;[INF] 2, 1
630 630 000AE 13 movw ax,bc ;[INF] 1, 1
631 631 000AF RBD00 movw _@RTARG2,ax ;[INF] 2, 1
632 632 000B1 R31720005 bt _@RTARG3.7,$?L0014 ;[INF] 4, 5
633 633 000B5 RFD0000 call !@@ftolu ;[INF] 3, 3
634 634 000B8 EF03 br $?L0015 ;[INF] 2, 3
635 635 000BA ?L0014:
636 636 000BA RFD0000 call !@@ftols ;[INF] 3, 3
637 637 000BD ?L0015:
638 638 000BD RAD00 movw ax,_@RTARG0 ;[INF] 2, 1
639 639 000BF B9 movw [de],ax ;[INF] 1, 1
640 640 ; line 61 : #endif
641 641 ; line 62 :
642 642 ; line 63 : #ifdef _pc_
643 643 ; line 64 : norm_hist[ hist_indx & TAP-1 ] = normh * 256 + norml;
644 644 ; line 65 : #endif
645 645 ; line 66 :
646 646 ; line 67 : hist_indx += 1;
647 647 $DGL 0,38
648 648 000C0 RA08E00 inc !?L0012 ; hist_indx ;[INF] 3, 2
649 649 ; line 68 :
650 650 ; line 69 : // <20>q<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>Ƀt<C983>B<EFBFBD><42><EFBFBD>^<5E><><EFBFBD>|<7C><><EFBFBD>āA<C481><41><EFBFBD><EFBFBD><EFBFBD>̒l<CC92><6C><EFBFBD><EFBFBD><EFBFBD>߂<EFBFBD>
651 651 ; line 70 : filterd = 0;
652 652 $DGL 0,41
653 653 000C3 F6 clrw ax ;[INF] 1, 1
654 654 000C4 BC20 movw [hl+32],ax ; filterd ;[INF] 2, 1
655 655 000C6 BC22 movw [hl+34],ax ; filterd ;[INF] 2, 1
656 656 ; line 71 : // for( i = 8; i != 55; i++ ) // <20>W<EFBFBD><57><EFBFBD><EFBFBD><EFBFBD>O<EFBFBD>΂<EFBFBD><CE82><EFBFBD><EFBFBD>̂<EFBFBD><CC82><EFBFBD>
657 657 ; line 72 : for( i = 0; i != 46; i++ ) // <20>W<EFBFBD><57><EFBFBD>e<EFBFBD>[<5B>u<EFBFBD><75><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>B<EFBFBD>p
658 658 ; <20><><EFBFBD><EFBFBD><EFBFBD>[<5B>^<5E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
659 659 $DGL 0,43
660 660 000C8 9C1F mov [hl+31],a ; i ;[INF] 2, 1
661 661 000CA ?L0016:
662 662 000CA 8C1F mov a,[hl+31] ; i ;[INF] 2, 1
663 663 000CC 4C2E cmp a,#02EH ; 46 ;[INF] 2, 1
664 664 000CE DD3C bz $?L0017 ;[INF] 2, 4
665 665 ; line 73 : {
666 666 000D0 ??bb00_pedometer:
667 667 ; line 74 : filterd += (signed long)norm_hist[ ( hist_indx + i ) & T
668 668 ; AP-1 ] * lpf_coeff[ i ];
669 669 $DGL 0,45
670 670 000D0 R8F8E00 mov a,!?L0012 ; hist_indx ;[INF] 3, 1
671 671 000D3 0E1F add a,[hl+31] ; i ;[INF] 2, 1
672 672 000D5 70 mov x,a ;[INF] 1, 1
673 673 000D6 F1 clrb a ;[INF] 1, 1
674 674 000D7 61DC rolc a,1 ;[INF] 2, 1
675 675 000D9 60 mov a,x ;[INF] 1, 1
676 676 000DA 5C3F and a,#03FH ; 63 ;[INF] 2, 1
677 677 000DC F0 clrb x ;[INF] 1, 1
678 678 000DD 317E shrw ax,7 ;[INF] 2, 1
679 679 000DF 12 movw bc,ax ;[INF] 1, 1
680 680 000E0 R790E00 movw ax,?L0011[bc] ; norm_hist ;[INF] 3, 1
681 681 000E3 RFD0000 call !bs_S0099 ;[INF] 3, 3
682 682 000E6 8C1F mov a,[hl+31] ; i ;[INF] 2, 1
683 683 000E8 73 mov b,a ;[INF] 1, 1
684 684 000E9 R090000 mov a,_lpf_coeff[b] ;[INF] 3, 1
685 685 000EC 318F sarw ax,8 ;[INF] 2, 1
686 686 000EE RBD00 movw _@RTARG4,ax ;[INF] 2, 1
687 687 000F0 70 mov x,a ;[INF] 1, 1
688 688 000F1 RBD00 movw _@RTARG6,ax ;[INF] 2, 1
689 689 000F3 RFD0000 call !@@lsmul ;[INF] 3, 3
690 690 000F6 AC20 movw ax,[hl+32] ; filterd ;[INF] 2, 1
691 691 000F8 RBD00 movw _@RTARG4,ax ;[INF] 2, 1
692 692 000FA AC22 movw ax,[hl+34] ; filterd ;[INF] 2, 1
693 693 000FC RFD0000 call !@@lsadd ;[INF] 3, 3
694 694 000FF RAD00 movw ax,_@RTARG2 ;[INF] 2, 1
695 695 00101 BC22 movw [hl+34],ax ; filterd ;[INF] 2, 1
696 696 00103 RAD00 movw ax,_@RTARG0 ;[INF] 2, 1
697 697 00105 BC20 movw [hl+32],ax ; filterd ;[INF] 2, 1
698 698 00107 ??eb00_pedometer:
699 699 ; line 75 : }
700 700 $DGL 0,46
701 701 00107 61591F inc [hl+31] ; i ;[INF] 3, 2
702 702 0010A EFBE br $?L0016 ;[INF] 2, 3
703 703 0010C ?L0017:
704 704 ; line 76 :
705 705 ; line 77 : filterd += (4096)*512;
706 706 ; line 78 : acc_norm_temp = (s16)( filterd /1024 & 0xFFFF ); // <20><>FIL_CO
707 707 ; EFF_QUANT<4E><54><EFBFBD>琳<EFBFBD>K<EFBFBD><4B>
708 708 $DGL 0,49
709 709 0010C AC20 movw ax,[hl+32] ; filterd ;[INF] 2, 1
710 710 0010E RBD00 movw _@RTARG0,ax ;[INF] 2, 1
711 711 00110 AC22 movw ax,[hl+34] ; filterd ;[INF] 2, 1
712 712 00112 RBD00 movw _@RTARG2,ax ;[INF] 2, 1
713 713 00114 RC9000004 movw _@RTARG4,#0400H ; 1024 ;[INF] 4, 1
714 714 00118 F6 clrw ax ;[INF] 1, 1
715 715 00119 RFD0000 call !@@lsdiv ;[INF] 3, 3
716 716 0011C RC900FFFF movw _@RTARG4,#0FFFFH ; -1 ;[INF] 4, 1
717 717 00120 F6 clrw ax ;[INF] 1, 1
718 718 00121 RFD0000 call !@@lsband ;[INF] 3, 3
719 719 00124 RAD00 movw ax,_@RTARG0 ;[INF] 2, 1
720 720 00126 RBF0600 movw !?L0006,ax ; acc_norm_temp ;[INF] 3, 1
721 721 ; line 79 : /*
722 722 ; line 80 : if( acc_norm[0] < acc_norm_temp )
723 723 ; line 81 : {
724 724 ; line 82 : t_rise += 1;
725 725 ; line 83 : if( t_rise == 0 )
726 726 ; line 84 : t_rise == 254;
727 727 ; line 85 : }
728 728 ; line 86 : else
729 729 ; line 87 : {
730 730 ; line 88 : t_rise = 0;
731 731 ; line 89 : }
732 732 ; line 90 : */
733 733 ; line 91 : if( acc_norm[0] != acc_norm_temp )
734 734 $DGL 0,62
735 735 00129 RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
736 736 0012C R420600 cmpw ax,!?L0006 ; acc_norm_temp ;[INF] 3, 1
737 737 0012F DD12 bz $?L0019 ;[INF] 2, 4
738 738 ; line 92 : {
739 739 00131 ??bb01_pedometer:
740 740 ; line 93 : acc_norm[2] = acc_norm[1]; // <20>q<EFBFBD>X<EFBFBD>g<EFBFBD><67>
741 741 $DGL 0,64
742 742 00131 RAF0200 movw ax,!?L0005+2 ; acc_norm ;[INF] 3, 1
743 743 00134 RBF0400 movw !?L0005+4,ax ; acc_norm ;[INF] 3, 1
744 744 ; line 94 : acc_norm[1] = acc_norm[0];
745 745 $DGL 0,65
746 746 00137 RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
747 747 0013A RBF0200 movw !?L0005+2,ax ; acc_norm ;[INF] 3, 1
748 748 ; line 95 : acc_norm[0] = acc_norm_temp;
749 749 $DGL 0,66
750 750 0013D RAF0600 movw ax,!?L0006 ; acc_norm_temp ;[INF] 3, 1
751 751 00140 RBF0000 movw !?L0005,ax ; acc_norm ;[INF] 3, 1
752 752 00143 ??eb01_pedometer:
753 753 ; line 96 : }
754 754 00143 ?L0019:
755 755 ; line 97 :
756 756 ; line 98 : if( acc_norm[2] <= acc_norm[1] && acc_norm[1] > acc_norm[0]
757 757 ; line 99 : && acc_norm[0] > th_H )
758 758 $DGL 0,70
759 759 00143 RAF0200 movw ax,!?L0005+2 ; acc_norm ;[INF] 3, 1
760 760 00146 R420400 cmpw ax,!?L0005+4 ; acc_norm ;[INF] 3, 1
761 761 00149 DC50 bc $?L0021 ;[INF] 2, 4
762 762 0014B RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
763 763 0014E R420200 cmpw ax,!?L0005+2 ; acc_norm ;[INF] 3, 1
764 764 00151 DE48 bnc $?L0021 ;[INF] 2, 4
765 765 00153 RAF0000 movw ax,!?L0003 ; th_H ;[INF] 3, 1
766 766 00156 R420000 cmpw ax,!?L0005 ; acc_norm ;[INF] 3, 1
767 767 00159 DE40 bnc $?L0021 ;[INF] 2, 4
768 768 ; line 100 : // <20>ɑ<EFBFBD><C991>ŁA臒l<E88792>𒴂<EFBFBD><F092B482>Ă<EFBFBD><C482><EFBFBD>
769 769 ; line 101 : {
770 770 0015B ??bb02_pedometer:
771 771 ; line 102 : if( 21 < interval_hh )
772 772 $DGL 0,73
773 773 0015B R40080016 cmp !?L0007,#016H ; interval_hh,22 ;[INF] 4, 1
774 774 0015F DC1F bc $?L0023 ;[INF] 2, 4
775 775 ; line 103 : // <20>O<EFBFBD><4F><EFBFBD>̋ɑ傩<C991><E582A9><EFBFBD>̊Ԋu<D48A><75><EFBFBD>قǂ悢
776 776 ; line 104 : {
777 777 00161 ??bb03_pedometer:
778 778 ; line 105 : if(( interval_hh < 160 ) && ( time_l < interval_hh )
779 779 ; )
780 780 $DGL 0,76
781 781 00161 R400800A0 cmp !?L0007,#0A0H ; interval_hh,160 ;[INF] 4, 1
782 782 00165 DE16 bnc $?L0027 ;[INF] 2, 4
783 783 00167 R8F0900 mov a,!?L0008 ; time_l ;[INF] 3, 1
784 784 0016A R4F0800 cmp a,!?L0007 ; interval_hh ;[INF] 3, 1
785 785 0016D DE0E bnc $?L0027 ;[INF] 2, 4
786 786 ; line 106 : // <20>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD>
787 787 ; line 107 : {
788 788 0016F ??bb04_pedometer:
789 789 ; line 108 : if( acc_norm[0] - peak_l > 4200 ){
790 790 $DGL 0,79
791 791 0016F RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
792 792 00172 R220A00 subw ax,!?L0009 ; peak_l ;[INF] 3, 1
793 793 00175 446910 cmpw ax,#01069H ; 4201 ;[INF] 3, 1
794 794 00178 61C8 skc ;[INF] 2, 1
795 795 0017A ??bb05_pedometer:
796 796 ; line 109 : // <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>܂<EFBFBD><DC82><EFBFBD>
797 797 ; line 110 : hosu_increment();
798 798 $DGL 0,81
799 799 0017A RFDE401 call !_hosu_increment ;[INF] 3, 3
800 800 0017D ??eb05_pedometer:
801 801 ; line 111 : }
802 802 0017D ?L0027:
803 803 ; line 112 : }
804 804 0017D ??eb04_pedometer:
805 805 ; line 113 : interval_hh = 0;
806 806 $DGL 0,84
807 807 0017D RF50800 clrb !?L0007 ; interval_hh ;[INF] 3, 1
808 808 00180 ??eb03_pedometer:
809 809 ; line 114 : }
810 810 00180 ?L0023:
811 811 ; line 115 : if( acc_norm[0] > 18000 )
812 812 $DGL 0,86
813 813 00180 RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
814 814 00183 445146 cmpw ax,#04651H ; 18001 ;[INF] 3, 1
815 815 00186 DC0B bc $?L0029 ;[INF] 2, 4
816 816 ; line 116 : {
817 817 00188 ??bb06_pedometer:
818 818 ; line 117 : th_L = acc_norm[0] - 10000;
819 819 $DGL 0,88
820 820 00188 RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
821 821 0018B 241027 subw ax,#02710H ; 10000 ;[INF] 3, 1
822 822 0018E RBF0200 movw !?L0004,ax ; th_L ;[INF] 3, 1
823 823 00191 ??eb06_pedometer:
824 824 ; line 118 : }
825 825 $DGL 0,89
826 826 00191 EF19 br $?L0022 ;[INF] 2, 3
827 827 00193 ?L0029:
828 828 ; line 119 : else
829 829 ; line 120 : {
830 830 00193 ??bb07_pedometer:
831 831 ; line 121 : th_L = 11000;
832 832 $DGL 0,92
833 833 00193 30F82A movw ax,#02AF8H ; 11000 ;[INF] 3, 1
834 834 00196 RBF0200 movw !?L0004,ax ; th_L ;[INF] 3, 1
835 835 00199 ??eb07_pedometer:
836 836 ; line 122 : }
837 837 ; line 123 : }
838 838 $DGL 0,94
839 839 00199 ??eb02_pedometer:
840 840 00199 EF11 br $?L0022 ;[INF] 2, 3
841 841 0019B ?L0021:
842 842 ; line 124 : else
843 843 ; line 125 : {
844 844 0019B ??bb08_pedometer:
845 845 ; line 126 : interval_hh += ( interval_hh != 255 ) ? 1: 0; // <20>O<EFBFBD>a<EFBFBD><61><EFBFBD>Z
846 846 ; <20><><EFBFBD>Ċy<C48A>ɏ<EFBFBD><C98F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>炢<EFBFBD><E782A2><EFBFBD>̂<EFBFBD>
847 847 $DGL 0,97
848 848 0019B R400800FF cmp !?L0007,#0FFH ; interval_hh,255 ;[INF] 4, 1
849 849 0019F DD03 bz $?L0031 ;[INF] 2, 4
850 850 001A1 E6 onew ax ;[INF] 1, 1
851 851 001A2 EF01 br $?L0032 ;[INF] 2, 3
852 852 001A4 ?L0031:
853 853 001A4 F6 clrw ax ;[INF] 1, 1
854 854 001A5 ?L0032:
855 855 001A5 R340800 movw de,#loww (?L0007) ; interval_hh ;[INF] 3, 1
856 856 001A8 89 mov a,[de] ;[INF] 1, 1
857 857 001A9 6108 add a,x ;[INF] 2, 1
858 858 001AB 99 mov [de],a ;[INF] 1, 1
859 859 001AC ??eb08_pedometer:
860 860 ; line 127 : }
861 861 001AC ?L0022:
862 862 ; line 128 :
863 863 ; line 129 : // (2) <20><><EFBFBD>߂̋ɏ<CC8B><C98F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̎<EFBFBD><CC8E><EFBFBD>
864 864 ; line 130 : if( acc_norm[2] >= acc_norm[1] && acc_norm[1] < acc_norm[0]
865 865 ; line 131 : && acc_norm[0] < th_L )
866 866 $DGL 0,102
867 867 001AC RAF0400 movw ax,!?L0005+4 ; acc_norm ;[INF] 3, 1
868 868 001AF R420200 cmpw ax,!?L0005+2 ; acc_norm ;[INF] 3, 1
869 869 001B2 DC1B bc $?L0033 ;[INF] 2, 4
870 870 001B4 RAF0200 movw ax,!?L0005+2 ; acc_norm ;[INF] 3, 1
871 871 001B7 R420000 cmpw ax,!?L0005 ; acc_norm ;[INF] 3, 1
872 872 001BA DE13 bnc $?L0033 ;[INF] 2, 4
873 873 001BC RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
874 874 001BF R420200 cmpw ax,!?L0004 ; th_L ;[INF] 3, 1
875 875 001C2 DE0B bnc $?L0033 ;[INF] 2, 4
876 876 ; line 132 : {
877 877 001C4 ??bb09_pedometer:
878 878 ; line 133 : // <20>ɏ<EFBFBD><C98F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>o
879 879 ; line 134 : time_l = 0;
880 880 $DGL 0,105
881 881 001C4 RF50900 clrb !?L0008 ; time_l ;[INF] 3, 1
882 882 ; line 135 : peak_l = acc_norm[0];
883 883 $DGL 0,106
884 884 001C7 RAF0000 movw ax,!?L0005 ; acc_norm ;[INF] 3, 1
885 885 001CA RBF0A00 movw !?L0009,ax ; peak_l ;[INF] 3, 1
886 886 001CD ??eb09_pedometer:
887 887 ; line 136 : }
888 888 $DGL 0,107
889 889 001CD EF11 br $?L0034 ;[INF] 2, 3
890 890 001CF ?L0033:
891 891 ; line 137 : else
892 892 ; line 138 : {
893 893 001CF ??bb0A_pedometer:
894 894 ; line 139 : time_l += ( time_l != 255 ) ? 1: 0;
895 895 $DGL 0,110
896 896 001CF R400900FF cmp !?L0008,#0FFH ; time_l,255 ;[INF] 4, 1
897 897 001D3 DD03 bz $?L0035 ;[INF] 2, 4
898 898 001D5 E6 onew ax ;[INF] 1, 1
899 899 001D6 EF01 br $?L0036 ;[INF] 2, 3
900 900 001D8 ?L0035:
901 901 001D8 F6 clrw ax ;[INF] 1, 1
902 902 001D9 ?L0036:
903 903 001D9 R340900 movw de,#loww (?L0008) ; time_l ;[INF] 3, 1
904 904 001DC 89 mov a,[de] ;[INF] 1, 1
905 905 001DD 6108 add a,x ;[INF] 2, 1
906 906 001DF 99 mov [de],a ;[INF] 1, 1
907 907 001E0 ??eb0A_pedometer:
908 908 ; line 140 : }
909 909 001E0 ?L0034:
910 910 ; line 141 :
911 911 ; line 142 : {
912 912 001E0 ??bb0B_pedometer:
913 913 001E0 ??eb0B_pedometer:
914 914 ; line 143 : /*
915 915 ; line 144 : static u8 i = 0;
916 916 ; line 145 :
917 917 ; line 146 : vreg_ctr[VREG_C_FREE_0] = i++;
918 918 ; line 147 :
919 919 ; line 148 : vreg_ctr[VREG_C_FREE_1] = (u8)( acc_norm[0] / 256 & 0x00
920 920 ; FF );
921 921 ; line 149 : vreg_ctr[VREG_C_FREE_2] = (u8)( acc_norm[0] & 0x00FF );
922 922 ; line 150 :
923 923 ; line 151 : vreg_ctr[VREG_C_FREE_3] = (u8)( norm_hist[ hist_indx -1
924 924 ; & TAP-1 ] / 256 & 0xFF );
925 925 ; line 152 : vreg_ctr[VREG_C_FREE_4] = (u8)( norm_hist[ hist_indx -1
926 926 ; & TAP-1 ] & 0xFF );
927 927 ; line 153 :
928 928 ; line 154 : vreg_ctr[VREG_C_FREE_5] = interval_hh;
929 929 ; line 155 : vreg_ctr[VREG_C_FREE_6] = time_l;
930 930 ; line 156 :
931 931 ; line 157 : vreg_ctr[VREG_C_FREE_7] = vreg_ctr[ VREG_C_ACC_HOSU_L ];
932 932 ; line 158 : vreg_ctr[VREG_C_FREE_8] = (u8)( peak_l / 256 & 0x00FF );
933 933 ; line 159 : vreg_ctr[VREG_C_FREE_9] = (u8)( peak_l & 0x00FF );
934 934 ; line 160 : // vreg_ctr[VREG_C_FREE_A] = (u8)( norm_avg[0] / 256 & 0x
935 935 ; 00FF );
936 936 ; line 161 : // vreg_ctr[VREG_C_FREE_B] = (u8)( norm_avg[0] &
937 937 ; 0x00FF );
938 938 ; line 162 : */
939 939 ; line 163 : }
940 940 ; line 164 : }
941 941 $DGL 0,135
942 942 001E0 ??ef_pedometer:
943 943 001E0 1024 addw sp,#024H ;[INF] 2, 1
944 944 001E2 C6 pop hl ;[INF] 1, 1
945 945 001E3 D7 ret ;[INF] 1, 6
946 946 001E4 ??ee_pedometer:
947 947 ; line 165 :
948 948 ; line 166 :
949 949 ; line 167 :
950 950 ; line 168 : /*=========================================================
951 951 ; line 169 : <20>@<40><><EFBFBD><EFBFBD><EFBFBD>{<7B>P
952 952 ; line 170 : <20>@<40>@<40>ݐς<DD90><CF82>C<EFBFBD><43><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>g
953 953 ; line 171 : <20>@<40><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>X<EFBFBD>V
954 954 ; line 172 : ========================================================*/
955 955 ; line 173 : u8 p_record;
956 956 ; line 174 : u8 last_hour = 0x23; // <20><><EFBFBD><EFBFBD><EFBFBD>̍ŐV<C590>͉<EFBFBD><CD89><EFBFBD><EFBFBD>H
957 957 ; line 175 : u8 last_day = 0x30;
958 958 ; line 176 : u8 last_month = 0x12;
959 959 ; line 177 : u8 last_year = 0x99;
960 960 ; line 178 :
961 961 ; line 179 : #define HOSU_NODATA 0xFFFF
962 962 ; line 180 : #define HOSU_MAX 0xFFFE
963 963 ; line 181 :
964 964 ; line 182 : static void hosu_increment()
965 965 ; line 183 : {
966 966 001E4 _hosu_increment:
967 967 $DGL 1,107
968 968 001E4 C7 push hl ;[INF] 1, 1
969 969 001E5 2006 subw sp,#06H ;[INF] 2, 1
970 970 001E7 FBF8FF movw hl,sp ;[INF] 3, 1
971 971 001EA ??bf_hosu_increment:
972 972 ; line 184 : static u16 last_hour_fny;
973 973 ; line 185 :
974 974 ; line 186 : // <20>ݐς̍X<CC8D>V //
975 975 ; line 187 : // <20><><EFBFBD>낢<EFBFBD>뎸<EFBFBD>s<EFBFBD><73><EFBFBD><EFBFBD>...
976 976 ; line 188 : if( ++vreg_ctr[ VREG_C_ACC_HOSU_L ] == 0 )
977 977 $DGL 0,6
978 978 001EA RA04B00 inc !_vreg_ctr+75 ;[INF] 3, 2
979 979 001ED RD54B00 cmp0 !_vreg_ctr+75 ;[INF] 3, 1
980 980 001F0 DF1C bnz $?L0044 ;[INF] 2, 4
981 981 ; line 189 : {
982 982 001F2 ??bb00_hosu_increment:
983 983 ; line 190 : if( ++vreg_ctr[ VREG_C_ACC_HOSU_M ] == 0 )
984 984 $DGL 0,8
985 985 001F2 RA04C00 inc !_vreg_ctr+76 ;[INF] 3, 2
986 986 001F5 RD54C00 cmp0 !_vreg_ctr+76 ;[INF] 3, 1
987 987 001F8 DF14 bnz $?L0044 ;[INF] 2, 4
988 988 ; line 191 : {
989 989 001FA ??bb01_hosu_increment:
990 990 ; line 192 : if( ++vreg_ctr[ VREG_C_ACC_HOSU_H ] == 0 ){
991 991 $DGL 0,10
992 992 001FA RA04D00 inc !_vreg_ctr+77 ;[INF] 3, 2
993 993 001FD RD54D00 cmp0 !_vreg_ctr+77 ;[INF] 3, 1
994 994 00200 DF0C bnz $?L0044 ;[INF] 2, 4
995 995 00202 ??bb02_hosu_increment:
996 996 ; line 193 : vreg_ctr[ VREG_C_ACC_HOSU_L ] = 255; // <20>J<EFBFBD><4A><EFBFBD>X<EFBFBD>g
997 997 ; orz
998 998 $DGL 0,11
999 999 00202 RCF4B00FF mov !_vreg_ctr+75,#0FFH ; 255 ;[INF] 4, 1
1000 1000 ; line 194 : vreg_ctr[ VREG_C_ACC_HOSU_M ] = 255;
1001 1001 $DGL 0,12
1002 1002 00206 RCF4C00FF mov !_vreg_ctr+76,#0FFH ; 255 ;[INF] 4, 1
1003 1003 ; line 195 : vreg_ctr[ VREG_C_ACC_HOSU_H ] = 255;
1004 1004 $DGL 0,13
1005 1005 0020A RCF4D00FF mov !_vreg_ctr+77,#0FFH ; 255 ;[INF] 4, 1
1006 1006 0020E ??eb02_hosu_increment:
1007 1007 ; line 196 : }
1008 1008 0020E ?L0044:
1009 1009 0020E ??eb01_hosu_increment:
1010 1010 ; line 197 : }
1011 1011 0020E ??eb00_hosu_increment:
1012 1012 ; line 198 : }
1013 1013 ; line 199 :
1014 1014 ; line 200 : {
1015 1015 0020E ??bb03_hosu_increment:
1016 1016 ; line 201 : // <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̍X<CC8D>V /////////////////////////////
1017 1017 ; line 202 : // <20>󔒂̎<F3949282><CC8E>Ԃ<EFBFBD><D482>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>B<EFBFBD>P<EFBFBD><50><EFBFBD>Ԉȏ<D488><C88F><EFBFBD><EFBFBD>u<EFBFBD><75><EFBFBD>ꂽ<EFBFBD>ȂǁB
1018 1018 ; line 203 : u16 now_hour;
1019 1019 ; line 204 : u8 now_year;
1020 1020 ; line 205 :
1021 1021 ; line 206 : // <20><><EFBFBD>v<EFBFBD><76><EFBFBD>~<7E>߂<EFBFBD><DF82>K<EFBFBD>v<EFBFBD><76><EFBFBD>L<EFBFBD><4C><EFBFBD>̂Ł<CC82><C581>͈<EFBFBD><CD88>C<EFBFBD>ɍs<C98D><73><EFBFBD>ĉ<EFBFBD><C489><EFBFBD><EFBFBD><EFBFBD>
1022 1022 ; line 207 : DI();
1023 1023 $DGL 0,25
1024 1024 0020E 717BFA di ;[INF] 3, 4
1025 1025 ; line 208 : RWAIT = 1;
1026 1026 $DGL 0,26
1027 1027 00211 710A9E set1 RTCC1.0 ;[INF] 3, 2
1028 1028 ; line 209 : while( !RWST ){;}
1029 1029 $DGL 0,27
1030 1030 00214 ?L0046:
1031 1031 00214 31929E02 bt RTCC1.1,$?L0047 ;[INF] 4, 5
1032 1032 00218 ??bb04_hosu_increment:
1033 1033 00218 ??eb04_hosu_increment:
1034 1034 00218 EFFA br $?L0046 ;[INF] 2, 3
1035 1035 0021A ?L0047:
1036 1036 ; line 210 : now_year = bcdtob( YEAR );
1037 1037 $DGL 0,28
1038 1038 0021A 8E98 mov a,YEAR ;[INF] 2, 1
1039 1039 0021C RFD0000 call !@@bcdtob ;[INF] 3, 3
1040 1040 0021F 9C03 mov [hl+3],a ; now_year ;[INF] 2, 1
1041 1041 ; line 211 : last_hour = HOUR; // <20><><EFBFBD><EFBFBD><EFBFBD>ǂݏo<DD8F><6F><EFBFBD><EFBFBD><EFBFBD>Ɏg<C98E>p<EFBFBD>BBCD<43>̂܂<CC82>
1042 1042 ; <20>ł悢
1043 1043 $DGL 0,29
1044 1044 00221 8E94 mov a,HOUR ;[INF] 2, 1
1045 1045 00223 R9F0400 mov !_last_hour,a ;[INF] 3, 1
1046 1046 ; line 212 : last_day = DAY;
1047 1047 $DGL 0,30
1048 1048 00226 8E96 mov a,DAY ;[INF] 2, 1
1049 1049 00228 R9F0500 mov !_last_day,a ;[INF] 3, 1
1050 1050 ; line 213 : last_month = MONTH;
1051 1051 $DGL 0,31
1052 1052 0022B 8E97 mov a,MONTH ;[INF] 2, 1
1053 1053 0022D R9F0600 mov !_last_month,a ;[INF] 3, 1
1054 1054 ; line 214 : now_hour = get_long_hour();
1055 1055 $DGL 0,32
1056 1056 00230 RFD8A03 call !_get_long_hour ;[INF] 3, 3
1057 1057 00233 13 movw ax,bc ;[INF] 1, 1
1058 1058 00234 BC04 movw [hl+4],ax ; now_hour ;[INF] 2, 1
1059 1059 ; line 215 : // RWAIT = 0; <20><><EFBFBD>ōs<C58D><73><EFBFBD>Ă<EFBFBD><C482>܂<EFBFBD>
1060 1060 ; line 216 : // EI(); <20>V
1061 1061 ; line 217 :
1062 1062 ; line 218 : // <20><><EFBFBD><EFBFBD><EFBFBD>v<EFBFBD><76><EFBFBD>~<7E>܂<EFBFBD><DC82>Ă<EFBFBD><C482><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ԃ<EFBFBD><D482>l<EFBFBD><6C><EFBFBD><EFBFBD><EFBFBD>ĕK<C495>v<EFBFBD>Ȃ<EFBFBD><C882>i<EFBFBD>߂<EFBFBD> //
1063 1063 ; line 219 : if( last_year == now_year )
1064 1064 $DGL 0,37
1065 1065 00236 R8F0700 mov a,!_last_year ;[INF] 3, 1
1066 1066 00239 4E03 cmp a,[hl+3] ; now_year ;[INF] 2, 1
1067 1067 0023B DF12 bnz $?L0048 ;[INF] 2, 4
1068 1068 ; line 220 : {
1069 1069 0023D ??bb05_hosu_increment:
1070 1070 ; line 221 : if( now_hour > last_hour_fny )
1071 1071 $DGL 0,39
1072 1072 0023D RAF9200 movw ax,!?L0039 ; last_hour_fny ;[INF] 3, 1
1073 1073 00240 614904 cmpw ax,[hl+4] ; now_hour ;[INF] 3, 1
1074 1074 00243 DE41 bnc $?L0056 ;[INF] 2, 4
1075 1075 ; line 222 : {
1076 1076 00245 ??bb06_hosu_increment:
1077 1077 ; line 223 : fill_hosu_hist_hours( now_hour - last_hour_fny )
1078 1078 ; ;
1079 1079 $DGL 0,41
1080 1080 00245 AC04 movw ax,[hl+4] ; now_hour ;[INF] 2, 1
1081 1081 00247 R229200 subw ax,!?L0039 ; last_hour_fny ;[INF] 3, 1
1082 1082 0024A RFDB902 call !_fill_hosu_hist_hours ;[INF] 3, 3
1083 1083 0024D ??eb06_hosu_increment:
1084 1084 ; line 224 : }
1085 1085 ; line 225 : }
1086 1086 $DGL 0,43
1087 1087 0024D ??eb05_hosu_increment:
1088 1088 0024D EF37 br $?L0056 ;[INF] 2, 3
1089 1089 0024F ?L0048:
1090 1090 ; line 226 : else if( last_year == ( now_year -1 ) )
1091 1091 $DGL 0,44
1092 1092 0024F 8C03 mov a,[hl+3] ; now_year ;[INF] 2, 1
1093 1093 00251 318E shrw ax,8 ;[INF] 2, 1
1094 1094 00253 B1 decw ax ;[INF] 1, 1
1095 1095 00254 12 movw bc,ax ;[INF] 1, 1
1096 1096 00255 RD90700 mov x,!_last_year ;[INF] 3, 1
1097 1097 00258 F1 clrb a ;[INF] 1, 1
1098 1098 00259 43 cmpw ax,bc ;[INF] 1, 1
1099 1099 0025A DF1F bnz $?L0052 ;[INF] 2, 4
1100 1100 ; line 227 : {
1101 1101 0025C ??bb07_hosu_increment:
1102 1102 ; line 228 : // <20>N<EFBFBD><4E><EFBFBD>܂<EFBFBD><DC82><EFBFBD><EFBFBD>ł<EFBFBD><C582><EFBFBD><EFBFBD>Ƃ<EFBFBD>
1103 1103 ; line 229 : u16 temp_hours = ( ( 365 + (( now_year & 0x03 ) ==
1104 1104 ; 1 ? 1: 0 )) * 24 ) - last_hour_fny + now_hour;
1105 1105 $DGL 0,47
1106 1106 0025C 8C03 mov a,[hl+3] ; now_year ;[INF] 2, 1
1107 1107 0025E 5C03 and a,#03H ; 3 ;[INF] 2, 1
1108 1108 00260 91 dec a ;[INF] 1, 1
1109 1109 00261 DF03 bnz $?L0054 ;[INF] 2, 4
1110 1110 00263 E6 onew ax ;[INF] 1, 1
1111 1111 00264 EF01 br $?L0055 ;[INF] 2, 3
1112 1112 00266 ?L0054:
1113 1113 00266 F6 clrw ax ;[INF] 1, 1
1114 1114 00267 ?L0055:
1115 1115 00267 046D01 addw ax,#016DH ; 365 ;[INF] 3, 1
1116 1116 0026A 313D shlw ax,3 ;[INF] 2, 1
1117 1117 0026C 12 movw bc,ax ;[INF] 1, 1
1118 1118 0026D 01 addw ax,ax ;[INF] 1, 1
1119 1119 0026E 03 addw ax,bc ;[INF] 1, 1
1120 1120 0026F R229200 subw ax,!?L0039 ; last_hour_fny ;[INF] 3, 1
1121 1121 00272 610904 addw ax,[hl+4] ; now_hour ;[INF] 3, 1
1122 1122 00275 BB movw [hl],ax ; temp_hours ;[INF] 1, 1
1123 1123 ; line 230 : fill_hosu_hist_hours( temp_hours );
1124 1124 $DGL 0,48
1125 1125 00276 RFDB902 call !_fill_hosu_hist_hours ;[INF] 3, 3
1126 1126 00279 ??eb07_hosu_increment:
1127 1127 ; line 231 : }
1128 1128 $DGL 0,49
1129 1129 00279 EF0B br $?L0056 ;[INF] 2, 3
1130 1130 0027B ?L0052:
1131 1131 ; line 232 : else if( last_year < now_year )
1132 1132 $DGL 0,50
1133 1133 0027B R8F0700 mov a,!_last_year ;[INF] 3, 1
1134 1134 0027E 4E03 cmp a,[hl+3] ; now_year ;[INF] 2, 1
1135 1135 00280 DE04 bnc $?L0056 ;[INF] 2, 4
1136 1136 ; line 233 : {
1137 1137 00282 ??bb08_hosu_increment:
1138 1138 ; line 234 : // <20><><EFBFBD>N<EFBFBD><4E><EFBFBD>u
1139 1139 ; line 235 : fill_hosu_hist_hours( 0 );
1140 1140 $DGL 0,53
1141 1141 00282 F6 clrw ax ;[INF] 1, 1
1142 1142 00283 RFDB902 call !_fill_hosu_hist_hours ;[INF] 3, 3
1143 1143 00286 ??eb08_hosu_increment:
1144 1144 ; line 236 : }
1145 1145 00286 ?L0056:
1146 1146 ; line 237 : else
1147 1147 ; line 238 : {
1148 1148 00286 ??bb09_hosu_increment:
1149 1149 00286 ??eb09_hosu_increment:
1150 1150 ; line 239 : // <20>J<EFBFBD><4A><EFBFBD><EFBFBD><EFBFBD>_<EFBFBD>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>߂<EFBFBD><DF82>Ȃ<EFBFBD>
1151 1151 ; line 240 : // <20>m<EFBFBD>[<5B>P<EFBFBD>A<EFBFBD>ł悢
1152 1152 ; line 241 : }
1153 1153 ; line 242 : last_year = now_year;
1154 1154 $DGL 0,60
1155 1155 00286 8C03 mov a,[hl+3] ; now_year ;[INF] 2, 1
1156 1156 00288 R9F0700 mov !_last_year,a ;[INF] 3, 1
1157 1157 ; line 243 : last_hour_fny = now_hour;
1158 1158 $DGL 0,61
1159 1159 0028B AC04 movw ax,[hl+4] ; now_hour ;[INF] 2, 1
1160 1160 0028D RBF9200 movw !?L0039,ax ; last_hour_fny ;[INF] 3, 1
1161 1161 ; line 244 :
1162 1162 ; line 245 : // <20><><EFBFBD>ۂɃC<C983><43><EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>g
1163 1163 ; line 246 : if( pool[ p_record ] == HOSU_NODATA )
1164 1164 $DGL 0,64
1165 1165 00290 RD99000 mov x,!_p_record ;[INF] 3, 1
1166 1166 00293 F1 clrb a ;[INF] 1, 1
1167 1167 00294 01 addw ax,ax ;[INF] 1, 1
1168 1168 00295 R040000 addw ax,#loww (_pool) ;[INF] 3, 1
1169 1169 00298 14 movw de,ax ;[INF] 1, 1
1170 1170 00299 A9 movw ax,[de] ;[INF] 1, 1
1171 1171 0029A 44FFFF cmpw ax,#0FFFFH ; -1 ;[INF] 3, 1
1172 1172 0029D DF04 bnz $?L0058 ;[INF] 2, 4
1173 1173 ; line 247 : {
1174 1174 0029F ??bb0A_hosu_increment:
1175 1175 ; line 248 : pool[ p_record ] = 1;
1176 1176 $DGL 0,66
1177 1177 0029F E6 onew ax ;[INF] 1, 1
1178 1178 002A0 B9 movw [de],ax ;[INF] 1, 1
1179 1179 002A1 ??eb0A_hosu_increment:
1180 1180 ; line 249 : }
1181 1181 $DGL 0,67
1182 1182 002A1 EF12 br $?L0060 ;[INF] 2, 3
1183 1183 002A3 ?L0058:
1184 1184 ; line 250 : else if( pool[ p_record ] != HOSU_MAX )
1185 1185 $DGL 0,68
1186 1186 002A3 RD99000 mov x,!_p_record ;[INF] 3, 1
1187 1187 002A6 F1 clrb a ;[INF] 1, 1
1188 1188 002A7 01 addw ax,ax ;[INF] 1, 1
1189 1189 002A8 R040000 addw ax,#loww (_pool) ;[INF] 3, 1
1190 1190 002AB 14 movw de,ax ;[INF] 1, 1
1191 1191 002AC A9 movw ax,[de] ;[INF] 1, 1
1192 1192 002AD 44FEFF cmpw ax,#0FFFEH ; -2 ;[INF] 3, 1
1193 1193 002B0 DD03 bz $?L0060 ;[INF] 2, 4
1194 1194 ; line 251 : {
1195 1195 002B2 ??bb0B_hosu_increment:
1196 1196 ; line 252 : pool[ p_record ] += 1;
1197 1197 $DGL 0,70
1198 1198 002B2 A9 movw ax,[de] ;[INF] 1, 1
1199 1199 002B3 A1 incw ax ;[INF] 1, 1
1200 1200 002B4 B9 movw [de],ax ;[INF] 1, 1
1201 1201 002B5 ??eb0B_hosu_increment:
1202 1202 ; line 253 : }
1203 1203 002B5 ?L0060:
1204 1204 002B5 ??eb03_hosu_increment:
1205 1205 ; line 254 : }
1206 1206 ; line 255 : }
1207 1207 $DGL 0,73
1208 1208 002B5 ??ef_hosu_increment:
1209 1209 002B5 1006 addw sp,#06H ;[INF] 2, 1
1210 1210 002B7 C6 pop hl ;[INF] 1, 1
1211 1211 002B8 D7 ret ;[INF] 1, 6
1212 1212 002B9 ??ee_hosu_increment:
1213 1213 ; line 256 :
1214 1214 ; line 257 :
1215 1215 ; line 258 :
1216 1216 ; line 259 : /* ========================================================
1217 1217 ; line 260 : <20>󔒂̎<F3949282><CC8E>Ԃ<EFBFBD><D482>K<EFBFBD>؂<EFBFBD>0<EFBFBD>ɂ<EFBFBD><C982>āA
1218 1218 ; line 261 : <20><><EFBFBD><EFBFBD><EFBFBD>܂ނP<DE82><50><EFBFBD>Ԃ̃f<CC83>[<5B>^<5E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʒu<CA92>Ƀ|<7C>C<EFBFBD><43><EFBFBD>^<5E>H<EFBFBD><48><EFBFBD>i<EFBFBD>߂<EFBFBD>
1219 1219 ; line 262 : ======================================================== */
1220 1220 ; line 263 : void fill_hosu_hist_hours( u16 hours )
1221 1221 ; line 264 : {
1222 1222 002B9 _fill_hosu_hist_hours:
1223 1223 $DGL 1,168
1224 1224 002B9 C7 push hl ;[INF] 1, 1
1225 1225 002BA 16 movw hl,ax ;[INF] 1, 1
1226 1226 002BB ??bf_fill_hosu_hist_hours:
1227 1227 ; line 265 : if( hours > 255 )
1228 1228 $DGL 0,2
1229 1229 002BB 17 movw ax,hl ;[INF] 1, 1
1230 1230 002BC 440001 cmpw ax,#0100H ; 256 ;[INF] 3, 1
1231 1231 002BF DC02 bc $?L0064 ;[INF] 2, 4
1232 1232 ; line 266 : {
1233 1233 002C1 ??bb00_fill_hosu_hist_hours:
1234 1234 ; line 267 : hours = 0;
1235 1235 $DGL 0,4
1236 1236 002C1 F6 clrw ax ;[INF] 1, 1
1237 1237 002C2 16 movw hl,ax ;[INF] 1, 1
1238 1238 002C3 ??eb00_fill_hosu_hist_hours:
1239 1239 ; line 268 : }
1240 1240 002C3 ?L0064:
1241 1241 ; line 269 :
1242 1242 ; line 270 : // <20>󔒂̐<F3949282><CC90><EFBFBD><EFBFBD>Ԃ̐ݒ<CC90>
1243 1243 ; line 271 : do
1244 1244 ; line 272 : {
1245 1245 002C3 ??bb01_fill_hosu_hist_hours:
1246 1246 ; line 273 : p_record += 1;
1247 1247 $DGL 0,10
1248 1248 002C3 RA09000 inc !_p_record ;[INF] 3, 2
1249 1249 ; line 274 : pool[ p_record ] = 0;
1250 1250 $DGL 0,11
1251 1251 002C6 RF99000 mov c,!_p_record ;[INF] 3, 1
1252 1252 002C9 F3 clrb b ;[INF] 1, 1
1253 1253 002CA 311C shlw bc,1 ;[INF] 2, 1
1254 1254 002CC F6 clrw ax ;[INF] 1, 1
1255 1255 002CD R780000 movw _pool[bc],ax ;[INF] 3, 1
1256 1256 ; line 275 : hours -= 1;
1257 1257 $DGL 0,12
1258 1258 002D0 B7 decw hl ;[INF] 1, 1
1259 1259 002D1 ??eb01_fill_hosu_hist_hours:
1260 1260 ; line 276 : }
1261 1261 ; line 277 : while( hours != 0 );
1262 1262 $DGL 0,14
1263 1263 002D1 F6 clrw ax ;[INF] 1, 1
1264 1264 002D2 47 cmpw ax,hl ;[INF] 1, 1
1265 1265 002D3 DFEE bnz $?L0064 ;[INF] 2, 4
1266 1266 ; line 278 : }
1267 1267 $DGL 0,15
1268 1268 002D5 ??ef_fill_hosu_hist_hours:
1269 1269 002D5 C6 pop hl ;[INF] 1, 1
1270 1270 002D6 D7 ret ;[INF] 1, 6
1271 1271 002D7 ??ee_fill_hosu_hist_hours:
1272 1272 ; line 279 :
1273 1273 ; line 280 :
1274 1274 ; line 281 :
1275 1275 ; line 282 : /* ========================================================
1276 1276 ; line 283 : <20>󔒂̎<F3949282><CC8E>Ԃ<EFBFBD><D482>K<EFBFBD>؂<EFBFBD>0<EFBFBD>ɂ<EFBFBD><C982>āA
1277 1277 ; line 284 : <20><><EFBFBD><EFBFBD><EFBFBD>܂ނP<DE82><50><EFBFBD>Ԃ̃f<CC83>[<5B>^<5E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʒu<CA92>Ƀ|<7C>C<EFBFBD><43><EFBFBD>^<5E>H<EFBFBD><48><EFBFBD>i<EFBFBD>߂<EFBFBD>
1278 1278 ; line 285 : ======================================================== */
1279 1279 ; line 286 : void clear_hosu_hist()
1280 1280 ; line 287 : {
1281 1281 002D7 _clear_hosu_hist:
1282 1282 $DGL 1,183
1283 1283 002D7 C7 push hl ;[INF] 1, 1
1284 1284 002D8 ??bf_clear_hosu_hist:
1285 1285 ; line 288 : u8 hours = 0;
1286 1286 $DGL 0,2
1287 1287 002D8 5600 mov l,#00H ; 0 ;[INF] 2, 1
1288 1288 ; line 289 : // <20>󔒂̐<F3949282><CC90><EFBFBD><EFBFBD>Ԃ̐ݒ<CC90>
1289 1289 ; line 290 : do
1290 1290 002DA ?L0071:
1291 1291 ; line 291 : {
1292 1292 002DA ??bb00_clear_hosu_hist:
1293 1293 ; line 292 : pool[ hours ] = 0xFFFF;
1294 1294 $DGL 0,6
1295 1295 002DA 66 mov a,l ;[INF] 1, 1
1296 1296 002DB F0 clrb x ;[INF] 1, 1
1297 1297 002DC 317E shrw ax,7 ;[INF] 2, 1
1298 1298 002DE 12 movw bc,ax ;[INF] 1, 1
1299 1299 002DF F6 clrw ax ;[INF] 1, 1
1300 1300 002E0 B1 decw ax ;[INF] 1, 1
1301 1301 002E1 R780000 movw _pool[bc],ax ;[INF] 3, 1
1302 1302 ; line 293 : hours -= 1;
1303 1303 $DGL 0,7
1304 1304 002E4 96 dec l ;[INF] 1, 1
1305 1305 002E5 ??eb00_clear_hosu_hist:
1306 1306 ; line 294 : }
1307 1307 ; line 295 : while( hours != 0 );
1308 1308 $DGL 0,9
1309 1309 002E5 66 mov a,l ;[INF] 1, 1
1310 1310 002E6 D1 cmp0 a ;[INF] 1, 1
1311 1311 002E7 DFF1 bnz $?L0071 ;[INF] 2, 4
1312 1312 ; line 296 : vreg_ctr[ VREG_C_ACC_HOSU_L ] = 0;
1313 1313 $DGL 0,10
1314 1314 002E9 RF54B00 clrb !_vreg_ctr+75 ;[INF] 3, 1
1315 1315 ; line 297 : vreg_ctr[ VREG_C_ACC_HOSU_M ] = 0;
1316 1316 $DGL 0,11
1317 1317 002EC RF54C00 clrb !_vreg_ctr+76 ;[INF] 3, 1
1318 1318 ; line 298 : vreg_ctr[ VREG_C_ACC_HOSU_H ] = 0;
1319 1319 $DGL 0,12
1320 1320 002EF RF54D00 clrb !_vreg_ctr+77 ;[INF] 3, 1
1321 1321 ; line 299 : }
1322 1322 $DGL 0,13
1323 1323 002F2 ??ef_clear_hosu_hist:
1324 1324 002F2 C6 pop hl ;[INF] 1, 1
1325 1325 002F3 D7 ret ;[INF] 1, 6
1326 1326 002F4 ??ee_clear_hosu_hist:
1327 1327 ; line 300 :
1328 1328 ; line 301 :
1329 1329 ; line 302 : extern u8 iic_burst_state;
1330 1330 ; line 303 : bit record_read_msb_lsb;
1331 1331 ; line 304 :
1332 1332 ; line 305 : /* ========================================================
1333 1333 ; line 306 : <20><><EFBFBD><EFBFBD><EFBFBD>v<EFBFBD>q<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>ǂݏo<DD8F><6F><EFBFBD>̌㏈<CC8C><E38F88>(<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
1334 1334 ; line 307 : <20>ǂݏo<DD8F><6F><EFBFBD>|<7C>C<EFBFBD><43><EFBFBD>^<5E>̃N<CC83><4E><EFBFBD>A
1335 1335 ; line 308 : ======================================================== */
1336 1336 ; line 309 : void hosu_read_end( )
1337 1337 ; line 310 : {
1338 1338 002F4 _hosu_read_end:
1339 1339 $DGL 1,194
1340 1340 002F4 ??bf_hosu_read_end:
1341 1341 ; line 311 : record_read_msb_lsb = 0;
1342 1342 $DGL 0,2
1343 1343 002F4 R710300 clr1 _record_read_msb_lsb ;[INF] 3, 2
1344 1344 ; line 312 : }
1345 1345 $DGL 0,3
1346 1346 002F7 ??ef_hosu_read_end:
1347 1347 002F7 D7 ret ;[INF] 1, 6
1348 1348 002F8 ??ee_hosu_read_end:
1349 1349 ; line 313 :
1350 1350 ; line 314 :
1351 1351 ; line 315 : /* ========================================================
1352 1352 ; line 316 : <20><><EFBFBD><EFBFBD><EFBFBD>v<EFBFBD>̃q<CC83>X<EFBFBD>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>Ԃ<EFBFBD><D482>B
1353 1353 ; line 317 : <20>P<EFBFBD><50><EFBFBD>Ăԓx<D493>ɁA<C981>q<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>̉<EFBFBD><CC89>ʁA<CA81><41><EFBFBD>ʁA<CA81>ꎞ<EFBFBD>ԑk<D491><6B><EFBFBD>ĉ<EFBFBD><C489>ʏ<EFBFBD><CA8F><EFBFBD>...
1354 1354 ; line 318 : ======================================================== */
1355 1355 ; line 319 : u8 hosu_read( )
1356 1356 ; line 320 : {
1357 1357 002F8 _hosu_read:
1358 1358 $DGL 1,200
1359 1359 002F8 C7 push hl ;[INF] 1, 1
1360 1360 002F9 2004 subw sp,#04H ;[INF] 2, 1
1361 1361 002FB FBF8FF movw hl,sp ;[INF] 3, 1
1362 1362 002FE ??bf_hosu_read:
1363 1363 ; line 321 : u8 dat;
1364 1364 ; line 322 : u16 temp;
1365 1365 ; line 323 : static u8 p_record_buffer;
1366 1366 ; line 324 :
1367 1367 ; line 325 : switch( iic_burst_state ){
1368 1368 $DGL 0,6
1369 1369 002FE RD90000 mov x,!_iic_burst_state ;[INF] 3, 1
1370 1370 00301 F1 clrb a ;[INF] 1, 1
1371 1371 00302 E7 onew bc ;[INF] 1, 1
1372 1372 00303 240000 subw ax,#00H ; 0 ;[INF] 3, 1
1373 1373 00306 DD11 bz $?L0080 ;[INF] 2, 4
1374 1374 00308 23 subw ax,bc ;[INF] 1, 1
1375 1375 00309 DD1E bz $?L0081 ;[INF] 2, 4
1376 1376 0030B 23 subw ax,bc ;[INF] 1, 1
1377 1377 0030C DD25 bz $?L0082 ;[INF] 2, 4
1378 1378 0030E 23 subw ax,bc ;[INF] 1, 1
1379 1379 0030F DD2C bz $?L0083 ;[INF] 2, 4
1380 1380 00311 23 subw ax,bc ;[INF] 1, 1
1381 1381 00312 DD37 bz $?L0084 ;[INF] 2, 4
1382 1382 00314 23 subw ax,bc ;[INF] 1, 1
1383 1383 00315 DD3C bz $?L0085 ;[INF] 2, 4
1384 1384 00317 EF42 br $?L0086 ;[INF] 2, 3
1385 1385 00319 ??bb00_hosu_read:
1386 1386 ; line 326 : case( 0 ):
1387 1387 00319 ?L0080:
1388 1388 ; line 327 : p_record_buffer = p_record;
1389 1389 $DGL 0,8
1390 1390 00319 R8F9000 mov a,!_p_record ;[INF] 3, 1
1391 1391 0031C R9F9400 mov !?L0078,a ; p_record_buffer ;[INF] 3, 1
1392 1392 ; line 328 : iic_burst_state += 1;
1393 1393 $DGL 0,9
1394 1394 0031F RA00000 inc !_iic_burst_state ;[INF] 3, 2
1395 1395 ; line 329 : return( last_hour );
1396 1396 $DGL 0,10
1397 1397 00322 RD90400 mov x,!_last_hour ;[INF] 3, 1
1398 1398 00325 F1 clrb a ;[INF] 1, 1
1399 1399 00326 12 movw bc,ax ;[INF] 1, 1
1400 1400 00327 EF5D br $?L0079 ;[INF] 2, 3
1401 1401 ; line 330 :
1402 1402 ; line 331 : case( 1 ):
1403 1403 00329 ?L0081:
1404 1404 ; line 332 : iic_burst_state += 1;
1405 1405 $DGL 0,13
1406 1406 00329 RA00000 inc !_iic_burst_state ;[INF] 3, 2
1407 1407 ; line 333 : return( last_day );
1408 1408 $DGL 0,14
1409 1409 0032C RD90500 mov x,!_last_day ;[INF] 3, 1
1410 1410 0032F F1 clrb a ;[INF] 1, 1
1411 1411 00330 12 movw bc,ax ;[INF] 1, 1
1412 1412 00331 EF53 br $?L0079 ;[INF] 2, 3
1413 1413 ; line 334 :
1414 1414 ; line 335 : case( 2 ):
1415 1415 00333 ?L0082:
1416 1416 ; line 336 : iic_burst_state += 1;
1417 1417 $DGL 0,17
1418 1418 00333 RA00000 inc !_iic_burst_state ;[INF] 3, 2
1419 1419 ; line 337 : return( last_month );
1420 1420 $DGL 0,18
1421 1421 00336 RD90600 mov x,!_last_month ;[INF] 3, 1
1422 1422 00339 F1 clrb a ;[INF] 1, 1
1423 1423 0033A 12 movw bc,ax ;[INF] 1, 1
1424 1424 0033B EF49 br $?L0079 ;[INF] 2, 3
1425 1425 ; line 338 :
1426 1426 ; line 339 : case( 3 ):
1427 1427 0033D ?L0083:
1428 1428 ; line 340 : iic_burst_state += 1;
1429 1429 $DGL 0,21
1430 1430 0033D RA00000 inc !_iic_burst_state ;[INF] 3, 2
1431 1431 ; line 341 : return( btobcd(last_year) );
1432 1432 $DGL 0,22
1433 1433 00340 R8F0700 mov a,!_last_year ;[INF] 3, 1
1434 1434 00343 RFD0000 call !@@bbcd ;[INF] 3, 3
1435 1435 00346 318E shrw ax,8 ;[INF] 2, 1
1436 1436 00348 12 movw bc,ax ;[INF] 1, 1
1437 1437 00349 EF3B br $?L0079 ;[INF] 2, 3
1438 1438 ; line 342 :
1439 1439 ; line 343 : case( 4 ):
1440 1440 0034B ?L0084:
1441 1441 ; line 344 : iic_burst_state += 1;
1442 1442 $DGL 0,25
1443 1443 0034B RA00000 inc !_iic_burst_state ;[INF] 3, 2
1444 1444 ; line 345 : return( 0x55 ); // reserved dummy
1445 1445 $DGL 0,26
1446 1446 0034E 325500 movw bc,#055H ; 85 ;[INF] 3, 1
1447 1447 00351 EF33 br $?L0079 ;[INF] 2, 3
1448 1448 ; line 346 :
1449 1449 ; line 347 : case( 5 ):
1450 1450 00353 ?L0085:
1451 1451 ; line 348 : iic_burst_state += 1;
1452 1452 $DGL 0,29
1453 1453 00353 RA00000 inc !_iic_burst_state ;[INF] 3, 2
1454 1454 ; line 349 : return( 0xAA ); // reserved. dummy
1455 1455 $DGL 0,30
1456 1456 00356 32AA00 movw bc,#0AAH ; 170 ;[INF] 3, 1
1457 1457 00359 EF2B br $?L0079 ;[INF] 2, 3
1458 1458 ; line 350 :
1459 1459 ; line 351 : default:
1460 1460 0035B ?L0086:
1461 1461 ; line 352 : temp = pool[ p_record_buffer ];
1462 1462 $DGL 0,33
1463 1463 0035B RF99400 mov c,!?L0078 ; p_record_buffer ;[INF] 3, 1
1464 1464 0035E F3 clrb b ;[INF] 1, 1
1465 1465 0035F 311C shlw bc,1 ;[INF] 2, 1
1466 1466 00361 R790000 movw ax,_pool[bc] ;[INF] 3, 1
1467 1467 00364 BB movw [hl],ax ; temp ;[INF] 1, 1
1468 1468 ; line 353 : if( record_read_msb_lsb == 0 )
1469 1469 $DGL 0,34
1470 1470 00365 R31020005 bt _record_read_msb_lsb,$?L0089 ;[INF] 4, 5
1471 1471 ; line 354 : {
1472 1472 00369 ??bb01_hosu_read:
1473 1473 ; line 355 : dat = (u8)( temp & 0x00FF );
1474 1474 $DGL 0,36
1475 1475 00369 8B mov a,[hl] ; temp ;[INF] 1, 1
1476 1476 0036A 9C03 mov [hl+3],a ; dat ;[INF] 2, 1
1477 1477 0036C ??eb01_hosu_read:
1478 1478 ; line 356 : }
1479 1479 $DGL 0,37
1480 1480 0036C EF07 br $?L0090 ;[INF] 2, 3
1481 1481 0036E ?L0089:
1482 1482 ; line 357 : else
1483 1483 ; line 358 : {
1484 1484 0036E ??bb02_hosu_read:
1485 1485 ; line 359 : dat = (u8)(( temp >> 8 ) & 0x00FF );
1486 1486 $DGL 0,40
1487 1487 0036E 8C01 mov a,[hl+1] ; temp ;[INF] 2, 1
1488 1488 00370 9C03 mov [hl+3],a ; dat ;[INF] 2, 1
1489 1489 ; line 360 : p_record_buffer -= 1;
1490 1490 $DGL 0,41
1491 1491 00372 RB09400 dec !?L0078 ; p_record_buffer ;[INF] 3, 2
1492 1492 00375 ??eb02_hosu_read:
1493 1493 ; line 361 : }
1494 1494 00375 ?L0090:
1495 1495 ; line 362 : record_read_msb_lsb += 1;
1496 1496 $DGL 0,43
1497 1497 00375 7180 set1 CY ;[INF] 2, 1
1498 1498 00377 R710700 xor1 CY,_record_read_msb_lsb ;[INF] 3, 1
1499 1499 0037A 61DC rolc a,1 ;[INF] 2, 1
1500 1500 0037C 61FB rorc a,1 ;[INF] 2, 1
1501 1501 0037E R710100 mov1 _record_read_msb_lsb,CY ;[INF] 3, 2
1502 1502 ; line 363 : return( dat );
1503 1503 $DGL 0,44
1504 1504 00381 8C03 mov a,[hl+3] ; dat ;[INF] 2, 1
1505 1505 00383 318E shrw ax,8 ;[INF] 2, 1
1506 1506 00385 12 movw bc,ax ;[INF] 1, 1
1507 1507 00386 ??eb00_hosu_read:
1508 1508 ; line 364 : }
1509 1509 00386 ?L0079:
1510 1510 ; line 365 : }
1511 1511 $DGL 0,46
1512 1512 00386 ??ef_hosu_read:
1513 1513 00386 1004 addw sp,#04H ;[INF] 2, 1
1514 1514 00388 C6 pop hl ;[INF] 1, 1
1515 1515 00389 D7 ret ;[INF] 1, 6
1516 1516 0038A ??ee_hosu_read:
1517 1517 ; line 366 :
1518 1518 ; line 367 :
1519 1519 ; line 368 :
1520 1520 ; line 369 : /* ========================================================
1521 1521 ; line 370 : <20><><EFBFBD>N<EFBFBD>̌<EFBFBD><CC8C>U<EFBFBD><55><EFBFBD><EFBFBD><EFBFBD>̌o<CC8C>ߎ<EFBFBD><DF8E><EFBFBD>(hour)<29><><EFBFBD>Ԃ<EFBFBD><D482>B
1522 1522 ; line 371 : <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
1523 1523 ; line 372 : <20>Ԓl u16 long_hour
1524 1524 ; line 373 : ======================================================== */
1525 1525 ; line 374 : static const u16 DAYS_FROM_HNY[] = {
1526 1526 ; line 375 : 0,
1527 1527 ; line 376 : 0, 31, 31+28, 59+31, 90+30,
1528 1528 ; line 377 : 120+31, 151+30, 181+31, 212+31, 243+30,
1529 1529 ; line 378 : 273+31, 304+30 };
1530 1530 ; line 379 :
1531 1531 ; line 380 : u16 get_long_hour()
1532 1532 ; line 381 : {
1533 1533 0038A _get_long_hour:
1534 1534 $DGL 1,223
1535 1535 0038A C7 push hl ;[INF] 1, 1
1536 1536 0038B 2006 subw sp,#06H ;[INF] 2, 1
1537 1537 0038D FBF8FF movw hl,sp ;[INF] 3, 1
1538 1538 00390 ??bf_get_long_hour:
1539 1539 ; line 382 : u16 long_hour;
1540 1540 ; line 383 : u8 year_hex;
1541 1541 ; line 384 : u8 month_hex;
1542 1542 ; line 385 : u8 day_hex;
1543 1543 ; line 386 : u8 hour_hex;
1544 1544 ; line 387 :
1545 1545 ; line 388 : year_hex = bcdtob( YEAR );
1546 1546 $DGL 0,8
1547 1547 00390 8E98 mov a,YEAR ;[INF] 2, 1
1548 1548 00392 RFD0000 call !@@bcdtob ;[INF] 3, 3
1549 1549 00395 9C03 mov [hl+3],a ; year_hex ;[INF] 2, 1
1550 1550 ; line 389 : month_hex = bcdtob( MONTH );
1551 1551 $DGL 0,9
1552 1552 00397 8E97 mov a,MONTH ;[INF] 2, 1
1553 1553 00399 RFD0000 call !@@bcdtob ;[INF] 3, 3
1554 1554 0039C 9C02 mov [hl+2],a ; month_hex ;[INF] 2, 1
1555 1555 ; line 390 : day_hex = bcdtob( DAY );
1556 1556 $DGL 0,10
1557 1557 0039E 8E96 mov a,DAY ;[INF] 2, 1
1558 1558 003A0 RFD0000 call !@@bcdtob ;[INF] 3, 3
1559 1559 003A3 9C01 mov [hl+1],a ; day_hex ;[INF] 2, 1
1560 1560 ; line 391 : hour_hex = bcdtob( HOUR );
1561 1561 $DGL 0,11
1562 1562 003A5 8E94 mov a,HOUR ;[INF] 2, 1
1563 1563 003A7 RFD0000 call !@@bcdtob ;[INF] 3, 3
1564 1564 003AA 9B mov [hl],a ; hour_hex ;[INF] 1, 1
1565 1565 ; line 392 :
1566 1566 ; line 393 : RWAIT = 0;
1567 1567 $DGL 0,13
1568 1568 003AB 710B9E clr1 RTCC1.0 ;[INF] 3, 2
1569 1569 ; line 394 : EI();
1570 1570 $DGL 0,14
1571 1571 003AE 717AFA ei ;[INF] 3, 4
1572 1572 ; line 395 :
1573 1573 ; line 396 : // <20>܂<EFBFBD><DC82><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̕<EFBFBD><CC95><EFBFBD>
1574 1574 ; line 397 : long_hour = DAYS_FROM_HNY[ month_hex ];
1575 1575 $DGL 0,17
1576 1576 003B1 8C02 mov a,[hl+2] ; month_hex ;[INF] 2, 1
1577 1577 003B3 F0 clrb x ;[INF] 1, 1
1578 1578 003B4 317E shrw ax,7 ;[INF] 2, 1
1579 1579 003B6 12 movw bc,ax ;[INF] 1, 1
1580 1580 003B7 R793000 movw ax,_DAYS_FROM_HNY[bc] ;[INF] 3, 1
1581 1581 003BA BC04 movw [hl+4],ax ; long_hour ;[INF] 2, 1
1582 1582 ; line 398 : if(( ( year_hex & 0x03 ) == 0 ) && ( ( 3 <= month_hex )
1583 1583 $DGL 0,18
1584 1584 003BC 8C03 mov a,[hl+3] ; year_hex ;[INF] 2, 1
1585 1585 003BE 5C03 and a,#03H ; 3 ;[INF] 2, 1
1586 1586 003C0 D1 cmp0 a ;[INF] 1, 1
1587 1587 003C1 DF15 bnz $?L0093 ;[INF] 2, 4
1588 1588 003C3 8C02 mov a,[hl+2] ; month_hex ;[INF] 2, 1
1589 1589 003C5 4C03 cmp a,#03H ; 3 ;[INF] 2, 1
1590 1590 003C7 DE0C bnc $?L0095 ;[INF] 2, 4
1591 1591 ; line 399 : || (( 2 == month_hex )
1592 1592 ; && ( day_hex == 29 )) ))
1593 1593 $DGL 0,19
1594 1594 003C9 8C02 mov a,[hl+2] ; month_hex ;[INF] 2, 1
1595 1595 003CB 4C02 cmp a,#02H ; 2 ;[INF] 2, 1
1596 1596 003CD DF09 bnz $?L0093 ;[INF] 2, 4
1597 1597 003CF 8C01 mov a,[hl+1] ; day_hex ;[INF] 2, 1
1598 1598 003D1 4C1D cmp a,#01DH ; 29 ;[INF] 2, 1
1599 1599 003D3 61F8 sknz ;[INF] 2, 1
1600 1600 003D5 ?L0095:
1601 1601 ; line 400 : {
1602 1602 003D5 ??bb00_get_long_hour:
1603 1603 ; line 401 : // <20>[<5B>N<EFBFBD>ŁA<C581>[<5B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
1604 1604 ; line 402 : long_hour += 1;
1605 1605 $DGL 0,22
1606 1606 003D5 617904 incw [hl+4] ; long_hour ;[INF] 3, 2
1607 1607 003D8 ??eb00_get_long_hour:
1608 1608 ; line 403 : }
1609 1609 003D8 ?L0093:
1610 1610 ; line 404 : long_hour += day_hex - 1;
1611 1611 $DGL 0,24
1612 1612 003D8 8C01 mov a,[hl+1] ; day_hex ;[INF] 2, 1
1613 1613 003DA 318E shrw ax,8 ;[INF] 2, 1
1614 1614 003DC B1 decw ax ;[INF] 1, 1
1615 1615 003DD 610904 addw ax,[hl+4] ; long_hour ;[INF] 3, 1
1616 1616 003E0 BC04 movw [hl+4],ax ; long_hour ;[INF] 2, 1
1617 1617 ; line 405 : long_hour *= 24; // <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
1618 1618 $DGL 0,25
1619 1619 003E2 313D shlw ax,3 ;[INF] 2, 1
1620 1620 003E4 12 movw bc,ax ;[INF] 1, 1
1621 1621 003E5 01 addw ax,ax ;[INF] 1, 1
1622 1622 003E6 03 addw ax,bc ;[INF] 1, 1
1623 1623 003E7 BC04 movw [hl+4],ax ; long_hour ;[INF] 2, 1
1624 1624 ; line 406 :
1625 1625 ; line 407 : long_hour += hour_hex;
1626 1626 $DGL 0,27
1627 1627 003E9 8C04 mov a,[hl+4] ; long_hour ;[INF] 2, 1
1628 1628 003EB 0D add a,[hl] ; hour_hex ;[INF] 1, 1
1629 1629 003EC 70 mov x,a ;[INF] 1, 1
1630 1630 003ED 8C05 mov a,[hl+5] ; long_hour ;[INF] 2, 1
1631 1631 003EF 1C00 addc a,#00H ; 0 ;[INF] 2, 1
1632 1632 003F1 BC04 movw [hl+4],ax ; long_hour ;[INF] 2, 1
1633 1633 ; line 408 :
1634 1634 ; line 409 : return( long_hour );
1635 1635 $DGL 0,29
1636 1636 003F3 12 movw bc,ax ;[INF] 1, 1
1637 1637 ; line 410 : }
1638 1638 $DGL 0,30
1639 1639 003F4 ??ef_get_long_hour:
1640 1640 003F4 1006 addw sp,#06H ;[INF] 2, 1
1641 1641 003F6 C6 pop hl ;[INF] 1, 1
1642 1642 003F7 D7 ret ;[INF] 1, 6
1643 1643 003F8 ??ee_get_long_hour:
1644 1644
1645 1645 ----- @@CODEL CSEG
1646 1646
1647 1647 ----- @@BASE CSEG BASE
1648 1648 END
1649 1649
1650 1650
1651 1651 ; *** Code Information ***
1652 1652 ;
1653 1653 ; $FILE C:\78k_data\yav-mcu-basara\branches\0.10(fix)\pedo_alg_thre_det2.c
1654 1654 ;
1655 1655 ; $FUNC pedometer(30)
1656 1656 ; void=(void)
1657 1657 ; CODE SIZE= 447 bytes, CLOCK_SIZE= 435 clocks, STACK_SIZE= 50 bytes
1658 1658 ;
1659 1659 ; $CALL abs(51)
1660 1660 ; bc=(int:ax)
1661 1661 ;
1662 1662 ; $CALL abs(52)
1663 1663 ; bc=(int:ax)
1664 1664 ;
1665 1665 ; $CALL abs(53)
1666 1666 ; bc=(int:ax)
1667 1667 ;
1668 1668 ; $CALL sqrt(60)
1669 1669 ; bc,de=(double:ax,bc)
1670 1670 ;
1671 1671 ; $CALL hosu_increment(110)
1672 1672 ; void=(void)
1673 1673 ;
1674 1674 ; $FUNC hosu_increment(183)
1675 1675 ; void=(void)
1676 1676 ; CODE SIZE= 213 bytes, CLOCK_SIZE= 166 clocks, STACK_SIZE= 12 bytes
1677 1677 ;
1678 1678 ; $CALL get_long_hour(214)
1679 1679 ; bc=(void)
1680 1680 ;
1681 1681 ; $CALL fill_hosu_hist_hours(223)
1682 1682 ; void=(unsigned short:ax)
1683 1683 ;
1684 1684 ; $CALL fill_hosu_hist_hours(230)
1685 1685 ; void=(unsigned short:ax)
1686 1686 ;
1687 1687 ; $CALL fill_hosu_hist_hours(235)
1688 1688 ; void=(unsigned short:ax)
1689 1689 ;
1690 1690 ; $FUNC fill_hosu_hist_hours(264)
1691 1691 ; void=(unsigned short hours:ax)
1692 1692 ; CODE SIZE= 30 bytes, CLOCK_SIZE= 31 clocks, STACK_SIZE= 2 bytes
1693 1693 ;
1694 1694 ; $FUNC clear_hosu_hist(287)
1695 1695 ; void=(void)
1696 1696 ; CODE SIZE= 29 bytes, CLOCK_SIZE= 26 clocks, STACK_SIZE= 2 bytes
1697 1697 ;
1698 1698 ; $FUNC hosu_read_end(310)
1699 1699 ; void=(void)
1700 1700 ; CODE SIZE= 4 bytes, CLOCK_SIZE= 8 clocks, STACK_SIZE= 0 bytes
1701 1701 ;
1702 1702 ; $FUNC hosu_read(320)
1703 1703 ; bc=(void)
1704 1704 ; CODE SIZE= 146 bytes, CLOCK_SIZE= 124 clocks, STACK_SIZE= 10 bytes
1705 1705 ;
1706 1706 ; $FUNC get_long_hour(381)
1707 1707 ; bc=(void)
1708 1708 ; CODE SIZE= 110 bytes, CLOCK_SIZE= 84 clocks, STACK_SIZE= 12 bytes
1709 1709
1710 1710 ; Target chip : uPD79F0104
1711 1711 ; Device file : E1.00b
Segment informations:
ADRS LEN NAME
00000 00000H.1 @@BITS
00000 0004AH @@CNST
00000 00008H @@R_INIT
00000 00008H @@INIT
00000 00096H @@DATA
00000 00000H @@R_INIS
00000 00000H @@INIS
00000 00000H @@DATS
00000 00000H @@CNSTL
00000 00000H @@RLINIT
00000 00000H @@INITL
00000 00000H @@DATAL
00000 00000H @@CALT
00000 003F8H ROM_CODE
00000 00000H @@CODEL
00000 00000H @@BASE
Target chip : uPD79F0104
Device file : E1.00b
Assembly complete, 0 error(s) and 0 warning(s) found. ( 0)

Reference in New Issue View Git Blame Copy Permalink