• Member Login:

+ Trả Lời Ðề Tài
Hiện kết quả từ 1 tới 2 của 2
  1. #1
    VQA
    VQA đã thoát
    Moderator
    Tham gia ngày
    Jan 2011
    Bài gửi
    735
    Thanks
    Thanked 364 Times in 218 Posts

    Lập trình chữ chạy trên led ma trận

    Tùy chỉnh font chữ: Xem với cỡ chữ lớn hơn Xem với cỡ chữ nhỏ hơn


    Đây là phần mô phỏng và chương trình mình viết cho 4 led ma trận 8*8



    Code:
    ;LAPTRINH:
    ;==========mach chay chu led matran -LEVUONGDT=======
    $mod51
    org 0000h
    
    batdau:
    mov DPTR,#maled
    lap:
    mov r0,#30
    main1:
    mov r2,#24
    mov r1,#16
    mov r7,#8
    mov b ,#0
    mov r3,#7fh
    
    main2:
    mov a,r3
    rl a
    mov r3,a
    mov p1,a
    setb p3.3
    setb p3.2
    setb p3.3
    clr p3.0
    mov a,r2
    movc a,@a+DPTR
    mov p2,a
    inc r2
    acall delay
    cjne r3,#07fh,main2
    main3:
    mov a,r3
    rl a
    mov r3,a
    mov p1,a
    clr p3.1
    setb p3.0
    setb p3.2
    setb p3.3
    mov a,r1
    movc a,@a+DPTR
    mov p2,a
    inc r1
    acall delay
    cjne r3,#07fh,main3
    main4:
    mov a,r3
    rl a
    mov r3,a
    mov p1,a
    clr p3.2
    setb p3.0
    setb p3.1
    setb p3.3
    mov a,r7
    movc a,@a+DPTR
    mov p2,a
    inc r7
    acall delay
    cjne r3,#07fh,main4
    main5:
    mov a,r3
    rl a
    mov r3,a
    mov p1,a
    clr p3.3
    setb p3.2
    setb p3.0
    setb p3.1
    mov a,b
    movc a,@a+DPTR
    mov p2,a
    inc b
    acall delay
    cjne r3,#07fh,main5
    
    djnz r0,main1
    inc DPTR
    mov a,DPL
    cjne a,#192,lap
    Ljmp batdau
    delay:
    push 04
    push 05
    push 06
    mov r4,#4
    n1:
    mov r5,#4
    n2:
    mov r6,#4
    n3:
    djnz r6,n3
    djnz r5,n2
    djnz r4,n1
    pop 06
    pop 05
    pop 04
    ret
    
    delay2:
    mov r4,#4
    m1:
    mov r5,#4
    m2:
    mov r6,#4
    m3:
    djnz r6,m3
    djnz r5,m2
    djnz r4,m1
    ret
    
    
    org 800h
    
    maled:
    DB 0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H ,0H,0H,0H,0H,0H,0H,0H
    DB 1CH,14H,5DH,36H,1CH,8H,0H,7EH,4AH,42H,3CH,0H,7EH,8 H,8H,7EH,0H,40H,0H,3CH,42H,42H,24H,0H
    DB 3CH,43H,43H,3CH,0H,7EH,4H,8H,7EH,0H,3CH,42H,52H,34 H,0H,0H,7EH,4H,8H,7EH,0H,3CH,42H,42H
    DB 34H,0H,7EH,8H,8H,7EH,0H,42H,7EH,42H,0H,7EH,0CBH,4A H,0H,7EH,0AH,0AH,4H,0H,8H,8H,8H,0H
    DB 2H,2H,7EH,2H,2H,7EH,0AH,0AH,4H,40H,0H,7EH,8H,8H,7E H,0H,3CH,43H,43H,3CH,0H,3CH,42H,42H
    DB 24H,0H,7EH,4H,18H,4H,7EH,0H,42H,7EH,42H,0H,7EH,4H, 8H,7EH,0H,7EH,8H,8H,7EH,0H,0H,0H
    DB 88H,15H,88H,15H,88H,15H,88H,15H,88H,15H,88H,15H,88 H,15H,88H,15H,88H,15H,88H,15H,88H,15H,88H,5H
    DB 7EH,40H,40H,0H,7EH,4BH,4AH,0H,6H,18H,60H,18H,6H,0H ,7EH,40H,40H,7EH,1H,7EH,42H,0C3H,7EH,0H
    DB 7EH,4H,8H,7EH,0H,3CH,42H,52H,34H,0H,0H,7EH,4AH,42H ,3CH,0H,2H,2H,7EH,2H,2H,0H,0H,0H
    DB 7EH,4H,8H,7EH,0H,3CH,42H,52H,34H,0H,0H,7EH,4AH,42H ,3CH,0H,2H,2H,7EH,2H,2H,0H,0H,0H
    DB 14H,14H,36H,1CH,8H,0H,41H,7FH,41H,0H,0H,6H,9H,11H, 21H,42H,21H,11H,9H,6H,0H,0H,1H,2H
    DB 4H,0F8H,4H,2H,1H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H,0H, 0H,0H,0H,0H,0H,0H,0H,0H
    end

    Xem chủ đề mới nhất cùng loại:

    ►Chia Sẻ Cho Bạn Bè:


    Pass nếu có: diendandien.com

  2. #2
    Junior Member
    Tham gia ngày
    Aug 2010
    Bài gửi
    2
    Thanks
    Thanked 0 Times in 0 Posts

    Arrow Làm nó thế nào?



    Bác post bài mà không hướng dẫn cách làm, cần phải học bổ xung và tìm hiểu những cái gì?
    Cho mỗi anh em cái code và file mô phỏng thế thì đến bao giờ mới làm được.
    Em nói thật đối với những ông đã biết làm rồi thì chẳng thèm ngó ngàng đến cái này làm gì, còn gà như em giờ mới tìm hiểu thì lại chẳng biết phải tiêu hóa cái đống code này thế nào vì đâu có hiểu nguyên lý hoạt động hay hiện chữ ra sao.

    Bạn hãy cùng chicken_home8x xây dựng DIENDANDIEN.COM nhé

Múi giờ GMT. Hiện tại là 02:04 PM
Powered by: VBB v4.1.5 Copyright ©2000-2014, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.5.2 DIỄNĐÀNĐIỆN.COM
Xây Dựng Và Phát Triển Bởi Các Thành Viên DienDanDien.Com
+ DDD là một hệ thống mở, chúng tôi sẽ không chịu trách nhiệm về nội dung đăng tải do thành viên đưa lên
+ Truy cập và sử dụng Website này nghĩa là bạn đã chấp nhận Quy Định của Diễn Đàn
Trang chủ | Diễn đàn |