|
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 |
22-05-2013, 04:34 PM | #1 |
Đệ tử 1 túi
Tham gia ngày: Apr 2012
Bài gửi: 16
: |
help truyền chuỗi ký tự từ pc xuống pic 16f877a
CODE PIC 16F877A
#include <main.h> //===================khai bao thu vien ct=================================// #include <lcd_rs232.c> //===========================khai bao dia chi cong===========================// #byte porta = 0x05 #byte portb = 0x06 #byte portc = 0x07 #byte portd = 0x08 #byte porte = 0x09 //===========================khai bao bien=============================// char str[5]; char s; int16 gt,i; //===========================ham ngat nhan==============================// #int_RDA void RDA_isr(void) { gets(str); } //============================chuong trinh chinh==========================// void main() { set_tris_a(0); set_tris_b(0xff); set_tris_c(0xc0); set_tris_d(0xe0); set_tris_e(0); enable_interrupts(INT_RDA); enable_interrupts(GLOBAL); lcd_init(); while(true) { lcd_putcmd(0x80); printf( lcd_putchar,"KT: %s",str); } } //================================================== =========== CODE VB6 Private Sub cmd4_Click() If (comm.PortOpen = False) Then MsgBox " Hay mo cong truoc khi chay chuong trinh ", vbOKOnly, " Thong Bao" Else comm.Output = txt1.Text End If End Sub moi nguoi ai biết giúp minh với ! trong doạn chuong trình này mình gửi một chuỗi ký tự từ vb xuống ,nhưng dưới con pic thì ko nhận được dữ liệu . Sau mỗi lần reset pic và để nguyên vb vẫn chay thì nhận được dữ liệu và hiển thị lên được lcd (NHƯNG MỘT LẦN TRUYỀN PHẢI RESET PIC 1 LẦN ) , nếu truyền một ký tự thì vẫn ok . AI BIẾT GIÚP MÌNH VỚI |
|
|