【文章內(nèi)容簡介】 ANL A,0FH ；抹去A的高四位 MOVC A,@A+DPTR ；查表 SETB ；關此位選 CLR ；開此位選 SETB ；關此位選 SETB ；關此位選 MOV P0,A ；顯示 LCALL DELAY ；調(diào)用延時 MOV P0,0FFH ；消隱 MOV A,R0 ；R0的值給A SWAP A ；高低半字節(jié)交換 ANL A,0FH ；抹去高四位 MOVC A,@A+DPTR ；查表 CLR ；開此位選 SETB ；關此位選 SETB ；關此位選 SETB ；關此位選 MOV P0,A ；顯示 LCALL DELAY ；調(diào)用延時 MOV P0,0FFH ；消隱 DJNZ R1,KEY ；判斷R1是否為0，是順序執(zhí)行，反之跳轉 RET ；結束 KEY: JB ,KEY1 。按鍵按下順序執(zhí)行，否跳轉到KEY1 LCALL DEL10MS ；調(diào)用延時 JNB ,$ ；判斷按鍵是否彈起，是順序執(zhí)行，否等待 INC R0 ；自加 CJNE R0,05,DISP ；R0等于5順序執(zhí)行，否跳轉 MOV R0,00H ；清零 SJMP DISP ；顯示 RET ；結束KEY1: JB ,KEY2 ；按鍵按下順序執(zhí)行，否跳轉到KEY2 LCALL DEL10MS 。調(diào)用延時 JNB ,$ ；按鍵彈起順序執(zhí)行，否等待 DEC R0 ；自減1 CJNE R0,0FFH,DISP ；R0=0FFH,順序執(zhí)行，否跳轉到顯示程序 MOV R0,04H ；R0賦值4 SJMP DISP ；跳轉到顯示 RET ；結束KEY2: JB ,DISP 。發(fā)送鍵判斷 LCALL DEL10MS ；調(diào)用延時 JNB ,DISP ；再次判斷 MOV A,R0 ；R0的值賦給A LCALL FASHE RET 。結束FASHE: MOV SBUF,A ；接收到的值賦給A JNB TI,$ ；TI=1順序執(zhí)行，否等待 CLR TI ；TI置零 RET ；結束EXIT: RETI ；中斷結束DEL10MS:MOV R4,2 ；R4賦值2DEL0: DJNZ R4,DEL0 ；R4為零順序執(zhí)行，否跳轉 RET ；結束TAB: DB 03H,9FH,25H,0DH,99H,49H ；段碼表 DB 41H,1FH,01H,09H,11H,0C1H；段碼表 DB 63H,85H,61H,71H ；段碼表DELAY: MOV R5,50 ；R5賦值50DEL1: MOV R3,48 ；R3賦值48DEL2: DJNZ R3,DEL2 ；R3為0順序執(zhí)行，否跳轉 DJNZ R5,DEL1 ；R5為0順序執(zhí)行，否跳轉 RET ；結束 END ；程序結束定時器T1設置 0000H ；程序入口 LJMP MAIN ；上電，轉主程序 ORG 0013H ；外部中斷1入口地址 LJMP SERINT1 ；調(diào)用中斷子程序 ORG 0030H ；主程序MAIN: MOV SCON,50H 。串行控制寄存器設置 MOV PCON,00H 。波特率不倍增 MOV TMOD,20H 。定時器T1工作方式2 MOV TH1,0FDH 。TH1賦初值 MOV TL1,0FDH ；TL1賦初值 SETB TR1 。定時器T1的啟動 SETB IT1 。開外部中斷1的端口 SETB EX1 。允許外部中斷1 SETB EA 。中斷總允許 SJMP $ ；原地等待 SERINT1:LCALL DEL10MS ；調(diào)用延時 JB ,EXIT ；判斷按鍵是否按下，是，順序執(zhí)行，反之否 LCALL DEL10MS ；調(diào)用延時 JNB ,$ ；判斷按鍵是否彈起，是，順序執(zhí)行，反之否 MOV DPTR,TAB ；數(shù)據(jù)指針指向段碼表 MOV R0,00H ；寄存器R0清零 LCALL DISP ；調(diào)用顯示DISP: MOV R1,50 ；掃描50次 MOV A,R0 ；R0的值賦給A ANL A,0FH ；抹去A的高四位 MOVC A,@A+DPTR ；查表 SETB ；關此位選 CLR ；開此位選 SETB ；關此位選 SETB ；關此位選 MOV P0,A ；顯示 LCALL DELAY ；調(diào)用延時 MOV P0,0FFH ；消隱 MOV A,R0 ；R0的值給A SWAP A ；高低半字節(jié)交換 ANL A,0FH ；抹去高四位 MOVC A,@A+DPTR ；查表 CLR ；開此位選 SETB ；關此位選 SETB ；關此位選 SETB ；關此位選 MOV P0,A ；顯示 LCALL DELAY ；調(diào)用延時 MOV P0,0FFH ；消隱 DJNZ R1,KEY ；判斷R1是否為0，是順序執(zhí)行，反之跳轉 RET ；結束 KEY: JB ,KEY1 。按鍵按下順序執(zhí)行，否跳轉到KEY1 LCALL DEL10MS ；調(diào)用延時 JNB ,$ ；判斷按鍵是否彈起，是順序執(zhí)行，否等待 INC R0 ；自加 CJNE R0,05,DISP ；R0等于5順序執(zhí)行，否跳轉 MOV R0,00H ；清零 SJMP DISP ；顯示 RET ；結束KEY1: JB ,KEY2 ；按鍵按下順序執(zhí)行，否跳轉到KEY2 LCALL DEL10MS 。調(diào)用延時 JNB ,$ ；按鍵彈起順序執(zhí)行，否等待 DEC R0 ；自減1 CJNE R0,0FFH,DISP ；R0=0FFH,順序執(zhí)行，否跳轉到顯示程序 MOV R0,04H ；R0賦值4 SJMP DISP ；跳轉到顯示 RET ；結束KEY2: JB ,DISP 。發(fā)送鍵判斷 LCALL DEL10MS ；調(diào)用延時 JNB ,DISP ；再次判斷 MOV A,R0 ；R0的值賦給A LCALL FASHE RET 。結束FASHE: MOV SBUF,A ；接收到的值賦給A JNB TI,$ ；TI=1順序執(zhí)行，否等待 CLR TI ；TI置零 RET ；結束EXIT: RETI ；中斷結束DEL10MS:MOV R4,2 ；R4賦值2DEL0: DJNZ R4,DEL0 ；R4為零順序執(zhí)行，否跳轉 RET ；結束TAB: DB 03H,9FH,25H,0DH,99H,49H ；段碼表 DB 41H,1FH,01H,09H,11H,0C1H；段碼表 DB 63H,85H,61H,71H ；段碼表DELAY: MOV R5,50 ；R5賦值50DEL1: MOV R3,48 ；R3賦值48DEL2: DJNZ R3,DEL2 ；R3為0順序執(zhí)行，否跳轉 DJNZ R5,DEL1 ；R5為0順序執(zhí)行，否跳轉 RET ；結束