|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
8x8Led之protues仿真调试通过
( [* c2 q( A9 z: ?
w5 f1 n! v- Z. s5 o F9 O0 b- x. k3 O9 Y3 j
- h A4 u- u- p% `$ K
' ?% K# W0 M0 d9 o( s3 e. ^和数码管相似,每显示一行数据后要进行消隐处理。* m. I9 k$ `+ T9 O9 a
+ U4 ?, m% v1 r. o. b& t. d g6 k! t6 w6 ^" p
( O: U- V* t" X: u
ORG 0000H 2 T1 y" J! {, B$ k, ?3 J; e
LJMP main% x' t; H; C# Z7 R3 h% Y" j
( ]) w4 H( J& S* |. X, u
ORG 0080H 6 l/ { N% X, p; {
main:
6 k5 X/ _1 @9 }( n5 \2 S1 OMOV R1,#00H
+ u7 U8 m- `( c8 O) aMOV R2,#08H
' ?) Q0 D' Z6 o9 b. \, p! A3 JMOV R7,#0feH
2 i3 b* Y2 G9 \* r/ V" G \LABEL:8 W, h1 s' O( h; S
MOV DPTR,#TABA
$ o* h& |9 g' D9 W1 s, C K MOV A,R17 V: f" i! D/ m
MOVC A,@A+DPTR% t$ s/ ~& ]* t* f% f- N. ^+ x
MOV P0,A
5 c9 I3 w3 u/ l# g/ h nop
8 s' {. c6 z: Y* Y" c4 ]" F MOV A,R7( j4 Y% X7 ~4 G
MOV P2,A) ]- G; o3 S0 y) T) Y4 C3 U
RL A8 k6 R/ g- ^5 k5 y8 C
MOV R7,A1 K5 ~ V; L f% E( `9 w( y" n
nop( X* ^9 O3 J2 }
INC R1
9 P0 r8 W, q( u- K% Y8 ]% b- z Mov P0,#00h% g' W% |, f4 M6 f1 r" o0 `
DJNZ R2,LABEL * n3 \/ [" f& q- \( F
Lcall DL 4 r9 Z( D, @; Z
JMP main! O1 l/ \8 d Z
DL: MOV R4,#02H" ]: O" s: k5 |" R
DL1:MOV R3,#01FH- j; e, B( m: k" ?0 \
DL2: DJNZ R3,DL2
0 B, z; s1 f! l }) W DJNZ R4,DL1
3 f* p- J6 A6 i! Qret + ]2 H- r# F) I- y) D; q6 g3 v. A9 ~
TABA: DB 00H,08H,08H,038H,08H,08H,0FFH,00H4 a$ x3 \3 `, g" ^3 {
END
$ t- W7 N4 d+ ^4 M7 P Q) P7 A
* A/ B7 o/ M% o$ l |
|