📄 memu.lis
字号:
0156 87 psha
0157 CD0000 jsr __divmod16u
015A 86 pula
015B B700 sta *__r0
015D 86 pula
015E AB30 add #48
0160 B700 sta *__r1
0162 B600 lda *__r0
0164 A900 adc #0
0166 E609 lda 9,X
0168 AB02 add #2
016A B700 sta *__r3
016C E608 lda 8,X
016E A900 adc #0
0170 B700 sta *__r2
0172 B600 lda *__r1
0174 5500 ldhx *__r2
0176 F7 sta ,x
0177 95 tsx
0178 .dbline 59
0178 ; ReP[1]=(*IntDataP)/1000+'0';
0178 E603 lda 3,X
017A EE04 ldx 4,X
017C 87 psha
017D 8A pulh
017E E601 lda 1,x
0180 B700 sta *__r1
0182 F6 lda ,x
0183 95 tsx
0184 B700 sta *__r0
0186 4E0000 mov *__r1,*__rlo
0189 4E0000 mov *__r0,*__rhi
018C A6E8 lda #-24
018E 87 psha
018F A603 lda #3
0191 87 psha
0192 CD0000 jsr __divmod16u
0195 A702 ais #2
0197 4E0000 mov *__rhi,*__r0
019A 4E0000 mov *__rlo,*__r1
019D B600 lda *__r1
019F AB30 add #48
01A1 B700 sta *__r1
01A3 B600 lda *__r0
01A5 A900 adc #0
01A7 E609 lda 9,X
01A9 AB01 add #1
01AB B700 sta *__r3
01AD E608 lda 8,X
01AF A900 adc #0
01B1 B700 sta *__r2
01B3 B600 lda *__r1
01B5 5500 ldhx *__r2
01B7 F7 sta ,x
01B8 95 tsx
01B9 .dbline 62
01B9 ;
01B9 ; //2:显示数据调整,有一位小数
01B9 ; ReP[5]=ReP[4];ReP[4]='.';
01B9 E609 lda 9,X
01BB AB04 add #4
01BD B700 sta *__r1
01BF E608 lda 8,X
01C1 A900 adc #0
01C3 B700 sta *__r0
01C5 5500 ldhx *__r0
01C7 F6 lda ,x
01C8 95 tsx
01C9 B700 sta *__r1
01CB E609 lda 9,X
01CD AB05 add #5
01CF B700 sta *__r3
01D1 E608 lda 8,X
01D3 A900 adc #0
01D5 B700 sta *__r2
01D7 B600 lda *__r1
01D9 5500 ldhx *__r2
01DB F7 sta ,x
01DC 95 tsx
01DD .dbline 62
01DD E609 lda 9,X
01DF AB04 add #4
01E1 B700 sta *__r1
01E3 E608 lda 8,X
01E5 A900 adc #0
01E7 B700 sta *__r0
01E9 A62E lda #46
01EB 5500 ldhx *__r0
01ED F7 sta ,x
01EE 95 tsx
01EF .dbline 64
01EF ; //3:调整前导的0为空格
01EF ; if(ReP[1]=='0')
01EF E609 lda 9,X
01F1 AB01 add #1
01F3 B700 sta *__r1
01F5 E608 lda 8,X
01F7 A900 adc #0
01F9 B700 sta *__r0
01FB 5500 ldhx *__r0
01FD F6 lda ,x
01FE 95 tsx
01FF A130 cmp #48
0201 2612 bne L14
0203 .dbline 65
0203 ; ReP[1]=0x20;
0203 E609 lda 9,X
0205 AB01 add #1
0207 B700 sta *__r1
0209 E608 lda 8,X
020B A900 adc #0
020D B700 sta *__r0
020F A620 lda #32
0211 5500 ldhx *__r0
0213 F7 sta ,x
0214 95 tsx
0215 L14:
0215 .dbline 66
0215 ; for(i=2;i<5;i++)
0215 A602 lda #2
0217 E705 sta 5,X
0219 2058 bra L19
021B L16:
021B .dbline 67
021B ; {if((ReP[i-1]==0x20)&&(ReP[i]=='0')&&(ReP[i+1]!='.'))
021B .dbline 67
021B 3F00 clr *__r0
021D E605 lda 5,X
021F A001 sub #1
0221 B700 sta *__r1
0223 B600 lda *__r0
0225 A200 sbc #0
0227 B700 sta *__r0
0229 B600 lda *__r1
022B EB09 add 9,X
022D B700 sta *__r1
022F B600 lda *__r0
0231 E908 adc 8,X
0233 B700 sta *__r0
0235 5500 ldhx *__r0
0237 F6 lda ,x
0238 95 tsx
0239 A120 cmp #32
023B 2634 bne L20
023D 3F00 clr *__r0
023F E605 lda 5,X
0241 EB09 add 9,X
0243 B700 sta *__r1
0245 B600 lda *__r0
0247 E908 adc 8,X
0249 B700 sta *__r0
024B 5500 ldhx *__r0
024D F6 lda ,x
024E 95 tsx
024F A130 cmp #48
0251 261E bne L20
0253 5500 ldhx *__r0
0255 AF01 aix #1
0257 F6 lda ,x
0258 95 tsx
0259 A12E cmp #46
025B 2714 beq L20
025D .dbline 68
025D 3F00 clr *__r0
025F E605 lda 5,X
0261 EB09 add 9,X
0263 B700 sta *__r1
0265 B600 lda *__r0
0267 E908 adc 8,X
0269 B700 sta *__r0
026B A620 lda #32
026D 5500 ldhx *__r0
026F F7 sta ,x
0270 95 tsx
0271 L20:
0271 .dbline 68
0271 L17:
0271 .dbline 66
0271 6C05 inc 5,X
0273 L19:
0273 .dbline 66
0273 E605 lda 5,X
0275 A105 cmp #5
0277 25A2 blo L16
0279 .dbline 70
0279 ; ReP[i]=0x20;}
0279 ; //4: 若为负数,添加负号
0279 ; if(sign=='-')
0279 E602 lda 2,X
027B A12D cmp #45
027D 263C bne L22
027F .dbline 71
027F ; {for(i=1;i<3;i++)
027F .dbline 71
027F A601 lda #1
0281 E705 sta 5,X
0283 201C bra L27
0285 L24:
0285 .dbline 72
0285 ; if(ReP[i+1]!=0x20) break;
0285 3F00 clr *__r0
0287 E605 lda 5,X
0289 EB09 add 9,X
028B B700 sta *__r1
028D B600 lda *__r0
028F E908 adc 8,X
0291 B700 sta *__r0
0293 5500 ldhx *__r0
0295 AF01 aix #1
0297 F6 lda ,x
0298 95 tsx
0299 A120 cmp #32
029B 2702 beq L28
029D .dbline 72
029D 2008 bra L26
029F L28:
029F L25:
029F .dbline 71
029F 6C05 inc 5,X
02A1 L27:
02A1 .dbline 71
02A1 E605 lda 5,X
02A3 A103 cmp #3
02A5 25DE blo L24
02A7 L26:
02A7 .dbline 73
02A7 ; ReP[i]=sign;}
02A7 3F00 clr *__r0
02A9 E605 lda 5,X
02AB EB09 add 9,X
02AD B700 sta *__r1
02AF B600 lda *__r0
02B1 E908 adc 8,X
02B3 B700 sta *__r0
02B5 E602 lda 2,X
02B7 5500 ldhx *__r0
02B9 F7 sta ,x
02BA 95 tsx
02BB .dbline 73
02BB L22:
02BB L30:
02BB .dbline 77
02BB ; //SCISend1('A');
02BB ; //for(i=1;i<=5;i++) SCISend1(ReP[i]);
02BB ; //SCISend1('B');
02BB ; NumFormatChange_End:;
02BB .dbline -2
02BB L13:
02BB A706 ais #6
02BD .dbline 0 ; func end
02BD 81 rts
02BE .dbsym l k 0 c
02BE .dbsym l j 1 c
02BE .dbsym l sign 2 c
02BE .dbsym l IntDataP 3 ps
02BE .dbsym l i 5 c
02BE .dbsym l flag 12 c
02BE .dbsym l Data 10 pc
02BE .dbsym l ReP 8 pc
02BE .dbend
02BE .dbfunc e PackShowBuf _PackShowBuf fV
02BE ; data -> 0,X
02BE ; buf -> 3,X
02BE ; i -> 9,X
02BE ; LcdShowBuff -> 12,X
02BE _PackShowBuf::
02BE .dbline -1
02BE A7F6 ais #-10
02C0 95 tsx
02C1 .dbline 87
02C1 ; }
02C1 ; /*PackShowBuf:封装LCD的显示缓冲区------------------------------------------*
02C1 ; *功能:将在LCD上显示的当前温度CurrentT、设定温度BasicT *
02C1 ; 当前湿度CurrentH、设定湿度BasicH风机情况和时间进行封包*
02C1 ; *参数:当前温度CurrentT、设定温度BasicT、当前温度符号SignCT *
02C1 ; 设定温度符号SignBT、当前湿度CurrentH、设定湿度BasicH *
02C1 ; *返回:LCD的显示缓冲区LcdShowBuff *
02C1 ; *-------------------------------------------------------------------------*/
02C1 ; void PackShowBuf(INT8U * LcdShowBuff)
02C1 ; {
02C1 .dbline 91
02C1 ; INT8U i;
02C1 ; INT8U data[3],buf[6];
02C1 ; //1:当前温度
02C1 ; data[0]=CurrentT>>8;data[1]=CurrentT; data[2]=SignCT;
02C1 B600 lda *_CurrentT
02C3 F7 sta ,X
02C4 .dbline 91
02C4 B601 lda *_CurrentT+1
02C6 E701 sta 1,X
02C8 .dbline 91
02C8 B600 lda *_SignCT
02CA E702 sta 2,X
02CC .dbline 92
02CC ; NumFormatChange(buf,data,1);
02CC A601 lda #1
02CE 87 psha
02CF 89 pshx
02D0 8B pshh
02D1 AF03 aix #3
02D3 89 pshx
02D4 8B pshh
02D5 CD0081 jsr _NumFormatChange
02D8 A705 ais #5
02DA 95 tsx
02DB .dbline 93
02DB A601 lda #1
02DD E709 sta 9,X
02DF 202F bra L37
02E1 L34:
02E1 .dbline 93
02E1 AF03 aix #3
02E3 3500 sthx *__r0
02E5 95 tsx
02E6 3F00 clr *__r2
02E8 E609 lda 9,X
02EA BB00 add *__r1
02EC B700 sta *__r1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -