thí nghiệm đo lường điều khiển bằng máy tính

đk 8led đơn dùng máy tính qua cổng song songlpt 4.. đk led ma trận dùng pic giao tiếp PC qua cổng LPT 5.. ĐK tốc độ động cơ một chiều dùng pic giao tiếp com PID số 7.. tính +-*/ xuất nhậ

thí nghiệm đo lường điều khiển bằng máy tính

b1: mở đầu

b2: đk qua cổng song song

b3: đk led, lcd bằng cổng nt

b4: hệ thống đk nhiệt độ

b5: đk tốc độ động cơ DC

b6: điều khiển vị trí động cơ DC

b7: đk qua cổng usb: card 6008 và phần mềm labview

b8: Card thu thập dự liệu và đk pci-1711 và pci-6221

thi

BT ở lớp (ĐTB) 50%

thi làm mạch 50%

Đề tài

2sv/1 đề tài 2 nhóm trùng

1 đk 8led đơn dùng pic16f887/877a giao tiếp máy tính qua cổng nt (com)

2 ĐK LCD qua com

3 đk 8led đơn dùng máy tính qua cổng song song(lpt)

4 đk led ma trận dùng pic giao tiếp PC qua cổng LPT

5 ĐK nhiệt độ giao tiếp PC qua cổng COM (// on/off)

6 ĐK tốc độ động cơ một chiều dùng pic giao tiếp com (PID số)

7 đk động cơ bước dùng pic giao tiếp pc qua cổng com (pp on/off)

8 đk 8led dùng card 6008 và lập trình labview

bài 1: mở đầu

I.vb 6.0

thí dụ: viết ct hiện thị thông báo “Chao cac ban lop DHDT6A” và ngày giờ

- tạo 1 nút nhấn, khi ta nhấn vào thù ct sẽ hiện thị thông báo

bước 1:

b2: file new project>> standrad.exe

b3: kéo thả nút nhấn vào

b4:viết mã lệnh

private sub Command1_click()

msgBox “Chao cac ban lop DHDT6A” &Now

End Sub

2 kiểu dữ liệu

- số nguyên: integer

khai báo: DIM tên biến as kiểu

vd: DIM a as interger

a=5

- số nguyên dài: long 32bit

DIM b as long

b=100 000

- số thực: single hay double

DIM C as double

c=3.14

- kiểu chuỗi: String

DIM d as string

d = “Xin chao”

 d$=”Xin chao”

3 cấu trúc điều khiển

a lệnh if… then…else

ex: if a>b then max=a

bài tập từ trang 1-4 trang 21

1 nhâp 2 số nguyên a,b tính tổng hiệu tích phương td:

DIM a as integer

a= InputBox(“a=”)

xuất MsgBox

2 nhập 2 số thực a,b tính +-*/

xuất nhập dùng textbox

*hàm CDbl(biến string): đổi chuyển thành số ex:

DIM a as double

DIM b as double

DIM c as double

a= CDbl(Text1.text)

b= CDbl(Text2.text)

c=a+b

*cstr(số thực): đổi số >> chuổi

text3.text= cstr(c)

3 giải pt bậc nhất ax+b=0 (a<>0)

4 giải ptb2 ax^2+bx+c=0

trang 118

tr91, nguyễn đức thành, viết tập tin inout.dll dùng vc++

*lệnh case: >> lệnh có nhiều chọn lựa select case biến

case giá trị 1 to giá trị 2

lệnh 1

case điều kiện/ giá trị

lệnh 2

case is điều kiện

lệnh 3

case else

lệnh 4

end select

ex:

select case lương

case 1000 to 2000

heeesothue =0.1

case is > 2000

hesothue = 0.3

case else

hesothue = 0

end select

b lệnh vòng lặp:

* vòng lặp for: >> số lần lặp biết trước

cú pháp: for biến = giá trị 1 to giá trị 2

lệnh

next

ý nghĩa: thực hiện lệnh vs số lần là gtri2-gtri1 + 1, mỗi lần biến tăng lên 1 khi biến > gtri

2 thì kết thúc vòng lăp

thí dụ: tính tổng S= 1+2+…+N

với N nhặp từ bàn phím

* vòng lặp while: >> số lần lặp không biết trước

cú pháp:

do

lệnh

loop until/while điều kiện

giải thích: chương trình thực hiện ít nhất một lần Khi đk đúng thì thoát khỏi vòng lặp s=0

i=1

do

s=s+i

i=i+1

loop until i>N

4 Chương trình con

- thủ tục

- hàm

gọi thủ tục >> là một câu lệnh

gọi hàm >> 1 phép gắn

* thủ l=tục

cú pháp:

private sub tên ctc (Byval đối số, ByRef đối số,…) lệnh

end sub

giải thích: CTC bắt đầu là privete sub tên CTC :

:

end sub

Byval >> truyền theo trị

ByRef>> truyền theo tham chiếu (địa chỉ)

đối số sẽ lưu giá trị khi ra khỏi CTC

vd:

Tìm số lớn hơn trong 2 số

tạo 1 nút nhấn nhấn vô CT yêu cầu nhập 2 số a.b

và in ra số lớn hơn

*Hàm:

Private Funciton tên CTC (Byval đối số,…) as kiểu lệnh

end funciton

gt: Hàm phải trả về 1 giá trị, giá trị này phải đc gián vào chính tên hàm

BT: 5-9 trang 21,22

nâng cao 1-4 trang 22, 23

bài 5: tính tổng S= 1+2+…100

b6: viết ctrinh tính diện tích và chu vi của hình tròn

pi.r^2 / 2piR

b7: tạo giao diện đk nhiệt độ

b8: viết dòng text thực hiện thông báo

“chào mừng các bạn lớp DHDT6A”

b9: viết ct tạo giao diện tổng hợp

Nâng cao:

1 viết chương trình tạo giao diện đk 8led đơn chạy đuổi, sáng dần, tắt dần và 2 bìa vào

2 đk thang máy

3 viết ctrinh tạo giao diện đống ngắt các thiết bị trong gia đình

4 tạo giao diện đk đèn giao thông

Private Sub Command1_Click()

Shape1.BackColor = &HFF&

Call Delay(2)

Shape2.BackColor = &HFF&

Call Delay(2)

Shape3.BackColor = &HFF&

End Sub

Public Sub Delay(HowLong As Date)

TempTime = DateAdd("s", HowLong, Now) While TempTime > Now

DoEvents 'Allows windows to handle other stuff Wend

End Sub

Bài 2: Điều khiển qua cổng song song hợp ngữ 8086

xuất:

mov dx,378h

mov ax,1h

out dx,ax

nhập:

mov dx,379h

in ax,dx

mov data,ax

thí dụ: dùng ngôn ngữ C

xuất: outportb (0x378,0x1);

nhập: int x;

x=inportb(0x379);

option Explicit

dim i as integer

dim ltp as integer

private declase sub portout lib “io.dll” (byval port as integer, byval data as byte) private declase function portout lib “io.dll” (byval port as integer) as byte

private sub delay()

dim j as long

for j = 1 to 20 000 000

next

end sub

private sub command1_click()

portout &H378,&H1

delay

portout &H378,&H2

delay

:

:

:

portout &H378,&H80

delay

endsub

Thực hành

1 viết ctrinh dieu khien 8led dung cong LPT chạy đuổi, sáng dần, tắt dần, và 2 bìa vào ra

2 led matraanj dùng at89c51 qua cổng LPT

3 ledmatran dung pic qua cổng lpt

buổi 4: điều khiển led đơn, lcd qua cổng nối tiếp

1 chớp tắt led dùng portd

2 đk 8 led: đuổi, sáng dần, tắt daanfm 2 bìa vào ra

3 điều khiển lcd: hiện thị : KHOA CN DIEN TU

PHẦN2: ĐIỀU KHIỂN QUA CỔNG NỐI TIẾP <P132>

1 KIỂM TRA KẾT NỐI CỔNG COM GIỮA PC VÀ PIC : 132

2 ĐIỀU KHIỂN 8led đơn, giao tiếp máy tính

3 đk lcd dùng pic, giao tiếp máy tính qua cổng com

buổi 6,7:

1 đo nhiệt độ và hiển thị giá trị ADC lên LCD

2 Đo nhiệt độ và hiển thị máy tính => tìm hàm truyền lò nhiệt trang 184-193

3 ĐK on off

4 đk tỉ lệ Kp, PID trang 220

buổi 8:

1 khảo sát hệ hở và tìm hàm truyền động cơ DC

2 đk on off

quay thuận + nghịch + start + stop + chạy nhanh, chạy chậm

3 pid số 274 + 300

buổi 9:

1 điều khiển vị trí góc động cơ tr 336

2 đk vị trí trên thướcª

Buổi 12

Card thu thập dữ liệu và điều khiển PCI 1711/ pci 6221

Điều khiển PLC

1 Tiềm hiểu card PCI 1711 / pci 6221

2 Cài driver

+ đặc điểm của card PCI 1711/ 6221

3 Điều khiển khí nén dùng PLC