abcdef.asm

我实验板带的实验程序

;两路动态扫描显示程序，开机显示012345，如果按下P32显示ABCDEF
;***************************************************************************
;*  [e-mail]		     (51c51 test web)     www.8951.com     *
;*  Create by :石学军      www.51c51.com 更多例程请登陆网站        	   *
;***************************************************************************
ORG 00H
START:		JB P3.2,DIR1;判断P32是否按？
		MOV DPTR,#TABLE1;如果按下送TAB1
		SJMP DIR;跳转到DIR
DIR1:		MOV DPTR,#TABLE2;如果没有按送TAB2

DIR:		MOV R0,#00H;R0是数的代码寄存器
		MOV R1,#0fdH;R1是数码管选择位10111111,P21亮
NEXT:		mov p0,#0ffh;清除显示
         MOV P2,#0FFH;清除显示
         MOV A,R0
			MOVC A,@A+DPTR;取代码
			MOV P0,A;送显示
			MOV A,R1
			MOV P2,A;数码管选择
		   	INC R0;取下一个码
			RL A;右移一位
			MOV R1,A;取下一个数码管端口		
			CJNE R1,#7fh,NEXT;如果6个数送完重新开始
			SJMP START;重新开始

TABLE1:		DB 28h,7eh,0a2h,62h,74h,61h;数码管ABCDEF
TABLE2:		DB 30h,25h,0a9h,26h,0a1h,0b1h;显示012345
			END