|
|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
单片机8X8点阵资料包下载 含原理图 仿真 左移与静止显示...
+ w; s! i+ S/ \& z $ h6 k9 B* Z% }' d7 ^
! U+ U0 l4 @% E, h( n/ s
/ X/ q1 V9 u) Q8 L( v2 }: H3 G3 G8 C+ }5 s+ J' J* w
单片机源程序如下(左移显示):/*********************************************************************************3 ^& U/ x: i9 ~5 C0 V# _5 f" m9 i
* 【编写时间】: 2014年3月5日
& x; o! S. i. K; M, M! t3 ?* 【作 者】: 清翔电子&51hei
4 s, h1 J6 l/ B; h, O/ ]0 p0 E. ~* 【声 明】: 此程序仅用于学习与参考,引用请注明版权和作者信息!
! _3 T1 Y4 p1 J1 h, {4 U* 【函数功能】: 8*8点阵静态显示"亲"与心形符号
3 K% z3 v5 N5 q, f/ @% X* 【使用说明】: 兼容1602接口,使用时请把点阵1脚至6脚对应接到1602 1脚至6脚,5 E8 r; Y4 ]% f3 r. |* D; @, p
使用QX-MCS51开发板可以直接烧写此程序,无需修改接口。
: p$ T+ D. x* F c5 S5 V/ M, g) j1 n3 q# W/ S2 U
**********************************************************************************// n9 O, _- {) S, J& ~
#include "main.h"
; O5 i) w: M1 O9 R, x3 ?/ Y) U" s8 S
//定义变量
. L% L) V `) N0 ~4 E4 L& J+ bunsigned char temp = 0xfe;
( o/ o1 `. b% {/ q7 nunsigned char KEY_NUM = 0;# O( G. c/ z* s; s% v7 R8 t; F) i9 n
. `8 U0 v) e S! Q1 Kunsigned char Display_word[4][4] = {" O0 c9 G' ?# N/ Y* s! ~/ E4 u
0x00,0x48,0x2A,0x8E,0xFB,0x0E,0x2A,0x48, //亲
$ E9 n3 ?- d; |# @6 q; P0x0C,0x1E,0x3E,0x7C,0x7C,0x3E,0x1E,0x0C, //心
, o& c) X* j$ G) j4 q2 w8 h! b3 h};& P1 Z# N8 V& z% b; F, R* n
$ o3 }) j8 C" z$ ]
# k# K' G5 T" u0 H9 K% |- U% b% U7 V4 K0 g/ q) {' R
//****************************************************
; J, F& \. e4 w/ N* w% h//主函数& z7 r1 d5 g" p1 P C1 W
//****************************************************! h2 ?9 d. ]- X% w, l- `8 P" @
void main()
* P9 F1 M+ A+ Z/ m& G. U9 q D{5 }( b8 m' U! K' ^8 ^% r% d; j
unsigned int i;
: f/ ]' Q5 E8 n( G( A* m unsigned char j,k;
( X0 c: N5 z: N, V- I& g: q while(1)5 i' _0 S& w; }. S
{5 a# `& t }0 z$ j
for(i = 0 ; i < 1000 ; i++)9 m% D" h% d% F, O# d7 K$ P
{6 }% J9 }2 a) e ?- n& `6 f
temp = 0x7f;8 ?1 o, g( |; S- S
for(j = 0 ; j < 2 ; j++) //显示前两个字母. D" T* B# P, }1 V* y- l
{) \$ ], }, l$ C* _* K2 } m8 E
for(k = 0 ; k < 4 ; k++) //一个字母4BYTE
$ @; O5 _6 f. E6 n( g( o {
7 ~+ I8 K* I9 M; X/ a Send_Byte(temp); //列选择
# A4 t( o2 t8 t5 ] Send_Byte(Display_word[j][k]); //行数据2 _. M$ o2 f- E8 {6 ~6 h- J
LEDARRAY_LAT = 1; //锁存数据; Y( J0 R. ]1 a! X- c
_nop_();
+ O+ D, {4 n4 T6 K3 H- t/ y0 {* V1 q- _) c S
LEDARRAY_LAT = 0;. {6 ~1 d6 V# v& }3 L" [
_nop_();
$ a3 c" T! C0 U1 U# Z) z& H* L temp = (temp>>1)|0x80;
7 ~2 ]/ H0 \" A6 ~% I }
! C5 O7 v6 b& a3 s$ l }
; B# f" Y/ w, C4 x }0 w6 i# O Z5 n; q1 D
& S, T- B( F1 K1 j! D- g4 j for(i = 0 ; i < 1000 ; i++)4 x# W8 s0 M. @( `2 t) J8 I
{! R8 K5 I5 b V2 n( M* M
temp = 0x7f;
! k/ e, |6 \7 s* P for(j = 2 ; j < 4 ; j++) //显示前两个字母! I! l6 x) S$ Q9 M; L. ]: z( _& E
{* H: S4 e2 J ^! m( D# k8 o
for(k = 0 ; k < 4 ; k++) //一个字母4BYTE
2 }$ X d; g) v {9 _. W! {2 b8 S$ E) T8 c
Send_Byte(temp); //列选择
+ t6 M. |" Y& G1 T/ s' @4 G# @ Send_Byte(Display_word[j][k]); //行数据2 S4 k8 w1 ~1 Z; Y3 L5 b) w
LEDARRAY_LAT = 1; //锁存数据
! z; b4 b* V9 W1 U) I _nop_(); d: R9 c( b0 p8 A
9 v' T' I. O' a6 A
LEDARRAY_LAT = 0;
2 q! h. X6 b/ n$ g# [0 j2 m _nop_();
3 I0 i- ~0 t& N0 P temp = (temp>>1)|0x80;
% ^; M: A3 A+ ^ x" F4 C+ L }# A, z( d. {$ e! p2 v
}+ I" J6 z# [5 y4 F' f5 @4 @$ g
}$ j) s" t C; W1 n* G& U r6 K* z2 P
2 Q4 l1 S* }2 ^5 X* q# d0 f7 w
) v+ D" K# V, Y* w1 G5 b1 T- L0 M
}
* v. f o) K' V; O* g}
8 z% N( A# x. i- K6 _ }
, L( J2 L0 \7 H! ^$ W//****************************************************
% M- a% L, p1 J% B4 y# X//发送一个字节数据
3 s6 t7 ^' G8 h& L" Z6 j//****************************************************6 T% f5 i4 l" x" k
void Send_Byte( unsigned char dat)* [8 I$ u$ h1 U6 N0 z4 z5 R
{
8 n/ A$ z. a- k/ ?$ i' X2 Y* m/ R; a unsigned char i;
8 b! U# E& h0 A8 H. ?' o LEDARRAY_CLK = 0;
( X/ T5 q* n, A2 s! b+ x _nop_();
0 Q4 o2 [" m: o LEDARRAY_LAT = 0;
3 S# z# S, K0 l& L m1 z _nop_();
|2 G6 R/ |% |! S" i& q2 c# u/ S6 x- M$ a1 _$ z# d) Q
for( i = 0 ; i < 8 ; i++ )
5 n( j ]. g# J6 p7 G {' b( i' A4 e' x3 D" a% t6 B
if( dat&0x01 )$ O, J0 W& w; m( m
{8 K& p9 [9 s" E# }9 n& t+ k1 |
LEDARRAY_DI = 1; 7 \4 g6 x0 H$ S* h! N- j: X6 {
}2 Y& B/ z" X' Q3 L/ B- x3 f7 x+ V* T
……………………
* A- ~6 d5 B7 K0 R& k5 X6 Z! P8 E/ R0 x& W f
…………限于本文篇幅 余下代码请从论坛下载附件…………; @& E8 N' _: q( Z& w. {2 w# e
: M, S& N( l' M+ g) r" b t& c) v. R
+ X: R7 W3 K0 ~. x/ \9 q% C. B
|
|