74hc164驱动数码管电路图和程序

应用：

1>驱动数码管：

程序：

/************************

用数码管显示0~9；

***********************/

#include

#define uint unsigned int

#define uchar unsigned char

sbit Dat = P0^0;

sbit CLR = P0^1;

uchar code

tab[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xff}; void play(uchar a)

{

uchar n,i;

n=tab[a];

for(i=0;i<8;i++) {

if((n&0x01)==0) {

CLR=0;

Dat=0;

CLR=1;

}

else

{

CLR=0;

Dat=1;

CLR=1;

}

n=n>>1;

}

}

void dealy(uint t) {

unsigned int j;

for(;t>0;t--)

for(j=6245;j>0;j--) {;}

}

main()

{

unsigned char h; while(1)

{

for(h=0;h<10;h++) {

//dealy(1);

play(h);

dealy(20);

play(10);

}

h=0;

}

}