Hiển thị các dòng chữ lần lượt trên LED ma trận

by **pdkdthn** Sun Apr 25, 2010 7:51 pm

;CHUONG TRINH DIEU KHIEN HIEN THI DONG CHU DICH CHUYEN LAN LUOT

;TREN LED MA TRAN

$MOD51

ORG 00H

MAIN:

MOV DPTR,#CODEDISP

M1:

MOV R0,#20

M2: LCALL SCANMATRIX

DJNZ R0,M2

INC DPTR

MOV A,DPL

CJNE A,LOW(CODEDISP+64),M1

LJMP MAIN

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

SCANMATRIX:

PUSH ACC

PUSH 00H

PUSH 01H

MOV R0,#00H

MOV R1,#01H

SCAN:

MOV A,R0

MOVC A,@A+DPTR

MOV P2,A

MOV P1,R1

LCALL DELAYLED

MOV P1,#00H

INC R0

MOV A,R1

RL A

MOV R1,A

CJNE R0,#8H,SCAN

POP 01H

POP 00H

POP ACC

RET

;*************CHUONG TRINH DELAY LED********************

DELAYLED:

PUSH 00H

PUSH 01H

MOV R1,#5

LOOP:

MOV R0,#250

DJNZ R0,$

DJNZ R0,LOOP

POP 01H

POP 00H

RET

;************************CSDL***************************

CODEDISP:

DB 0FFH,0FFH,080H,0F7H,0EBH,0DDH,0BEH,0FFH ;K

DB 0FFH,0FFH,080H,0F7H,0F7H,0F7H,080H,0FFH ;H

DB 0FFH,0FEH,0E0H,0DBH,0BBH,0DBH,0E0H,0FFH ;A

DB 0FFH,0FFH,0C1H,0BEH,0BEH,0BEH,0DDH,0FFH ;C

DB 0FFH,0FFH,080H,0F7H,0F7H,0F7H,080H,0FFH ;H

DB 0FFH,0FFH,0FFH,0BEH,080H,0BEH,0FFH,0FFH ;I

DB 0FFH,0FFH,080H,0B6H,0B6H,0B6H,0B6H,0FFH ;E

DB 0FFH,0FFH,081H,0FEH,0FEH,0FEH,081H,0FFH ;U

END