【正文】 LJMP K0 KEY9: MOV A,9 ACALL SQR LJMP K0 KEY10: SETB LJMP MAIN KEY11: ACALL SECOND LJMP START KEY12: LJMP K0 KEY13: LJMP K0 SQR: INC R0 CJNE R0,01H,SQ1 MOV R2,A MOV DPTR,TABLE MOVC A,A+DPTR MOV P1,A ACALL DELAY SJMP SQ2 SQ1: CJNE R0,02H,SQ2 MOV R1,A MOV DPTR,TABLE MOVC A,A+DPTR MOV P0,A ACALL DELAY SQ2: RET SECOND: NEXT1: MOV DPTR,TABLE MOV A,R2 MOVC A,A+DPTR MOV P1,A MOV DPTR,TABLE MOV A,R1 MOVC A,A+DPTR MOV P0,A ACALL DELAY DEC R1 CJNE R1,0FFH,NEXT1 CJNE R2,00H,NEXT2 SJMP NEXT4 Protel 軟件及單片機技術綜合訓練 15 NEXT2: DEC R2 MOV R3,09H NEXT3: MOV DPTR,TABLE MOV A,R2 MOVC A,A+DPTR MOV P1,A MOV DPTR,TABLE MOV A,R3 MOVC A,A+DPTR MOV P0,A ACALL DELAY DEC R3 CJNE R3,0FFH,NEXT3 CJNE R2,00H,NEXT2 NEXT4: RET INT_0: CJNE R4,01H,$ MOV R4,00H RETI INT_1: INC R4 RETI DELAY: MOV R7,10 LOOP3: MOV R6,100 LOOP2: MOV R5,250 LOOP1: NOP NOP DJNZ R5,LOOP1 DJNZ R6,LOOP2 DJNZ R7,LOOP3 RET TABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H DB 7FH,6FH,77H,7CH,39H,5EH,79H,71H ORG 0000H ORG 0000H LJMP START1 ORG 00BBH LJMP TIM0 ORG 0005H SJMP MAIN ORG 0009H Protel 軟件及單片機技術綜合訓練 16 LJMP INT_0 ORG 0013H LJMP INT_1 ORG 0040H MAIN: MOV P0,00H MOV P1,00H MOV R0,00H MOV R4,00H MOV TCON,05H MOV IE,85H SETB PX1 START: MOV P2,0F0H MOV A,P2 ORL A,0FH CJNE A,0FFH,K0 SJMP START K0: MOV P2,0FEH MOV A,P2 ORL A,0F0H CJNE A,0F0H,KEYS0 K1: MOV P2,0FDH MOV A,P2 ORL A,0F0H CJNE A,0F0H,KEYS1 K2: MOV P2,0FBH MOV A,P2 ORL A,0F0H CJNE A,0F0H,KEYS2 K3: MOV P2,0F7H MOV A,P2 ORL A,0F0H CJNE A,0F0H,KEYS3 SJMP START KEYS0: JNB ,KEY0 JNB ,KEY1 JNB ,KEY2 JNB ,KEY3 LJMP K1 KEYS1: JNB ,KEY4 JNB ,KEY5 JNB ,KEY6 Protel 軟件及單片機技術綜合訓練 17 JNB ,KEY7 LJMP K2 KEYS2: JNB ,KEY8 JNB ,KEY9 JNB ,KEY10 JNB ,KEY11 LJMP K3 KEYS3: JNB ,KEY12 JNB ,KEY13 LJMP K0 KEY0: MOV A,0 ACALL SQR LJMP K0 KEY1: MOV A,1 ACALL SQR LJMP K0 KEY2: MOV A,2 ACALL SQR LJMP K0 KEY3: MOV A,3 ACALL SQR LJMP K0 KEY4: MOV A,4 AC