EDA365欢迎您登录！
您需要 登录 才可以下载或查看，没有帐号？注册
x
初级单片机流水灯程序1 {( p; ^1 X; n/ w, Y6 o4 H3 Q
5 k4 L3 z2 F: p
6 q. _- b% ?) K. b1 ^* l![]() ----- 主程序开始 -----. i' y6 V2 b1 T6 O- z/ u j
START: CLR P1.0  1.0输出低电平,使LED1点亮
T! H: p+ `' p( A ACALL DELAY ;调用延时子程序
; u3 I3 E. I% d2 D* {; b* A' y+ u SETB P1.0 1.0输出高电平,使LED1熄灭6 A7 W. E/ u7 S a8 B' u
CLR P1.1 1.1输出低电平,使LED2点亮
7 ~" N- _0 h2 o ACALL DELAY ;调用延时子程序3 N( p6 ^9 F! k/ n
SETB P1.1 ;P1.1输出高电平,使LED2熄灭
# N8 |- w4 }6 L7 `1 i2 T" Y: V CLR P1.2 ;P1.2输出低电平,使LED3点亮
; m. O8 _ O3 |4 ~3 Q* B; J( W! Y ACALL DELAY ;调用延时子程序
, G( z& M' w' B1 p SETB P1.2 ;P1.2输出高电平,使LED3熄灭& D6 _! D: g: J t0 \: i! s1 I
CLR P1.3 ;P1.3输出低电平,使LED4点亮: n* Q2 s: B# w5 ~: C
ACALL DELAY ;调用延时子程序
6 a7 T3 d, d1 a+ Y* F! i4 r SETB P1.3 ;P1.3输出高电平,使LED4熄灭2 Y) ~; D: T# q/ ~7 m
CLR P1.4 ;P1.4输出低电平,使LED5点亮
5 ^2 J* M9 X1 q* T6 V, g/ H ACALL DELAY ;调用延时子程序
5 j0 G& r7 R5 W SETB P1.4 ;P1.4输出高电平,使LED5熄灭
* \5 P; i/ y+ V' X* I2 {$ L CLR P1.5 ;P1.5输出低电平,使LED6点亮$ S7 A% m1 d9 H( Z3 F! R
ACALL DELAY ;调用延时子程序1 Z% J* d) y9 X; J& G, [
SETB P1.5 ;P1.5输出高电平,使LED6熄灭$ w& I+ ^" o, U4 D& h
CLR P1.6 ;P1.6输出低电平,使LED7点亮
4 l P5 B& ?/ l2 L! N ACALL DELAY ;调用延时子程序 j% M2 w9 o& |5 ~1 ^
SETB P1.6 ;P1.6输出高电平,使LED7熄灭: _3 E4 z* o7 \% m7 ?
CLR P1.7 ;P1.7输出低电平,使LED8点亮; _0 W3 ?8 M- N8 Z0 h/ w
ACALL DELAY ;调用延时子程序
. N, D/ b! C2 m SETB P1.7 ;P1.7输出高电平,使LED8熄灭
& ?9 S9 Y+ r( ]4 `4 m1 o ACALL DELAY ;调用延时子程序" m$ K; \* X+ t8 j
AJMP START ;8个LED流了一遍后返回到标号START处再循环 ;----- 延时子程序 -----
* w, e! ]" u% U) i. JDELAY: MOV R0,#255 ;延时一段时间% _% p! l, i% H
D1: MOV R1,#255( Z% P; Z& d; K) o: l) L/ t
DJNZ R1,$2 r) q7 p' M5 j4 b
DJNZ R0,D1
7 A% x# [, ]/ C+ T$ v RET ;子程序返回 END ;程序结束
; F0 |2 g* M/ w% a$ y9 `2 k% y2 o ?, W* E: i
|
/1 
发表于 2019-3-4 06:00
收藏
淘帖
支持！
反对！