38led.asm

这是一个八路跑马灯的实验在单片机做跑马灯时经常用到 希望能对大家有帮助

;********************************************************************************
;*  p1口八个灯作3路跑马灯。分别往端口送三个不同的数， 理解数字和端口的对应关系  *
;********************************************************************************
;*  日期:  2007-3-25                                                            *
;*  版本:  3.0                                                                  *
;*  作者:  深圳学林电子有限公司     专业8051单片机教学站                        *
;*  邮箱: [e-mail]                                                       *
;*  网站： http://www.51c51.com     http://www.8951.com    更多例程请登陆网站   *
;********************************************************************************
;*  硬件：此程序在本公司xlisp系列单片机实验仪运行通过                           *
;********************************************************************************
;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com  All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！                  *
;********************************************************************************
   	ORG 0000H	;       
    	LJMP MAIN	;
    	ORG 030H	;
MAIN:	MOV P1,#0DBH	;11011011--零为亮
    	ACALL DELay	;
    	MOV P1,#06DH	;01101101
    	ACALL DELay	;
    	MOV P1,#0B6H	;10110110
    	ACALL DELay	;
   	AJMP MAIN	;
delay:  mov r7,#255	;延时子程序
d1:	mov r6,#255
d2:	djnz r6,d2
   	djnz r7,d1
   	ret
   	end