Chuyển ảnh xám sang màu và ảnh màu sang xám bằng mô hình HSI (code VB + file word)

Bài tập điều kiện II Môn: Xử lý ảnh dif = max - min sum = max + min L = 0.5 * sum If (dif = 0) Then H = 0.0 : S = 0.0 Else If (L < 127.5) Then S = 255.0 * dif / sum Else S = 255.0 * dif / (510.0 - sum) End If H = (f1 + 60.0 * f2 / dif) If H < 0.0 Then H += 360.0 If H >= 360.0 Then H -= 360.0 End If ''Apply transformation. H = H + _hue If H >= 360.0 Then H = H - 360.0 S = S + sat If S < 0.0 Then S = 0.0 If S > 255.0 Then S = 255.0 L = L + lum If L < 0.0 Then L = 0.0 If L > 255.0 Then L = 255.0 ''Conversion back to RGB space. If (S = 0) Then R = L : G = L : B = L Else If (L < 127.5) Then v2 = c1o255 * L * (255 + S) Else v2 = L + S - c1o255 * S * L End If v1 = 2 * L - v2 v3 = v2 - v1 H1 = H + 120.0 If (H1 >= 360.0) Then H1 -= 360.0 If (H1 < 60.0) Then R = v1 + v3 * H1 * c1o60 ElseIf (H1 < 180.0) Then R = v2 ElseIf (H1 < 240.0) Then R = v1 + v3 * (4 - H1 * c1o60) Else R = v1 End If H1 = H If (H1 < 60.0) Then G = v1 + v3 * H1 * c1o60 ElseIf (H1 < 180.0) Then G = v2 ElseIf (H1 < 240.0) Then G = v1 + v3 * (4 - H1 * c1o60) Else G = v1 End If H1 = H - 120.0 Nhóm thực hiện: Nhóm 1-L11CQCN12BTrang 11 Bài tập điều kiện II Môn: Xử lý ảnh If (H1 < 0.0) Then H1 += 360.0 If (H1 < 60.0) Then B = v1 + v3 * H1 * c1o60 ElseIf (H1 < 180.0) Then B = v2 ElseIf (H1 < 240.0) Then B = v1 + v3 * (4 - H1 * c1o60) Else B = v1 End If End If ''Save new values. pixels(index + 2) = CByte(R) pixels(index + 1) = CByte(G) pixels(index + 0) = CByte(B) Next Next ''Copy the RGB values back to the bitmap System.Runtime.InteropServices.Marshal.Copy(pixels, 0, ptr, size) ''Unlock the bits. result.UnlockBits(bmpData) Return result End Function End Class Dưới đây là hình ảnh ví dụ để minh họa: => Hình 2.2. Chuyển ảnh xám sang ảnh màu theo mô hình màu HSI. Nhóm thực hiện: Nhóm 1-L11CQCN12BTrang 12 Bài tập điều kiện II Môn: Xử lý ảnh II.3 Giao diện chương trình Hình 2.3. Giao diện chính của chương trình. Nhóm thực hiện: Nhóm 1-L11CQCN12BTrang 13 Bài tập điều kiện II Môn: Xử lý ảnh PHẦN III: KẾT LUẬN VÀ HƯỚNG PHÁT TRIỂN Qua quá trình nhóm chúng em làm bài tập điều kiện nhóm chúng đã rút ra được những khó khăn, thuận lợi, những mặt đã làm được cũng như những thiếu sót trong đề tài. Đề tài hầu hết đã đáp ứng được yêu cầu của giáo viên. - Những mặt đã làm được: Chương trình đã thực hiện được các chức năng đã đề ra khi thảo luận, giao diện dễ sử dụng, có tính trực quan cao… - Những hạn chế: Tuy đã rất cố gắng trong quá trình thực hiện đề tài nhưng với kiến thức về môn học cũng như khả năng lập trình còn nhiều hạn chế nên chương trình không tránh khỏi các thiếu sót… Hướng phát triển: nếu có thời gian và kiến thức tốt hơn, nhóm em sẽ khắc phục những hạn chế của đề tài, và tạo thêm một số chức năng như: tạo ảnh âm bản, làm mịn ảnh, tìm biên ảnh,…. Link download: https://drive.google.com/file/d/0B-8O8mvfY4rYYmdMNWpiVWQzck0/edit?usp=sharing Nhóm thực hiện: Nhóm 1-L11CQCN12BTrang 14