📄 searchhandle.lst
字号:
\ 0240 ?0074:
150 }
151
152 ResShowPic(RA_FM, 16, 0); //fm 标志显示
\ 0240 0E00 LD C,0
\ 0242 C5 PUSH BC
\ 0243 0E10 LD C,16
\ 0245 11B101 LD DE,433
\ 0248 CDAE03 CALL LWRD ?0130
\ 024B F1 POP AF
153 if (FMStatus.stereo_status == 0)
\ 024C 3A0700 LD A,(FMStatus+7)
\ 024F B7 OR A
\ 0250 200B JR NZ,?0081
\ 0252 ?0080:
154 {
155 ResShowPic(RA_STERE, 128 - 30, 0); //显示立体声
\ 0252 4F LD C,A
\ 0253 C5 PUSH BC
\ 0254 0E62 LD C,98
\ 0256 11B801 LD DE,440
\ 0259 CDAE03 CALL LWRD ?0130
\ 025C F1 POP AF
\ 025D ?0081:
156 }
157
158 ui_show_batt(GetBattery(), F_comval.BatteryType); //电池电量显示
\ 025D ED4B0F00 LD BC,(g_comval+15)
\ 0261 CD0000 CALL LWRD GetBattery
\ 0264 5F LD E,A
\ 0265 1600 LD D,0
\ 0267 3E00 LD A,BYTE3 ui_show_batt
\ 0269 210000 LD HL,LWRD ui_show_batt
\ 026C CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
159 strcpy(Freqtab, "<");
\ 026F 110700 LD DE,?0082
\ 0272 210000 LD HL,Freqtab
\ 0275 CD0000 CALL LWRD ?STRCPY_L11
160 strcat(Freqtab, "FM");
\ 0278 110900 LD DE,?0083
\ 027B 210000 LD HL,Freqtab
\ 027E CD0000 CALL LWRD ?STRCAT_L11
161 #if 1
162 //strcpy(Freqtab,"FM");
163 //频率换算及转换成ASCII码
164 k = FMStatus.freq;
\ 0281 FD2A0100 LD IY,(FMStatus+1)
165 if(FMStatus.mode==0)
\ 0285 3A0500 LD A,(FMStatus+5)
\ 0288 B7 OR A
\ 0289 010A00 LD BC,10
\ 028C FDE5 PUSH IY
\ 028E D1 POP DE
\ 028F CD0000 CALL LWRD ?SS_DIV_L02
\ 0292 2018 JR NZ,?0085
\ 0294 ?0084:
166 i=k/10 + 87;
\ 0294 215700 LD HL,87
\ 0297 1816 JR ?0111
\ 0299 7C LD A,H
\ 029A 1815 JR ?0113
\ 029C 9F SBC A,A
\ 029D 1814 JR ?0115
\ 029F 41 LD B,C
\ 02A0 1813 JR ?0116
\ 02A2 DD74FB LD (IX-5),H
\ 02A5 1814 JR ?0117
\ 02A7 DD70FD LD (IX-3),B
167 else
\ 02AA 1815 JR ?0086
\ 02AC ?0085:
168 i=k/10 + 76;
\ 02AC 214C00 LD HL,76
\ 02AF ?0111:
\ 02AF 19 ADD HL,DE
\ 02B0 7C LD A,H
\ 02B1 ?0113:
\ 02B1 07 RLCA
\ 02B2 9F SBC A,A
\ 02B3 ?0115:
\ 02B3 4F LD C,A
\ 02B4 41 LD B,C
\ 02B5 ?0116:
\ 02B5 DD75FA LD (IX-6),L
\ 02B8 DD74FB LD (IX-5),H
\ 02BB ?0117:
\ 02BB DD71FC LD (IX-4),C
\ 02BE DD70FD LD (IX-3),B
\ 02C1 ?0086:
169
170 h=k%10;
\ 02C1 010A00 LD BC,10
\ 02C4 FDE5 PUSH IY
\ 02C6 D1 POP DE
\ 02C7 CD0000 CALL LWRD ?SS_MOD_L02
\ 02CA DD73FE LD (IX-2),E
171
172
173
174 if (i < 100)
\ 02CD 68 LD L,B
\ 02CE 60 LD H,B
\ 02CF E5 PUSH HL
\ 02D0 2E64 LD L,100
\ 02D2 E5 PUSH HL
\ 02D3 DD4EFC LD C,(IX-4)
\ 02D6 DD46FD LD B,(IX-3)
\ 02D9 DD6EFA LD L,(IX-6)
\ 02DC DD66FB LD H,(IX-5)
\ 02DF CD0000 CALL LWRD ?SL_CMP_L03
\ 02E2 210000 LD HL,0
\ 02E5 3010 JR NC,?0088
\ 02E7 ?0087:
175 *itoa_2(i, buf);
\ 02E7 39 ADD HL,SP
\ 02E8 4D LD C,L
\ 02E9 44 LD B,H
\ 02EA DD5EFA LD E,(IX-6)
\ 02ED 3E00 LD A,BYTE3 itoa_2
\ 02EF 210000 LD HL,LWRD itoa_2
\ 02F2 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
176 else
\ 02F5 1811 JR ?0089
\ 02F7 ?0088:
177 *itoa_3(i, buf);
\ 02F7 39 ADD HL,SP
\ 02F8 4D LD C,L
\ 02F9 44 LD B,H
\ 02FA DD5EFA LD E,(IX-6)
\ 02FD DD56FB LD D,(IX-5)
\ 0300 3E00 LD A,BYTE3 itoa_3
\ 0302 210000 LD HL,LWRD itoa_3
\ 0305 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0308 ?0089:
178 strcat(Freqtab, buf);
\ 0308 210000 LD HL,0
\ 030B 39 ADD HL,SP
\ 030C EB EX DE,HL
\ 030D 210000 LD HL,Freqtab
\ 0310 CD0000 CALL LWRD ?STRCAT_L11
179 strcat(Freqtab, ".");
\ 0313 110C00 LD DE,?0090
\ 0316 210000 LD HL,Freqtab
\ 0319 CD0000 CALL LWRD ?STRCAT_L11
180
181 *itoa_1(h, buf);
\ 031C 210000 LD HL,0
\ 031F 39 ADD HL,SP
\ 0320 4D LD C,L
\ 0321 44 LD B,H
\ 0322 DD5EFE LD E,(IX-2)
\ 0325 3E00 LD A,BYTE3 itoa_1
\ 0327 210000 LD HL,LWRD itoa_1
\ 032A CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
182 //buf[1]=' ';
183 //buf[1] = 0;
184 strcat(Freqtab, buf);
\ 032D 210000 LD HL,0
\ 0330 39 ADD HL,SP
\ 0331 EB EX DE,HL
\ 0332 210000 LD HL,Freqtab
\ 0335 CD0000 CALL LWRD ?STRCAT_L11
185 strcat(Freqtab, ">");
\ 0338 110E00 LD DE,?0091
\ 033B 210000 LD HL,Freqtab
\ 033E CD0000 CALL LWRD ?STRCAT_L11
186 #else
187 *itoa_2(SetFreq, buf);
188 strcat(Freqtab, buf);
189 *itoa_2(SearchFreq, buf);
190 strcat(Freqtab, buf);
191
192 #endif
193
194
195
196 SetTextPos((128 - 6 * 8) / 2, 8);
\ 0341 0E08 LD C,8
\ 0343 1E28 LD E,40
\ 0345 CD0000 CALL LWRD SetTextPos
197 PutS(Freqtab, -1); //显示电台频率
\ 0348 0EFF LD C,255
\ 034A 110000 LD DE,Freqtab
\ 034D CD0000 CALL LWRD PutS
198 if (FMStatus.mode == 0)
\ 0350 3A0500 LD A,(FMStatus+5)
\ 0353 B7 OR A
\ 0354 ED4B0100 LD BC,(FMStatus+1)
\ 0358 116400 LD DE,100
\ 035B CD0000 CALL LWRD ?S_MUL_L02
\ 035E 01C800 LD BC,200
\ 0361 CD0000 CALL LWRD ?US_DIV_L02
\ 0364 0E10 LD C,16
\ 0366 C5 PUSH BC
\ 0367 7B LD A,E
\ 0368 2018 JR NZ,?0093
\ 036A ?0092:
199 {
200 k = (FMStatus.freq )*100/200;
201
202 ResShowPic(DWNARROW, 11 - 5 + k, 16); //显示箭头
\ 036A C606 ADD A,6
\ 036C CDAA03 CALL LWRD ?0131
\ 036F F1 POP AF
203 ResShowPic(FQBAR, 0, 24); //显示US频率条
\ 0370 0E18 LD C,24
\ 0372 C5 PUSH BC
\ 0373 0E00 LD C,0
\ 0375 11A700 LD DE,167
\ 0378 1816 JR ?0112
\ 037A 210000 LD HL,LWRD ResShowPic
\ 037D 1816 JR ?0114
\ 037F F1 POP AF
204 }
205 else
\ 0380 1817 JR ?0094
\ 0382 ?0093:
206 {
207 k = (FMStatus.freq )*100/200;
208
209 ResShowPic(DWNARROW, 30 - 6 + k, 16); //显示箭头
\ 0382 C618 ADD A,24
\ 0384 CDAA03 CALL LWRD ?0131
\ 0387 F1 POP AF
210 ResShowPic(FQBAR2, 0, 24); //显示JP频率条
\ 0388 0E18 LD C,24
\ 038A C5 PUSH BC
\ 038B 0E00 LD C,0
\ 038D 11A800 LD DE,168
\ 0390 ?0112:
\ 0390 3E00 LD A,BYTE3 ResShowPic
\ 0392 210000 LD HL,LWRD ResShowPic
\ 0395 ?0114:
\ 0395 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0398 F1 POP AF
\ 0399 ?0094:
211 }
212 UpdateScreen(NULL); //刷新
\ 0399 110000 LD DE,0
\ 039C CD0000 CALL LWRD UpdateScreen
213 }
\ 039F DDF9 LD SP,IX
\ 03A1 DDE1 POP IX
\ 03A3 FDE1 POP IY
\ 03A5 D1 POP DE
\ 03A6 C1 POP BC
\ 03A7 C30000 JP LWRD ?BANK_FAST_LEAVE_L08
\ 03AA ?0131:
\ 03AA 4F LD C,A
\ 03AB 115E00 LD DE,94
\ 03AE ?0130:
\ 03AE 3E00 LD A,BYTE3 ResShowPic
\ 03B0 210000 LD HL,LWRD ResShowPic
\ 03B3 C30000 JP LWRD ?BANK_CALL_DIRECT_L08
214
\ 0000 RSEG CSTR
\ 0000 ?0077:
\ 0000 5B DEFB '['
\ 0001 00 DEFB 0
\ 0002 ?0078:
\ 0002 4348 DEFB 'CH'
\ 0004 00 DEFB 0
\ 0005 ?0079:
\ 0005 5D DEFB ']'
\ 0006 00 DEFB 0
\ 0007 ?0082:
\ 0007 3C DEFB '<'
\ 0008 00 DEFB 0
\ 0009 ?0083:
\ 0009 464D DEFB 'FM'
\ 000B 00 DEFB 0
\ 000C ?0090:
\ 000C 2E DEFB '.'
\ 000D 00 DEFB 0
\ 000E ?0091:
\ 000E 3E DEFB '>'
\ 000F 00 DEFB 0
\ 0000 RSEG CONST
\ 0000 ?0072:
\ 0000 464D DEFB 'FM'
\ 0002 00 DEFB 0
\ 0003 00 DEFB 0
\ 0004 END
Errors: none
Warnings: none
Code size: 950
Constant size: 20
Static variable size: Data(0) Iram(0)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -