Thông báo

Collapse
No announcement yet.

Chế độ 4 bit của LCD

Collapse
X
 
  • Lọc
  • Giờ
  • Show
Clear All
new posts

  • Chế độ 4 bit của LCD

    Em đang viết code cho LCD ở chế độ 4 bit , nhưng em không thể ép con trỏ về đầu dòng 2 được, dù em đã khai báo chế độ 4 bit .Các anh chị giúp em với

  • #2
    Bạn dùng VDK gì vậy? Và viết chương trình bằng ngôn ngữ gì?
    Mua bán thiết bị điện công nghiệp tại Hà Nội, toàn quốc.
    http://diencongnghiep360.com/
    http://tudienhathe.vn/

    Comment


    • #3
      Mình dùng chíp AT89S52 và viết bằng assembly

      Comment


      • #4
        4 bit LCD

        Bạn có thể đưa code lên cho mọi người check thử? Đây là code của mình để bạn tham khảo nhé
        Code:
         ;In this whole 4-bit tutorial LCD is connected to
        ;my controller in following way...
        ;D4 - P3.0
        ;D5 - P3.1
        ;D6 - P3.2
        ;D7 - P3.3
        ;EN - P3.7
        ;RS - P3.5
        ;RW gnd
        
                lcd_port equ P3         ;LCD connected to Port3
                en equ P3.7             ;Enable connected to P3.7
                rs equ P3.5             ;Register select to P3.5
               
        lcd_reset:                  ;LCD reset sequence
                mov lcd_port, #0FFH
                mov delay,#20           ;20mS delay
                acall delayms
                mov lcd_port, #83H      ;Data = 30H, EN = 1, First Init
                mov lcd_port, #03H      ;Data = 30H, EN = 0
                mov delay,#15           ;Delay 15mS
                acall delayms
                mov lcd_port, #83H      ;Second Init, Data = 30H, EN = 1
                mov lcd_port, #03H      ;Data = 30H, EN = 0
                mov delay,#5            ;Delay 5mS
                acall delayms
                mov lcd_port, #83H      ;Third Init
                mov lcd_port, #03H
                mov delay,#5            ;Delay 5mS
                acall delayms
                mov lcd_port, #82H      ;Select Data width (20H for 4bit)
                mov lcd_port, #02H      ;Data = 20H, EN = 0
                mov delay,#5            ;Delay 5mS
                acall delayms
                ret
        
        lcd_init:
                acall lcd_reset         ;Call LCD Reset sequence
                mov a,#28H              ;4-bit, 2 line, 5x7 dots
                acall lcd_cmd           ;Call LCD command
                mov a,#0CH              ;Display ON cursor OFF
                acall lcd_cmd           ;Call LCD command
                mov a,#06H              ;Set entry mode (Auto increment)
                acall lcd_cmd           ;Call LCD command
                mov a,#80H              ;Bring cursor to line 1
                acall lcd_cmd           ;Call LCD command
                ret
        lcd_cmd:                  ;LCD command Routine
                mov temp,a            ;Save a copy of command to temp
                swap a                ;Swap to use higher nibble
                anl a,#0FH            ;Mask the first four bits
                add a,#80H            ;Enable = 1, RS = 0
                mov lcd_port,a        ;Move it to lcd port
                anl a,#0FH            ;Enable = 0, RS = 0
                mov lcd_port,a        ;Move to lcd port
        
                mov a,temp            ;Reload the command from temp
                anl a,#0FH            ;Mask first four bits
                add a,#80H            ;Enable = 1
                mov lcd_port,a        ;Move to port
                anl a,#0FH            ;Enable = 0
                mov lcd_port,a        ;Move to lcd port
        
                mov delay,#1          ;delay 1 ms
                acall delayms
                ret
        
        lcd_dat:                  ;LCD data Routine
                mov temp,a            ;Keep copy of data in temp
                swap a                ;We need higher nibble
                anl a,#0FH            ;Mask first four bits
                add a,#0A0H           ;Enable = 1, RS = 1
                mov lcd_port,a        ;Move to lcd port
                nop
                clr en                ;Enable = 0
        
                mov a,temp            ;Reload the data from temp
                anl a,#0FH            ;we need lower nibble now
                add a,#0A0H           ;Enable = 1, RS = 1
                mov lcd_port,a        ;Move to lcd port
                nop
                clr en                ;Enable = 0
        
                mov delay,#1          ;Delay 1mS
                acall delayms
                ret

        Comment


        • #5
          cảm ơn bạn, mình làm được rồi

          Comment

          Về tác giả

          Collapse

          vanquangtk Tìm hiểu thêm về vanquangtk

          Bài viết mới nhất

          Collapse

          • Ng.Phuong.5
            Khi in lỗ khoan ra pdf ở Orcad 9.2
            bởi Ng.Phuong.5
            Khi in mạch ra pdf và bấm chọn Keep Drill Holes Open, in ra thì pdf trắng đen các lỗ chân linh kiện như nhau.
            Không biết có ai sửa được vấn đề này không ạ? Hay đây là mặc định của orcad 9.2 rồi ạ ?
            Các cách em xem trên diễn đàn thử rồi nhưng không được ạ...
            hôm nay, 19:47
          • Ng.Phuong.5
            Khi in lỗ khoan ra pdf ở Orcad 9.2
            bởi Ng.Phuong.5
            Vấn đề cũ: khi in mạch ra pdf và bấm chọn Keep Drill Holes Open, in ra thì pdf trắng đen các lỗ chân linh kiện như nhau. Mặc dù có linh kiện phần Drill là 1mm, có linh kiện thì là 3mm. Cho em hỏi cách sửa phần này ở Orcad 9.2 với ạ.
            Không biết...
            hôm nay, 19:45
          • Ng.Phuong.5
            Vấn đề in lỗ khoan ra pdf ở Orcad 9.2
            bởi Ng.Phuong.5
            Vấn đề cũ: khi in mạch ra pdf và bấm chọn Keep Drill Holes Open, in ra thì pdf trắng đen các lỗ chân linh kiện như nhau. Mặc dù có linh kiện phần Drill là 1mm, có linh kiện thì là 3mm. Cho em hỏi cách sửa phần này ở Orcad 9.2 với ạ.
            Không biết...
            hôm nay, 19:45
          • Ng.Phuong.5
            Vấn đề in lỗ khoan ra pdf ở Orcad 9.2
            bởi Ng.Phuong.5
            Vấn đề cũ: khi in mạch ra pdf và bấm chọn Keep Drill Holes Open, in ra thì pdf trắng đen các lỗ chân linh kiện như nhau. Mặc dù có linh kiện phần Drill là 1mm, có linh kiện thì là 3mm. Cho em hỏi cách sửa phần này ở Orcad 9.2 với ạ.
            Mấy con...
            hôm nay, 19:44
          • viettinh
            Trả lời cho Cần tư vấn cải thiện chất âm thanh loa SoNy.
            bởi viettinh
            Bác nói đúng quá. Cơ mà muốn mua hàng chính hãng, hàng thương hiệu mà tai lại hợp hàng tầu mới khổ chứ.
            Đang tính mua cái loa tầu nữa cột đằng sau loa này, Loa sony chỉ để hát nhép thôi, có dc k các bác ...
            hôm nay, 18:12
          • nguyendinhvan
            Trả lời cho Cần tư vấn cải thiện chất âm thanh loa SoNy.
            bởi nguyendinhvan
            Theo tôi thì khi hpj sản xuất ra cái loa đó, đã có nhiều chuyên gia kỹ thuật hiệu chỉnh, tính toán các phần tử kỹ lưỡng rồi.
            Bây giờ tính toán hiệu chỉnh lại cần có đội ngũ tương đương với nhà sản xuất.
            Cách đơn giản...
            hôm nay, 00:04
          • Ng.Phuong.5
            Vấn đề in lỗ khoan ra pdf ở Orcad 9.2
            bởi Ng.Phuong.5
            Vấn đề cũ: khi in mạch ra pdf và bấm chọn Keep Drill Holes Open, in ra thì pdf trắng đen các lỗ chân linh kiện như nhau. Mặc dù có linh kiện phần Drill là 1mm, có linh kiện thì là 3mm. Cho em hỏi cách sửa phần này ở Orcad 9.2 với ạ.
            Mấy con...
            Hôm qua, 22:44
          • mèomướp
            Trả lời cho Sửa bộ nguồn DC 60V 45A
            bởi mèomướp
            Dạ cháu có ý tốt muốn động viên chú ấy ngâm cứu khoa học thôi ạ. Về phần kiểm tra dao động thì chú ấy chưa biết thì sẽ tìm hiểu được là cần những gì ạ, chắc chắn là khi hướng dẫn phần ấy các cô chú nào đó sẽ lưu ý cần loại sò công suất ra tránh cháy nổ rồi ạ....
            Hôm qua, 19:02
          • tuyennhan
            Trả lời cho Sửa bộ nguồn DC 60V 45A
            bởi tuyennhan
            Chủ thớt hỏi có kiểm tra được dao động mà không cấp nguồn thì rõ trình ở mức nào mà mèo còn xúi ngâm cứu nữa ác vậy ....
            Hôm qua, 15:43
          • tuyennhan
            Trả lời cho Cần tư vấn cải thiện chất âm thanh loa SoNy.
            bởi tuyennhan
            Loa bass đấu trực tiếp không qua phân tần để thành loa toàn dải xem có thoát tiếng khộng , nếu không thoát cần phải sửa lại mạch cs hay âm sắc nếu đủ trình còn nếu thoát ca hay nhưng chưa vừa ý vì bass kém chăc thì đấu lại như cũ và đấu thêm loa mid treble bên ngoài .
            Hôm qua, 15:28
          Đang tải...
          X