Android Question Int to 7bit and 10bit binary converter

Cableguy

Expert
Licensed User
Longtime User
Hi guys

I need to convert an integer to both a 7bit and 10 bit binary string representation.
But... I don't have the foggiest idea how to do it.
any help apreciated
 

JordiCP

Expert
Licensed User
Longtime User
B4X:
Sub int2Bin(num As Int, digits As Int) As String

    Dim s As String
   
    For k=0 To digits-1
        If Bit.AND(num,1)=1 Then
            s="1"&s
        Else
            s="0"&s
        End If
        num=Bit.ShiftRight(num,1)
    Next
    Return s
End Sub
 
Upvote 0

Cableguy

Expert
Licensed User
Longtime User
Just before I read your solution I came up with:

B4X:
Sub int2bin(value As Int, base As Int) As String
   Private x As String
   x = Bit.ToBinaryString(value)
   If x.Length < base Then
     Do Until x.Length = base
       x= "0" & x
     Loop
   End If
   Return x
End Sub

But thanks for taking the time to help me
 
Upvote 0
Top