【文章內(nèi)容簡介】 TEMPDIN NOP NOP CLR TEMPDIN MOV R6, 0AOH DJNZ R6, $ SETB TEMPDIN MOV R6, 32H DJNZ R6 , $ MOV R6 , 3CH LOOPKEY: MOV C, TEMPDIN JC INNITKEYOUT DJNZ R6, LOOP1820 MOV R6, 064H DJNZ R6, $ SJMP INITKEY RET INITKEYOUT: SETB TEMPIN RET READKEY: MOV R7, 08H SETB TEMPDIN NOP NOP READKEYLOOP: CLR TEMPDIN NOP NOP NOP SETB TEMPDIN MOV R6, 07H DJNZ R6, $ MOV C, TEMPDIN MOV R6 , 3CH DJNZ R6, $ RRC A SETB TEMPDIN DJNZ R7,READKEYLOOP MOV R6,$ RET WRITE: MOV R7,08H SETB TEMPDIN NOP NOP WRITELOP: CLR TEMPDIN MOV R6, 07H DJNZ R6, $ RRC A MOV TEMPDIN, C MOV R6, 34H DJNZ R6, $ SETB TEMPDIN DJNZ R7, WRITEKEYLOP RET CONVTEMP: MOV A, TEMPH ANL A, 80H JZ TEMPC1 CLR C MOV A, TEMPL CPL A ADD A, 01H MOV TEMP , A MOV A, TEMP CPL A ADDC A, 00H MOV TEMP, A MOV TEMPHC , 0BH SJMP TEMPC11 TEMPC1: MOV TEMPC, OAH TEMPC11: MOV A, TEMPHC SWAP A MOV TEMPHC, A MOV A, TEMPL ANL A, 0FH MOV DPTR, TEMPDOTTAB MOVC A,@A+DPTR MOV TEMPLC , A MOV A, TEMPL ANL A, 0FOH SWAP A MOV TEMPL, A MOV A, TEMPH ORL A, 0FH SWAP A LCALL HEX2BCD1 MOV TEMPL, A ANL A, 0F0H ANL A, OFOH SWAP A ORL A, TEMPHC MOV TEMP, A MOV A, TEMP ANL A, 0FH SWAP A ORL A, TEMPC MOV TEMPLC, A MOV A, R7 JZ TEMPC12 ANL A, OFH SWAP A MOV R7, A MOV A, TEMPHC ANL A, OFH ORL A, R7 MOV TEMPHC, A TEMPC12: RET TEMPDOTTAB: DB 00H,01H,02H,03H,04H,05H,06H,07H,06H,08H,09H DISPBCD: MOV A, TEMPLC ANL A, OFH MOV 70H, A MOV A, TEMPLC SWAP A ANL A, 0FH MOV 71H, A MOV A, TEMPHC ANL A, 0F0H MOV 72H , A MOV A, TEMPHC SWAP A ANL A, 0FH MOV 73H , A MOV A, TEMPHC ANL A, 0F0H CJNE A, 01H,DISPBCD SJMP DISPBCD2 DISPBCD0: MOV A, TEMPHC ANL A, 0F0H JNZ DISPBCD2 MOV A, TEMPHC SWAP A ANL A, 0FH MOV 73H, 0AH MOV 72H , A DISPBCD2: RET DISP1: MOV R1, 70H MOV R5, 0FEH PLAY: MOV P1, OFEH MOV A, R5 MOV P3, A MOV A,@R1 MOV DPTR, TAB MOVC A,@A+DPTR MOV P1, A MOV A, R5 JB , LOOP5 CLR LOOP5: LCALL DL1MS INC R1 MOV A, R5 JNB , ENDOUT RL A MOV R5, A AJMP PLAY ENEOUT: MOV P3 , 0FFH RET TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,0BFH DL1MS: MOV R6, 14H DL1: MOV R7, 19H DL2: DJNZ R7, DL2 DJNZ R6, DL1 RET CRC8CAL: PUSH ACC MOV R7, 08H CRC8LOOP1: XRL A, B RRC A MOV A, B JNC CRC8LOOP2 XRL A, 18H CRC8LOOP2: RRC A MOV B, A POP ACC RR A PUS