课程设计51单片机交通灯c语言程序,51单片机控制交通灯的课程设计

原标题:51单片机控制交通灯的课程设计

51单片机控制交通灯的课设

程序如下:

ORG 00H

;************************************************************

;灯操作及数码管显示

;************************************************************

START:MOV DPTR,#TAB

MOV S CON,#00H

MOV P1,#6CH

MOV R0,#11

D1: DEC R0 ;自定义为10S

CJNE R0,#3,LP0

LCALL DBDB

MOV P1,#6CH

LCALL DISP1

D11: DEC R0

CJNE R0,#0,LP00

MOV P1,#6CH

LCALL DBDB

LCALL DISP

MOV P1,#0AAH

MOV R0,#04

D2: DEC R0

CJNE R0,#0,LP1

LCALL DBDB

LCALL DISP

MOV P1,#0C6H

MOV R0,#16 ; 自定义为15S

D3: DEC R0

CJNE R0,#3,LP2

LCALL DBDB

MOV P1,#0C6H

LCALL DISP1

D33: DEC R0

CJNE R0,#0,LP22

MOV P1,#0C6H

LCALL DBDB

LCALL DISP

MOV P1,#0AAH

MOV R0,#04

D4: DEC R0

CJNE R0,#0,LP3

LCALL DBDB

LCALL DISP

MOV P1,#6CH

MOV R0,#11

LJMP D1

LP0: LCALL DBDB

LCALL DISP

LJMP D1

LP00: LCALL DBDB

MOV P1,#6CH

LCALL DISP1

LJMP D11

LP1: LCALL DBDB

LCALL DISP

LJMP D2

LP2: LCALL DBDB

LCALL DISP

LJMP D3

LP22: LCALL DBDB

MOV P1,#0C6H

LCALL DISP1

LJMP D33

LP3: LCALL DBDB

LCALL DISP

LCALL D4

;************************************************************

;除10运算

;************************************************************

DBDB: MOV A,R0

MOV B,#10

DIV AB

MOV R1,A

MOV R2,B

RET

;************************************************************

;显示子程序

;************************************************************

DISP: MOV A,R2

MOVC A,@A+DPTR

MOV SBUF,A

JNB TI,$

CLR TI

MOV A,R1

MOVC A,@A+DPTR

MOV SBUF,A

JNB TI,$

CLR TI

LCALL DELAY

RET

DISP1: MOV A,R2

MOVC A,@A+DPTR

MOV SBUF,A

JNB TI,$

CLR TI

MOV A,R1

MOVC A,@A+DPTR

MOV SBUF,A

JNB TI,$

CLR TI

LCALL DELAY1

MOV P1,#0FFH

MOV A,#10

MOVC A,@A+DPTR

MOV SBUF,A

JNB TI,$

CLR TI

MOV SBUF,A

JNB TI,$

CLR TI

LCALL DELAY2

RET

;************************************************************

;延时子程序

;************************************************************

DELAY:MOV R3,#09H

K1: MOV R4,#100

K2: MOV R5,#250

K3: DJNZ R5,K3

DJNZ R4,K2

DJNZ R3,K1

RET

DELAY1:MOV R3,#09H

SS1: MOV R4,#80

SS2: MOV R5,#250

SS3: DJNZ R5,SS3

DJNZ R4,SS2

DJNZ R3,SS1

RET

DELAY2:MOV R3,#09H

AA1: MOV R4,#30

AA2: MOV R5,#250

AA3: DJNZ R5,AA3

DJNZ R4,AA2

DJNZ R3,AA1

RET

TAB: DB 3FH,06H,5BH

DB 4FH,66H

DB 6DH,7DH,07H

DB 7FH,6FH,00H返回搜狐,查看更多

责任编辑:

你可能感兴趣的:(课程设计51单片机交通灯c语言程序,51单片机控制交通灯的课程设计)