控制P1口LED灯渐亮和渐暗程序

;控制P1口LED灯渐亮和渐暗程序
ORG 00H
JMP MAIN
ORG 30H
MAIN:
MOV A,#0
CALL LOOP ;由暗变亮子程序
MOV P1,#0FFH ;关灯,全暗
MOV A,#0
CALL LOOP2 ;由亮变暗子程序
MOV P1,#0 ;开灯,全亮
JMP MAIN
;以下一段为由暗变亮的子程序,变化程度共255级,由两段程序组成,一段点亮,时间
值由A中的数决定
;另一段将A取反后作延时时间值,这样无论A是什么值,每个周期时间相等,但点亮和关
闭的值就不断变化
;类似一个频率一定,占空比可调的方波,从
而实现灯光由暗到亮.
LOOP:
;这一段为点亮灯的延时
MOV P1,#0 ;把灯点亮
INC A ;A的值加1
CJNE A,#0FFH,E2 ;A还没有加到FF,跳转E
2
E1:JMP OVER ;A加到了FF,结束返回E2:MOV R7,A ;A的值存入R7
D1:MOV R6,#30 ;延时子程序
DJNZ R6,$
DJNZ R7,D1 ;R7-1不为零就转D1,这里R7即上面预置的A值,用在这里,就是每次延时
时间不同,有255级
MOV P1,#0FFH ;延时时间到,送所有灯
;这一段为关掉灯的延时,两段相加,组成占空比可变的方波输出控制灯由暗到亮
CPL A ;A的值取反,
MOV R7,A
D2:MOV R6,#30 ;延时子程序
DJNZ R6,$
DJNZ R7,D2
CPL A ;再取反,恢复原来的值
JMP LOOP ;跳回循环
OVER:RET
;以下为由亮变暗子程序,原理与上面一样.
LOOP2:
MOV P1,#0FFH
INC A ;程序运行到此,A的值为0,经这一
步后为1
CJNE A,#0FFH,W2
W1:JMP OVER2
W2:
MOV R7,A
D11:MOV R6,#30
DJNZ R6,$
DJNZ R7,D11
MOV P1,#0
CPL A
MOV R7,A
D22:MOV R6,#30
DJNZ R6,$
DJNZ R7,D22
CPL A
JMP LOOP2
OVER2:RET
END
#include <A T89X52.h>
sbit LED = P0 ^ 0;
void delay (unsigned int d){ //延时功能函数，由d决定延时长度
unsigned char i;
while( --d != 0){
for(i = 0; i < 2; i++);
}
}
void main (void){
unsigned char a,c,b;//a控制延时长度b控制循环周期
while (1){
LED = 1;
a = 0x00;
for (b=250; b>0; b--){
a++;
c=a;
delay (c); //延时长度随a而改变
LED = 0;
c = ~c;
//a值取反，决定灯灭时的占空比
delay (c);
LED = 1;
c = ~c;
//a值取反使a回到原值继续循环
}
/*LED = 0;
//亮起LED
a = 0x00;
for (b=250; b>0; b--){
a++;
c=a;
delay (c);
LED = 1;
c = ~c;
delay (c);
LED = 0;
c = ~c;
}
LED = 1;*/
}
}
蓝色是由暗变亮。