EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
51单片机16x16点阵显示汉字可左移 带仿真源程序; Q5 c+ z- \2 [/ Q. @
( s( j$ m6 ?$ U2 y0 C$ l
" O+ w8 q5 k& `2 O8 `) e51单片机 16x16点阵显示汉字左移proteus仿真原理图:5 n" p5 S* n& @) }# V& k5 C: F
9 |1 k3 t, d9 ]$ G
4 c' ]3 x* [+ @' h( c6 R, q, p% l: P) J5 @6 K% g
16x16点阵单片机左移源程序:& K2 @% z. b+ u* w
#include1 ]) B* D" b2 |7 a# W- ~
#define uchar unsigned char4 i" f8 ]7 L0 t5 t+ ]8 y6 }: ~
#define uint unsigned int9 \5 H9 z5 y1 D' `! D
uchar m,n,i,b;
X: D: u* }1 [0 T$ `8 a) X9 |sbit hang0=P0^6;
3 K- `" a# A( U- b- z: {' G$ Hsbit hang1=P0^7;
( f' U4 @% V! L$ p/ S: y$ Fuchar code lie[16]={0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f};
' ?- x2 s5 s$ t8 u+ J! D! Quchar code hang[6][32]={{0xFF,0xBF,0xFD,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x01,0x80,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0x7D,0xBF,0xFD,0xBF,0xFF,0xBF,0xFF,0xFF},/*"王",0*/
1 T5 ^5 D5 B7 |{0xBF,0x7F,0xBD,0xBF,0xBB,0xDF,0xA7,0xE7,0x3F,0xF8,0xBF,0xFF,0x80,0xFF,0xBF,0xFF,0x3F,0xC0,0xAF,0xBF,0xB7,0xBF,0xB9,0xBF,0xBF,0xBF,0xBF,0x87,0xFF,0xFF,0xFF,0xFF},/*"光",1*/
/ X, w$ ]% E9 ~ ?) F7 @5 R{0xEF,0xFD,0xF3,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xBD,0xDA,0x7D,0x19,0x80,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xDB,0xFD,0xEB,0xFD,0xF3,0xFD,0xFF,0xFF},/*"宇",2*/
# ]; n2 g9 q9 H" O3 Z: j{0xFF,0x7E,0xFF,0xBE,0xFF,0xDE,0x80,0xE2,0xB6,0xDE,0xB6,0xBE,0xB6,0x7E,0xB6,0x00,0xB6,0x76,0xB6,0x76,0xB6,0x76,0x80,0x76,0xFF,0x76,0xFF,0x7E,0xFF,0x7E,0xFF,0xFF},/*"是",3*/9 h( C8 ^- b* l& d, p5 t6 K3 g6 P" o
{0xFF,0x7F,0xFF,0x9F,0x07,0xE0,0xF7,0xFF,0xB7,0xC1,0xB7,0xED,0xB7,0xED,0xB7,0x41,0xF7,0xBF,0x00,0xDE,0xF7,0xE9,0xF6,0xE7,0xF5,0xD9,0x37,0xBE,0xF7,0x07,0xFF,0xFF},/*"咸",4*// A4 _/ q2 c) K4 y: Q4 n& D7 Q
{0xBF,0xBF,0xDF,0xBF,0x0F,0xB0,0xD7,0xB6,0xDB,0xB6,0xD8,0xB6,0xDB,0xB6,0x1B,0xB0,0xDB,0xB6,0xCB,0xB6,0xD3,0xB6,0xDF,0xB6,0x1F,0xB0,0xFF,0xBF,0xFF,0xBF,0xFF,0xFF},/*"鱼",5*/5 D$ s0 K0 R; n4 m
};3 f: j3 f6 d$ D% ]" W8 e, W
delayms(uint tms)/ a& ]1 q+ q% G- Y
{* c* R) h/ X4 {3 S
uint x,y;1 G2 B! X! I& j1 ~
for(x=tms;x>0;x--)
: C: g, O7 ~5 N$ ^ for(y=110;y>0;y--);
- q- D) C: S& m# Q) b}
- X4 A, G3 m7 Nmain()
7 w* Z3 T+ q. m8 g3 e' u{. m- Y, {6 F8 t1 Q) Z! _- ~; o5 n1 J
while(1)
5 s, f0 P2 D, n9 i5 N3 r {, x+ t6 B. s* V! x! w. R* M
for(m=0;m<6;m++)
+ L- @# h' i/ c; z/ }& N1 c for(b=0;b<16;b++)+ l8 C( O% X' K5 f: H% F
for(n=0;n<20;n++)7 e6 T! Z8 H( X2 q- m0 a
for(i=0;i<16;i++)* V. @/ W! d& n& h! E0 v# C6 L; Y' p
{
' _1 i" n" m- H* Z/ [. k hang0=1;
. ?9 f6 Z+ E# ^& g: f P2=lie;
+ J( q3 b8 j* T, K. x+ v- m- C P1=hang[m][2*(i+b)];+ P+ l9 Y: y) C: y3 v' } A5 G7 e
hang0=0;
4 ~' U4 E4 Z7 }- K3 w0 I9 Z$ \1 {" _ P1=0xff;& `8 x: e' K+ {& u9 g0 e& \# p1 g
hang1=1;# K: ]- g# r7 P+ P# v
P2=lie;
" @4 F9 r7 }3 j4 {; @9 g& p$ S5 Z W P1=hang[m][2*(i+b)+1];
9 U- R7 d6 j9 F" w7 g hang1=0;
8 K" Q0 ?, t3 O; e$ b& h delayms(1);
( h4 E! J4 l- Z) k! P P1=0xff;0 K* k: @3 P8 r: T6 ]' v- @( _
# Y. O2 }+ Z7 m
…………限于本文篇幅 余下代码请从论坛下载附件…………2 s1 S0 h9 [# e5 z0 h
' F% `: k- ^. `+ k6 n' H, C9 q
: P; r2 E) W& Q5 ^ |