实验要求
利用P0口与行列式，编写键盘扫描程序，把按键输入的键码，显示在上 //This is the fourth program of the homework //The date:2013/3/1 The author：WQ ORG 0000H SJMP MAIN MAIN: MOV D,#TABLE MOV R1,#00H SETB P2.6 MOV P0,#00H CLR P2.6 SETB P2.7 MOV P0,#0H; CLR P2.7 SCAN: //检测第一行 MOV P3,#0FEH; MOV A,P3 ANL A,#0F0H XHPD0: CJNE A,#0F0H,OK0 CALL JIEDIAN SJMP NO1 OK0: CALL DELAY MOV A,P3 ANL A,#0F0H CJNE A,#0F0H,MM0 SJMP XHPD0 MM0: CJNE A,#0E0H,MM1 MOV R1,#01H CALL JIEDIAN MM1: CJNE A,#0D0H,MM2 MOV R1,#02H CALL JIEDIAN MM2: CJNE A,#0B0H,MM3 MOV R1,#03H CALL JIEDIAN MM3: CJNE A,#070H,XHPD0 MOV R1,#04H CALL JIEDIAN //检测第二行 NO1: MOV P3,#0FDH; MOV A,P3 ANL A,#0F0H XHPD1: CJNE A,#0F0H,OK1 CALL JIEDIAN SJMP NO2 OK1: CALL DELAY MOV A,P3 ANL A,#0F0H CJNE A,#0F0H,MM00 SJMP XHPD1 MM00: CJNE A,#0E0H,MM10 MOV R1,#05H CALL JIEDIAN MM10: CJNE A,#0D0H,MM20 MOV R1,#06H CALL JIEDIAN MM20: CJNE A,#0B0H,MM30 MOV R1,#07H CALL JIEDIAN MM30: CJNE A,#070H,XHPD1 MOV R1,#08H CALL JIEDIAN //检测第三行 NO2: MOV P3,#0FBH; MOV A,P3 ANL A,#0F0H XHPD2: CJNE A,#0F0H,OK2 CALL JIEDIAN SJMP NO3 OK2: CALL DELAY MOV A,P3 ANL A,#0F0H CJNE A,#0F0H,MM01 SJMP XHPD2 MM01: CJNE A,#0E0H,MM11 MOV R1,#09H CALL JIEDIAN MM11: CJNE A,#0D0H,MM21 MOV R1,#0AH CALL JIEDIAN MM21: CJNE A,#0B0H,MM31 MOV R1,#0BH CALL JIEDIAN MM31: CJNE A,#070H,XHPD2 MOV R1,#0CH CALL JIEDIAN //检测第四行 NO3: MOV P3,#0F7H; MOV A,P3 ANL A,#0F0H XHPD3: CJNE A,#0F0H,OK3 CALL JIEDIAN LJMP SCAN OK3: CALL DELAY MOV A,P3 ANL A,#0F0H CJNE A,#0F0H,MM40 SJMP XHPD3 MM40: CJNE A,#0E0H,MM41 MOV R1,#0DH CALL JIEDIAN CALL DELAY MM41: CJNE A,#0D0H,MM42 MOV R1,#0EH MM42: CJNE A,#0B0H,MM43 MOV R1,#0 MM43: CJNE A,#070H,XHPD3 MOV R1,#10H CALL JIEDIAN LJMP scan ORG 02f0h DELAY: MOV R3,#012H DELY1: MOV R4,#011H DELY2: NOP DJNZ R4,DELY2 DJNZ R3,DELY1 RET JIEDIAN: MOV A,R1 MOVC A,@A+TR SETB P2.6 MOV P0,A CLR P2.6 RET org 0250h TABLE: 0H,3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,77H,7CH,39H,5EH,79 H,71H END
-电子元器件采购网（www.ruidan.com）是本土元器件目录分销商，采用“小批量、现货、样品”销售模式，致力于满足客户多型号、高质量、快速交付的采购需求。 自建高效智能仓储，拥有自营库存超过50,000种，提供一站式正品现货采购、个性化解决方案、选型替代等多元化服务。