2012单片机程序及复习.docVIP

1 清零实验 1：将30H 40H 单元清零 ORG 0000 AJMP MAIN ORG 0030H MAIN: MOV SP,#60H MOV R0,#0 MOV DPTR,#8000H MOV A,#0ABH LOOP: MOVX @DPTR,A INC DPTR DJNZ R0,LOOP AJMP $ END 2 拆字实验 ORG 0000H AJMP MAIN ORG 0030H MAIN: MOV SP,#60H MOV DPTR,#0E100H //8155命令口 （8155初始化 开始） MOV A,#3 //PA PB 口输出，PC 口输出 MOVX @DPTR,A //（8155初始化 完） MOV 20H,#34H //将34H送20H MOV A,20H //读出20H单元的数 ACALL CHAI //调用拆字子程序 //**显示子程序送三个入口参数 LOOP: MOV R0,#10H //显示缓冲区首地址 MOV R1,#2 //数码管显示位数（2位） MOV R2,#1 //显示数码管的低位地址； ACALL DISPLAY //调用显示子程序 AJMP LOOP DISPLAY: MOV A,@R0 ;读显示数 MOV 0FH,#8 ;164移位次数 ACALL P164 ;字形码输出子程序 ACALL PBIT ;字位码输出子程序 ACALL DELAY ;延时2ms MOV A,#0 ;熄灭显示 MOVX @DPTR,A INC R0 ;指向下一位显示数 DJNZ R1,DISPLAY ;没有显示完继续 RET P164: MOV DPTR,#TAB MOVC A,@A+DPTR P164_1: RRC A MOV R3,A MOV ACC.0,C ANL A,#0FDH MOV DPTR,#0E102H MOVX @DPTR,A ORL A,#0FEH MOVX @DPTR,A MOV A,R3 DJNZ 0FH,P164_1 MOV 0FH,#8 RET PBIT: MOV DPTR,#0E101H MOV A,R2 MOVX @DPTR,A RL A MOV R2,A RET DELAY: MOV R6,#4 DEL: MOV R7,#250 DJNZ R7,$ DJNZ R6,DEL RET TAB: DB 0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E0H DB 0FEH,0F6H,0EEH,3EH,9CH,7AH,9EH, 8EH //拆字子程序 CHAI: MOV B,#10H //立即数10H送B DIV AB //A/B MOV 10H,B //B送10H单元（低4位） MOV 11H,A //A送11H单元（高4位） RET //子程序返回 END 3 闪烁灯实验 ORG 0000H AJMP MAIN ORG 0030H MAIN: MOV SP,#60H MOV R4,#10 LOOP1: CLR P3.3 LOOP3: JB P3.5,LOOP1 JB P3.4,LOOP2 JNB P3.4,$ DJNZ R4,LOOP2 MOV R4,#10 LOOP2: CPL P3.3 MOV 5,4 ACALL DELAY AJMP LOOP3 MOV R5,#10 DELAY: MOV R6,#200 DEL: MOV R7,#229 DJNZ R7,$ DJNZ R6,DEL DJNZ R5,DELAY RET