RE: TIB: A few more questions


[Prev][Next][Index][Thread]

RE: TIB: A few more questions



> Clive Bentley wrote:
>
> Its not that easy. What I want to do is get the binary # 10011001 and
> put 1 into (1,1) 0->(1,2) 0->(1,3) 1->(1,4) ect.... Anyone know how?
>
> Clive Bentley
>
First or all, I want to tell you I'm spanish, and my English is horrible. Sorry about that.
I hope this little program will help you:

153\->\A
[1,2,3,4,5,6,7,8]\->\M
1\->\B
For(C,1,8)
A and B\->\D
If D>0
Then
1\->\M(C)
Else
0\->\M(C)
End
2*B\->\B
End
Disp M

It puts 1 into (1), 0->(2), 0->(3), 1->(4), etc. It's and example using decimal numbers,
but you can easily modify it to run with binary ones.

Ronaldo. <mejias@lobocom.es>