Proteus原理仿真之霓虹灯实验

本次实验原理相对简单，主要就是通过编程控制从P1口输出8位二进制数中“0”的个数和移动（高电平灯灭，低电平灯亮），另外要主要每次数据从P1口输出以后要维持一段时间，即需要软件延时，否则无法看到发光二极管移动效果，且延时时间要超过人眼视觉暂留效应的时间，一般延时数百毫秒。

程序清单

  

   

    

     

    
    

     

      #include <reg51.h> //包含头文件reg51.h，定义单片机特殊功能寄存器和特殊标志位
     
    
   

    

     

    
    

     

      #include <intrins.h> //包含头文件intrins.h，定义各种循环移位函数等
     
    
   

    

     

    
    

     

      #define uchar unsigned char //宏定义无符号字符型
     
    
   

    

     

    
    

     

      #define uint unsigned int //宏定义无符号整型
     
    
   

    

     

    
    

     

      uchar code tab[]={
      0xe7,
      0xdb,
      0xbd,
      0x7e,
      0x7e,
      0xbd,
      0xdb,
      0xe7};	
      //定义数组，且存放在程序存储区
     
    
   

    

     

    
    

     

      void delay(void) //延时子函数，大约500ms
     
    
   

    

     

    
    

     

      {
     
    
   

    

     

    
    

     
    
      int i,j;
     
    
   

    

     

    
    

     
	
      for(i=
      0;i<
      500;i++)
     
    
   

    

     

    
    

     
		
      for(j=
      0;j<
      62;j++);
     
    
   

    

     

    
    

     

      }		 
     
    
   

    

     

    
    

     

      void main (void)
     
    
   

    

     

    
    

     

      {
     
    
   

    

     

    
    

     

          uchar shuju,count;
     
    
   

    

     

    
    

     
    
      while (
      1)	
      //无限循环
     
    
   

    

     

    
    

     

          {
     
    
   

    

     

    
    

     

      		shuju = 
      0xfe;
     
    
   

    

     

    
    

     
		
      for(count=
      0;count<
      8;count++)	
      //1个发光二极管从左往右循环点亮
     
    
   

    

     

    
    

     

      		{	        		
     
    
   

    

     

    
    

     

          	   	P1 = shuju;					
     
    
   

    

     

    
    

     

      			delay();
     
    
   

    

     

    
    

     

      			shuju = _crol_(shuju,
      1);	
      //8位数据循环左移1位
     
    
   

    

     

    
    

     

      		}
     
    
   

    

     

    
    

     

      		shuju = 
      0x7f;
     
    
   

    

     

    
    

     
		
      for(count=
      0;count<
      8;count++)	
      //1个发光二极管从右往左循环点亮
     
    
   

    

     

    
    

     

      		{	        		
     
    
   

    

     

    
    

     

          	   	P1 = shuju;
     
    
   

    

     

    
    

     

      			delay();
     
    
   

    

     

    
    

     

      			shuju = _cror_(shuju,
      1);	
      //8位数据循环右移1位