📄 jianpan.lis
字号:
08C7 5500 ldhx *__r2
08C9 F7 sta ,x
08CA ; time_array[13]=time[0]%10;
08CA B600 lda *_time
08CC AE0A ldx #10
08CE 8C clrh
08CF 52 div
08D0 8B pshh
08D1 86 pula
08D2 95 tsx
08D3 B700 sta *__r1
08D5 E603 lda 3,X
08D7 AB0D add #13
08D9 B700 sta *__r3
08DB E602 lda 2,X
08DD A900 adc #0
08DF B700 sta *__r2
08E1 B600 lda *__r1
08E3 5500 ldhx *__r2
08E5 F7 sta ,x
08E6 95 tsx
08E7 L60:
08E7 .dbline 0 ; func end
08E7 81 rts
08E8 ; n -> 4,X
08E8 ; time_array -> 2,X
08E8 _str_clock::
08E8 95 tsx
08E9 ; }
08E9 ;
08E9 ; void str_clock(unsigned char time_array[],unsigned char n)
08E9 ; {
08E9 ; time_clock[0]=time_array[8]*10+time_array[9];
08E9 E603 lda 3,X
08EB AB09 add #9
08ED B700 sta *__r1
08EF E602 lda 2,X
08F1 A900 adc #0
08F3 B700 sta *__r0
08F5 5500 ldhx *__r0
08F7 F6 lda ,x
08F8 95 tsx
08F9 B700 sta *__r1
08FB E603 lda 3,X
08FD AB08 add #8
08FF B700 sta *__r3
0901 E602 lda 2,X
0903 A900 adc #0
0905 B700 sta *__r2
0907 5500 ldhx *__r2
0909 F6 lda ,x
090A AE0A ldx #10
090C 42 mul
090D 95 tsx
090E BB00 add *__r1
0910 B700 sta *_time_clock
0912 ; time_clock[1]=time_array[10]*10+time_array[11];
0912 E603 lda 3,X
0914 AB0B add #11
0916 B700 sta *__r1
0918 E602 lda 2,X
091A A900 adc #0
091C B700 sta *__r0
091E 5500 ldhx *__r0
0920 F6 lda ,x
0921 95 tsx
0922 B700 sta *__r1
0924 E603 lda 3,X
0926 AB0A add #10
0928 B700 sta *__r3
092A E602 lda 2,X
092C A900 adc #0
092E B700 sta *__r2
0930 5500 ldhx *__r2
0932 F6 lda ,x
0933 AE0A ldx #10
0935 42 mul
0936 95 tsx
0937 BB00 add *__r1
0939 B701 sta *_time_clock+1
093B ; time_clock[2]=time_array[12]*10+time_array[13];
093B E603 lda 3,X
093D AB0D add #13
093F B700 sta *__r1
0941 E602 lda 2,X
0943 A900 adc #0
0945 B700 sta *__r0
0947 5500 ldhx *__r0
0949 F6 lda ,x
094A 95 tsx
094B B700 sta *__r1
094D E603 lda 3,X
094F AB0C add #12
0951 B700 sta *__r3
0953 E602 lda 2,X
0955 A900 adc #0
0957 B700 sta *__r2
0959 5500 ldhx *__r2
095B F6 lda ,x
095C AE0A ldx #10
095E 42 mul
095F 95 tsx
0960 BB00 add *__r1
0962 B702 sta *_time_clock+2
0964 L71:
0964 .dbline 0 ; func end
0964 81 rts
.area lit
0000 L75:
0000 312E7365742074696D65202020202020 .byte 49,46,'s,'e,'t,32,'t,'i,'m,'e,32,32,32,32,32,32
0010 322E73657420636C6F636B2020202020 .byte 50,46,'s,'e,'t,32,'c,'l,'o,'c,'k,32,32,32,32,32
0020 L150:
0020 312E7365742074696D65202020202020 .byte 49,46,'s,'e,'t,32,'t,'i,'m,'e,32,32,32,32,32,32
0030 322E73657420636C6F636B2020202020 .byte 50,46,'s,'e,'t,32,'c,'l,'o,'c,'k,32,32,32,32,32
0040 L153:
0040 00 .byte 0
0041 00000000000000000000 .word 0,0,0,0,0
004B 000000 .byte 0,0,0
004E L184:
004E 312E7365742074696D65202020202020 .byte 49,46,'s,'e,'t,32,'t,'i,'m,'e,32,32,32,32,32,32
005E 322E73657420636C6F636B2020202020 .byte 50,46,'s,'e,'t,32,'c,'l,'o,'c,'k,32,32,32,32,32
006E L187:
006E 20202020206F6B202020202020202020 .byte 32,32,32,32,32,'o,'k,32,32,32,32,32,32,32,32,32
007E 20202020202020202020202020202020 .byte 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32
.area text
; Okinit -> 0,X
; optioninit -> 0,X
; gb_mask1 -> 32,X
; sign -> 33,X
; clock_array -> 34,X
; gb_mask2 -> 48,X
; optioninit -> 0,X
; gb_mask2 -> 32,X
; sign -> 33,X
; gb_mask1 -> 34,X
; time_array -> 35,X
; qidong -> 49,X
0965 _Akey::
0965 A7AF ais #-81
0967 95 tsx
0968 ; }
0968 ;
0968 ; void Akey()
0968 ; {
0968 ; unsigned char qidong[32]="1.set time 2.set clock ";
0968 AF31 aix #49
096A 3500 sthx *__r0
096C 95 tsx
096D A620 lda #32
096F 87 psha
0970 4F clra
0971 87 psha
0972 A600 lda #<L75
0974 87 psha
0975 A600 lda #>L75
0977 87 psha
0978 B600 lda *__r1
097A 87 psha
097B B600 lda *__r0
097D 87 psha
097E CD0000 jsr __asgnblk
0981 A706 ais #6
0983 ; lcdshow2(qidong);
0983 AF31 aix #49
0985 89 pshx
0986 8B pshh
0987 CD0000 jsr _lcdshow2
098A A702 ais #2
098C 95 tsx
098D ; KB_valve=0;
098D 3F00 clr *_KB_valve
098F CC10E7 jmp L77
0992 L76:
0992 ; while(1)
0992 ; {
0992 ; if(KB_valve=='1')//选项1:调整时间
0992 B600 lda *_KB_valve
0994 A131 cmp #49
0996 2703 beq X19
0998 CC0D67 jmp L79
099B X19:
099B ; {
099B ; unsigned char gb_mask2=2,gb_mask1=0,sign=2,time_array[14];
099B A602 lda #2
099D E720 sta 32,X
099F 6F22 clr 34,X
09A1 A602 lda #2
09A3 E721 sta 33,X
09A5 ; Lcd_Show(0);
09A5 4F clra
09A6 87 psha
09A7 CD0368 jsr _Lcd_Show
09AA A701 ais #1
09AC 95 tsx
09AD ; change_str(time_array,14);
09AD A60E lda #14
09AF 87 psha
09B0 AF23 aix #35
09B2 89 pshx
09B3 8B pshh
09B4 CD06EF jsr _change_str
09B7 A703 ais #3
09B9 95 tsx
09BA ; KB_valve=0;
09BA 3F00 clr *_KB_valve
09BC CC0D64 jmp L82
09BF L81:
09BF ; while(1)
09BF ; {
09BF ; guangbiao(gb_mask1,gb_mask2);
09BF E620 lda 32,X
09C1 87 psha
09C2 E622 lda 34,X
09C4 87 psha
09C5 CD0000 jsr _guangbiao
09C8 A702 ais #2
09CA 95 tsx
09CB ; if(KB_valve=='6')//光标右移
09CB B600 lda *_KB_valve
09CD A136 cmp #54
09CF 2656 bne L84
09D1 ; {
09D1 ; gb_mask2++;
09D1 6C20 inc 32,X
09D3 ; sign++;
09D3 6C21 inc 33,X
09D5 ; if(sign==10&&gb_mask1==0) sign=2;
09D5 E621 lda 33,X
09D7 A10A cmp #10
09D9 2608 bne L86
09DB E622 lda 34,X
09DD 2604 bne L86
09DF A602 lda #2
09E1 E721 sta 33,X
09E3 L86:
09E3 ; if(sign==8&&gb_mask1==1) sign=2;
09E3 E621 lda 33,X
09E5 A108 cmp #8
09E7 260A bne L88
09E9 E622 lda 34,X
09EB A101 cmp #1
09ED 2604 bne L88
09EF A602 lda #2
09F1 E721 sta 33,X
09F3 L88:
09F3 ; if(gb_mask2==6) gb_mask2=7;
09F3 E620 lda 32,X
09F5 A106 cmp #6
09F7 2604 bne L90
09F9 A607 lda #7
09FB E720 sta 32,X
09FD L90:
09FD ; if(gb_mask2==9) gb_mask2=10;
09FD E620 lda 32,X
09FF A109 cmp #9
0A01 2604 bne L92
0A03 A60A lda #10
0A05 E720 sta 32,X
0A07 L92:
0A07 ; if(gb_mask2==12&&gb_mask1==0) gb_mask2=2;
0A07 E620 lda 32,X
0A09 A10C cmp #12
0A0B 2608 bne L94
0A0D E622 lda 34,X
0A0F 2604 bne L94
0A11 A602 lda #2
0A13 E720 sta 32,X
0A15 L94:
0A15 ; if(gb_mask2==12&&gb_mask1==1) gb_mask2=4;
0A15 E620 lda 32,X
0A17 A10C cmp #12
0A19 260A bne L96
0A1B E622 lda 34,X
0A1D A101 cmp #1
0A1F 2604 bne L96
0A21 A604 lda #4
0A23 E720 sta 32,X
0A25 L96:
0A25 ; KB_valve=0;
0A25 3F00 clr *_KB_valve
0A27 ; }
0A27 L84:
0A27 ; if(KB_valve=='2')//累加
0A27 B600 lda *_KB_valve
0A29 A132 cmp #50
0A2B 2703 beq X20
0A2D CC0D1A jmp L98
0A30 X20:
0A30 ; {
0A30 ; time_array[gb_mask1*8+sign-2]++;
0A30 3F00 clr *__r0
0A32 E621 lda 33,X
0A34 B700 sta *__r1
0A36 3F00 clr *__r2
0A38 E622 lda 34,X
0A3A B700 sta *__r3
0A3C 3800 lsl *__r3
0A3E 3900 rol *__r2
0A40 3800 lsl *__r3
0A42 3900 rol *__r2
0A44 3800 lsl *__r3
0A46 3900 rol *__r2
0A48 B600 lda *__r3
0A4A BB00 add *__r1
0A4C B700 sta *__r1
0A4E B600 lda *__r2
0A50 B900 adc *__r0
0A52 B700 sta *__r0
0A54 AF21 aix #33
0A56 3500 sthx *__r2
0A58 B600 lda *__r1
0A5A BB00 add *__r3
0A5C B700 sta *__r1
0A5E B600 lda *__r0
0A60 B900 adc *__r2
0A62 B700 sta *__r0
0A64 5500 ldhx *__r0
0A66 F6 lda ,x
0A67 AB01 add #1
0A69 5500 ldhx *__r0
0A6B F7 sta ,x
0A6C 95 tsx
0A6D ; if(time_array[10]>=6||time_array[12]>=6)
0A6D E62D lda 45,X
0A6F A106 cmp #6
0A71 2406 bhs L105
0A73 E62F lda 47,X
0A75 A106 cmp #6
0A77 2539 blo L101
0A79 L105:
0A79 ; time_array[gb_mask1*8+sign-2]=0;
0A79 3F00 clr *__r0
0A7B E621 lda 33,X
0A7D B700 sta *__r1
0A7F 3F00 clr *__r2
0A81 E622 lda 34,X
0A83 B700 sta *__r3
0A85 3800 lsl *__r3
0A87 3900 rol *__r2
0A89 3800 lsl *__r3
0A8B 3900 rol *__r2
0A8D 3800 lsl *__r3
0A8F 3900 rol *__r2
0A91 B600 lda *__r3
0A93 BB00 add *__r1
0A95 B700 sta *__r1
0A97 B600 lda *__r2
0A99 B900 adc *__r0
0A9B B700 sta *__r0
0A9D AF21 aix #33
0A9F 3500 sthx *__r2
0AA1 B600 lda *__r1
0AA3 BB00 add *__r3
0AA5 B700 sta *__r1
0AA7 B600 lda *__r0
0AA9 B900 adc *__r2
0AAB B700 sta *__r0
0AAD 4F clra
0AAE 5500 ldhx *__r0
0AB0 F7 sta ,x
0AB1 95 tsx
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -