[51单片机学习笔记ONE]-----LED灯的多种使用方法

 1 /******************************************************
 2 实验名称：       交替闪烁8个LED灯,时间间隔1s
 3 实验时间：       2014年12月2日
 4 ******************************************************/
 5     
 6 #include <reg51.h>
 7 
 8 void delay(unsigned char a);
 9 
10 void main()
11 {
12     while(1)
13     {
14         /*根据原理图，P0置高电平灯亮*/
15         P0 = 0x00;
16         delay(45);
17         
18         /*根据原理图，P0置低电平灯灭*/
19         P0 = 0xFF;
20         delay(45);    
21     }
22 }
23 
24 /*延时1s，有误差。计算公式大约可以用((((c*2)+3)*b+3)*a)*/
25 void delay(unsigned char a)      
26 {
27     unsigned char b,c; 
28     for(;a>0;a--)
29         for(b=152;b>0;b--)
30             for(c=70;c>0;c--);
31     
32 }

 1 /*******************************************************************************
 2 * 实 验 名         : LED闪烁的简单试验
 3 * 实验说明       : 得到8盏LED交替亮灭的实验效果
 4 *******************************************************************************/
 5     
 6     ORG     0000H        ;程序从此地址开始运行
 7     LJMP     MAIN        ;跳转到 MAIN 程序处
 8 
 9     ORG     030H        ;MAIN 从030H处开始
10 MAIN:    
11       MOV     P0 ,#00H    ;P0为低电平 LED 灯亮
12     ACALL     DELAY        ;调用延时子程序
13     MOV     P0 ,#0FFH
14     ACALL     DELAY
15     AJMP     MAIN        ;跳转到主程序处
16 
17 DELAY:    
18     MOV     R5,#08H       ;将立即数传给寄存器R5
19 F3:    
20     MOV     R6,#0FAH
21 F2:    
22     MOV     R7,#0FAH
23 F1:    
24     DJNZ     R7,F1           ;若为0程序向下执行，若不为0程序跳转到
25     DJNZ     R6,F2
26     DJNZ     R5,F3
27     RET
28 
29     END

 1 /*********************************
 2  ---------------------------------
 3  实验名称：    LED二进制加法显示
 4  实验时间：        2014/12/2
 5 *********************************/
 6 
 7 #include <reg51.h>
 8 
 9 void Delay(unsigned char x);
10 
11 void main()
12 {
13     unsigned char n = 0x00;
14     while(1)
15     {
16         P0 = n;
17         Delay(45);
18         n++;
19     }
20 }
21 
22 void Delay(unsigned char x)
23 {
24     unsigned char y,z;
25     for(;x>0;x--)
26         for(y=152;y>0;y--)
27             for(z=35;z>0;z--);
28 }

 1 /***************************************
 2 ---------------------------------------
 3 实验名称：       流水灯实验
 4 实验说明：       延时实现LED灯流水线效果
 5 实验时间：        2014/12/2
 6 ***************************************/
 7 
 8 #include <reg51.h>
 9 #include <intrins.h>
10 
11 void Delay(unsigned char a);
12 
13 void main()
14 {
15     
16     unsigned char x;
17     x = 0x01;
18     while(1)
19     {
20         P0 = x;
21         Delay(45);
22         x = _crol_(x,1);    //char型循环向左移
23     }
24 }
25 
26 void Delay(unsigned char a)
27 {
28     unsigned b,c;
29     for(;a>0;a--)
30         for(b=76;b>0;b--)
31             for(c=35;c>0;c--);
32 }

 1 /*******************************************
 2 --------------------------------------------
 3 实 验 名:     LED跑马灯
 4 实验说明:     LED灯右移跑马灯
 5 *******************************************/    
 6   
 7 #include<reg51.h>
 8 #include<intrins.h>
 9   
10 void Delay(unsigned char a);
11  
12 void main()
13 {
14     unsigned char n = 0xFE;
15     while(1)
16     {    
17         P0 = n;
18         Delay(45);
19         n = _crol_(n,1);
20     }
21 }
22  
23 void Delay(unsigned char a)
24 {
25     unsigned char b,c;     
26         for (;a>0;a--)
27             for (b=152;b>0;b--)
28                 for (c=35;c>0;c--);
29 }           

 1 /*******************************************
 2 --------------------------------------------
 3 实 验 名:     LED跑马灯
 4 实验说明:     LED灯左右跑马灯
 5 *******************************************/    
 6 
 7 #include<reg51.h>
 8 #include<intrins.h>
 9 
10 void Delay(unsigned char a);
11 
12 void main()
13 {
14     unsigned char n = 0xFE;
15     unsigned char i = 0;
16     unsigned char j = 0;
17     while(1)
18     {
19         for(;i<7;i++)
20         {
21             P0 = n;
22             Delay(45);
23             n = _crol_(n,1);    
24         }    
25 
26         for(;j<7;j++)
27         {
28             P0 = n;
29             Delay(45);
30             n = _cror_(n,1);
31         }
32     }
33 }
34 
35 void Delay(unsigned char a)
36 {
37     unsigned char b,c;
38     for (;a>0;a--)
39         for (b=152;b>0;b--)
40             for (c=35;c>0;c--);
41 }