|
/***********************************************************
实验名称：跑马灯示例程序
***********************************************************/
ORG 0000H
AJMP MAIN
ORG 0030H
MAIN:clr p1.4 ;打开led使能
MOV P0,#00H
LCALL DELAY
LCALL DELAY
LCALL DELAY ; 全亮,调用3次延时
MOV A,#0FEH ;二进制为11111110 ,这个0就是表示亮
SETB C
LOOP:MOV P0,A ;送入8个led
LCALL DELAY ;延时
LCALL DELAY ;延时
RLC A ;利用进位标志控制左移
JC LOOP ;如果有进位则跳转
TT: RRC A ;灯右移
MOV P0,A ;送入8个led
LCALL DELAY ;延时
LCALL DELAY ;延时
JC TT
AJMP LOOP
DELAY:MOV R2,#0FEH ;延时子程序
LOOP0:MOV R3,#0FEH
LOOP1:DJNZ R3,LOOP1
DJNZ R2,LOOP0
RET
END
| 
