|
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 |
21-09-2008, 11:32 AM | #106 |
Nhập môn đệ tử
Tham gia ngày: Apr 2008
Bài gửi: 2
: |
Chào mọi người,mình mới bắt đầu học con 8051,mình làm theo TUT của anh ngohaibac,nhưng mình ko có code và sơ đồ mạch để truyền dữ liệu từ 8051 lên PC,bác nào giúp mình với hay mail cho minh theo địa chỉ : nguythachun@gmail.com
...thanks!!! |
27-09-2008, 08:13 PM | #107 |
Nhập môn đệ tử
Tham gia ngày: Sep 2008
Bài gửi: 1
: |
cam on mấy bác, để em về đọc đã có gì thắc mắc hôm sau em sẻ hỏi mấy bác
|
29-09-2008, 11:34 AM | #108 |
Nhập môn đệ tử
Tham gia ngày: Sep 2008
Bài gửi: 1
: |
Bac Bac va cac cao thu giup em cai truyen thong PC voi p30f4011 cai
Em muốn điều khiển tốc độ động cơ DC từ PC, PIC dùng cái UART2. Các bác giúp em xem chương trình PIC sai chỗ nào mà em k thể truyền thông được.
Cám ơn các bác nhiều nhiều. |
30-09-2008, 10:39 AM | #109 |
Đệ tử 4 túi
Tham gia ngày: May 2007
Bài gửi: 69
: |
mình cũng viết 1 ít về nó nhưng chắc chưa hay lắm bạn tham khao nha .có sai ji bạn góp ý nha
|
06-12-2008, 06:05 AM | #110 |
Nhập môn đệ tử
Tham gia ngày: May 2008
Bài gửi: 1
: |
Cám ơn
E cảm ơn a Bắc rất nhiều!
|
06-01-2009, 09:00 PM | #111 |
Nhập môn đệ tử
Tham gia ngày: Jan 2009
Bài gửi: 2
: |
Mình cũng đang muốn viết một phần mềm truyền thông giữa hai máy tính:có thể gửi các byte đơn (kí tự) hoặc là file text qua cho nhau dùng VB 6.0
Mình cũng mới học VB nên chưa biết nhiều. Tìm kếm trên mạng thì được đoạn code này code:truyền kí tự Code:
Private Sub cmdClear_Click() Text1.Text = "" Text2.Text = "" End Sub Private Sub cmdExit_Click() Unload Me End Sub Private Sub cmdSend_Click() MSComm1.Output = Text2.Text End Sub Private Sub Form_Load() cmdSend.Caption = "&Send" Text1.Text = "" Text2.Text = "" Text1.Enabled = False cmdExit.Caption = "&Exit" With MSComm1 .Settings = "9600,N,8,1" .CommPort = 1 .RThreshold = 1 .SThreshold = 0 .InputMode = comInputModeText .InputLen = 0 .Handshaking = comNone .InBufferSize = 1024 .OutBufferSize = 1024 If .PortOpen = False Then .PortOpen = True End If End With End Sub code: truyền file text Private Sub Command1_Click() Cdlg.DialogTitle = "Send file..." Cdlg.Filter = "Textfile (*.TXT)|*.txt|All Files (*.*)|*.*" Cdlg.InitDir = App.Path Cdlg.FileName = "" Cdlg.ShowOpen ' The Function Call If Cdlg.FileName <> "" Then SendFile (Cdlg.FileName) End Sub Private Sub Form_Load() ' Opens the selected com port MSComm1.CommPort = 1 MSComm1.PortOpen = True End Sub ' here is the function Function SendFile(tmp$) Dim temp$ Dim hsend, bsize, LF& ' Open file Open tmp$ For Binary Access Read As #2 ' Check size on Mscomm1 OutBuffer bsize = MSComm1.OutBufferSize ' Check file length LF& = LOF(2) ' This code makes tiny pieces of data (Buffer sized) ' And send's it Do Until EOF(2) If LF& - Loc(2) <= bsize Then bsize = LF& - Loc(2) + 1 End If ' Make room for some data temp$ = Space$(bsize) ' Put the data piece in the Temp$ string Get #2, , temp$ MSComm1.Output = temp$ Do ret = DoEvents() ' Wait until the buffer is empty Loop Until MSComm1.OutBufferCount = 0 Loop ' close file Close #2 End Function Ai rành về cái này có thể viết tiếp hộ mình được ko? ah còn 1 yêu cầu nhỏ nữa là phần mềm thì phải có giao diện nữa nhỉ? có thể hướng dẫn mình cách tạo giao diện bằng tiếng việt được ko? kiểu như là một dòng ghi là: gửi file hay ki tự còn dòng dưới ghi là file hay kí tự nhận được. Cảm ơn mọi người nhiều. cảm ơn anh Bắc đã mở diễn đàn này cho đàn em học hỏi. Cảm ơn! thay đổi nội dung bởi: ngohaibac, 27-01-2009 lúc 09:37 AM. Lý do: thêm tag code |
20-01-2009, 10:06 PM | #112 |
Nhập môn đệ tử
Tham gia ngày: Jan 2009
Bài gửi: 1
: |
tui chỉ có thể giúp bạn phần truyền kí tự thui.bạn có thể tham khảo đoạn chương trình đính kèm theo đây.Có gì không hiểu tui có thể giúp bạn
|
27-01-2009, 09:39 AM | #113 | |
Đệ tử 9 túi
|
Trích:
Diễn đàn là nơi trao đổi, có rất nhiều người rất giỏi, mỗi người biết chút, góp nhặt vào sẽ là kiến thức tốt cho mình. Bạn cứ mạnh dạn thảo luận đề tài của bạn trên diễn đàn nhé. Chúc bạn thành công. |
|
26-02-2009, 10:09 AM | #114 |
Đệ tử 6 túi
Tham gia ngày: Jul 2007
Bài gửi: 154
: |
mình muốn giao tiếp PC với 2 hoặc nhiều PIC thông qua 1 cổng COM của PC. nhưng khi PC gửi xuống chỉ có 1 PIC nhận data. giốmg như chuẩn I2C ấy. PC là Master còn các PIC là Slever. Bác nào biết thì chỉ giúp mình hướng giải quyết với. thank you!
|
27-02-2009, 10:59 AM | #115 |
Nhập môn đệ tử
Tham gia ngày: Feb 2009
Bài gửi: 1
: |
chào bác Bắc, vừa qua em có thực hiện cái TUT bác viết về RS232 hướng dẫn về lập trình giao tiếp RS232 bằng VC++. (http://www.picvietnam.com/download/T...OHB.100106.pdf). Em làm theo bác chỉ mà nó báo 102 lỗi, toàn lỗi "error C2018: unknown character '0xa0' ". Bác có thể giải thích cho em lỗi này đc không? Và cách khắc phục như thế nào.
Project em tạo đây: http://www.mediafire.com/?zlmntzbeg3m . Cám ơn các bác đã đọc! |
27-02-2009, 11:37 AM | #116 |
Nhập môn đệ tử
Tham gia ngày: Feb 2009
Bài gửi: 4
: |
em dang lam ve giao tiep rs232 giua pic 16f877a voi may tinh.em khong biet lap trinh vb6.0 de truyen du lieu .bac nao biet day em voi .thank ,,,,,,,,,,,
|
27-02-2009, 11:58 AM | #117 |
Đệ tử 3 túi
Tham gia ngày: Jan 2009
Bài gửi: 52
: |
Các bạn ơi làm thế nào để viết được tiếng Việt trong CCS thế? Có phải chúng ta tạo một font rồi include font đó vào chương trình sau đó đổi lại mã ASCII mở rộng là được ko ạ?
|
14-03-2009, 05:24 PM | #118 |
Nhập môn đệ tử
Tham gia ngày: Nov 2008
Bài gửi: 4
: |
Bác Bắc ơi!Sao bác ko dịch luôn ra file.exe cho a e đc nhờ
|
15-03-2009, 12:31 AM | #119 |
Đệ tử 6 túi
Tham gia ngày: Apr 2006
Bài gửi: 125
: |
Theo mình biết thì chuẩn RS232 chỉ cho phép thực hiện liên kết điểm-điểm, nếu bạn muốn tạo liên kết đa điểm thì bạn có thể chuyển nó sang chuẩn RS485
|
15-03-2009, 03:54 PM | #120 |
Nhập môn đệ tử
Tham gia ngày: Nov 2008
Bài gửi: 4
: |
a Bắc ơi! E ko down dc nó xuống. Chương trình ko còn nữa rồi.
|
|
|
Similar Threads | ||||
Ðề tài | Người gửi | Chuyên mục | Trả lời | Bài mới |
Cho hỏi về giao tiếp RS232 của PIC16F877A | enti | Giao tiếp cổng COM và LPT | 31 | 25-03-2016 10:14 PM |
Giao tiếp RS232 trên PC qua Matlab | ngohaibac | Giao tiếp cổng COM và LPT | 47 | 18-11-2015 03:51 PM |
giao tiep RS232 voi C | dangngoc | Giao tiếp cổng COM và LPT | 9 | 26-02-2012 02:25 AM |
cần mua bộ thu GPS có giao tiếp RS232 | kienvq | Tìm mua sản phẩm | 15 | 17-03-2011 11:25 PM |
Help! Dùng C để giao tiếp RS232 | dandiennang | Các ngôn ngữ lập trình khác (CCS C, HT PIC,...) | 6 | 15-03-2009 06:41 PM |