Chợ thông tin Thiết bị điện Việt Nam - Bài tập Led chạy hai bên vào ra

Bài tập Led chạy hai bên vào ra

[video=youtube_share;O3NfAR3oZLQ]http://youtu.be/O3NfAR3oZLQ[/video]

Mã:

$MOD51

ORG 00H

MAIN:

MOV R1,#00H

MOV DPTR,#DATABASE

LOOP1:

MOV A,R1

MOVC A,@A+DPTR

MOV P0,A

LCALL DELAY

INC R1

CJNE R1,#8,LOOP1

SJMP MAIN

DELAY:

PUSH 00H

MOV R0,#250

MOV TMOD,#01H

LOOP2:

MOV TH0,#HIGH(-15000)

MOV TL0,#LOW(-15000)

SETB TR0

JNB TF0,$

CLR TR0

CLR TF0

DJNZ R0,LOOP2

POP 00H

RET

DATABASE:

DB 0FFH,7EH,0BDH,0DBH,0E7H,0DBH,0BDH,7EH

END

Vào ra hai bên (có đệm đảo)

[video=youtube_share;dyYTuWXR1FA]http://youtu.be/dyYTuWXR1FA[/video]

Mã:

$MOD51

ORG 00H

MAIN:

MOV R1,#00H

MOV DPTR,#DATABASE

LOOP1:

MOV A,R1

MOVC A,@A+DPTR

MOV P0,A

LCALL DELAY

INC R1

CJNE R1,#8,LOOP1

SJMP MAIN

DELAY:

PUSH 00H

MOV R0,#100

MOV TMOD,#01H

LOOP2:

MOV TH0,#HIGH(-5000)

MOV TL0,#LOW(-5000)

SETB TR0

JNB TF0,$

CLR TR0

CLR TF0

DJNZ R0,LOOP2

POP 00H

RET

DATABASE:

DB 00H,81H,42H,024H,18H,24H,42H,81H ;CO DEM DAO

END

Thêm mạch có đệm đảo

Link Mediafire