用 74hc138 和 74hc595 驱动 8x8 点阵显示

用STC89C52，74hc138驱动列，74hc595驱动行，8x8点阵显示问题。
想显示箭头，......。悬赏分：30       解决时间：2010-12-10 08:58
//=============================================
最佳答案：
题目给出的程序基本结构是正确的，稍有瑕疵，HC138的使能没有打开，关键是消隐做的不够好，导致余辉重叠，显示比较模糊。
经过调整，可以正常工作了，显示箭头和桃心的仿真画面如下。

图片链接：http://hi.baidu.com/%D7%F6%B6%F8%C2%DB%B5%C0/album/item/b20572cac056a3b053664fd8.html#IMG=b20572cac056a3b053664fd8

调试成功的程序如下：
//=============================================
#include<reg52.h>
#define uint unsigned int
#define uchar unsigned char

sbit H_shcp  = P1^3;        //HC595芯片
sbit H_stcp  = P1^4;
sbit H_oe    = P1^5;
sbit H_ds    = P1^6;
sbit HC138_G = P3^1;        //HC138芯片

uchar data_j[] = {0x00,0x00,0x18,0x3c,0x5a,0x18,0x18,0x00};  //箭头
uchar data_t[] = {0x00,0x66,0x99,0x81,0x81,0x42,0x24,0x18};  //桃心
//------------------------------------------------------------------
void delaxms(uint xms)
{
    uint i, j;
    for(i = xms; i > 0; i--)  for(j = 118; j > 0; j--);
}
//------------------------------------------------------------------
void sendbyte_H(uchar aa)      //利用HC595输出
{
    uchar z;
    for(z = 0; z < 8; z++)  {  //循环8次移入数据
      H_shcp = 0;
      H_ds = aa & 0x01;        //数据低位送到HC595数据线
      H_shcp = 1;              //上升沿输入数据
      aa >>= 1;                //右移一位
    }
    H_stcp = 0;
    H_stcp = 1;                //上升沿使数据并行输出
}
//------------------------------------------------------------------
void main()
{
    uint i,  r;
    while(1)  {
      for(r = 30; r > 0; r--)  { //显示箭头
        for(i = 0; i < 8; i++)   {
          HC138_G = 1;           //关闭138，关闭显示
          sendbyte_H(data_j[i]); //输出箭头信息
          P1 = 0xd8 | i;         //换行
          HC138_G = 0;           //打开显示
          delaxms(5);            //显示的时间
      } }
      for(r = 10; r > 0; r--)  { //显示空白
        for(i = 0; i < 8; i++)   {
          HC138_G = 1;           //关闭138，关闭显示
          sendbyte_H(0);         //输出0
          P1 = 0xd8 | i;         //换行
          HC138_G = 0;           //打开显示
          delaxms(5);            //显示的时间
      } }
      for(r = 30; r > 0; r--)  { //显示桃心
        for(i = 0; i < 8; i++)   {
          HC138_G = 1;           //关闭138，关闭显示
          sendbyte_H(data_t[i]); //输出箭头信息
          P1 = 0xd8 | i;         //换行
          HC138_G = 0;           //打开显示
          delaxms(5);            //显示的时间
      } }
      for(r = 10; r > 0; r--)  { //显示空白
        for(i = 0; i < 8; i++)   {
          HC138_G = 1;           //关闭138，关闭显示
          sendbyte_H(0);         //输出0
          P1 = 0xd8 | i;         //换行
          HC138_G = 0;           //打开显示
          delaxms(5);            //显示的时间
    } } }
}
//------------------------------------------------------------------
提问者对于答案的评价：谢谢您的无私帮助~~~，这程序贼好。
原题网址：
http://zhidao.baidu.com/question/204018025.html
http://zhidao.baidu.com/question/204240600.html
//=============================================