Đồ Án Ghép Nối Máy Tính Khoa Điện Tử
PHẦN I
LỜI MỞ ĐẦU
Ghép nối máy tính là môn học nghiên cứu các cổng, các khe cắm mở rộng
của máy tính để từ đó thiết kế các khối ghép nối phục vụ mục đích cho đo
lường và điều khiển trong công nghiệp. Máy tính được ứng dụng rộng rãi
trong nhiều lĩnh vực, công việc này cần phải có khối ghép này,công viecje kia
cần khối ghép kia… Tất cả các khả năng đó đều được các nhà sản xuất để
trống nhiều vô số các đường có thể ghép vói bus của máy tính như: RS232,
LPT, khe cắm mở rộng , cổng USB……
Trong đề tài cần nghiên cứu là cổng LPT là sinh viên khoa điện tử chúng em
nói chung cũng như sinh viên các khoa khác co liên quoan tới môn học.nhưng
do thời gian tìm hiểu và kiến thức về môn học còn có nhiều hạn chế,cho nên
trong đề tài nghiên cứu về vi điều khiển của chúng em còn gì thiếu sót và hạn
chế mong thầy chỉ bảo giúp cho chúng em hiểu sâu hơn về môn học này.

Chúng em xin chân thành cảm ơn!
PHẦN II
I : CƠ SỞ LÝ THUYẾT
1: Giới thiệu cổng LPT
Cổng song song được thiết kế đầu tiên bởi công ty Centronic nhằm mục đích
ghép nối máy vi tính với máy in. Sau này được tiêu chuẩn hóa và có mặt ở hầu
hết máy vi tính. Tên gọi của cổng song song bắt nguồn kiểu truyền dữ liệu qua
cổng này, các bit truyền song song còn các byte truyền nối tiếp. Ngoài ra còn
gọi là cổng LPT

Cấu trúc cổng song song gồm 8 đường dữ liệu, 4 dường dẫn điều khiển và 5
đường dẫn trạng thái. Các đường dẫn này đều tương thích với mức TTL(0.5)
do vậy khá thuận tiện, đơn giản cho việc ghép nối nhiều linh kiện, mạch điện
tương thích với mức logic trên.
GVHD: Phạm Văn Chiến

giấy của máy in
13 13 SLCT Vào Tín hiệu báo sẵn
sàng của máy in
14 14 /AF Ra Tín hiệu yêu cầu
nạp một dòng
mới của máy in
đối với máy in
15 32 /EROR Vào Tín hiệu thông
báo lỗi của máy
in với máy tính
16 31 INIT(RẾT) Ra Tín hiệu khởi
động của máy
tính với máy in
17 36 SLCTIN Ra Tín hiệu lựa
chọn máy in của
máy tính
18-25 19-30, 33 GND Tín hiệu nối mas
16 Tín hiệu nối mas
GVHD: Phạm Văn Chiến
Đồ Án Ghép Nối Máy Tính Khoa Điện Tử
Các đường tín hiệu này được chia làm 3 nhóm:
Các đường tín hiệu xuất ra từ máy tính và điều khiển máy in được gọi là các
đường điều khiển
Các đường đưa thông báo ngược trở lại từ máy in về máy tính được gọi là các
đường trạng thái.
Các địa chỉ của song song trên máy PC
Cổng song song
(LPT)
Địa chỉ thanh ghi
dữ liệu

9
2 1
8
2 0
7
1 9
6
1 8
5
1 7
4
1 6
3
1 5
2
1 4
1
Hinh 2: Sơ đồ chân cổng song song
Thanh ghi dữ liệu

D7 D6 D5 D4 D3 D2 D1 D0
Bit dữ liệu D0 (chân 2)
Bit dữ liệu D1 (Chân 3)
Bit dữ liệu D2 (Chân 4)
Bit dữ liệu D3 (Chân5 )
Bit dữ liệu D4 (Chân 6)
Bit dữ liệu D5 (Chân 7)
Bit dữ liệu D6 (Chân 8)
Bit dữ liệu D7 (Chân 9)
GVHD: Phạm Văn Chiến

1 9
1 8
1 7
1 6
1 5
1 4
1 3
1 2
D 0
D 1
D 2
D 3
D 4
D 5
D 6
D 7
L E
O E
Q 0
Q 1
Q 2
Q 3
Q 4
Q 5
Q 6
Q 7
Hình 3: Vi mạch chốt
II: Yêu cầu của đề tài:
1. Thiết kế hệ thống mô phỏng điều khiển, giám sát sử dụng cổng song
song.

3
4
O N A P 5 V
7 8 H T 2
1 3
2
V I N V O U T
G N D
Q 5
C 1 8 1 5
R 3
R
C 1
2 2 0 0 U F
C 3
1 0 4
U 4
R O L E
1
2
3
4
5
1
2
3
4
5
7 4 L S 5 7 3
U 9

1 9
U 7
R O L E
1
2
3
4
5
1
2
3
4
5
R 1
R
Q 4
C 2 3 8 3
Q 9
C 1 8 1 5
C 4
0 . 4 7 U F
U 6
R O L E
1
2
3
4
5
1
2

8
9 1 2
1 3
1 4
1 5
1 6
1 7
1 8
1 9
2
3
4
5
6
7
8
9 1 2
1 3
1 4
1 5
1 6
1 7
1 8
1 9
R 2
R
R 4
R
Q 7
C 1 8 1 5

R O L E
1
2
3
4
5
1
2
3
4
5
Q 1 0
C 2 3 8 3
J 1
C O N 2
1
2
Q 1
C 1 8 1 5
Hinh 4: Sơ đò thiết kế phần cứng của đồ án
II: Phần mềm
Phần mềm điều khiển được viết trên phần mềm visual basic
Private Declare Sub Out32 Lib "inpout32.dll" (ByVal portaddress As Integer,
ByVal value As Integer)
Private Declare Function Inp32 Lib "inpout32.dll" (ByVal portaddress As
Integer) As Integer
Dim tb1, tb2, tb3, tb4, tb5, kt, dk, check As Integer
Dim loi1, loi2, loi3, loi4, loi5 As Integer
Dim thongbao1, thongbao2, thongbao3, thongbao4, thongbao5 As String
Private Sub Command1_Click()

If check = 1 Then
tb3 = tb3 + 1
If tb3 = 2 Then tb3 = 0
dk = dk And &HFA
If tb3 = 1 Then dk = dk Or &H4
Out32 &H378, dk
End If
End Sub
Private Sub Command6_Click()
If check = 1 Then
GVHD: Phạm Văn Chiến
Đồ Án Ghép Nối Máy Tính Khoa Điện Tử
tb4 = tb4 + 1
If tb4 = 2 Then tb4 = 0
dk = dk And &HF7
If tb4 = 1 Then dk = dk Or &H8
Out32 &H378, dk
End If
End Sub
Private Sub Command7_Click()
If check = 1 Then
tb5 = tb5 + 1
If tb5 = 2 Then tb5 = 0
dk = dk And &HEF
If tb5 = 1 Then dk = dk Or &H10
Out32 &H378, dk
End If
End Sub
Private Sub Command8_Click()
If Dir("C:\Dieukhienrole.txt") <> "Da luu file " Then

loi1 = 1
thongbao1 = "Loi"
ElseIf ((kt And &H10) = &H10 And tb1 = 0) Then
Text1.Text = "Lçi hÖ thèng §K"
Shape1.FillColor = vbYellow
loi1 = 1
thongbao1 = "Loi HT"
ElseIf ((kt And &H10) = &H0 And tb1 = 0) Then
loi1 = 0
Text1.Text = "§K TB1"
Shape1.FillColor = vbBlue
thongbao1 = "Tat"
End If
'
If ((kt And &H20) = &H20 And tb2 = 1) Then
loi2 = 0
Shape2.FillColor = vbGreen
Text2.Text = "TB2 ®ang ho¹t ®éng"
thongbao2 = "Bat"
ElseIf ((kt And &H20) = &H0 And tb2 = 1) Then
Text2.Text = "TB2 gÆp sù cè"""
Shape2.FillColor = vbRed
loi2 = 1
thongbao2 = "Loi"
ElseIf ((kt And &H20) = &H20 And tb2 = 0) Then
Text2.Text = "Lçi hÖ thèng §K"
Shape2.FillColor = vbYellow
loi2 = 1
thongbao2 = "Loi HT"
ElseIf ((kt And &H20) = &H0 And tb2 = 0) Then

If ((kt And &H80) = &H0 And tb4 = 1) Then
loi4 = 0
Shape4.FillColor = vbGreen
Text4.Text = "TB4 ®ang ho¹t ®éng"
thongbao4 = "Bat"
ElseIf ((kt And &H80) = &H80 And tb4 = 1) Then
Text4.Text = "TB4 gÆp sù cè"""
Shape4.FillColor = vbRed
loi4 = 1
thongbao4 = "Loi"
ElseIf ((kt And &H80) = &H0 And tb4 = 0) Then
Text4.Text = "Lçi hÖ thèng §K"
GVHD: Phạm Văn Chiến
Đồ Án Ghép Nối Máy Tính Khoa Điện Tử
Shape4.FillColor = vbYellow
loi4 = 1
thongbao4 = "Loi HT"
ElseIf ((kt And &H80) = &H80 And tb4 = 0) Then
loi4 = 0
Text4.Text = "§K TB4"
Shape4.FillColor = vbBlue
thongbao4 = "Tat"
End If
'
If ((kt And &H8) = &H8 And tb5 = 1) Then
loi5 = 0
Shape5.FillColor = vbGreen
Text5.Text = "TB5 ®ang ho¹t ®éng"
thongbao5 = "Bat"
ElseIf ((kt And &H8) = &H0 And tb5 = 1) Then

Phần III: I: Sơ đồ thiết kế phần cứng
II: Phần mềm
GVHD: Phạm Văn Chiến