📄 main.lst
字号:
\ 0484 010600 LD BC,6
\ 0487 DD5EE2 LD E,(IX-30)
\ 048A DD56E3 LD D,(IX-29)
\ 048D CD0000 CALL LWRD ?SS_MOD_L02
\ 0490 DD73FB LD (IX-5),E
\ 0493 DD72FC LD (IX-4),D
385 ResShowPic(MENUBCK1, 0, menu_pos[tmp]-1);
\ 0496 210A00 LD HL,menu_pos
\ 0499 19 ADD HL,DE
\ 049A 7E LD A,(HL)
\ 049B C6FF ADD A,255
\ 049D 4F LD C,A
\ 049E C5 PUSH BC
\ 049F 48 LD C,B
\ 04A0 11B500 LD DE,181
\ 04A3 CD3A0A CALL LWRD ?0367
\ 04A6 F1 POP AF
386 SetPenColor(Color_BLACK_def);
\ 04A7 010000 LD BC,0
\ 04AA 59 LD E,C
\ 04AB 50 LD D,B
\ 04AC CD0B0A CALL LWRD ?0365
387 SetBackgdColor(Color_MENU_def);
388 TextOutRect(&tregion ,1);
\ 04AF 39 ADD HL,SP
\ 04B0 CD420A CALL LWRD ?0369
389 if(with_fm)
\ 04B3 C5 PUSH BC
\ 04B4 0E03 LD C,3
\ 04B6 C5 PUSH BC
\ 04B7 ED4B0C00 LD BC,(g_comval+12)
\ 04BB DD6EE2 LD L,(IX-30)
\ 04BE DD66E3 LD H,(IX-29)
\ 04C1 29 ADD HL,HL
\ 04C2 2805 JR Z,?0143
\ 04C4 ?0142:
390 ResShowMultiString(name[old_active],g_comval.langid, 3, menu_pos[tmp]);
\ 04C4 111000 LD DE,name
\ 04C7 1803 JR ?0318
391 else
\ 04C9 ?0143:
392 ResShowMultiString(name_nofm[old_active],g_comval.langid, 3, menu_pos[tmp]);
\ 04C9 112000 LD DE,name_nofm
\ 04CC ?0318:
\ 04CC 19 ADD HL,DE
\ 04CD 5E LD E,(HL)
\ 04CE 23 INC HL
\ 04CF 56 LD D,(HL)
\ 04D0 3E00 LD A,BYTE3 ResShowMultiString
\ 04D2 210000 LD HL,LWRD ResShowMultiString
\ 04D5 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 04D8 F1 POP AF
\ 04D9 F1 POP AF
\ 04DA ?0144:
393 TextOutRect(&tregion ,0);
\ 04DA 0E00 LD C,0
\ 04DC 211900 LD HL,25
\ 04DF 39 ADD HL,SP
\ 04E0 EB EX DE,HL
\ 04E1 CD0000 CALL LWRD TextOutRect
394 ResShowPic(MENUARR, 163, menu_pos[tmp]-1);
\ 04E4 210A00 LD HL,menu_pos
\ 04E7 DD4EFB LD C,(IX-5)
\ 04EA DD46FC LD B,(IX-4)
\ 04ED 09 ADD HL,BC
\ 04EE 7E LD A,(HL)
\ 04EF C6FF ADD A,255
\ 04F1 5F LD E,A
\ 04F2 D5 PUSH DE
\ 04F3 0EA3 LD C,163
\ 04F5 11B200 LD DE,178
\ 04F8 CD3A0A CALL LWRD ?0367
\ 04FB F1 POP AF
395
396 tmp = active%6;
\ 04FC 010600 LD BC,6
\ 04FF DD5EE0 LD E,(IX-32)
\ 0502 DD56E1 LD D,(IX-31)
\ 0505 CD0000 CALL LWRD ?SS_MOD_L02
\ 0508 DD73FB LD (IX-5),E
\ 050B DD72FC LD (IX-4),D
397 ResShowPic(MENUBCK, 0, menu_pos[tmp]-1);
\ 050E 210A00 LD HL,menu_pos
\ 0511 19 ADD HL,DE
\ 0512 7E LD A,(HL)
\ 0513 C6FF ADD A,255
\ 0515 4F LD C,A
\ 0516 C5 PUSH BC
\ 0517 48 LD C,B
\ 0518 11B400 LD DE,180
\ 051B CD3A0A CALL LWRD ?0367
\ 051E F1 POP AF
398 ResShowPic(MENUARR1, 163, menu_pos[tmp]-1);
\ 051F 210A00 LD HL,menu_pos
\ 0522 DD4EFB LD C,(IX-5)
\ 0525 DD46FC LD B,(IX-4)
\ 0528 09 ADD HL,BC
\ 0529 7E LD A,(HL)
\ 052A C6FF ADD A,255
\ 052C 4F LD C,A
\ 052D C5 PUSH BC
\ 052E CD350A CALL LWRD ?0368
\ 0531 F1 POP AF
399 SetPenColor(Color_WHITE_def);
\ 0532 CD1D0A CALL LWRD ?0366
400 SetBackgdColor(0x00003358);
401 TextOutRect(&tregion ,1);
\ 0535 39 ADD HL,SP
\ 0536 CD420A CALL LWRD ?0369
402 if(with_fm)
\ 0539 C5 PUSH BC
\ 053A 0E03 LD C,3
\ 053C C5 PUSH BC
\ 053D ED4B0C00 LD BC,(g_comval+12)
\ 0541 DD6EE0 LD L,(IX-32)
\ 0544 DD66E1 LD H,(IX-31)
\ 0547 29 ADD HL,HL
\ 0548 2805 JR Z,?0146
\ 054A ?0145:
403 ResShowMultiString(name[active],g_comval.langid, 3, menu_pos[tmp]);
\ 054A 111000 LD DE,name
\ 054D 1803 JR ?0319
404 else
\ 054F ?0146:
405 ResShowMultiString(name_nofm[active],g_comval.langid, 3, menu_pos[tmp]);
\ 054F 112000 LD DE,name_nofm
\ 0552 ?0319:
\ 0552 19 ADD HL,DE
\ 0553 5E LD E,(HL)
\ 0554 23 INC HL
\ 0555 56 LD D,(HL)
\ 0556 3E00 LD A,BYTE3 ResShowMultiString
\ 0558 210000 LD HL,LWRD ResShowMultiString
\ 055B CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 055E F1 POP AF
\ 055F F1 POP AF
\ 0560 ?0147:
406 TextOutRect(&tregion ,0);
\ 0560 0E00 LD C,0
\ 0562 211900 LD HL,25
\ 0565 39 ADD HL,SP
\ 0566 EB EX DE,HL
\ 0567 CD0000 CALL LWRD TextOutRect
407 //---------------------//
408 value_changed=FALSE;
\ 056A DD36EE00 LD (IX-18),0
\ 056E ?0141:
409 }
410
411 if(result == RESULT_MAIN)
\ 056E FDE5 PUSH IY
\ 0570 E1 POP HL
\ 0571 3E0A LD A,10
\ 0573 AD XOR L
\ 0574 B4 OR H
\ 0575 202A JR NZ,?0150
\ 0577 ?0148:
412 {
413 char rtc_count=0;
\ 0577 DD77FB LD (IX-5),A
\ 057A ?0152:
414
415 //start from other ap (user hold mode key)?
416 do
417 {
418 key = ap_get_message();
\ 057A CD0000 CALL LWRD ap_get_message
\ 057D DD77E6 LD (IX-26),A
419 if(key == AP_KEY_NULL)
\ 0580 B7 OR A
\ 0581 2811 JR Z,?0160
\ 0583 ?0153:
\ 0583 ?0154:
420 {
421 }
422 else if((key == AP_MSG_RTC) || (key == AP_MSG_CHARGING))
\ 0583 FE1C CP 28
\ 0585 2804 JR Z,?0158
\ 0587 FE1B CP 27
\ 0589 2005 JR NZ,?0157
\ 058B ?0158:
\ 058B ?0159:
\ 058B ?0156:
423 {
424 rtc_count++;
\ 058B DD34FB INC (IX-5)
\ 058E 1804 JR ?0160
\ 0590 ?0157:
425 }
426 else rtc_count = 0;
\ 0590 DD36FB00 LD (IX-5),0
\ 0594 ?0160:
\ 0594 ?0155:
427
428 //check time out
429 if(rtc_count >= 2) break;
\ 0594 DD7EFB LD A,(IX-5)
\ 0597 FE02 CP 2
\ 0599 3006 JR NC,?0150
\ 059B ?0161:
\ 059B ?0162:
430 }
431 while((key&AP_KEY_UP) !=AP_KEY_UP);
\ 059B DDCBE66E BIT 5,(IX-26)
\ 059F 28D9 JR Z,?0152
\ 05A1 ?0150:
432 }
433 else ASSERT(result == RESULT_NULL); //start form first boot
\ 05A1 ?0149:
\ 05A1 ?0163:
434
435 key = ap_get_message();
\ 05A1 CD0000 CALL LWRD ap_get_message
436 //handle msg
437 switch( key )
\ 05A4 5F LD E,A
\ 05A5 CD0000 CALL LWRD ?C_V_SWITCH_L06
\ 05A8 0600 DEFW 6
\ 05AA 05 DEFB 5
\ 05AB 06 DEFB 6
\ 05AC 1C DEFB 28
\ 05AD 30 DEFB 48
\ 05AE 45 DEFB 69
\ 05AF 46 DEFB 70
\ 05B0 8C06 DEFW ?0184
\ 05B2 BE05 DEFW ?0165
\ 05B4 0606 DEFW ?0172
\ 05B6 6C06 DEFW ?0180
\ 05B8 5306 DEFW ?0179
\ 05BA BE05 DEFW ?0165
\ 05BC 0606 DEFW ?0172
\ 05BE ?0165:
438 {
439 case AP_KEY_NEXT|AP_KEY_HOLD:
440 case AP_KEY_NEXT:
441 if(active < item_count - 1)
\ 05BE DD4EEF LD C,(IX-17)
\ 05C1 0600 LD B,0
\ 05C3 0B DEC BC
\ 05C4 DD6EE0 LD L,(IX-32)
\ 05C7 DD66E1 LD H,(IX-31)
\ 05CA F680 OR 128
\ 05CC ED42 SBC HL,BC
\ 05CE E2D205 JP PO,?0313
\ 05D1 AC XOR H
\ 05D2 ?0313:
\ 05D2 F2FC05 JP P,?0167
\ 05D5 ?0166:
442 {
443 active++;
\ 05D5 DD34E0 INC (IX-32)
\ 05D8 2003 JR NZ,?0314
\ 05DA DD34E1 INC (IX-31)
\ 05DD ?0314:
444 if(active/6==cur_group)
\ 05DD 010600 LD BC,6
\ 05E0 DD5EE0 LD E,(IX-32)
\ 05E3 DD56E1 LD D,(IX-31)
\ 05E6 CD0000 CALL LWRD ?SS_DIV_L02
\ 05E9 DD4EF1 LD C,(IX-15)
\ 05EC EB EX DE,HL
\ 05ED A7 AND A
\ 05EE ED42 SBC HL,BC
\ 05F0 C2F409 JP NZ,?0347
\ 05F3 ?0168:
445 {
446 old_active=active-1;
\ 05F3 DD6EE0 LD L,(IX-32)
\ 05F6 DD66E1 LD H,(IX-3⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -