Hi guys!
I need to convert an integer to binary, it would be something in the code itself, as if it had a
DECL I=10 and the corresponding binary of I is returned. I didn't find the solution in the manual and I would like to see with you some possible solution. thanks
Workvisual
convert an integer to binary KRC
-
ycrideas -
January 5, 2023 at 4:45 PM -
Thread is Unresolved
- Go to Best Answer
-
- Best Answer
then just write your own... assuming this is 16-bit
Code
Display MoreDEF DECODE16(val1:in, val2[]:out) DECL INT val1, i, n DECL BOOL val2[] i=1 FOR n=1 to 16 val2[n]=(val1 B_AND i)<>0 i=i+i ENDFOR END DEFFCT INT ENCODE16(val1[]:out) DECL BOOL val1[] DECL INT i, n, tmp tmp=0 i=1 FOR n=1 to 16 IF Val1[n]==TRUE THEN tmp=tmp+i ENDIF i=i+i ENDFOR RETURN tmp ENDFCTthen you could use them to do something like
Code
Display MoreDECL BOOL BitNumber[16] DECL INT MyValue1, MyValue2 MyValue1 = 10 DECODE16(MyValue1,BitNumber[]) ; and the other way BitNumber[1]=TRUE BitNumber[2]=FALSE BitNumber[5]=TRUE MyValue2 = ENCODE16(BitNumber[]) -
the values that are filled in the array are the other way around
Just reverse index...
N goes through values 1..16 so to get 16..1 replace N with 17-N:
val2[17-n]=(val1 B_AND i)<>0
ENCODE16 is inverse of DECODE16. It does exactly the opposite...
-
42 binary is:
0010 1010
Your assumption 0001 0101 is wrong. You can see it on one sight. Lowest bit must be zero, as 42 is an even number.
-
...it returns 0101010000000000
42 is 0000000000101010 but you wanted bit array reversed. so program returns correct output.
Advertising from our partners
