是火林吗？我是一凡。我写了个子函数，你拿去看一下，程序我还没调试过，可能会有点问题，你拿去试一下，完整的程序我就不写了，我想还是你自己去琢磨一下比较好吧。原理大致说一下，文字左移过程中，就是最后面的半个字显示部分发送位数的多少，前面的数据就不用管了，会一位一位向前挤的。

#define uchar unsigned char
#define uint unsigned int
#define SCREEN_WIDTH 8 //定义屏的宽度，4个汉字，宽度为8个字节

sbit V_SDA = P3^0;
sbit V_CLK = P3^1;

/*****************************************************
输出字模数据子函数
函数入口：*zm:本次发送的数据在字模数组中起始位置
bit_num:发送最后的不是完整的字模部分的位数
用法示例：send_line(&zimo[i],j);
zimo[]为字模数组
*****************************************************/
void send_line(uchar *zm,uchar bit_num)
{uint byte_num;
uint m=0;
for(byte_num=SCREEN_WIDTH;byte_num>0;byte_num--)
{SBUF=zm[m++];
while(TI==0);
TI=0;
}
for(;bit_num>0;bit_num--)
{V_SDA=zm[m]&0x80;
V_CLK=1;
V_CLK=0;
zm[m]=zm[m]<<1;
}
}

首先感谢提供程序:

;-- 谢 -- ** 宋体, 12 **
; 当前所选字体下一个汉字对应的点阵为: 宽度x高度=16x16, 调整后为: 16x16
0x80,0x10,0x42,0x10,0xEC,0x11,0x24,0x11,0xE0,0x7F,0x20,0x11,0xE7,0x13,0x24,0x15
0xF4,0x15,0x84,0x11,0x44,0x11,0x54,0x11,0x2C,0x11,0x14,0x11,0x48,0x15,0x80,0x08

这里以"谢"这个字模说一下你的用法,这个字是横向取模的,另外for(;bit_num>0;bit_num--)
{V_SDA=zm[m]&0x80;
V_CLK=1;
V_CLK=0;
zm[m]=zm[m]<<1;
}
是什么意思!

以send_line(&zimo[i],j);为例，在使用它时，要在外面使用两重循环，外面这重是用来控制“&zimo[i]”的，每循环一次i增1；里面这重循环用来控制j的，循环8次，j从0到7。具体的我就这么也说不太清。现在只能大致说一下。

用串口发送数据每次都是1个字节，而这里要求一位一位的向前移，我是把前面的完整字节的用串口方式发送，后面的不完整部分用普通I/O口方式发送，每次发送是按位发送的，以解决不是完整字节的问题。

这写天我考试，比较忙，考完把完整的程序调出来发给你好了。

小弟也想做啊

上面提到的都有了

就不懂接线

望指教

小弟也想做啊

上面提到的都有了

就不懂接线

望指教

请问是有程序？不会搞电路接线？可否把程序放上来？坛子里可是有很多搞点阵的高手啊。

今年第12期的《无线电》内有个2字左移的点阵屏程序，行扫描用两片138，列扫描用595。将程序改一下就可以同时显示四个汉字。（本人不懂编程）

#include <AT892051.H>
#define uchar unsigned char
#define uint unsigned int
#define SPEED 3
uchar col,disrow;
uint word;
uchar code HZ[];
uchar BUFF[6];
void loadoneline(void);
void sendoneline(void);
/********************************************/
uchar two_onebyte(uchar h1,uchar h2)
{
uchar temp,tempcol;
if(col<8) tempcol=col;
else tempcol=col-8;
temp=(h1<<tempcol)|(h2>>(8-tempcol));
temp=255-temp;
return temp;
}
/*******************************************************/
void main(void)
{
uchar i;
col=0;word=0;
while(1)
{
while(col<16)
{
for(i=0;i<SPEED;i++)
{
for(disrow=0;disrow<16;disrow++)
{
loadoneline();
sendoneline();
P1=0x10+disrow;
P1=0x20+disrow;
}
}
col++;
}
col=0;word=word+32;
if(word>=1600)word=0;
}
}
/******************************************************/
void loadoneline(void)
{
uchar s;
for(s=0;s<3;s++)
{
BUFF[2*s]=HZ[word+32*s+2*disrow];
BUFF[2*s+1]=HZ[word+1+32*s+2*disrow];
}
}
/******************************************************/
void sendoneline(void)
{
char s;uchar inc;
if(col<8)inc=0;else inc=1;
for(s=4+inc;s>=0+inc;s--)
{
SBUF=two_onebyte(BUFF[s],BUFF[s+1]);
while(!TI);TI=0;
}
}
/*******************************************************/
uchar code HZ[]=
{
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
//=============================================================================
0x00,0x08,0x00,0x12,0x00,0x24,0x00,0x48,0x00,0x90,0x01,0x20,0x02,0x40,0x04,0x80,
0x02,0x40,0x01,0x20,0x00,0x90,0x00,0x48,0x00,0x24,0x00,0x12,0x00,0x08,0x00,0x04,/*"《",0*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0xFE,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*"—",1*/
0x00,0x08,0x00,0x12,0x00,0x24,0x00,0x48,0x00,0x90,0x01,0x20,0x02,0x40,0x04,0x80,
0x02,0x40,0x01,0x20,0x00,0x90,0x00,0x48,0x00,0x24,0x00,0x12,0x00,0x08,0x00,0x04,/*"《",2*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0xFE,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*"—",3*/
0x00,0x08,0x00,0x12,0x00,0x24,0x00,0x48,0x00,0x90,0x01,0x20,0x02,0x40,0x04,0x80,
0x02,0x40,0x01,0x20,0x00,0x90,0x00,0x48,0x00,0x24,0x00,0x12,0x00,0x08,0x00,0x04,/*"《",4*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0xFE,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*"—",5*/
//**************************************************************************
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
/****************************************************************************/
0x08,0x20,0x06,0x30,0x04,0x40,0x3F,0xF8,0x21,0x08,0x3F,0xF8,0x21,0x08,0x21,0x08,
0x3F,0xF8,0x21,0x08,0x01,0x00,0xFF,0xFE,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,/*"单",0*/
0x00,0x40,0x10,0x40,0x10,0x40,0x10,0x44,0x1F,0xFE,0x10,0x00,0x10,0x00,0x10,0x00,
0x1F,0xF0,0x10,0x10,0x10,0x10,0x10,0x10,0x20,0x10,0x20,0x10,0x40,0x10,0x80,0x10,/*"片",1*/
0x10,0x00,0x10,0xF8,0x10,0x88,0xFE,0x88,0x10,0x88,0x10,0x88,0x38,0x88,0x34,0x88,
0x54,0x88,0x50,0x88,0x91,0x08,0x11,0x0A,0x12,0x0A,0x12,0x0A,0x14,0x06,0x10,0x00,/*"机",2*/
0x00,0x00,0x0F,0xF0,0x08,0x10,0x0F,0xF0,0x08,0x10,0x0F,0xF0,0x08,0x10,0x0F,0xF0,
0x08,0x10,0x08,0x10,0xFF,0xFE,0x04,0x00,0x06,0x20,0x0C,0x10,0x10,0x18,0x20,0x08,/*"具",3*/
0x01,0x00,0x01,0x00,0x7F,0xFE,0x02,0x00,0x04,0x00,0x0F,0xF0,0x18,0x10,0x28,0x10,
0x4F,0xF0,0x88,0x10,0x08,0x10,0x0F,0xF0,0x08,0x10,0x08,0x90,0x08,0x70,0x08,0x20,/*"有",4*/
0x10,0x40,0x18,0x40,0x10,0x40,0x20,0x40,0x37,0xFC,0x60,0xC0,0xA0,0xE0,0x21,0x60,
0x21,0x50,0x22,0x48,0x24,0x4E,0x2B,0xF4,0x20,0x40,0x20,0x40,0x20,0x40,0x00,0x00,/*"体",5*/
0x0C,0x00,0x71,0xFC,0x11,0x04,0x11,0x04,0xFD,0x04,0x11,0x04,0x39,0x04,0x35,0x04,
0x55,0xFC,0x50,0x00,0x90,0x90,0x10,0x88,0x11,0x04,0x11,0x06,0x12,0x02,0x14,0x02,/*"积",6*/
0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x09,0x40,0x0D,0x20,0x19,0x10,0x11,0x18,
0x21,0x0C,0x41,0x06,0x81,0x04,0x01,0x00,0x01,0x00,0x01,0x00,0x05,0x00,0x02,0x00,/*"小",7*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x60,0x00,0x30,0x00,0x10,0x00,0x00,0x00,0x00,0x00,/*"、",8*/
0x00,0x20,0x00,0x20,0x7F,0x20,0x08,0x20,0x0B,0xFC,0x08,0x24,0x08,0x24,0x08,0x44,
0x09,0x44,0x0E,0x44,0xF0,0x84,0x40,0x84,0x01,0x04,0x02,0x78,0x04,0x10,0x00,0x00,/*"功",9*/
0x20,0x40,0x30,0x40,0x24,0x4C,0x42,0x70,0xFF,0x44,0x42,0x46,0x00,0x7C,0x7E,0x00,
0x42,0x40,0x7E,0x4C,0x42,0x70,0x7E,0x40,0x42,0x44,0x42,0x46,0x4A,0x3C,0x44,0x00,/*"能",10*/
0x00,0x00,0x79,0xF8,0x09,0x08,0x09,0x08,0x79,0xF8,0x40,0x40,0x43,0xFC,0x42,0x44,
0x7A,0x44,0x0A,0x44,0x0B,0xFC,0x08,0x40,0x08,0x48,0x08,0x44,0x28,0x7E,0x13,0xC4,/*"强",11*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x60,0x00,0x30,0x00,0x10,0x00,0x00,0x00,0x00,0x00,/*"、",12*/
0x01,0x00,0x00,0x80,0x3F,0xFC,0x20,0x00,0x22,0x00,0x21,0x08,0x30,0x8C,0x28,0xC8,
0x24,0x90,0x24,0x90,0x26,0x20,0x44,0x20,0x40,0x40,0x5F,0xFE,0x80,0x00,0x00,0x00,/*"应",13*/
0x00,0x00,0x1F,0xFC,0x10,0x84,0x10,0x84,0x10,0x84,0x1F,0xFC,0x10,0x84,0x10,0x84,
0x10,0x84,0x1F,0xFC,0x10,0x84,0x10,0x84,0x20,0x84,0x20,0x84,0x40,0x94,0x80,0x88,/*"用",14*/
0x00,0x00,0x7F,0xFE,0x02,0x00,0x04,0x00,0x3F,0xFC,0x24,0x44,0x24,0x44,0x27,0xC4,
0x24,0x44,0x24,0x44,0x27,0xC4,0x24,0x44,0x24,0x44,0x3F,0xFC,0x20,0x04,0x00,0x00,/*"面",15*/
0x01,0x00,0x00,0x80,0x3F,0xFE,0x20,0x00,0x20,0x00,0x20,0x00,0x20,0x00,0x20,0x00,
0x20,0x00,0x20,0x00,0x20,0x00,0x20,0x00,0x40,0x00,0x40,0x00,0x80,0x00,0x00,0x00,/*"广",16*/
0x20,0x80,0x3E,0xFC,0x28,0xA0,0x45,0x10,0x85,0x10,0x3F,0xF8,0x01,0x00,0xFF,0xFE,
0x00,0x20,0x00,0x20,0x7F,0xFC,0x04,0x20,0x02,0x20,0x02,0x20,0x00,0xA0,0x00,0x40,/*"等",17*/
0x10,0x80,0x18,0xA0,0x10,0x98,0x20,0x90,0x37,0xFC,0x61,0x40,0xA1,0x40,0x21,0x40,
0x21,0x40,0x21,0x40,0x21,0x40,0x22,0x44,0x22,0x44,0x24,0x46,0x28,0x3C,0x20,0x00,/*"优",18*/
0x01,0x00,0x01,0x00,0x01,0xF8,0x01,0x00,0x01,0x10,0x1F,0xF8,0x10,0x10,0x10,0x10,
0x10,0x10,0x1F,0xF0,0x10,0x10,0x01,0x10,0x28,0x88,0x24,0x44,0x44,0x44,0x00,0x00,/*"点",19*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x00,0x30,0x00,0x10,0x00,0x20,0x00,0x00,0x00,/*"，",20*/
0x00,0x00,0x1F,0xF8,0x10,0x08,0x10,0x08,0x10,0x08,0x1F,0xF8,0x10,0x08,0x10,0x08,
0x10,0x08,0x1F,0xF8,0x10,0x08,0x10,0x08,0x10,0x08,0x1F,0xF8,0x10,0x08,0x00,0x00,/*"目",21*/
0x08,0x10,0x06,0x18,0x04,0x20,0xFF,0xFE,0x00,0x00,0x3E,0x08,0x22,0x48,0x3E,0x48,
0x22,0x48,0x22,0x48,0x3E,0x48,0x22,0x48,0x22,0x48,0x2A,0x08,0x24,0x28,0x00,0x10,/*"前",22*/
0x00,0x00,0x7F,0xFE,0x00,0x80,0x00,0x80,0x00,0x80,0x00,0x80,0x10,0x80,0x10,0xFC,
0x10,0x80,0x10,0x80,0x10,0x80,0x10,0x80,0x10,0x80,0xFF,0xFE,0x00,0x00,0x00,0x00,/*"正",23*/
0x00,0x10,0x24,0x10,0x22,0x10,0x23,0x10,0x22,0x10,0x20,0x10,0x20,0x10,0x21,0x10,
0x22,0x10,0x2C,0x30,0x38,0x30,0x70,0x68,0x20,0xC4,0x01,0x07,0x06,0x02,0x00,0x00,/*"以",24*/
0x08,0x10,0x06,0x18,0x04,0x20,0xFF,0xFE,0x00,0x00,0x3E,0x08,0x22,0x48,0x3E,0x48,
0x22,0x48,0x22,0x48,0x3E,0x48,0x22,0x48,0x22,0x48,0x2A,0x08,0x24,0x28,0x00,0x10,/*"前",25*/
0x0E,0x1E,0x70,0xE0,0x40,0x80,0x40,0x80,0x7C,0x80,0x44,0xFE,0x44,0x88,0x44,0x88,
0x7C,0x88,0x40,0x88,0x41,0x08,0x41,0x08,0x42,0x08,0x42,0x08,0x84,0x08,0x08,0x08,/*"所",26*/
0x01,0x00,0x01,0x00,0x01,0x00,0x3F,0xF8,0x01,0x00,0x01,0x00,0xFF,0xFE,0x03,0x00,
0x03,0x80,0x05,0x40,0x05,0x20,0x09,0x18,0x31,0x0E,0xC1,0x04,0x01,0x00,0x01,0x00,/*"未",27*/
0x1F,0xF0,0x10,0x10,0x10,0x10,0x11,0x10,0x11,0x10,0x11,0x10,0x11,0x10,0x11,0x10,
0x12,0x90,0x02,0x80,0x04,0x80,0x04,0x84,0x08,0x84,0x30,0x86,0xC0,0x7C,0x00,0x00,/*"见",28*/
0x10,0x80,0x10,0x80,0x20,0x80,0x7C,0xFC,0x45,0x04,0x45,0x04,0x46,0x04,0x7C,0x84,
0x44,0x44,0x44,0x64,0x44,0x24,0x44,0x04,0x7C,0x04,0x44,0x28,0x40,0x10,0x00,0x00,/*"的",29*/
0x00,0x80,0x40,0x80,0x2F,0xFC,0x20,0x80,0x00,0x80,0x07,0xF8,0xE4,0x88,0x24,0x88,
0x27,0xF8,0x21,0xA0,0x22,0x98,0x2C,0x88,0x20,0x80,0x50,0x80,0x8F,0xFE,0x00,0x00,/*"速",30*/
0x01,0x00,0x00,0x80,0x3F,0xFE,0x22,0x20,0x22,0x20,0x2F,0xFC,0x22,0x20,0x23,0xE0,
0x20,0x00,0x27,0xF8,0x22,0x10,0x21,0x20,0x20,0xC0,0x41,0x30,0x46,0x0E,0x98,0x04,/*"度",31*/
0x00,0x00,0xFF,0x80,0x22,0x7E,0x22,0x44,0x3E,0x44,0x22,0x44,0x22,0x44,0x3E,0x28,
0x22,0x28,0x22,0x90,0x27,0x10,0x3A,0x28,0xC2,0x46,0x02,0x84,0x02,0x00,0x02,0x00,/*"取",32*/
0x11,0x00,0x19,0x20,0x11,0x10,0x11,0x08,0x21,0xFC,0x3F,0x00,0x50,0x80,0x90,0x80,
0x10,0x80,0x10,0x40,0x10,0x40,0x10,0x24,0x10,0x14,0x10,0x0C,0x10,0x06,0x00,0x00,/*"代",33*/
0x08,0x10,0x04,0x20,0x7F,0xFE,0x01,0x00,0x3F,0xF8,0x01,0x00,0x7F,0xFE,0x02,0x00,
0x07,0xF8,0x0C,0x08,0x37,0xF8,0xC4,0x08,0x07,0xF8,0x04,0x08,0x07,0xF8,0x04,0x08,/*"着",34*/
0x10,0x40,0x18,0x48,0x17,0xFC,0x20,0x40,0x20,0x80,0x60,0x84,0xAF,0xFE,0x20,0x80,
0x21,0x08,0x23,0xFC,0x20,0x08,0x21,0x10,0x20,0xA0,0x20,0x40,0x20,0x20,0x00,0x00,/*"传",35*/
0x10,0x40,0x10,0x20,0x23,0xFE,0x20,0x40,0x44,0x40,0xF8,0x88,0x09,0x04,0x13,0xFE,
0x20,0x94,0x7C,0x90,0x00,0x90,0x00,0x90,0x1D,0x12,0xE1,0x12,0x02,0x0E,0x04,0x00,/*"统",36*/
0x01,0x00,0x01,0x00,0x01,0x00,0x3F,0xF8,0x21,0x08,0x21,0x08,0x3F,0xF8,0x21,0x08,
0x21,0x08,0x21,0x08,0x3F,0xF8,0x21,0x08,0x01,0x02,0x01,0x02,0x00,0xFE,0x00,0x00,/*"电",37*/
/********************************************************************************/
0x08,0x40,0x0C,0x40,0x08,0x40,0x17,0xFC,0x10,0x40,0x33,0xFC,0x30,0x40,0x50,0x40,
0x97,0xFC,0x10,0x44,0x10,0x44,0x10,0x44,0x10,0x44,0x10,0x54,0x10,0x48,0x10,0x40,/*"伟",0*/
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x30,0x00,0x48,0x00,0x48,0x00,0x30,0x00,0x00,0x00,0x00,0x00,/*"。",0*/
//============================================================================
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
};

对单个子程序软件仿真了一下，修改了一些错误。

/*****************************************************
输出字模数据子函数
函数入口：*zm:本次发送的数据在字模数组中起始位置
bit_num:发送不是完整的字模部分的位数
用法示例：send_line(&zimo[i],j);
zimo[]为字模数组
*****************************************************/
void send_line(uchar *zm,uchar bit_num)
{uint byte_num;
uchar temp;
uint m=0;
for(byte_num=SCREEN_WIDTH;byte_num>0;byte_num--)
{SBUF=zm[m++];
while(TI==0);
TI=0;
}
V_CLK=0;
temp=zm[m];
for(;bit_num>0;bit_num--)
{V_SDA=temp&0x80;
V_CLK=1;
V_CLK=0;
temp=temp<<1;
}
}

我考试考完了，不过还有一门数据库，不考试的，要交一份作业，用PB+SQL做学生成绩管理系统，等这个弄好了再弄屏了。