|
Tài trợ cho PIC Vietnam |
Giao tiếp cổng COM và LPT RS232, RS485 và LPT là những giao tiếp cơ bản và kinh điển khi mới học về vi điều khiển... |
|
Ðiều Chỉnh | Xếp Bài |
11-06-2008, 05:18 PM | #1 |
Đệ tử 1 túi
Tham gia ngày: Jul 2007
Bài gửi: 22
: |
Điều khiển con trỏ dịch chuyển trên màn hình LCD dùng Visual Basic
Mình mới viết 1 chg trình dùng để điều khiển con trỏ dịch chuyển : lên, xuống, trái, phải trên màn mình LCD, để điều khiển nó, mình viết VB truyền dữ liệu xuống 16f877a để ra lệnh điều khiển và test lại bằng Serial in out Monitor của CCS, sau đây là code CCS và code VB ,mong các bạn tham khảo và góp ý:
Code:
#include <16f877a.h> #include <def_877a.h> #use delay(clock=20000000) #fuses HS, NOPUT, NOWDT, NOBROWNOUT, NOLVP, NOPROTECT #use rs232(baud=9600,xmit=PIN_C6,rcv=PIN_C7,stream=GPS) #include <flex_lcd_1.c> //#include <lcd1.c> #include <stdlib.h> #include <string.h> int32 dulieu; int i=1; int j=1; char kytu; #INT_RDA void nhandulieu() { dulieu=getc(); if(dulieu=='l') { i--; lcd_gotoxy(i,j); } else if(dulieu=='r') { i++; lcd_gotoxy(i,j); } else if(dulieu=='u') { j=1; lcd_gotoxy(i,j); } else if(dulieu=='d') { j=2; lcd_gotoxy(i,j); } else if(dulieu=='`') { lcd_putc('\n'); } else { lcd_putc(dulieu); } } void main(void) { set_tris_c(128); enable_interrupts(GLOBAL); enable_interrupts(INT_RDA); lcd_init(); delay_ms(10); lcd_gotoxy(1,1); while(true) { //lcd_send_byte(0,0x0A); lcd_send_byte(0,0x0E); //bat hien thi, nhap nhay con tro. } } thay đổi nội dung bởi: ngohaibac, 11-06-2008 lúc 07:00 PM. Lý do: Bỏ code trong thẻ code |
|
|