EDA365欢迎您登录！
您需要 登录 才可以下载或查看，没有帐号？注册
x
51单片机16x16点阵显示汉字可左移 带仿真源程序+ L! ^8 \: a* s: H( {
6 Q, i4 t+ z* x) N) k3 A& }
0 m; `# Y* ~2 U5 q, S4 d
51单片机 16x16点阵显示汉字左移proteus仿真原理图：
1 E% I6 r# s- D3 ~9 m' @) ]![]() - G) M. y3 d T! x' H, j
* K0 c, w' d" u+ `0 i/ ^8 r0 j+ u$ H
16x16点阵单片机左移源程序：) y" O3 a' ]! a) L) D/ [
#include1 c O; t$ q T3 q a g; R
#define uchar unsigned char& z! X) m: S2 {- e' m/ z& L, F3 {
#define uint unsigned int/ Y6 m4 s* Q3 {3 d0 f+ O
uchar m,n,i,b;
" y- F& A4 e1 h& u; Hsbit hang0=P0^6;3 A/ H) z- [: \6 f7 s+ q
sbit hang1=P0^7;5 _. M2 z3 [" S0 s3 }) x
uchar code lie[16]={0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f};
! K( P4 ^) \2 ]+ Yuchar 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*/! J# y0 @; Z8 o) c
{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*/$ Y0 ]' M/ ]8 I- A) D
{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*/
9 y$ u. v$ U$ i5 Z) q; \{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*/
' l/ f i0 A& ~; P7 j{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*/2 h9 \' M1 J8 x* o
{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*/# ^; [6 Y5 u# L% a
};
8 Q. J9 e0 G0 J( Q1 }% P$ V- Hdelayms(uint tms)
+ D7 u" S/ U9 d* n4 M% r{
- k( O2 @+ j9 s) d uint x,y;' i; _; B$ `/ K, i e
for(x=tms;x>0;x--). G& f& w2 r4 k- `5 T# [0 l2 l
for(y=110;y>0;y--);
) B$ i( |# K! B3 } q w! S, M" U* q}
% X6 x O8 y+ S+ e* Mmain()7 W& O2 c" P: e7 L8 }: I4 O
{
5 k* n: p9 q3 X% U while(1)( H+ f: g3 }5 Z$ g
{
]( | c1 c5 Y5 E9 U0 ~2 x) e$ | for(m=0;m<6;m++)# U9 G7 f3 A& f7 m. n
for(b=0;b<16;b++) }- u) e/ X1 d u: G& H3 W e
for(n=0;n<20;n++)! @) ~2 P! Y$ `9 s; r d9 l
for(i=0;i<16;i++)3 y9 i1 ]+ x4 G4 S& ?9 ~8 g* `
{
x! U/ h/ R, Q% O9 ~( i. R hang0=1;+ ?" b$ g. ~8 }8 ~) t
P2=lie;
! V7 G, Y. ]* s0 a P1=hang[m][2*(i+b)];1 C$ Z2 [. L4 r( L6 W- O
hang0=0;
! E v4 @3 _. q5 @4 q f D P1=0xff;; F% x/ o* U; h* r/ g
hang1=1;; q3 x# q8 f3 g% N# p4 x
P2=lie;
4 }/ x- t. W# N P1=hang[m][2*(i+b)+1];
( \, Q/ v1 x- j hang1=0;' C8 V( O4 D8 d7 j$ _
delayms(1);8 c/ S9 g# G! G- L- \' p& q& @
P1=0xff;
; A4 P0 O+ i6 N0 m1 @. F
* Y) ?5 [( d9 P" i" M' G…………限于本文篇幅 余下代码请从论坛下载附件…………4 S* a- J% t% V, L4 @
1 V/ J: ^- E% b
# S& W/ z! [6 M% N1 z |
/1 
发表于 2018-11-30 13:58
收藏
淘帖
支持！
反对！