题3.c

单片机C语言15个实验附有原理图和程序 是我的课程作业 以经过实践验证

#include <stdio.h>
#include <reg51.h>
#include <intrins.h>
#define hi  0x3c
#define lo  0xb0   //50ms
#define hi0 0xfc
#define lo0 0x17
unsigned char led_no,array_no=5,mask=0xfe,f[5]={0,0,0,0};
unsigned int tf0=0,tf1=0;
unsigned char code ledk[14]
       ={0x3f,0x06,0x5b,0x4f,0x66,0x6d,
        0x7d,0x07,0x7f,0x6f,0xf3,0x79,0x3e,0x31};//p10,E11,U12,r13
unsigned long t,time,time1;
unsigned char startstop=0;
sbit P37=P3^7;sbit clk=P0^7;sbit sda=P0^6;               //74LS164
void delay(unsigned int n)
{ unsigned int i,j;
  for(i=0;i<n;i++)
     for(j=0;j<n;j++)
       ;}
void shift(unsigned char dx)
{static unsigned char d;
   unsigned char j=0;
    d=dx;
   	while(j<8)
	{if((d&0x80)!=0) sda=1;
       else  sda=0;
	   clk=0;clk=1;
	   d<<=1;j++;}  }
void hextodec(long xx)
 {unsigned  char B;
  B=xx/100000;      f[0]=B;
xx=xx%100000;
 B=xx/10000;       f[1]=B;
xx=xx%10000;
 B=xx/1000;        f[2]=B;
xx=xx%1000;
 B=xx/100;         f[3]=B;
xx=xx%100;
 B=xx/10;          f[4]=B;

 }
void  int0() interrupt 0
{ if(startstop%2==0)
       TR1=1;
   else TR1=0;
  startstop++;
}

void t1() interrupt 3
{TH1=hi;TL1=lo;tf0++;}
 void out()
 {
  time=50*(long)tf0; 
  time1=(long)((TH1*256+TL1)-(hi*256+lo))*50/(long)(0x10000-(hi*256+lo));
  t=time+time1;
  hextodec(t);
  if(f[0]!=0){f[1]=0;f[2]=12;f[3]=11;f[4]=13;}
   array_no--;
  if(array_no<1)array_no=4;
  if(led_no==2)shift(ledk[f[array_no]]|0x80);
      else shift(ledk[f[array_no]]); 
  led_no++;
  if(led_no>3)led_no=0;
  P2=mask;
  mask=_crol_(mask,1);
  if(mask==0xef)mask=0xfe;

  } 
void main(void)
{TMOD=0x11;TH1=hi;TL1=lo;ET0=1;ET1=1;EX0=1;IT0=1;EA=1;

 while(1)
  { out();
    delay(2);
  } 
}