Nhờ test giùm mạch Đo và Điều khiển nhiệt Độ qua cổng LPT

[Tanco]

Chào các bác !!
Mình thiết kế mạch này với nhiệm vụ gám sát và điều khiển nhiệt độ , giao tiếp máy tính qua cổng máy in . Các bác kiểm tra giùm mạch như vậy có khả năng chạy không ??
Còn nữa , nếu viết chương trình điều khiển bằng VB thì nên bắt đầu như thế nào ( Làm sao để cho VB có khả năng điều khiển xuất nhập dữ liệu qua cổng máy in )
Tui định viết là :
. Cho Nhiệt Độ hiển thị lên một Edit Text ( tự qua vòng lặp và hiển thị khi ta khởi động chương trình điều khiển )
( khó khăn về việc nhận lần lượt khi 4 bit, nhập lại , chuyển từ áp qua nhị phân , rồi từ chuơng trình VB phải chuyển qua thập phân để hiển thị )
. Điều khiển nhiệt độ mô tả bằng việc sáng tắt 8 Đèn LED , điều khiển qua các Check Box .....
..............
Bác nào đã làm hay là biết thì giúp mình với !!!

Thanks !!

[Tanco]

Ok , neu chan WR và INIT của ADC nối với nhau , chân RD nối GND ( Không cần mấy chân ở LPT nữa) . Như vậy giá trị nhận vào có bị sai lệch không ( vì phải lấy lần lượt giá trị từ 4 bit - đồng thời với nó . ADC chạy ở chế độ tự do nên có thể giá trị cũ , mới lẫn lộn ...... ), có bị nhảy loạn xạ lên không ?? ... Đau đầu ghê . Bác nào giúp giùm đi !!

[phamhuong_]

cổng LPT

bạn muốn xuất nhập dữ liệu qua cổng LPT thì bạn phải có thư viện dlportio chứa hàm đó và khai báo các hàm xuất ,hàm đọc
(Mình muốn gửi thư viện đó cho bạn mà không biết gửi kiểu gì bạn bảo mình nhá )

[saobanmai]

Bàn về chổ phần cứng: Đệ nghĩ nên cần một PPI 8255 để giao tiếp , nếu làm cách này vừa có thể đọc 1 lần 8 bit của ADC vừa có thể hiển thị trên LED.
Bàn về phần mềm: Phải có thư viện IO.DLL, nếu có cái này rồi thì bác không cần phải tính toán nhị phân vớ vẫn như bác đã nói, dùng một hàm đọc là đọc về luôn giá trị Integer hoặc Hex.
Nếu cần tài liệu ghép nối LPT thì mail cho tôi saobanmai_ht@yahoo.com

[Tanco]

Cái này mình đã làm được .Chỉ cần dùng thêm thư viện INPOUT32.DLL , rồi khai báo trong Module dòng lệnh :
'===============
Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
'=========
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
--------------------------------------------------------------------------

Nhận nhiệt độ được, xuất được . Chỉ tiếc là nhiệt độ nó nhảy vui lắm !

[nguyenphuc91]

bạn có bài đầy đủ ko cho mình với