For those interested here is
the Case source code of a scheme for key exchange similar in concept to a DH Key exchange process, but using simple bitwise operations with an iterated function:
Sample of the output:
ALICE:
15076425430454950481 A [Secret 1]
5065174741009230133 B [Secret 2]
6616145336279823145 D [FSCX_REVOLVE(A,B,16)] ->
BOB:
A2 5640910407791789943 [Secret 3]
B2 2734548036544947114 [Secret 4]
<- D2 7953994751009905686 [FSCX_REVOLVE(A2,B2,16)]
11220837854338859672 FA [FSCX_REVOLVE(D2,B,48) xor A]
FA = FA2 11220837854338859672 [FSCX_REVOLVE(D,B2,48) xor A2]
EVE: NOT (D xor D2)= 14577306244540485824
EVE: D xor D2= 3869437829169065791
EVE: FSCX(D,D2)= 14126811020873148126
EVE: FSCX(D2,D)= 14126811020873148126
EVE: FSCX(D,D2) xor D= 11519582121138542071
EVE: FSCX(D2,D) xor D= 11519582121138542071
...
EVE: FSCX_REVOLVE_PRINT(D,D2,64)= 6616145336279823145
...