怎么驱动不了数码管呢？

单片机

我用的STC的单片机，共阳极的数码管，用的驱动芯片TM1638，你们看看我的程序，哪里出了问题，数码管不亮啊。帮忙指点下谢谢了。在线等~~~
#include
#define DATA_COMMAND 0X40
#define DISP_COMMAND 0x80
#define ADDR_COMMAND 0XC0

//TM1638模块引脚定义
***it DIO=P2^1;
***it CLK=P2^0;
***it STB=P4^0;
unsigned char num[10]; //各个数码管显示的值
//共阴数码管显示代码
unsigned char code tab[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,
                        0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};
//共阳极数码管0~F

void TM1638_Write(unsigned char DATA) //写数据函数
{
unsigned char i;
for(i=0;i<8;i++)
{
CLK=0;
if(DATA&0X01)
DIO=1;
else
DIO=0;
DATA>>=1;
CLK=1;
}
}
/*unsigned char TM1638_Read(void) //读数据函数
{
unsigned char i;
unsigned char temp=0;
DIO=1; //设置为输入
for(i=0;i<8;i++)
{
temp>>=1;
CLK=0;
if(DIO)
temp|=0x80;
CLK=1;
}
return temp;
} */
void Write_COM(unsigned char cmd) //发送命令字
{
STB=0;
TM1638_Write(cmd);
STB=1;
}

void Write_DATA(unsigned char add,unsigned char DATA) //指定地址写入数据
{
Write_COM(0x44);
STB=0;
TM1638_Write(0xc0|add);
TM1638_Write(DATA);
STB=1;
}

void init_TM1638(void)
{
unsigned char i;
Write_COM(0x8b);//亮度
Write_COM(0x40); //写数据命令
STB=0;
TM1638_Write(0xc0); //写地址命令
for(i=0;i<16;i++)
TM1638_Write(0x00);
STB=1;
}

/*unsigned char led(unsigned char adress_led,da_led)
{
STB=1;
TM1638_Write(0x44);
STB=1;
TM1638_Write(adress_led);
TM1638_Write(da_led);
STB=1;
return 0;
}
*/
int main(void)
{
//unsigned char i;
init_TM1638();
//初始化TM1638
// for(i=0;i<8;i++)
// Write_DATA(i<<1,tab[0]);                //初始化寄存器
while(1)
{

Write_DATA(0x00,0x01);
Write_DATA(0x02,0x01);
Write_DATA(0x04,0x01);
Write_DATA(0x06,0x01);
Write_DATA(0x08,0x01);
Write_DATA(0x0a,0x01);
Write_DATA(0x0c,0x00);
/*i=Read_key();                         //读按键值
if(i<8)
{
num[i]++;
while(Read_key()==i);          //等待按键释放
if(num[i]>15)
num[i]=0;
Write_DATA(i*2,tab[num[i]]);
Write_allLED(1< }*/
}
}