2.asm

点阵管单排行列循环,对点阵学习的一点基础

;XRF多功能51单片机开发板
;点阵管单排循环显示程序

	COL EQU P0
	ROW EQU P2

	ORG 0000H
	AJMP MAIN
	ORG 0030H
MAIN:   MOV COL,#0FFH
	MOV ROW,#00H	;全亮
	LCALL DELAY
	MOV A,#01H
START:	MOV COL,A	;第一列亮
	LCALL DELAY
	RL A		;循环下去，每次只亮一列
	CJNE A,#01H,START
	MOV COL,#0FFH
	MOV A,#0FEH
LOOP:	MOV ROW,A	;第一行亮
	LCALL DELAY
	RL A		;循环下去，每次只亮一行
	CJNE A,#0FEH,LOOP
	AJMP MAIN

DELAY:MOV R5,#2		;延时子程序
D2:	MOV R7,#250
D1:	MOV R6,#200
	DJNZ R6,$
	DJNZ R7,D1
	DJNZ R5,D2
	RET
 	END