12.1.3并行io口编程.txt

这是《MCS-51单片机应用开发实用子程序》配套源代码,对初学者很有用的

 START: 
ORG	0100H						
MAIN: 
MOV	R0,#00H					
MOV	DPTR,#TABLE				
DISP: 
MOV	A,R0					
MOVC	A,@A+ADPTR  			
MOV	P1,A 						
ACALL	DELAY					
INC		R0					 
CJNE	 R0,#0AH,DISP 				
AJMP	MAIN	 			  	
DELAY: 
MOV	R1,#0FFH					
LOOP0: 
MOV	 R2,#0FFH
LOOP1: 
DJNZ	R2,LOOP1
DJNZ	R1,LOOP0
RET								
TABLE: 
DB		0C0H					
DB		0F9H
DB		0A4H
DB		0B0H
DB		99H
DB		92H
DB		82H
DB		0F8H
DB		80H
DB		90H
END