Formula needed for Correct Hue in RGB->HSB.

[Sastraxi]

I've answered my original question up to one point; the hue value. I'm using this formula converted from this page: http://www.cs.rit.edu/~ncs/color/t_convert.html to convert it. Here's my attempt to translate it into VB:Function RGBtoHSB(R As Single, G As Single, B As Single, H As Long, S As Single, V As Single)
Dim Mini As Single, Maxi As Single, Delta As Single

Mini = Min(R, G, B)
Maxi = Max(R, G, B)

V = Maxi
Delta = Maxi - Mini

If Maxi <> 0 Then
S = Delta / Maxi
Else
S = 0
H = -1
Exit Function
End If

If R = Maxi Then
H = (G - B) / Delta
ElseIf G = Maxi Then
H = 2 + (B - R) / Delta
Else
H = 4 + (R - G) / Delta
End If

H = H * 60
If H < 0 Then H = H + 360

End Function

Function Max(R As Single, G As Single, B As Single) As Single
If R > G Then
If R > B Then
Max = R
Else
Max = B
End If
Else
If G > B Then
Max = G
Else
Max = B
End If
End If
End Function

Function Min(R As Single, G As Single, B As Single) As Single
If R < G Then
If R < B Then
Min = R
Else
Min = B
End If
Else
If G < B Then
Min = G
Else
Min = B
End If
End If
End FunctionI'm assuming that's how the Max and Min functions should be, but that's where my problem may lie.