Using 74hc138 and 74hc595 to drive 8x8 dot matrix display

Use STC89C52, 74hc138 to drive the columns, 74hc595 to drive the rows , 8x8 dot matrix display problem. Want to display arrows, ....... Reward points
: 30 Solved time: 2010-12-10 08:58
//= ...

The successfully debugged program is as follows:
//============================================
#include
#define uint unsigned int
#define uchar unsigned char

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

uchar data_j[] = {0x00,0x00,0x18,0x3c,0x5a,0x18,0x18,0x00}; //arrow
uchar data_t[] = {0x00,0x66,0x99,0x81,0x81,0x42,0x24,0x18}; //heart
//------------------------------------------------------------------
void delaxms(uint xms)
{
    uint i, j;
    for(i = xms; i > 0; i--) for(j = 118; j > 0; j--);
}
//------------------------------------------------------------------
void sendbyte_H(uchar aa) //output using HC595
{ 
    uchar z;
    for(z = 0; z < 8; z++) { //loop 8 times to move in data
      H_shcp = 0;
      H_ds = aa & 0x01; //The low bit of data is sent to the HC595 data line
      H_shcp = 1; //Rising edge input data
      aa >>= 1; //Shift right one bit
    }
    H_stcp = 0;
    H_stcp = 1; //Rising edge makes data output in parallel
}
//------------------------------------------------------------------
void main()
{
    uint i, r;
    while(1) {
      for(r = 30; r > 0; r--) { //Display arrow
        for(i = 0; i < 8; i++) {
          HC138_G = 1; //Turn off 138, turn off display
          sendbyte_H(data_j[i]); //Output arrow information
          P1 = 0xd8 | i; //Wrap
          HC138_G = 0; //Turn on display
          delaxms(5); //Display time
      } }
      for(r = 10; r > 0; r--) { //Display blank
        for(i = 0; i < 8; i++) {
          HC138_G = 1; //Turn off 138, turn off display
          sendbyte_H(0); //Output 0
          P1 = 0xd8 | i; //Wrap
          HC138_G = 0; //Turn on display
          delaxms(5); //Display time
      } }
      for(r = 30; r > 0; r--) { //Display heart
        for(i = 0; i < 8; i++) {
          HC138_G = 1; //Turn off 138, turn off display
          sendbyte_H(data_t[i]); //Output arrow information
          P1 = 0xd8 | i; //Wrap
          HC138_G = 0; //Turn on display
          delaxms(5); //Display time
      } }
      for(r = 10; r > 0; r--) { //Display blank
        for(i = 0; i < 8; i++) {
          HC138_G = 1; //Turn off 138, turn off display
          sendbyte_H(0); //Output 0
          P1 = 0xd8 | i; //line break
          HC138_G = 0; //turn on display
          delaxms(5); //display time
    } } }
}