Giáo trình Đo lường và điều khiển bằng máy tính phần 1 gồm các nội dung chính sau: Khái niệm chung; Cảm biến và chuyển đổi; Giao tiếp qua cổng song song; Giao tiếp qua cổng nối tiếp. Mời các bạn cùng tham khảo!
ỦY BAN NHÂN DÂN TỈNH AN GIANG TRƯỜNG CAO ĐẲNG NGHỀ AN GIANG GIÁO TRÌNH MƠN HỌC/MƠ ĐUN: ĐO LƯỜNG VÀ ĐIỀU KHIỂN BẰNG MÁY TÍNH NGÀNH/ NGHỀ : CN KTĐK VÀ TĐH TRÌNH ĐỘ : Cao đẳng (Ban hành theo Quyết định số:630/QĐ-CĐN, ngày 05 tháng 04 năm 2022 Hiệu trưởng trường Cao đẳng nghề An Giang) An Giang, Năm ban hành: 2022 Đo lường điều khiển máy tính TUYÊN BỐ BẢN QUYỀN Tài liệu thuộc loại sách giáo trình nên nguồn thơng tin phép dùng ngun trích dùng cho mục đích đào tạo tham khảo Mọi mục đích khác mang tính lệch lạc sử dụng với mục đích kinh doanh thiếu lành mạnh bị nghiêm cấm Nguyễn Trường Sanh Đo lường điều khiển máy tính LỜI MỞ ĐẦU Mơn học Đo lường điều khiển máy tính môn học chuyên ngành dùng giảng dạy cho sinh viên năm cuối ngành Điện tử tự động Môn học đề cập đến vấn đề ứng dụng máy tính (Máy tính cá nhân PC, máy tính cơng nghiệp PLC) vào hệ thống điều khiển đo lường Xu hướng phát triển dùng Điều khiển dựa vào máy tính (PC-based Control) với hệ điều hành mạnh, giao diện thân thiện, phần mềm dễ phát triển giá thành hợp lí Để học tốt mơn học sinh viên cần phải học qua môn Lý thuyết điều khiển tự động Vi xử lí Giáo trình soạn dựa theo chương trình chi tiết mơn học Đo lường điều khiển máy tính ngành cơng nghệ kỹ thuật điều khiển tự động hóa, số mơn học 75 (30 lý thuyết, 45 thực hành) Với mục tiêu trên, nội dung môn học chia thành chương sau: Chương 1: Khái niệm chung Chương 2: Cảm biến chuyển đổi Chương : Giao tiếp qua cổng song song Chương 4: Giao tiếp qua cổng nối tiếp Chương 5: Giao tiếp qua cổng USB Chương 6: Thiết kế hệ thống nhúng giao tiếp máy tính Chương 7: Lâp trình giao tiếp điều khiển PC Các học xếp theo trình tự phù hợp với nhận thức phát triển nhận thức người học nghề Tuy nhiên để đạt hiệu cao đọc giáo trình này, người học cần nắm vững kiến thức môn học sở khác như: kỹ thuật điện, linh kiện điện tử, mạch số, điện tử công suất, kỹ thuật vi điều khiển Cho dù kiến thức giáo trình xếp cách hợp lý có mối quan hệ chặt chẽ người học cần tham khảo thêm giáo trình có liên quan để việc học có hiệu Mặc dù cố gắng q trình biên soạn chắn khơng tránh khỏi thiếu sót, kính mong đồng nghiệp học viên góp ý giáo trình ngày hồn thiện Giáo trình phục vụ cho mục đích giảng dạy, lưu hành nội ! An Giang, ngày 20 tháng 05 năm 2021 Tác giả biên soạn Nguyễn Trường Sanh Nguyễn Trường Sanh Đo lường điều khiển máy tính Mục Lục Mục Lục CHƯƠNG TRÌNH MƠN HỌC CHƯƠNG KHÁI NIỆM CHUNG 12 I Máy tính điều khiển 12 Cấu trúc tổng quát hệ thống điều khiển trình 12 Hệ điều khiển nhúng 13 II HMI (Human Machine Interface) 14 III Kỹ thuật số (Digital techique) 15 IV Điều khiển phân cấp tích hợp hệ thống 17 Cấu trúc hệ thống điều khiển máy tính 17 Hệ thống điều khiển vịng hở (Hệ thống khơng hồi tiếp) 20 Hệ thống điều khiển vịng kín 20 Hệ thống điều khiển số: 20 CHƯƠNG CẢM BIẾN VÀ CHUYỂN ĐỔI 22 I Nguyên lý mạch đo chuyển đổi 22 II Các loại cảm biến thông dụng 22 Cảm biến nhiệt độ 22 1/ Nhiệt điện trở Platin 24 2/ Nhiệt kế điện trở silic 25 3/IC Cảm biến nhiệt 25 4/Nhiệt điện trở NTC 26 5/ Nhiệt điện trở PTC 26 Cảm biến công nghiệp 28 1/ Cảm biến tiệm cận (Proximity Sensor) 28 2/ Cảm biến tiệm cận điện dung (Capacitive Proximity Sensor) 30 3/ Cảm biến tiệm cận siêu âm (Ultrasonic proximity sensor) 30 4/ Encoder 31 CHƯƠNG GIAO TIẾP QUA CỔNG SONG SONG (LPT) 32 I Giới thiệu chung 32 Giao tiếp với thiết bị ngoại vi 33 Giao tiếp thiết bị khác 34 Cổng song song SSP 35 Cổng song song EPP 36 Cổng song song ECP 36 II Ghép nối máy tính 37 CHƯƠNG GIAO TIẾP QUA CỔNG NỐI TIẾP 49 I Cơ ghép nối chuẩn giao tiếp cổng Com RS232 49 RS232: 49 1/ Đặc điểm RS232 49 2/ Chức chân RS232 50 RS422 51 1/ Thông số kỹ thuật chuẩn RS422 52 Nguyễn Trường Sanh Đo lường điều khiển máy tính 2/ Thơng số kỹ thuật chuẩn RS422A 52 3/ Ưu nhược điểm RS422 52 4/ Ứng dụng RS422 52 II Bộ chuyễn đổi mức 53 Các mức điện áp đường truyền 53 Quá trình truyền liệu 53 Tốc độ Baud 53 III Mạch giao tiếp cổng com 54 Sơ đồ chuyển đổi tín hiệu TTL thành RS485 54 Dây chuyển đổi USB sang RS485 55 Cáp điều khiển RS485 – Grove 55 Bộ chuyển đổi tín hiệu RS485 sang USB 56 Bộ chuyển đổi tín hiệu RS485 sang Ethernet 56 IV Mạng RS485 56 Thông số kỹ thuật chuẩn RS485A 57 Truyền dẫn cân 57 Mức tín hiệu 57 Cặp dây xoắn 57 Trở kháng đặc tính cặp dây xoắn 57 Điện áp kiểu chung 57 Vấn đề nối đất 58 Điện trở đầu cuối 58 Phân cực đường truyền 58 V MOSBUS RTU 59 Nguyên lý hoạt động RS485 59 Sơ đồ chân RS485 dây 60 Ưu điểm RS485 60 Nhược điểm RS485 61 Sự khác RS485 RS232 61 Số lượng trình điều khiển nút 61 Khoảng cách giao tiếp 61 Ứng dụng RS485 công nghiệp 61 VI Thực hành giao tiếp qua cổng nối tiếp 62 Sơ đồ giao tiếp RS485 hai Arduino 62 Chương trình 62 CHƯƠNG 5: GIAO TIẾP QUA CỔNG USB 64 I Cấu trúc cổng USB 64 II Các mạch tích hợp chuyển đổi 65 USB sang RS232 65 USB sang RS422 65 USB sang RS485 66 Sự khác biệt RS232, RS422, RS485 67 III Các mạch ứng dụng 67 Nguyễn Trường Sanh Đo lường điều khiển máy tính USB đến cổng nối tiếp RS232 68 USB đến 3-dây cổng nối tiếp RS232 68 Bộ điều hợp hồng ngoại USB 68 CHƯƠNG THIẾT KẾ HỆ THỐNG NHÚNG GIAO TIẾP MÁY TÍNH 70 I Giới thiệu chung 70 Bo Nhúng 70 Sơ đồ ứng dụng hệ thống nhúng 70 Sơ đồ khối hệ thống nhúng điều hòa: 71 Đặc điểm hệ thống nhúng 72 Ứng dụng tầm quan trọng hệ thống nhúng 72 II Hệ thống thu thập, đo đạc số liệu từ cảm biến 72 Tổng quan hệ thống đo lường điều khiển 72 Ví dụ hệ thống đo lường nhiệt độ 73 Hệ thiết bị đo lường 74 Khảo sát số sơ đồ khối hệ thống đo tự động: 75 1/ Sơ đồ khối điều khiển máy điều hịa khơng khí 75 2/ Hệ thống giám sát vận hành 76 3/ Mơ hình ứng dụng IoT nơng nghiệp cơng nghệ cao 77 Thu thập liệu Thu thập liệu 77 1/ Thu thập liệu Thu thập liệu giao tiếp máy tính 77 2/ Chức hệ thu thập liệu 78 Hệ thống thu thập liệu nhiều kênh 78 1/ Hệ thống liệu kênh 78 2/ Hệ thống liệu nhiều kênh 79 Thực Hành: 79 III Hệ thống điều khiển thiết bị ngoại vi 79 Tạo cổng ảo trao đổi RS-232 79 Sử dụng file * DLL phần mềm windows 80 Thực Hành: 80 CHƯƠNG 7: LẬP TRÌNH GIAO TIẾP VỚI VI ĐIỀU KHIỂN TRÊN PC 81 I Giới thiệu Visual Basic 81 Giới thiệu Visual Basic 6.0 81 Cài đặt Visual Basic 6.0 81 1/ Tìm hiểu thành phần IDE 82 2/ Biểu mẫu (Form) 82 3/ Lập Trình Cấu Trúc Trong Visual Basic 83 4/ Lệnh lựa chọn Select Case 83 II Lập trình giao tiếp cổng COM 85 Ngơn ngữ lập Trình 85 Các chức 85 Chương trình 85 Nguyễn Trường Sanh Đo lường điều khiển máy tính Thực Hành 87 III Lập trình giao tiếp cổng song song 87 Sơ đồ giao tiếp cổng song song 87 IC 89c051 giao tiếp &4HC299 88 Ghép nối máy tính 89 IV Lập trình điều khiển thiết bị dùng chuẩn Modbus 90 MODBUS RTU có chủ, PLC, PC, DCS 247 thiết bị tớ kết nối cấu hình multi-drop 90 Nguyên tắc hoạt động MODBUS RTU 91 Sơ đồ kết nối chuẩn MODBUS 92 V Lập trình điều khiển thiết bị dùng chuẩn Ethernet 93 Hệ thống điều khiển 93 Mạng truyền thông công nghiệp 94 Giao thức truyền thông 94 Mạng truyền thông Ethernet 95 Các bước thiết lập điều khiển 96 SCADA (Supervisory Control And Data Acquisition) 98 1/ Sơ đồ khối hệ thống 99 2/ Sơ đồ cấu trúc hệ thống điều khiển thiết bị hệ thống trạm trộn điều khiển PLC 99 3/ Cấu trúc PLC CP1E-N30DR-A 100 4/ Biến tần 3G3JX 101 5/ Ethernet Option Board CP1W-CIF41 101 6/ Cảm biến mức 101 7/ Cảm biến quang 101 8/ Giao tiếp truyền thông (Communications) 101 9/Giao tiếp truyền thông PLC Omron 101 Thực hành viết chương trình điều khiển ứng dụng 101 Nguyễn Trường Sanh Đo lường điều khiển máy tính CHƯƠNG TRÌNH MƠN HỌC Tên Mơn học: ĐO LƯỜNG VÀ ĐIỀU KHIỂN BẰNG MÁY TÍNH Mã số môn học: MH26 Thời gian môn học: 75h (Lý thuyết: 30h; Thực hành: 36h; kiểm tra: 9h) I VỊ TRÍ, TÍNH CHẤT CỦA MƠN HỌC: Trước học Mơn học cần hồn thành Mơn học sở, đặc biệt môn học: Cảm biến chuyển II MỤC TIÊU MÔN HỌC : Kiến thức: Module nhằm trang bị cho người học kiến thức sau: - Hiểu đặc điểm cách sử dụng chuẩn giao tiếp máy tính - Phương pháp thiết kế hệ thống nhúng có khả thu thập số liệu từ cảm biến, điều khiển thiết bị ngoại vi giao tiếp với máy tính thơng qua cổng giao tiếp - Cung cấp kiến thức lập trình điều khiển Windows với Visual Basic - Lập trình truyền thơng theo chuẩn Modbus, Ethernet Kỹ năng: - Module giúp người học có hội rèn luyện phát triển kỹ sau: - Kỹ phân tích, lựa chọn cổng kết nối máy tính - Kỹ thiết kế hệ thống nhúng giao tiếp với máy tính - Kỹ lập trình giao tiếp điều khiển Windows - Có khả làm việc nhóm, phân tích, đánh giá, lựa chọn giải pháp phù hợp để giải vấn đề thực tế - Có khả tổng hợp, tìm kiếm thông tin, lập kế hoạch, báo cáo công việc, thuyết trình kết thực Về lực tự chủ trách nhiệm: - Sinh viên cần có thái độ tích cực tham gia vào hoạt động lớp, chủ động chuẩn bị làm tập nhà - Có tinh thần trách nhiệm làm việc nhóm, hịa nhã, tích cực cơng việc giao Nguyễn Trường Sanh Đo lường điều khiển máy tính III NỘI DUNG MƠN HỌC Nội dung tổng quát phân bố thời gian : Số TT Tên Môn học Chương 1: Khái niệm chung Chương 2: Cảm biến chuyển đổi Chương : Giao tiếp qua cổng song song Chương 4: Giao tiếp qua cổng nối tiếp Chương 5: Giao tiếp qua cổng USB Chương 6: Thiết kế hệ thống nhúng giao tiếp máy tính Chương 7: Lâp trình giao tiếp điều khiển PC Cộng: Tổng số Thời gian Lý Thực thuyết hành Kiểm tra* 8 4 4 20 12 27 12 12 75 30 36 *Ghi chú: Thời gian kiểm tra tích hợp lý thuyết với thực hành tính vào thực hành Nội dung chi tiết: Nội dung chi tiết: Chương 1: Khái niệm chung Mục tiêu bài: - Phát biểu khái niệm máy tính điều khiển Nội dung bài: Thời gian: 1.0h (LT: 1.0h; TH: 0.0h) Máy tính điều khiển Thời gian:0.5h Điều khiển phân cấp tích hợp hệ thống Thời gian:0.5h Chương 2: Cảm biến chuyển đổi Mục tiêu bài: - Xác định nhiệm vụ chức cảm biến; - Trình bày nguyên lý hoạt số cảm biến công nghiệp; - Nhận biết sử dụng số cảm biến công nghiệp Nội dung bài: Thời gian: 3.0h (LT: 3.0h; TH: 0.0h) Nguyên lý mạch đo chuyển đổi Thời gian:1.0h Giới thiệu loại cảm biến thông dụng Thời gian:1.0h Cảm biến công nghiệp Thời gian:1.0h Chương 3: Giao tiếp qua cổng song song (LPT) Mục tiêu bài: - Trình bày nhiệm vụ chức cổng LPT; Nguyễn Trường Sanh Đo lường điều khiển máy tính - Trình bày phương thức truyền liệu qua cổng LPT; - Thực việc truyền liệu qua cổng LPT Nội dung bài: Thời gian: 8.0h (LT: 2h; TH: 4.0h; KT: 2.0h) Giới thiệu chung Thời gian: 0.5h Cổng song song SSP Thời gian:0 5h Cổng song song EPP Thời gian: 0.5h Cổng song song ECP Thời gian: 0.5h Ghép nối máy tính Thời gian: 4h Kiểm tra Thời gian: 2.0h Chương 4: Giao tiếp qua cổng nối tiếp (RS232) Mục tiêu bài: - Trình bày nhiệm vụ chức cổng RS232; - Trình bày phương thức truyền liệu qua cổng RS232; - Thực việc truyền liệu qua cổng RS232 Nội dung bài: Thời gian: 8h (LT: 4.0h; TH: 4.0h) Cấu trúc cổng COM Thời gian: 1.0h Mạch chuyển mức Thời gian: 1.0h Mạch giao tiếp cổng COM Thời gian: 1.0h Mạng RS485 Thời gian: 1.0h Thực hành giao tiếp qua cổng nối tiếp Thời gian: 4.0h Chương 5: Giao tiếp qua cổng USB Mục tiêu bài: - Trình bày nhiệm vụ chức cổng USB; - Trình bày phương thức truyền liệu qua cổng USB; - Thực việc truyền liệu qua cổng USB Nội dung bài: Thời gian: 8.0h (LT: 4.0h; TH: 4.0h) Cấu trúc cổng USB Thời gian: 2.0h Các mạch tích hợp chuyển đổi Thời gian: 2.0h Các ứng dụng Thời gian: 4.0h Chương 6: Thiết kế hệ thống nhúng giao tiếp máy tính Mục tiêu bài: - Trình bày cấu trúc hệ thống nhúng; - Biết thành phần hệ thống nhúng bản; - Thực kết nối hệ thống nhúng Nội dung bài: Thời gian: 20h (LT: 4.0h; TH: 12.0h;KT: 4.0h) Giới thiệu chung Thời gian: 2.0h Hệ thống thu thập, đo đạc số liệu từ cảm biến Thời gian: 6.0h Hệ thống điều khiển thiết bị ngoại vi Thời gian: 8.0h Kiểm tra Thời gian: 4.0h Chương 7: Lập trình giao tiếp với vi điều khiển PC Mục tiêu bài: - Trình bày cấu trúc Visual Basic lập trình giao tiếp; - Viết giao diện cho lập trình vi điều khiển PC; - Thực kết nối hệ thống vi điều khiển với PC Nguyễn Trường Sanh 10 Đo lường điều khiển máy tính Sơ đồ chân kết nối mơ tả sau: Giao tiếp thiết bị khác Quá trình giao tiếp với thiết bị ngoại vi thực thông qua chế độ chuẩn Để đọc liệu, dùng IC ghép kênh 2→1 74LS257 dùng bit trạng thái cổng song song xuất liệu sử dụng đường liệu D0 - D7 Hình 28 Giao tiêp qua cổng máy in Nguyễn Trường Sanh 34 Đo lường điều khiển máy tính Cổng song song SSP Hình 29 Cổng SPP Hình 29 Sơ đồ bắt tay Nguyễn Trường Sanh 35 Đo lường điều khiển máy tính - Cổng song song EPP Là sản phẩm Intel, Xircom Có chuẩn EPP1.7 EPP1.9 Vận tốc truyền 500kbytes/s, Mbytes/s Có chu kỳ truyền: Chu kỳ ghi liệu Chu kỳ đọc liệu Chu kỳ ghi địa Chu kỳ đọc địa Các giao diện song song chế độ EPP Chế độ EPP cần nhiều ghi bổ sung thêm ghi (địa lệch từ đến 7) Địa cổng tính cách cộng địa lệch (offset) với địa sở cổng song song 378h Các ghi chế độ EPP: - Khi ghi lên cổng 378h-37Ah nhận phản ứng giao diện song song chuẩn SPP - Chu kỳ đọc ghi địa tiến hành ghi đọc cổng 37Bh - Khi ghi liệu cổng 37Ch phần cứng tự động quản lý tín hiệu bắt tay chu kỳ ghi - Tốc độ truyền: 500KB đến 2MB/1giây Cổng song song ECP - Được phát triển Hewlett Packard Microsoft vận tốc truyền nhanh Chế độ ECP thiết kế nhằm cải thiện trình truyền liệu máy chủ máy in Chế độ ECP cho phép hai chu kỳ truyền liệu theo hai hướng: - Chu kỳ liệu - Chu kỳ lệnh Nguyễn Trường Sanh 36 Đo lường điều khiển máy tính Chu kỳ lệnh chia thành hai loại: Đếm chiều dài chạy-RLE (run-length count) Kênh địa (channel address) - Tốc độ truyền: 2MB/giây Ưu điểm cổng song song: Tốc độ truyền nhanh khả xuất bit liệu lúc Khuyết điểm: Không truyền xa 8m Do tượng lệch tín hiệu chập chờn tín hiệu Hiện tượng lêch tín hiệu tượng tín hiệu khơng đến đầu nhận lúc gửi lúc đầu phát Cáp dài khoảng thời gian thời điểm tín hiệu tín hiệu cuối đến đầu nhận lớn (độ lệch lớn) Sự chập chờn tín hiệu xu hướng tín hiệu dao động quanh điện áp định mức khoảng thời gian ngắn Ơ tốc độ cao, tín hiệu song song có khuynh hướng gây nhiễu lẫn đường tín hiệu liền kề II Ghép nối máy tính Ghép mát tính song song để truyền số liệu thơng qua tiện ích Direct Cable Connection Windows, hay Norton Commander Ghép song song dùng cáp nối đầu đực DB25 Ghép nối tiếp dùng đầu DB9 DB25 - Nguyễn Trường Sanh 37 Đo lường điều khiển máy tính Truyền song song nhanh gấp đến 10 lần truyền nối tiếp Ứng dụng Mạch đèn GIAO THƠNG Hình 30 Mạch đèn nháy Nguyễn Trường Sanh 38 Đo lường điều khiển máy tính Thực hành: Sinh viên viết chương trình Bài tập phát triển tảng VB Chương trình giao tiếp VB sử dụng thư viện liên kết động để trao đổi liệu với cổng máy in Thư viện IO.DLL bao gồm hàm sau: - Hàm PortOut: xuất byte cổng Private Declare Sub PortOut Lib "IO.DLL" (ByVal Port As Integer, ByVal Data As Byte) Port: địa cổng, Data: liệu xuất - Hàm PortWordOut: xuất word cổng Private Declare Sub PortWordOut Lib "IO.DLL" (ByVal Nguyễn Trường Sanh 39 Đo lường điều khiển máy tính Port As Integer, ByVal Data As Integer) - Hàm PortDWordOut: xuất double word cổng Private Declare Sub PortDWordOut Lib "IO.DLL" (ByVal Port As Integer, ByVal Data As Long) - Hàm PortIn: nhập byte từ cổng, trả giá trị nhập Private Declare Function PortIn Lib "IO.DLL" (ByVal Port As Integer) As Byte - Hàm PortWordIn: nhập word từ cổng Private Declare Function PortWordIn Lib "IO.DLL" (ByVal Port As Integer) As Integer - Hàm PortDWordIn: nhập double word từ cổng Private Declare Function PortDWordIn Lib "IO.DLL" (ByVal Port As Integer) As Long Chương trình nguồn: VERSION 5.00 Begin VB.Form Form1 Caption = "Printer Interface Example" ClientHeight = 4665 ClientLeft = 60 ClientTop = 345 ClientWidth = 3585 LinkTopic = "Form1" ScaleHeight = 4665 ScaleWidth = 3585 StartUpPosition = 'Windows Default Begin VB.CommandButton cmdReceive Caption = "Receive" Height = 495 Left = 1200 TabIndex = 18 Top = 3960 Width = 1095 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 17 Top = 3480 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Nguyễn Trường Sanh 40 Đo lường điều khiển máy tính Index = Left = 1800 TabIndex = 16 Top = 3000 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 15 Top = 2520 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 14 Top = 2040 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 17 Top = 3480 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 16 Top = 3000 Width = 1575 End Begin VB.CheckBox chkSW Nguyễn Trường Sanh 41 Đo lường điều khiển máy tính Height = 375 Index = Left = 1800 TabIndex = 15 Top = 2520 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 14 Top = 2040 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 13 Top = 1560 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 12 Top = 1080 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 11 Top = 600 Width = 1575 End Begin VB.CheckBox chkSW Height = 375 Index = Left = 1800 TabIndex = 10 Nguyễn Trường Sanh 42 Đo lường điều khiển máy tính Top = 120 Width = 1575 End Begin VB.CommandButton cmdExit Caption = "Exit" Height = 495 Left = 2400 TabIndex = Top = 3960 Width = 975 End Begin VB.CommandButton cmdSend Caption = "Send" Height = 495 Left = TabIndex = Top = 3960 Width = 1095 End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED7" Height = 375 Index = Left = 240 TabIndex = Top = 3480 Width = 1095 End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED6" Height = 375 Index = Left = 240 TabIndex = Top = 3000 Width = 975 End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED5" Height = 375 Index = Nguyễn Trường Sanh 43 Đo lường điều khiển máy tính Left = 240 TabIndex = Top = 2520 Width = 975 End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED4" Height = 375 Index = Left = 240 TabIndex = Top = 2040 Width = 975 End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED3" Height = 375 Index = Left = 240 TabIndex = Top = 1560 Width = 975 End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED2" Height = 375 Index = Left = 240 TabIndex = Top = 1080 Width = 975 End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED1" Height = 375 Index = Left = 240 TabIndex = Top = 600 Width = 975 Nguyễn Trường Sanh 44 Đo lường điều khiển máy tính End Begin VB.Label lblLED BackStyle = 'Transparent Caption = "LED0" Height = 375 Index = Left = 240 TabIndex = Top = 120 Width = 975 End Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 3480 Width = 375 End Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 3000 Width = 375 End Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 2520 Width = 375 End Nguyễn Trường Sanh 45 Đo lường điều khiển máy tính Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 2040 Width = 375 End Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 1560 Width = 375 End Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 1080 Width = 375 End Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 600 Width = 375 End Nguyễn Trường Sanh 46 Đo lường điều khiển máy tính Begin VB.Shape shpLED BorderColor = &H000000FF& FillColor = &H000000FF& FillStyle = 'Solid Height = 375 Index = Left = 840 Shape = 'Circle Top = 120 Width = 375 End End Attribute VB_Name = "Form1" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False 'IO.DLL Private Declare Sub PortOut Lib "IO.DLL" (ByVal Port As Integer, ByVal Data As Byte) Private Declare Function PortIn Lib "IO.DLL"(ByVal Port As Integer) As Byte 'Variable Private BA_LPT As Integer Private Sub cmdExit_Click() End End Sub Private Sub cmdReceive_Click() Dim n As Integer Dim n1 As Integer Dim i As Integer PortOut BA_LPT + 2, &H8 'SELECTIN = PortOut BA_LPT + 2, 'SELECTIN = n1 = PortIn(BA_LPT + 1) 'Doc bit thap n1 = n1 / &H10 'Dich phai bit PortOut BA_LPT + 2, 'AUTOFEED=1 n = PortIn(BA_LPT + 1) 'Doc bit cao n = n And &HF0 n = n + n1 For i = To chkSW(i).Value = n Mod If chkSW(i).Value = Then chkSW(i).Caption="Switch " & Str(i) & "off " Else chkSW(i).Caption="Switch " & Str(i) & " on" End If n = Fix(n / 2) Next i End Sub Nguyễn Trường Sanh 47 Đo lường điều khiển máy tính Private Sub cmdSend_Click() Dim t As Integer Dim i As Integer Dim s As String t = For i = To t = t + (2 ^ i) * (1 - shpLED(i).FillStyle) Next i PortOut BA_LPT, t PortOut BA_LPT, 'STROBE = PortOut BA_LPT, 'STROBE = End Sub Private Sub Form_Load() BA_LPT = &H378 PortOut BA_LPT + 2, End Sub Private Sub lblLED_Click(Index As Integer) shpLED(Index).FillStyle=1- shpLED(Index).FillStyle End Sub Nguyễn Trường Sanh 48 ... Omron 10 1 Thực hành viết chương trình điều khiển ứng dụng 10 1 Nguyễn Trường Sanh Đo lường điều khiển máy tính CHƯƠNG TRÌNH MƠN HỌC Tên Mơn học: ĐO LƯỜNG VÀ ĐIỀU KHIỂN BẰNG MÁY TÍNH Mã số... liên lạc người - máy Các kênh truyền thông liên lạc Nguyễn Trường Sanh 12 Đo lường điều khiển máy tính người - máy tính tính (HMI) (HMI) máy tính ? ?máy tính máy tính ? ?máy tính - Các thiết bị... động nhiệt thuận nghịch hoạt động hai nguồn có nhiệt độ ? ?1 2 thang đo phụ thuộc vào ? ?1 2: Nguyễn Trường Sanh 22 Đo lường điều khiển máy tính η F(? ?1 ) F(θ ) Dạng hàm F phụ thuộc vào thang đo