Ðề tài: Lcd
View Single Post
Old 17-05-2007, 11:30 AM   #23
zero
Đệ tử 4 túi
 
Tham gia ngày: Feb 2007
Bài gửi: 87
:
Send a message via Yahoo to zero
LCD 4Bit

Hiện tôi đã có thể điều khiển được LCD ở chế độ 4BIT
Tôi sẽ hoàn thành CODE hoàn chỉnh và gửi lên sau
Nói nôm na là: thay vì Out 8Bit ra ta Out lần lượt 4Bit cao trước sau đó là 4Bit thấp
VD: để out chữ A ra ta làm như sau
Vì A=&H41
Code:
E 1
RS 1
DB &H4 '4Bit cao
E 0
Pause

E 1
RS 1
DB &H1 '4Bit thap
E 0
Pause
Với lệnh điều khiển ta cũng làm tương tự tôi lấy ví dụ về hàm khởi tạo
Code:
Function Init_LCD()
RS 0
E 1
DB &H0
E 0
Pause
E 1
DB &HF
E 0
Pause

E 1
DB &H2
E 0
Pause
E 1
DB &HC
E 0
Pause

Clrscr
End Function
Trên đây là đoạn chương trình tôi viết trên VB kết nối qua LPT
Rất mong mọi người cho ý kiến

thay đổi nội dung bởi: zero, 17-05-2007 lúc 11:34 AM. Lý do: Sửa lại cho dễ nhìn
zero vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn