【正文】 DL: MOV R6,0FFH DL6:DJNZ R6,DL6 DJNZ R7,DL RET TABLE1: DB 0C0H, 0F9H, 0A4H, 0B0H, 99H DB 92H, 82H, 0F8H, 80H, 90H DB 0CEH,0C0H,0CEH,0CEH,86H END 30 附 2 計算器模擬系統(tǒng)電路圖 。 MOV R0,30H 29 MOV R1,80H MOV R5,40H NEXTF:MOV P2,R1 MOV A,R0 MOVC A,A+DPTR MOV P0,A ACALL DELAY1mS MOV A,P2 RR A MOV R1,A INC R0 MOV A,R5 JZ AA DJNZ R5,NEXTF AA: RET DELAY1mS:MOV R7,02H 。DISPLAY。 JNB 07H,JUD4 ACALL ERROR LJMP LOOP3 JUD4:JMP TBB TB2:CJNE A,03H,TB3 MOV R3,3CH MOV R2,3DH MOV R6,39H MOV R7,38H 28 ACALL MAKEMUL MOV 3DH,R6 MOV 3CH,R7 MOV 3EH,R5 MOV 3FH,R4 MOV A,R5 JZ JUD3 ACALL ERROR LJMP LOOP3 JUD3: JMP TBB TB3:MOV R7,3CH MOV R6,3DH MOV R5,00H MOV R4,00H MOV R2,39H MOV R3,38H ACALL MAKEDIV MOV 3CH,R7 MOV 3DH,R6 TBB:MOV 38H,00H MOV 39H,00H MOV 3AH,00H MOV 3BH,00H RET WARNNING: CLR SETB ACALL DELAY1mS RET ERROR:MOV R0,30H MOV A,0AH MOV R5,05H MOV 40H,05H ET: MOV R0,A INC R0 INC A DJNZ R5,ET RET DISPLAY:MOV DPTR,TABLE1 。將 3B 單元數(shù)加，減，乘，除 38H 單元放入 3BH 單元 。41標(biāo)志位 1表示加法， 2 表示減法 3表示乘法 4表示除法 。 MOV A,41H 。 MAKESUB:CLR 07H MOV A,R0 MOV R2,A 24 MOV A,R3 MOV R7,A CLR C LOP1:MOV A,R0 SUBB A,R1 MOV R0,A INC R0 INC R1 DJNZ R7,LOP1 JNC LOP2 SETB 07H LOP2:MOV A,R2 MOV R0,A RET 乘法程序 : 入口 ： R3,被乘數(shù)低位地址字節(jié)， R2,被乘數(shù)高位地址字節(jié)， R7,乘數(shù)低位地址字節(jié)， R6,乘數(shù)高位地址字節(jié)， 出口 ： R4,R5,R6,R7 結(jié)果字節(jié)由高到低 MAKEMUL:MOV A,R3 MOV B,R7 MUL AB XCH A,R7 MOV R5,B MOV B,R2 MUL AB ADD A,R5 MOV R4,A CLR A ADDC A,B MOV R5,A MOV A,R6 MOV B,R3 MUL AB ADD A,R4 XCH A,R6 XCH A,B ADDC A,R5 MOV R5,A MOV F0,C MOV A,R2 MUL AB 25 ADD A,R5 MOV R5,A CLR A MOV ,C MOV C,F0 ADDC A,B MOV R4,A RET 除法程序 :入口 :被除數(shù)放在 R4R5R6R7,R4R5,內(nèi)容為零， R4 高 R5 低 ,除數(shù)放在 R2R3,R2 高R3 低 ， 出口：商放在 R6R7,R6 高 R7 低，余數(shù)放在 R4R5,R4 高 R5 低 MAKEDIV:MOV A,R5 CLR C SUBB A,R3 MOV A,R4 SUBB A,R2 JNC DIV11 MOV B,16 DIV22:CLR C MOV A,R7 RLC A MOV R7,A MOV A,R6 RLC A MOV R6,A MOV A,R5 RLC A MOV R5,A XCH A,R4 RLC A XCH A,R4 MOV F0,C CLR C SUBB A,R3 MOV R1,A MOV A,R4 SUBB A,R2 JB F0,DIV33 JC DIV44 DIV33:MOV R4,A 26 MOV A,R1 MOV R5,A INC R7 DIV44:DJNZ B,DIV22 CLR F0 RET DIV11:SETB F0 RET CHANGE11: MOV R0,40H CJNE R0,01H,TA1 。保存地址 。 MAKEADD:MOV A,R0 。 NOP NOP NOP NOP INC R1 。01 表示加法 。計算結(jié)果放入 3CH 起始的單元 。將結(jié)果放入顯示緩沖區(qū) 。 ACALL JUDEG 。EQUEL。 KEY11:CJNE A,7DH,KEY12 MOV A,40H JZ CJNE A,08H,TW10 ACALL WARNNING JMP LOOP3 TW10:MOV A,00H INC 40H MOV 43H,A ACALL MOVE ACALL CHANGE11 : JMP LOOP3 KEY12:CJNE A,0BBH,KEY13 。 JMP LOOP3 ROW4KEY:MOV A,R5 ORL A,R0 。 MOV 42H,01H MOV 41H,02H 。將結(jié)果放入顯示緩沖區(qū) 。 JMP LOOP3 ROW3KEY:CJNE R0,0B0H,ROW4KEY 。 MOV 42H,01H MOV 41H,03H 。將結(jié)果放入顯示緩沖區(qū) 。計算結(jié)果 放入 3CH 起始的單元 。04 表示除法 。將結(jié)果放入顯示緩沖區(qū) 。 ACALL CHANGE 。計算結(jié)果放入 3CH 起始的單元 。 CJNE A,0EEH,KEY2 。 ORL A,R0 。 R5 列號 。 MOV A,R5 。R0 行號 。 CJNE A,01H,NEXT1