【正文】 A02C4 22 READHUMOUT: RET處理溫度，濕度BCD碼：02C5 E500 CONVTEMP: MOV A,TEMPH02C7 5480 ANL A,80H02C9 6014 JZ TEMPC102CB C3 CLR C02CC E500 MOV A,TEMPL02CE F4 CPL A02CF 2401 ADD A,01H02D1 F500 MOV TEMPL,A02D3 E500 MOV A,TEMPH02D5 F4 CPL A02D6 3400 ADDC A,00H02D8 F500 MOV TEMPH,A02DA 75000B MOV TEMPHC,0BH02DD 8003 SJMP TEMPC1102DF 75000A TEMPC1: MOV TEMPHC,0AH02E2 E500 TEMPC11: MOV A,TEMPHC02E4 C4 SWAP A02E5 F500 MOV TEMPHC,A02E7 E500 MOV A,TEMPL02E9 540F ANL A,0FH02EB 90031F MOV DPTR,TEMPDOTTAB02EE 93 MOVC A,@A+DPTR02EF F500 MOV TEMPLC,A02F1 E500 MOV A,TEMPL02F3 54F0 ANL A,0F0H02F5 C4 SWAP A02F6 F500 MOV TEMPL,A02F8 740F MOV A,0FH02FA C4 SWAP A02FB 4500 ORL A,TEMPL02FD 120000 LCALL HEX2BCD10300 F500 MOV TEMPL,A0302 54F0 ANL A,0F0H0304 C4 SWAP A0305 4500 ORL A,TEMPHC0307 F500 MOV TEMPHC,A0309 E500 MOV A TEMPL030B 540F ANL A,0FH030D C4 SWAP A030E 4500 ORL A,TEMPLC0310 F500 MOV TEMPLC,A0312 EF MOV A,R70313 6009 JZ TEMPC120315 540F ANL A,0FH0317 C4 SWAP A0318 FF MOV R7,A0319 E500 MOV A,TEMPHC031B 5F ANL A,R7031C F500 MOV TEMPHC,A031E 22 TEMPC12: RET031F 00010102 TEMPDOTTAB: DB 00H,01H,01H,02H,03H,03H,04H,04H,05H,06H0323 030304040327 0506 0329 06070809 DB 06H,07H,08H,09H,09H032D 09 032E 850000 CONVHUM: MOV D,HUMH0331 530080 ANL D,80H0334 601D JZ HUMC10336 C200 CLR F0338 850000 MOV D,HUMPL033B B200 CPL D033D 0000 ADD D,01H0340 850000 MOV HUML,D0343 850000 MOV D,HUMH0346 B200 CPL D0348 0000 ADDC D,00H034B 850000 MOV HUMH,034E 75000B MOV HUMHC,0BH0351 8003 SJMP HUMC110353 75000A HUMC1: MOV HUMHC,0AH0356 850000 HUMC11: MOV D,HUML0359 5300F0 ANL D,0F0H035C C4 SWAP D035D 850000 MOV HUML,D0360 75000F MOV D,0FH0363 C4 SWAP D0364 0000 ORL D,HUML0367 120000 LCALL HEX2BCD1036A 850000 MOV HUML,D036D 5300F0 ANL D,0F0H0370 C4 SWAP D0371 0000 ORL D,HUMHC0374 850000 MOV HUMHC,D0377 850000 MOV D HUML037A 53000F ANL D,0FH037D C4 SWAP D037E 0000 ORL D,HUMLC0381 850000 MOV HUMLC,D0384 850000 MOV D,R90387 6010 JZ HUMC120389 53000F ANL D,0FH038C C4 SWAP D038D 850000 MOV R9,D0390 850000 MOV D,HUMHC0393 0000 ANL D,R90396 850000 MOV HUMHC,D0399 22 HUMC12: RET顯示BCD刷新子程序：039A E500 DISPBCD: MOV A,TEMPLC039C 540F ANL A,0FH039E F570 MOV 70H,A03A0 E500 MOV A,TEMPLC03A2 C4 SWAP A03A3 540F ANL A,0FH03A5 F571 MOV 71H,A03A7 E500 MOV A,TEMPHC03A9 740F MOV A,0FH03AB F572 MOV 72H A03AD E500 MOV A,TEMPHC03AF C4 SWAP A03B0 540F ANL A,0FH03B2 F573 MOV 73H A03B4 E500 MOV A,TEMPHC03B6 54F0 ANL A,0F0H03B8 B41025 CJNZ A,010H,DISPBCD003BB 850000 MOV D,HUMLC03BE 53000F ANL D,0FH03C1 850074 MOV 74H,D03C4 850000 MOV D,HUMLC03C7 C4 SWAP D03C8 53000F ANL D,0FH03CB 850075 MOV 75H,D03CE 850000 MOV D,HUMHC03D1 75000F MOV D,0FH03D4 850076 MOV 76H D03D7 850000 MOV D,HUMHC03DA C4 SWAP D03DB 850000 MOV D,HUMHC03DE 8000 SJMP DISPCBD203E0 E500 DISPBCD0: MOV A,TEMPHC03E2 540F ANL A,0FH03E4 700A JNZ DISPBCD203E6 E500 MOV A,TEMPHC03E8 C4 SWAP A03E9 540F ANL A,0FH03EB 75730A MOV 73H,0AH03EE F572 MOV 72H,A03F0 22 DISPBCD2: RET顯示子程序：03F1 7970 DISP1: MOV R1,70H03F3 7DFE MOV R5,0FEH03F5 7580FF PLAY1: MOV P0,0FFH03F8 ED MOV A,R503F9 F590 MOV P1 A03FB E500 MOV A,@A+DPTR03FD F580 MOV P0,A03FF ED MOV A,R50400 20E100 JB ,LOOP50403 C287 CLR 0405 120000 LOPP5: LCALL DL1MS0408 09 INC R10409 ED MOV A,R5040A 30E304 JNB ,ENDOUT040D 23 RL A040E FD MOV R5,A040F 61F5 AJMP PLAY10411 7580FF ENDOUT: MOV P0,0FFH0414 7590FF MOV P1,0FFH0417 22 RET0418 7B74 DISP1: MOV R3,74H041A 7FFE MOV R7,0FEH041C 7580FF PLAY2: MOV P0,0FFH041F 8F00 MOV D,R70421 850090 MOV P1 D0424 850000 MOV D,@A+DPTR0427 850080 MOV P0,D042A 8F00 MOV D,R7042C 120000 LOPP6: LCALL DL1MS042F 0B INC R30430 8F00 MOV D,R70432 30E3DC JNB ,ENDOUT0435 23 RL D0436 AF00 MOV R7,D0438 811C AJMP PLAY2043A 7580FF ENDOUT: MOV P0,0FFH043D 7590FF MOV P1,0FFH0440 22 RET0441 C0F9A4B0 TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,0BFH0445 999282F8449 8090FFB044D 7E14 DLMS: MOV R6,14H044F 7F19 DL1: MOV R7,19H0451 DFFE DL2: DJNZ R7,DL20453 DEFA DJNZ R6,DL10455 22 RET0456 C200 CONTROL: CLR HUMDIN0458 750007 MOV R8,07H0