EDA365欢迎您登录！
您需要 登录 才可以下载或查看，没有帐号？注册
x
初级单片机流水灯程序" Y4 Z; Q; a$ U1 A
* _3 k3 T/ w" M+ O
* Q/ P1 X* U$ i" @7 f o- f7 N4 o/ c![]() ----- 主程序开始 -----5 N* ^& k7 S& a+ F5 P
START: CLR P1.0  1.0输出低电平,使LED1点亮, T2 [* _8 L* D. E( _
ACALL DELAY ;调用延时子程序! P G4 h. P+ f
SETB P1.0 1.0输出高电平,使LED1熄灭
( B: o4 X. k% o CLR P1.1 1.1输出低电平,使LED2点亮
5 M7 o& w3 ]# E: ^( U8 c ACALL DELAY ;调用延时子程序
5 F! J' Q6 R" I7 H$ X SETB P1.1 ;P1.1输出高电平,使LED2熄灭
* E9 i# R* q1 c. c. E% p& Y& h% t CLR P1.2 ;P1.2输出低电平,使LED3点亮. D- V2 d! m. j# I! X
ACALL DELAY ;调用延时子程序
4 ~6 F3 y; M+ n# ` SETB P1.2 ;P1.2输出高电平,使LED3熄灭2 p+ s- e( ]" _; l+ w+ x: s5 q
CLR P1.3 ;P1.3输出低电平,使LED4点亮* e) Q8 S3 t, w4 o: }
ACALL DELAY ;调用延时子程序! M8 P' D4 @: E2 Y. u5 w
SETB P1.3 ;P1.3输出高电平,使LED4熄灭. M& O# D: P$ w* V/ p3 ~5 q
CLR P1.4 ;P1.4输出低电平,使LED5点亮# v1 H0 d( Y- ~8 i7 Q+ y+ U0 T
ACALL DELAY ;调用延时子程序+ |$ u- d# L6 O- ]* z9 e
SETB P1.4 ;P1.4输出高电平,使LED5熄灭0 ]0 y3 g' N7 @: w5 j0 g1 c
CLR P1.5 ;P1.5输出低电平,使LED6点亮
5 e3 F3 B" t; k9 D, ^4 ` ACALL DELAY ;调用延时子程序
% `0 n) m6 s0 P4 n+ w SETB P1.5 ;P1.5输出高电平,使LED6熄灭; C7 K% X/ D& R- N/ [
CLR P1.6 ;P1.6输出低电平,使LED7点亮
+ f$ Y) v. b( l% O0 K2 ]" H2 a ACALL DELAY ;调用延时子程序
9 B1 V8 n3 A, m SETB P1.6 ;P1.6输出高电平,使LED7熄灭6 f: E! y8 Z2 w3 \
CLR P1.7 ;P1.7输出低电平,使LED8点亮
9 [3 D3 W: C& O e ACALL DELAY ;调用延时子程序
{5 c5 G& e& E3 S; l) g1 s SETB P1.7 ;P1.7输出高电平,使LED8熄灭, O, Q. ^3 r+ K& @2 |3 y- \
ACALL DELAY ;调用延时子程序! ?, A; P0 w+ \6 E! O
AJMP START ;8个LED流了一遍后返回到标号START处再循环 ;----- 延时子程序 -----
! ^, q4 Y6 `6 `4 k8 ?9 r2 s4 t' TDELAY: MOV R0,#255 ;延时一段时间
, T; T. ?% P2 C1 ]7 r6 t iD1: MOV R1,#2550 M) S! l3 K( ?4 ?5 [' H
DJNZ R1,$
+ Y/ I2 t: j% Q( Z. e* f) s$ [ DJNZ R0,D1
! H+ A6 Y8 o p# B RET ;子程序返回 END ;程序结束
: B# c* @* |3 p" X3 J2 z. q& P5 W7 k& R: _2 Z1 J
|
/1 
发表于 2019-3-4 06:00
收藏
淘帖
支持！
反对！