📄 sleep.lst
字号:
000051A9 01 4E < jnz ?L_MinuteLowOk
000051AA 4A A4 < r2|= 0x000a
< ?L_MinuteLowOk:
000051AB 12 EE < jmp L_ShowTwoDigit
< F_ShowDate:
000051AC 0D 9B CC 52 < bp = TW_DigitDate
000051AE 12 95 0B 00 < r2 = [RW_Date]
000051B0 0A C5 00 F0 < test r2,0xf000
000051B2 05 5E < jz ?L_MonthLowOk
000051B3 0A C5 00 0F < test r2,0x0f00
000051B5 02 4E < jnz ?L_MonthLowOk
000051B6 0A A5 00 0A < r2|= 0x0a00
< ?L_MonthLowOk:
000051B8 0A C5 F0 00 < test r2,0x00f0
000051BA 03 5E < jz L_ShowTwoDigit
000051BB 4F C4 < test r2,0x000f
000051BC 01 4E < jnz L_ShowTwoDigit
000051BD 4A A4 < r2|= 0x000a
< L_ShowTwoDigit:
000051BE 7A 93 < r1 = r2 lsr 4
000051BF 79 93 < r1 = r1 lsr 4
000051C0 79 93 < r1 = r1 lsr 4
000051C1 4F B2 < r1 = r1&0x000f
000051C2 40 F0 D2 51 < call F_ShowDigit
000051C4 7A 93 < r1 = r2 lsr 4
000051C5 79 93 < r1 = r1 lsr 4
000051C6 4F B2 < r1 = r1&0x000f
000051C7 40 F0 D2 51 < call F_ShowDigit
000051C9 7A 93 < r1 = r2 lsr 4
000051CA 4F B2 < r1 = r1&0x000f
000051CB 40 F0 D2 51 < call F_ShowDigit
000051CD 0A B3 0F 00 < r1 = r2&0x000f
000051CF 40 F0 D2 51 < call F_ShowDigit
000051D1 90 9A < retf
< //-----------------------------------------------------------------------
< F_ShowDigit:
000051D2 09 09 ED 51 < R4 = R1+TB_Pattern0
000051D4 C4 92 < R1 = [R4] //Get pattern of corresponding number
< ?L_ShowPointLoop:
000051D5 D5 98 < R4 = [BP++] //Get display buffer address of current dot
000051D6 0D 5E < JZ ?L_ShowDigitOver//Digital display dots is over, subrotine over
000051D7 C4 96 < R3 = [R4] //Get display buffer content of current dot
000051D8 CD 98 < R4 = [BP--] //Get bit map in display buffer of current dot
000051D9 04 A7 < R3|= R4 //Set bit of current dot
000051DA 41 C2 < TEST R1,0x0001 //Test if current dot is display
000051DB 03 4E < JNZ ?L_ShowDigit_30 //Yes, Display buffer content is Ok
000051DC 0C 89 FF 00 < R4^= 0x00FF //No, clear the bit
000051DE 04 B7 < R3&= R4
< ?L_ShowDigit_30:
000051DF D5 98 < R4 = [BP++] //Get display buffer address
000051E0 C4 D6 < [R4] = R3 //Put prepared content into the buffer
000051E1 41 0A < BP+= 0x0001 //Skip bit map of current dot
000051E2 61 93 < R1 = R1 LSR 1 //shift pattern register so that next
< //dot can be test in next loop
000051E3 4F EE < JMP ?L_ShowPointLoop
< ?L_ShowDigitOver:
000051E4 90 9A < RETF;
< //-----------------------------------------------------------------------
< F_ClrLcd:
000051E5 40 92 < r1 = 0x0000
000051E6 0D 9B 00 71 < bp = 0x7100
< ?L_ClrLcdLoop:
000051E8 D5 D2 < [bp++] = r1
000051E9 0D 4B 1C 71 < cmp bp,0x711c
000051EB 44 0E < jb ?L_ClrLcdLoop
000051EC 90 9A < retf
< //-----------------------------------------------------------------------
000051ED 00 00 < TB_Pattern0: .DW 0x0000;
000051EE 28 00 < TB_Pattern1: .DW 0x0028;
000051EF 73 00 < TB_Pattern2: .DW 0x0073;
000051F0 79 00 < TB_Pattern3: .DW 0x0079;
000051F1 3C 00 < TB_Pattern4: .DW 0x003C;
000051F2 5D 00 < TB_Pattern5: .DW 0x005D;
000051F3 5F 00 < TB_Pattern6: .DW 0x005F;
000051F4 68 00 < TB_Pattern7: .DW 0x0068;
000051F5 7F 00 < TB_Pattern8: .DW 0x007F;
000051F6 7D 00 < TB_Pattern9: .DW 0x007D;
000051F7 EF 00 < TB_PatternA: .DW 0x00EF;
000051F8 03 00 < TB_PatternStar: .DW 0x0003;
000051F9 09 00 < TB_PatternPound: .DW 0x0009;
< //-----------------------------------------------------------------------
< TW_LcdPhoneDigit:
000051FA 00 71 01 00 < Digit0: .DW P_Seg0,B_Com0,P_Seg0,B_Com1,P_Seg0,B_Com2;
00 71 02 00
00 71 04 00
00005200 01 71 01 00 < .DW P_Seg1,B_Com0,P_Seg1,B_Com1,P_Seg1,B_Com2,P_Seg1,B_Com3,0;
01 71 02 00
01 71 04 00
01 71 08 00
00 00
00005209 02 71 01 00 < Digit1: .DW P_Seg2,B_Com0,P_Seg2,B_Com1,P_Seg2,B_Com2;
02 71 02 00
02 71 04 00
0000520F 03 71 01 00 < .DW P_Seg3,B_Com0,P_Seg3,B_Com1,P_Seg3,B_Com2,P_Seg3,B_Com3,0;
03 71 02 00
03 71 04 00
03 71 08 00
00 00
00005218 04 71 01 00 < Digit2: .DW P_Seg4,B_Com0,P_Seg4,B_Com1,P_Seg4,B_Com2;
04 71 02 00
04 71 04 00
0000521E 05 71 01 00 < .DW P_Seg5,B_Com0,P_Seg5,B_Com1,P_Seg5,B_Com2,P_Seg5,B_Com3,0;
05 71 02 00
05 71 04 00
05 71 08 00
00 00
00005227 06 71 01 00 < Digit3: .DW P_Seg6,B_Com0,P_Seg6,B_Com1,P_Seg6,B_Com2;
06 71 02 00
06 71 04 00
0000522D 07 71 01 00 < .DW P_Seg7,B_Com0,P_Seg7,B_Com1,P_Seg7,B_Com2,P_Seg7,B_Com3,0;
07 71 02 00
07 71 04 00
07 71 08 00
00 00
00005236 08 71 01 00 < Digit4: .DW P_Seg8,B_Com0,P_Seg8,B_Com1,P_Seg8,B_Com2;
08 71 02 00
08 71 04 00
0000523C 09 71 01 00 < .DW P_Seg9,B_Com0,P_Seg9,B_Com1,P_Seg9,B_Com2,P_Seg9,B_Com3,0;
09 71 02 00
09 71 04 00
09 71 08 00
00 00
00005245 0A 71 01 00 < Digit5: .DW P_Seg10,B_Com0,P_Seg10,B_Com1,P_Seg10,B_Com2;
0A 71 02 00
0A 71 04 00
0000524B 0B 71 01 00 < .DW P_Seg11,B_Com0,P_Seg11,B_Com1,P_Seg11,B_Com2,P_Seg11,B_Com3,0;
0B 71 02 00
0B 71 04 00
0B 71 08 00
00 00
00005254 0C 71 01 00 < Digit6: .DW P_Seg12,B_Com0,P_Seg12,B_Com1,P_Seg12,B_Com2;
0C 71 02 00
0C 71 04 00
0000525A 0D 71 01 00 < .DW P_Seg13,B_Com0,P_Seg13,B_Com1,P_Seg13,B_Com2,P_Seg13,B_Com3,0;
0D 71 02 00
0D 71 04 00
0D 71 08 00
00 00
00005263 0E 71 01 00 < Digit7: .DW P_Seg14,B_Com0,P_Seg14,B_Com1,P_Seg14,B_Com2;
0E 71 02 00
0E 71 04 00
00005269 0F 71 01 00 < .DW P_Seg15,B_Com0,P_Seg15,B_Com1,P_Seg15,B_Com2,P_Seg15,B_Com3,0;
0F 71 02 00
0F 71 04 00
0F 71 08 00
00 00
00005272 10 71 01 00 < Digit8: .DW P_Seg16,B_Com0,P_Seg16,B_Com1,P_Seg16,B_Com2;
10 71 02 00
10 71 04 00
00005278 11 71 01 00 < .DW P_Seg17,B_Com0,P_Seg17,B_Com1,P_Seg17,B_Com2,P_Seg17,B_Com3,0;
11 71 02 00
11 71 04 00
11 71 08 00
00 00
00005281 12 71 01 00 < Digit9: .DW P_Seg18,B_Com0,P_Seg18,B_Com1,P_Seg18,B_Com2;
12 71 02 00
12 71 04 00
00005287 13 71 01 00 < .DW P_Seg19,B_Com0,P_Seg19,B_Com1,P_Seg19,B_Com2,P_Seg19,B_Com3,0;
13 71 02 00
13 71 04 00
13 71 08 00
00 00
00005290 14 71 01 00 < Digit10: .DW P_Seg20,B_Com0,P_Seg20,B_Com1,P_Seg20,B_Com2;
14 71 02 00
14 71 04 00
00005296 15 71 01 00 < .DW P_Seg21,B_Com0,P_Seg21,B_Com1,P_Seg21,B_Com2,P_Seg21,B_Com3,0;
15 71 02 00
15 71 04 00
15 71 08 00
00 00
0000529F 16 71 01 00 < Digit11: .DW P_Seg22,B_Com0,P_Seg22,B_Com1,P_Seg22,B_Com2;
16 71 02 00
16 71 04 00
000052A5 17 71 01 00 < .DW P_Seg23,B_Com0,P_Seg23,B_Com1,P_Seg23,B_Com2,P_Seg23,B_Com3,0;
17 71 02 00
17 71 04 00
17 71 08 00
00 00
< Digit12:
000052AE 18 71 01 00 < .DW P_Seg24,B_Com0,P_Seg24,B_Com1,P_Seg24,B_Com2;
18 71 02 00
18 71 04 00
000052B4 19 71 01 00 < .DW P_Seg25,B_Com0,P_Seg25,B_Com1,P_Seg25,B_Com2,P_Seg25,B_Com3,0;
19 71 02 00
19 71 04 00
19 71 08 00
00 00
< Digit13:
000052BD 1A 71 01 00 < .DW P_Seg26,B_Com0,P_Seg26,B_Com1,P_Seg26,B_Com2;
1A 71 02 00
1A 71 04 00
000052C3 1B 71 01 00 < .DW P_Seg27,B_Com0,P_Seg27,B_Com1,P_Seg27,B_Com2,P_Seg27,B_Com3,0
1B 71 02 00
1B 71 04 00
1B 71 08 00
00 00
< TW_DigitDate:
000052CC 0A 71 00 01 < .DW P_Seg10,B_Com8,P_Seg10,B_Com8,P_Seg10,B_Com8
0A 71 00 01
0A 71 00 01
000052D2 0B 71 10 00 < .DW P_Seg11,B_Com4,P_Seg11,B_Com8,P_Seg11,B_Com6,P_Seg11,B_Com8,0
0B 71 00 01
0B 71 40 00
0B 71 00 01
00 00
000052DB 0C 71 10 00 < .DW P_Seg12,B_Com4,P_Seg12,B_Com5,P_Seg12,B_Com6
0C 71 20 00
0C 71 40 00
000052E1 0D 71 10 00 < .DW P_Seg13,B_Com4,P_Seg13,B_Com5,P_Seg13,B_Com6,P_Seg13,B_Com7,0
0D 71 20 00
0D 71 40 00
0D 71 80 00
00 00
000052EA 0E 71 10 00 < .DW P_Seg14,B_Com4,P_Seg14,B_Com5,P_Seg14,B_Com6
0E 71 20 00
0E 71 40 00
000052F0 0F 71 10 00 < .DW P_Seg15,B_Com4,P_Seg15,B_Com5,P_Seg15,B_Com6,P_Seg15,B_Com7,0
0F 71 20 00
0F 71 40 00
0F 71 80 00
00 00
000052F9 10 71 10 00 < .DW P_Seg16,B_Com4,P_Seg16,B_Com5,P_Seg16,B_Com6
10 71 20 00
10 71 40 00
000052FF 11 71 10 00 < .DW P_Seg17,B_Com4,P_Seg17,B_Com5,P_Seg17,B_Com6,P_Seg17,B_Com7,0
11 71 20 00
11 71 40 00
11 71 80 00
00 00
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -