Lập trình cho ma trận LED 8x8 2 m￠u xanh đỏ

Em đang gặp khó khăn trong trong vấn đề nay, nhờ các cao thủ chỉ giáo... Em đang làm một hiển thị chữ trên ma trận LED 8x8, và dưới đây là chương trình khiển thi chữ BK50 từ phải qua trai, nhưng vấn đề đặt ra là cần phải có một nút điều chỉnh và viết lại chương trình với yêu cầu mới. Bấm vào nút thì chữ BK sẽ chạy theo hướng khác (VD: tù trên xuống dưới, từ dưới lên trê, cuốn ngang màn hình, nói chung thẻ hiện tất cả các trạng thái của một cái biển quảng cáo.)

Lập trình cho ma trận LED 8x8 2 màu xanh đỏ

Em đang gặp khó khăn trong trong vấn đề nay, nhờ các cao thủ chỉ giáo

Em đang làm một hiển thị chữ trên ma trận LED 8x8, và dưới đây là chương trình khiển thi

chữ BK50 từ phải qua trai, nhưng vấn đề đặt ra là cần phải có một nút điều chỉnh và viết lại

chương trình với yêu cầu mới Bấm vào nút thì chữ BK sẽ chạy theo hướng khác (VD: tù

trên xuống dưới, từ dưới lên trê, cuốn ngang màn hình, nói chung thẻ hiện tất cả các trạng thái của

một cái biển quảng cáo.)

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

; Chuong trinh hien thi chu BK bang led 2 mau xanh do

; p3 dieu khien quet, p2 dieu khien cot xanh, p1 dieu khien cot do

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

ORG 00H

MAIN: MOV R3,#00H ;Bat dau chuong trinh voi dia chi 00h

MOV R2,#01H ;chuoi bit quet

MOV DPTR,#MANG ;Lay dia chi bat dau doc bo nho la tu bang

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

CHUB: MOV R5,#50 ;Hien thi chu D 50 lan

DD1: MOV R3,#00H ;Bien dem so cot cua mot ki tu

DDD1: MOV A,R3 ;Xoa thanh ghi da nang

MOVC A,@A+DPTR ;Lay gia tri tai vi tri con tro

MOV 90h,A ;p1 = A

MOV 0b0h,R2 ;p3 = r2

ACALL DELAY1 ;Tre 250x5 chu ky may

MOV 0b0h,#00H ;p3 = 00 xoa quet

ACALL DELAY2 ;Tre 4 chu ky may

MOV A,R2

INC R3 ;Tang bien dem ky tu

RL A ;Quay chuoi quet

MOV R2,A

CJNE R3,#08H,DDD1 ;neu r3 = 8 thi thoi

DJNZ R5,DD1 ;r5 = 0 thi thoi

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

CHUK: MOV R5,#50 ;Bat dau bien dem lap la 50

xx1: MOV R3,#08H ;Bien dem ky tu bat dau la 8

xxx1: MOV A,R3 ;Xao thanh ghi da nang A

MOVC A,@A+DPTR ;Lay gia tri cua ngan nho vao A

MOV 0a0h,A ;p2 = a

MOV 0b0h,R2 ;p3 = r2

ACALL DELAY1 ;Goi tre 250X5 chu ky may

MOV 0b0h,#00H ;Xao cong quet

ACALL DELAY2 ;Goi tre 4 chu ky may

MOV A,R2

INC R3 ;Tang bien dem ky tu

RL A ;Quay tin hieu quet

MOV R2,A

CJNE R3,#16,xxx1 ;neu r3 = 16 thi thoi

DJNZ R5,xx1 ;neu r5 = 0 thi thoi

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

CHU5: MOV R5,#50 ;So luong lan lap la 50

DD2: MOV R3,#16 ;Bien dem ky tu bat dau la 16

DDD2: MOV A,R3 ;Xao A

MOVC A,@A+DPTR

MOV 090h,A ;p1 = a

MOV 0b0h,R2 ;p3 = r2

ACALL DELAY1

MOV 0b0h,#00H ;Xoa xung quet

ACALL DELAY2

MOV A,R2

INC R3

RL A

MOV R2,A

CJNE R3,#24,DDD2 ;Neu bien dem r3 = 24 thi thoi

DJNZ R5,DD2

RET

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

CHU0: MOV R5,#50 ;Bat dau bien dem lap la 50

xx2: MOV R3,#24H ;Bien dem ky tu bat dau la 8

xxx2: MOV A,R3 ;Xao thanh ghi da nang A

MOVC A,@A+DPTR ;Lay gia tri cua ngan nho vao A

MOV 0a0h,A ;p2 = a

MOV 0b0h,R2 ;p3 = r2

ACALL DELAY1 ;Goi tre 250X5 chu ky may

MOV 0b0h,#00H ;Xao cong quet

ACALL DELAY2 ;Goi tre 4 chu ky may

MOV A,R2

INC R3 ;Tang bien dem ky tu

RL A ;Quay tin hieu quet

MOV R2,A

CJNE R3,#32,xxx2 ;neu r3 = 32 thi thoi

DJNZ R5,xx2 ;neu r5 = 0 thi thoi

SJMP main

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

DELAY1: MOV R6,#5

LAP1: MOV R7,#250

DJNZ R7,$

DJNZ R6,LAP1

RET

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

DELAY2: MOV R7,#4

DJNZ R7,$

RET

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

org 0800h

MANG: DB 0ffh,41h,91h,0aah,44h,00h,00h,00h

DB 0ffh,10h,28h,44h,00h,00h,00h,00h

DB 0efh,91h,91h,1eh,00h,00h,00h,00h

DB 3ch,42h,81h,81h,42h,3ch,00h,00h

END

Em định post sơ đồ nguyên lý lên cho các bác tham khảo, đóng góp ý khiến

:Rất mong đựoc chỉ giáo

-

nguyenly2.jpg (85145 bytes) (Số lần tải về: 1416) (Đây là sơ đồ nguyên lí của nó )

Re: Lập trình cho ma trận LED 8x8 2 màu xanh đỏ

chao cac ban day la chuong trinh toi lam roi, no chay ngon, moi toi cai hình khong duoc dep

$mod51

ORG 00H

MAIN: MOV R3,#00H

MOV R2,#10000000B

CHUBK: MOV DPTR,#BK

LCALL CHU1

JNB P0.4,CHU05

SJMP CHUBK

CHU05: LCALL DELAY1

MOV DPTR,#S50

LCALL CHU1

JNB P0.4,HINHT

SJMP CHU05

HINHT: MOV DPTR,#HINH

LCALL CHU1

JNB P0.4,CHUBK

SJMP HINHT

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

CHU1: MOV R5,#50

CHU11: MOV R3,#00H

CHU111: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#08H,CHU111

DJNZ R5,CHU11

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

CHU2: MOV R5,#50

CHU21: MOV R3,#02H

CHU211: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#10,CHU211

DJNZ R5,CHU21

;************************************* CHU3: MOV R5,#50

CHU31: MOV R3,#03

CHU311: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#11,CHU311

DJNZ R5,CHU31

;************************************* CHU4: MOV R5,#50

CHU41: MOV R3,#04

CHU411: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#12,CHU411

DJNZ R5,CHU41

;************************************* CHU5: MOV R5,#50

CHU51: MOV R3,#05

CHU511: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#13,CHU511

DJNZ R5,CHU51

;************************************* CHU6: MOV R5,#50

CHU61: MOV R3,#06

CHU611: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#14,CHU611

DJNZ R5,CHU61

;************************************* CHU7: MOV R5,#50

CHU71: MOV R3,#07

CHU711: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#15,CHU711

DJNZ R5,CHU71

;************************************* CHU8: MOV R5,#50

CHU81: MOV R3,#08

CHU811: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#16,CHU811

DJNZ R5,CHU81

;************************************* CHU9: MOV R5,#50

CHU91: MOV R3,#09

CHU911: MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#17,CHU911

DJNZ R5,CHU91

;************************************* CHU10: MOV R5,#50

CHU101: MOV R3,#10

CHU1011:MOV A,R3

MOVC A,@A+DPTR

MOV P3,A

MOV P1,R2

LCALL DELAY1

MOV P1,#00H

LCALL DELAY2

MOV A,R2

INC R3

RR A

MOV R2,A

CJNE R3,#18,CHU1011

DJNZ R5,CHU101

RET

;*********************************** DELAY1: MOV R6,#5

LAP1: MOV R7,#255

DJNZ R7,$

DJNZ R6,LAP1

RET

;*********************************** DELAY2: MOV R7,#4

DJNZ R7,$

RET

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

BK: DB

00H,0BEH,7EH,6DH,93H,0FFH,0FFH,0FFH,00H,0EFH,0D7H,0BBH,7DH,0FFH,0FFH,0FFH,0FFH,0FFH S50: DB

0C3H,0BDH,7EH,7EH,0BDH,0C3H,0FFH,0FFH,0FFH,0FFH,1EH,6EH,6EH,0F1H,0FFH,0FFH,0FFH,0FF

H

HINH: DB

0F3H,0E1H,0C1H,83H,0C1H,0E1H,0F3H,0FFH,0FFH,0F3H,0E1H,0C1H,83H,0C1H,0E1H,0F3H,0FFH,0 FFH

END