B4J Question Convert RGB to HSB

function RGBToHSL(r, g, b) {
   var
   min = Math.min(r, g, b),
   max = Math.max(r, g, b),
   diff = max - min,
   h = 0, s = 0, l = (min + max) / 2;

   if (diff != 0) {
       s = l < 0.5 ? diff / (max + min) : diff / (2 - max - min);

       h = (r == max ? (g - b) / diff : g == max ? 2 + (b - r) / diff : 4 + (r - g) / diff) * 60;
   }

   return [h, s, l];
}

…
 Dim hsb(3) As Float = RGBtoHSB(200,170,75) ' r g b values
 Log("(H)ue          : "&hsb(0))
 Log("(S)aturation % : "&hsb(1))
 Log("(B)rightness % : "&hsb(2))
End Sub
Sub RGBtoHSB(red As Int,green As Int,blue As Int) As Float()
 Dim HSB(3) As Float
 Dim p As JavaObject = fx.Colors.RGB(red,green,blue)
 HSB(0)=p.RunMethod("getHue",Null)  ' degree value
 HSB(1)=p.RunMethod("getSaturation",Null)*100  ' to percentile value
 HSB(2)=p.RunMethod("getBrightness",Null)*100  ' to percentile value
 Return HSB
End Sub