'--------------------------------------------------------
        Math = CSng(SData(0))
        If Math > 6# Then
            SData(0) = Math - 6#
        End If
        If Math < -6# Then
            SData(0) = (Math + 6#)
            SData(0) = CSng(SData(0)) - (CSng(SData(0)) * 2)
        End If
        SData(0) = SData(0) * 57.2957795130823
        SData(0) = Format(SData(0), "0.000000")
        
        'Rotation 2 / 3
        '--------------------------------------------------------
        Math = CSng(SData(1))
        If Math > 6# Then
            SData(1) = Math - 6#
        End If
        If Math < -6# Then
            SData(1) = (Math + 6#)
            SData(10) = CSng(SData(1)) - (CSng(SData(1)) * 2)
        End If
        SData(1) = SData(1) * 57.2957795130823
        SData(1) = Format(SData(1), "0.000000")
        
        'Rotation 3 / 3
        '--------------------------------------------------------
        Math = CSng(SData(2))
        If Math > 6# Then
            SData(2) = Math - 6#
        End If
        If Math < -6# Then
            SData(2) = (Math + 6#)
            SData(2) = CSng(SData(0)) - (CSng(SData(0)) * 2)
        End If
        SData(2) = SData(2) * 57.2957795130823
        SData(2) = Format(SData(2), "0.000000")