16X16点阵流动显示 154和2个595驱动（51汇编）06 29 更新 2 -- 电子技术、单片机、网络应用、计算机编程爱好者的家园-- 编程爱好者博客

SH_CP EQU P2.0; DS0 EQU P2.1; ST_CP EQU P2.2; ORG 00H AJMP MAIN ORG 30H MAIN: MOV R0,#8 MOV R4,#50 ; MOV DPTR,#TAB MOV R3,#80 MAIN1: MOV A,R2 INC A ;先送下半列 MOVC A,@A+DPTR ACALL WB INC R2 MOV A,R2 DEC A　;后送上半列 MOVC A,@A+DPTR ACALL WB INC R2 MOV P1,R1 SETB ST_CP CLR ST_CP INC R1 CJNE R1,#16,MAIN1 MOV R1,#0 CJNE R2,#32,MAIN1 MOV R2,#0 DJNZ R4,MAIN1 MOV R4,#50;50次 INC DPTR INC DPTR DJNZ R3,MAIN1 AJMP MAIN WB: CLR C RRC A MOV DS0,C SETB SH_CP CLR SH_CP DJNZ R0,WB MOV R0,#8 RET TAB: 阴码逐列顺向 DB 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H DB 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H;"　",0 DB 000H, 000H, 030H, 004H, 036H, 00EH, 037H, 03CH, 031H, 0F0H, 03FH, 0E0H, 03EH, 03AH, 000H, 013H DB 00EH, 007H, 0FFH, 00EH, 0F8H, 01CH, 01BH, 0F8H, 01BH, 0F0H, 018H, 01CH, 01EH, 00EH, 01EH, 007H;"欢",1 DB 000H, 000H, 003H, 002H, 073H, 007H, 073H, 0FEH, 003H, 0FCH, 000H, 006H, 03FH, 0F3H, 03FH, 0F3H DB 060H, 033H, 060H, 063H, 000H, 003H, 07FH, 0FFH, 07FH, 0FFH, 060H, 063H, 07FH, 0E3H, 07FH, 0E3H;"迎",2 DB 000H, 000H, 003H, 002H, 003H, 003H, 003H, 007H, 033H, 00EH, 03FH, 01CH, 00FH, 0F8H, 003H, 0F0H DB 0FFH, 000H, 0FFH, 000H, 003H, 0FEH, 003H, 0FFH, 00FH, 003H, 03FH, 003H, 033H, 003H, 003H, 00FH;"光",3 DB 000H, 000H, 03FH, 0FCH, 03FH, 0FCH, 000H, 000H, 0FFH, 0FFH, 0FFH, 0FFH, 000H, 000H, 00CH, 000H DB 01EH, 0FFH, 0F8H, 0FFH, 0F0H, 0C6H, 036H, 0FEH, 036H, 0FEH, 030H, 0C6H, 030H, 0FFH, 030H, 0FFH;"临",4 2012 06 29 更新 ;2012 06 29 SH_CP EQU P2.0; DS0 EQU P2.1; ST_CP EQU P2.2; ORG 00H AJMP MAIN ORG 30H MAIN: MOV P1,#00H MOV R0,#8 MOV R4,#50 ; 每屏反复显示50次 MOV DPTR,#TAB MOV R3,#80 ;含空格字符共80列 MAIN1: MOV A,R2 MOVC A,@A+DPTR ACALL WB INC R2 MOV A,R2 MOVC A,@A+DPTR ACALL WB JB F0,MAIN2 INC R2 MOV P1,R1 SETB P1.6 ;U2使能 SETB ST_CP CLR ST_CP INC R1 CJNE R1,#8,MAIN1 MOV R1,#0 SETB F0 AJMP MAIN1 MAIN2: INC R2 MOV A,R1 RL A RL A RL A MOV P1,A ;A里的数左移3 次，即R1之0~7,送P1.3~P1.5输出 SETB P1.7 ;U3使能 SETB ST_CP CLR ST_CP INC R1 CJNE R1,#8,MAIN1 MOV R1,#0 CLR F0 CJNE R2,#32,MAIN1 MOV R2,#0 DJNZ R4,MAIN1 MOV R4,#50;50次 INC DPTR INC DPTR DJNZ R3,MAIN1 AJMP MAIN WB: CLR C RRC A MOV DS0,C SETB SH_CP CLR SH_CP DJNZ R0,WB MOV R0,#8 RET TAB: ;黑体逐列顺向阴码 DB 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H DB 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H;"　",0 DB 000H, 000H, 030H, 004H, 036H, 00EH, 037H, 03CH, 031H, 0F0H, 03FH, 0E0H, 03EH, 03AH, 000H, 013H DB 00EH, 007H, 0FFH, 00EH, 0F8H, 01CH, 01BH, 0F8H, 01BH, 0F0H, 018H, 01CH, 01EH, 00EH, 01EH, 007H;"欢",1 DB 000H, 000H, 003H, 002H, 073H, 007H, 073H, 0FEH, 003H, 0FCH, 000H, 006H, 03FH, 0F3H, 03FH, 0F3H DB 060H, 033H, 060H, 063H, 000H, 003H, 07FH, 0FFH, 07FH, 0FFH, 060H, 063H, 07FH, 0E3H, 07FH, 0E3H;"迎",2 DB 000H, 000H, 003H, 002H, 003H, 003H, 003H, 007H, 033H, 00EH, 03FH, 01CH, 00FH, 0F8H, 003H, 0F0H DB 0FFH, 000H, 0FFH, 000H, 003H, 0FEH, 003H, 0FFH, 00FH, 003H, 03FH, 003H, 033H, 003H, 003H, 00FH;"光",3 DB 000H, 000H, 03FH, 0FCH, 03FH, 0FCH, 000H, 000H, 0FFH, 0FFH, 0FFH, 0FFH, 000H, 000H, 00CH, 000H DB 01EH, 0FFH, 0F8H, 0FFH, 0F0H, 0C6H, 036H, 0FEH, 036H, 0FEH, 030H, 0C6H, 030H, 0FFH, 030H, 0FFH;"临",4 END 2012 07 10 更新仍用汇编所用的上图 //16x16 2个138，2个595 控制LED点阵流动显示欢迎光临 //2012 07 10 E:\DPJ_C\点阵DIY\4X8X8\16X16_138595\16X16_138595.c #include<reg51.h> #include<intrins.h> #define uchar unsigned char #define uint unsigned int bit flag; sbit SH_CP=P2^0; sbit DS=P2^1; sbit ST_CP=P2^2; sbit U2E1=P1^6; sbit U3E1=P1^7; uchar code tab[ ]= { 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,/*" ",0*/ 0x00,0x00,0x30,0x04,0x36,0x0E,0x37,0x3C,0x31,0xF0,0x3F,0xE0,0x3E,0x3A,0x00,0x13, 0x0E,0x07,0xFF,0x0E,0xF8,0x1C,0x1B,0xF8,0x1B,0xF0,0x18,0x1C,0x1E,0x0E,0x1E,0x07,/*"欢",1*/ 0x00,0x00,0x03,0x02,0x73,0x07,0x73,0xFE,0x03,0xFC,0x00,0x06,0x3F,0xF3,0x3F,0xF3, 0x60,0x33,0x60,0x63,0x00,0x03,0x7F,0xFF,0x7F,0xFF,0x60,0x63,0x7F,0xE3,0x7F,0xE3,/*"迎",2*/ 0x00,0x00,0x03,0x02,0x03,0x03,0x03,0x07,0x33,0x0E,0x3F,0x1C,0x0F,0xF8,0x03,0xF0, 0xFF,0x00,0xFF,0x00,0x03,0xFE,0x03,0xFF,0x0F,0x03,0x3F,0x03,0x33,0x03,0x03,0x0F,/*"光",3*/ 0x00,0x00,0x3F,0xFC,0x3F,0xFC,0x00,0x00,0xFF,0xFF,0xFF,0xFF,0x00,0x00,0x0C,0x00, 0x1E,0xFF,0xF8,0xFF,0xF0,0xC6,0x36,0xFE,0x36,0xFE,0x30,0xC6,0x30,0xFF,0x30,0xFF,/*"临",4*/ 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,/*" ",5*/ }; //顺向、逐列、阴码黑体字宽16 字高17 MATRIX-8X8-GREEN 左旋90度左右翻转 // MATRIX-8X8-RED 右旋90度上下翻转 void delay_ms(unsigned int ms) { uchar j; while(ms--) for(j=0;j<123;j++); } void WriteByte(uchar dat) { uchar k; for(k=0;k<8;k++) { dat=dat>>1; DS=CY; SH_CP=0; SH_CP=1; } } void main() { uchar num,temp,n,m,k; while(1) { P1=0; for(k=0;k<5;k++) //含空格，5个字符。 for(n=0;n<16;n++) //每字16行 for(m=0;m<4;m++) //重复显示4次 { for(num=n;num<16+n;num++) { WriteByte(tab[2*num+(k*32)+0]); WriteByte(tab[2*num+(k*32)+1]); ST_CP=0; ST_CP=1; if(flag==0) { P1=temp; U2E1=1; delay_ms(1); P1=0; //关显示，消隐 temp++; } else { P1=_crol_(temp,3); U3E1=1; delay_ms(1); P1=0; //关显示，消隐 temp++; } delay_ms(1); if(temp==8) { flag=!flag; temp=0; } } } } } 关于增加流动显示字数的补充 2012 10 31 更新例子中为5 字符左流动，按程序中MOV R3,#80 ;R3存放的是总列数，亦即显示的总屏数。如果R3初为0则最大值256，可以显示16个字符。但可再设一个R5，就可 16X16＝256个数了。比如上例中，显示“ 欢迎光临”，如果再加上0~9及A~Z共41个字符，可以这样： ...... MAIN: MOV R0,#8 MOV R4,#50; MOV DPTR,#TAB MOV R3,#16 ;16列 MOV R5,#41 ;41个字符 MAIN1: ..... INC DPTR INC DPTR DJNZ R5,MAIN1；这里加一条 MOV R5,#41 DJNZ R3,MAIN1 ;共显示16X41屏 AJMP MAIN; WB: ...... 同理，可再嵌套循环，显示的字数可以更多，只要单片机的ROM足够

博客介绍

正文

16X16点阵流动显示 154和2个595驱动（51汇编）06 29 更新 22013-12-20 20:57:00

评论