CD4511数码管显示

来源：飒榕旅游知识分享网

+5VU119XTAL1P0.0/AD0P0.1/AD1P0.2/AD2P0.3/AD3P0.4/AD4P0.5/AD5P0.6/AD6P0.7/AD7P2.0/A8P2.1/A9P2.2/A10P2.3/A11P2.4/A12P2.5/A13P2.6/A14P2.7/A15P3.0/RXDP3.1/TXDP3.2/INT0P3.3/INT1P3.4/T0P3.5/T1P3.6/WRP3.7/RD393837363534333221222324252627281011121314151617712634518XTAL29RST293031PSENALEEAU2ABCDLTBILE/STB4511QAQBQCQDQEQFQG131211109151412345678P1.0P1.1P1.2P1.3P1.4P1.5P1.6P1.7ATS51 ORG 0000H

AJMP MAIN

ORG 0030H

MAIN:MOV P3,#3

LOOP:LCALL DL

JNB P3.0,FUN1

JNB P3.1,FUN2

AJMP LOOP

FUN1:LCALL YP

LCALL SECOND

JNB P3.1,LOOP

LJMP FUN1

FUN2:LCALL YP

D3: MOV 40H,#0

MOV 41H,#0

LCALL DL

JNB P3.1,D3

LJMP LOOP

SECOND:LCALL DL

INC R0

MOV A,R0

CJNE A,#150,SECOND

MOV R0,#0

LCALL ADD1

RET

DL: MOV DPTR,#TAB

MOV A,41H

MOVC A,@A+DPTR

MOV P1,A

CLR P2.1

LCALL D10MS

CPL P2.1

MOV A,40H

MOVC A,@A+DPTR

MOV P1,A

CLR P2.0

LCALL D10MS

CPL P2.0

RET

ADD1:MOV A,40H

CJNE A,#9,GW

MOV A,41H

CJNE A,#9,SW

RET

GW:INC 40H

RET

SW:INC 41H

MOV 40H,#0

RET

YP: SETB P2.2

ACALL DEL

CLR P2.2

ACALL DEL

INC R5

CJNE R5,#200,YP

MOV R5,#00H

RET

D10MS:MOV R3,#30

D2:MOV R4,#100

DJNZ R4,$

DJNZ R3,D2

RET

DEL: MOV R5,#10

MOV R6,#10

DJNZ R6,$

DJNZ R5,$-4

RET

TAB:DB 00H,01H,02H,03H,04H,05H,06H,07H,08H,09H

END

因篇幅问题不能全部显示，请点此查看更多更全内容

查看全文