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

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

调试成功的程序如下：
//=============================================
#include
#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); //显示的时间
} } }
}