B4J Question Pixel Color

Sub Button13_Click
    
    
    Log(rbt.ScreenPixelColorGetAt(2595,631))
    Log(fx.Colors.From32Bit(rbt.ScreenPixelColorGetAt(2595,631)))
    
    GetARGB(rbt.ScreenPixelColorGetAt(2595,632))
    
    
    
    
    
End Sub

Sub GetARGB(Color As Int) As Int()
    Dim res(4) As Int
    res(0) = Bit.UnsignedShiftRight(Bit.And(Color, 0xff000000), 24)
    res(1) = Bit.UnsignedShiftRight(Bit.And(Color, 0xff0000), 16)
    res(2) = Bit.UnsignedShiftRight(Bit.And(Color, 0xff00), 8)
    res(3) = Bit.And(Color, 0xff)
    
    Log(res(0))
    Log(res(1))
    Log(res(2))
    Log(res(3))
    
    
    Return res
End Sub