3.4.2.1 Thử nghiệm cụm cấp thuốc
Lọ được đưa đến vị trí cấp thuốc nhờ băng tải 1 và bàn xoay định vị, cảm biến nhận biết lọ ở vị trí cấp thuốc, cửa gạt hũ chứa mở đưa thuốc xuống lọ trong thời gian cài đặt. Theo dõi lượng thuốc xuống lọ đạt yêu cầu đề ra. Cụm cấp thuốc hoạt động ổn định.
3.4.2.2 Thử nghiệm cụm đóng nắp
Lọ được đưa đến vị trí đóng nắp nhờ bàn xoay định vị, cảm biến nhận biết lọ ở vị trí đóng nắp. Nắp sẽ được đẩy ra từ ống chứa nắp nhờ xy lanh đẩy nắp và đóng nắp chặt vào lọ nhờ xy lanh đóng nắp. Thời gian đạt yêu cầu đề ra, theo dõi quá trình đóng nắp có xảy ra sai xót thì xử lý tránh trường hợp quy trình bị delay. Cụm đóng nắp hoạt động ổn định, tuy nhiên có một số trường hợp nắp bị đóng hỏng do lệch vị trí so với miệng lọ và do nắp sử dụng là loại nắp nhựa khá mỏng nên đôi khi khó đóng chặt vào miệng lọ.
3.4.2.3 Thử nghiệm cụm kiểm tra nắp lọ
Lọ trải qua 2 quá trình chính là cấp thuốc và đóng nắp sẽ được đưa ra ngoài nhờ băng tải 2. Tại đây, cụm kiểm tra nắp lọ sẽ kiểm tra xem nắp đã được đóng hay chưa nhờ 2 cảm biến. Theo dõi quá trình vận hành của cụm kiểm tra nắp lọ và khắc phục sự cố về tín hiệu của cảm biến so với thực tế xảy ra để điều chỉnh vị trí cảm biến phù hợp. Cụm kiểm tra nắp hoạt động ổn định đúng nguyên lý đặt ra.
67
KẾT LUẬN VÀ ĐỊNH HƯỚNG PHÁT TRIỂN 4.1 Kết quả đạt được
Sau thời gian thực hiện nghiên cứu, chế tạo, lắp ráp mô hình đồ án tốt nghiệp dưới sự cố gắng, nhiệt huyết của tất cả thành viên trong nhóm và sự hướng dẫn, giúp đỡ nhiệt tình của thầy giáo Nguyễn Văn Trường, nhóm đã hoàn thành đồ án tốt nghiệp đúng tiến độ và đáp ứng yêu cầu đã đề ra và thu được kết quả:
- Thiết kế hoàn thiện hệ thống cơ khí.
- Thi công, lắp ráp được mô hình thực tế của hệ thống.
- Lập trình cho hệ thống thực tế hoạt động theo đúng yêu cầu đã đề ra. - Các mô đun hoạt động đúng chức năng và yêu cầu đề ra.
- Hệ thống vận hành đảm bảo độ an toàn cao.
- Sản phẩm hoàn thành được cấp thuốc và đóng nắp hoàn thiện.
- Ngoài ra, việc thực hiện thành công mô hình đồ án còn giúp nâng cao tinh thần làm việc nhóm, nâng cao tinh thần học hỏi tìm tòi, là bước đà cho sự phát triển của bản thân sau này.
4.2 Hạn chế và phương hướng giải quyết Hạn chế Hạn chế
- Do ít tham gia vào quá trình thiết kế chế tạo, thi công mô hình thực, chưa có kinh nghiệm nên phần tính toán hệ thống cơ khí còn khá sơ sài và chưa được đảm bảo. - Phần mềm điểu khiển tuy đã có khả năng dự trù được một vài lỗi nhưng vẫn chưa
đầy đủ và hầu hết vẫn phải khắc phục thủ công.
- Tiếng ồn và rung động từ hệ thống chỉ dừng lại ở mức chấp nhận được, vẫn chưa tối ưu hoàn toàn.
- Các chi tiết thiết kế chưa tối ưu nên hoạt động chưa hoàn toàn chính xác. - Tính thẩm mĩ của hệ thống chưa hoàn hảo.
- Năng suất của hệ thống không được cao.
- Chưa có phương án giải quyết triệt để việc sàng lọc thuốc đầu vào do mới chỉ tách được thuốc dính nhau và tạp chất lớn, để lọt thuốc vỡ.
68
- Chưa thiết kế được mô hình thực của cơ cấu sàng rung tách do chi phí và độ phức tạp cao.
Phương hướng giải quyết
- Thay đổi động cơ DC giảm tốc thành động cơ bước hoặc thiết kế cơ cấu man cho bàn xoay định vị.
- Sử dụng phễu cân, cân điện tử trong phương pháp cấp thuốc.
- Nghiên cứu thêm về sàng rung nhiều tầng hoạt động nhiều chế độ giúp tách được nhiều thành phần hơn.
- Thiết kế chính xác các chi tiết cơ khí để mô hình đảm bảo vận hành chính xác hơn.
- Nghiên cứu sâu hơn về các phương pháp vận hành và giám sát qua phần mềm hiện hành.
4.3 Định hướng phát triển
Thực tế sản suất của hầu hết các dây chuyền tự động, hệ thống cấp và đóng nắp lọ thuốc là một dây chuyền khép kín hoàn toàn tự động nên hướng phát triển tiếp theo của đề tài là xây dựng một dây chuyền tự động bao gồm tất cả các khâu và hoàn toàn khép kín chứ không chỉ dừng lại ở một số khâu cơ bản nhất như trong mô hình đồ án. Thiết kế chi tiết hơn hệ thống giám sát quá trình sản xuất, phát triển hướng điều khiển, giám sát từ xa, kiểm tra sản phẩm đầu ra về cả chất lượng và số lượng một cách chi tiết và chính xác nhất. Thiết kế thêm các vị trí mang các chức năng tương tự trên dây chuyền giúp giảm thời gian dừng giữa các khâu để tăng năng suất của hệ thống.
69
DANH MỤC TÀI LIỆU THAM KHẢO
[1] PGS.TS. Hoàng Văn Quý-GS.TS. Nguyễn Cảnh Cầm, Bài tập thủy lực, Hà Nội: NXB Xây Dựng, 2005.
[2] TS. Nguyễn Tuấn Linh, Giáo trình Chi tiết máy, Đại học Công nghiệp Hà Nội: NXB Giáo dục Việt Nam, 2015.
[3] ThS. Bùi Thanh Lâm (Ch.b)-ThS. Lưu Vũ Hải-ThS. Lê Ngọc Duy, Giáo trình hệ thống tự động thủy khí, Đại học Công nghiệp Hà Nội: NXB Khoa học tự nhiên &công nghệ, 2019.
[4] PGS.TS. Ngô Văn Thuyên-KS.Phạm Quang Huy, Lập Trình Với PLC S7 1200 & S7 1500, Nhà xuất bản Thanh Niên, 2019.
[5] PGS.TS. Trịnh Chất-TS. Lê Văn Uyển, Tính toán thiết kế hệ thống dẫn động cơ khí, Nhà xuất bản Giáo Dục, 2007.
[6] Nguyễn Hữu Lộc, Cơ sở thiết kế máy, Hồ Chí Minh: NXB.Đại học Quốc gia, 2013.
[7] Hà Văn Phương, Giáo Trình đo lường và cảm biến, Đại học Công nghiệp Hà Nội: NXB Khoa học &kỹ thuật, 2013.
[8] PGS.TS. Vũ Liêm Chính (Ch.b)-ThS. Nguyễn Kiếm Anh-ThS. Nguyễn Thị Thanh Mai-KS. Đoàn Tài Ngọ-PGS.TS. Trần Văn Tuấn-TS. Nguyễn Thiệu Xuân, Máy và thiết bị sản xuất vật liệu và cấu kiện xây dựng, Hà Nội: NXB Xây Dựng, 2013.
[9] Youtuber Ngọc Automation, “Ngọc Automation,” 17 09 2021. [Trực tuyến]. Available: https://www.youtube.com/watch?v=bbaIAjEA-8c&t=2356s. [Đã truy cập 12 04 2021].
70
PHỤ LỤC Phụ lục 1: Bản vẽ hệ thống
Bản vẽ lắp của hệ thống cơ khí Bản vẽ phân giã của hệ thống cơ khí
Bản vẽ các chi tiết các cụm thành phần hệ thống cơ khí
Phụ lục 2: Lưu đồ thuật toán Phụ lục 3: Mạch điện điều khiển
Phụ lục 4: Chương trình điều khiển hệ thống
Chương trình xuất dữ liệu báo cáo WinCC Sub Create_Report()
'Tip:
' 1. Use the <CTRL+SPACE> or <CTRL+I> shortcut to open a list of all objects and functions
' 2. Write the code using the HMI Runtime object. ' Example: HmiRuntime.Screens("Screen_1").
' 3. Use the <CTRL+J> shortcut to create an object reference. 'Write the code as of this position:
'Tested OK VBScript for reporting in MS-Excel as per client submitted EXCEL sheet
Dim wsh, XLSrunning, TargetBookrunning, objExcelApp, objWorkbook, TheTargetBook
Dim TheCount, theSheet, theCell, theLastCell, theLastRow, PreviousDate Dim objFSO Dim Date1 Dim EXCEL_R Const OverwriteExisting = 1 Set wsh = CreateObject("WScript.Shell") TheTargetBook = "C:\Users\DELL\Desktop\DATN\REPORT\report.xlsx" TheCount = GetObject("winmgmts:root\CIMV2").ExecQuery("SELECT * FROM Win32_Process WHERE Name='EXCEL.EXE'").Count
'While TheCount is bigger than 0, it means the Excel Application is running..., but doesn't mean the workbook is open for sure!
If TheCount > 0 Then
Set objExcelApp = GetObject(,"Excel.Application")
' Using GetObject(,"Excel.Application") to point to the running Excel Application.
For Each XLSrunning In objExcelApp.Workbooks
If XLSrunning.name = TheTargetBook Then'Name Then TargetBookrunning = 1
End If Next
If TargetBookrunning = 1 Then
Set objWorkbook = GetObject(TheTargetBook) Else
Set objWorkbook = objExcelApp.Workbooks.Open(TheTargetBook) End If
Else
Set objExcelApp = CreateObject("Excel.Application")
Set objWorkbook = objExcelApp.Workbooks.Open(TheTargetBook)
objWorkbook.Worksheets(1).Activate Set theSheet = objWorkbook.ActiveSheet End If objExcelApp.Visible = False objExcelApp.ScreenUpdating = False objExcelApp.DisplayAlerts = False If SmartTags("Excel_row") < 4 Then SmartTags("Excel_row") = 4 End If objWorkbook.Worksheets(1).Activate
Set theSheet = objWorkbook.ActiveSheet With theSheet .cells(SmartTags("Excel_row"),1) = Now .cells(SmartTags("Excel_row"),2) = SmartTags("Set_Time_Thuoc_Day") .cells(SmartTags("Excel_row"),3) = SmartTags("Act_Time_Thuoc_Day") .cells(SmartTags("Excel_row"),4) = SmartTags("Act_SP_Vao")
.cells(SmartTags("Excel_row"),5) = SmartTags("Act_SP_Ra") .cells(SmartTags("Excel_row"),6) = SmartTags("Act_SP_OK") .cells(SmartTags("Excel_row"),7) = SmartTags("Act_SP_NotOK") End With SmartTags("Excel_row") = SmartTags("Excel_row") + 1 objWorkbook.Save objWorkbook.Close
Set objWorkbook = Nothing objExcelApp.Quit
Set objExcelApp = Nothing Set wsh = Nothing