MagicEncoder (theText;theCode)

This function is like the magic decoder rings you used to find in cereal boxes. It makes a simple substitution of letters found in the code string for letters in the same relative position in the alphabet.

A space is expected as the last character but may be placed anywhere. If placed in position 5 for example any spaces in the original text would be replaced with “e”.

MagicEncoder (theText;theCode)

// Note that there is a space in the last character position of "alpha". 

// This function does not preserve upper case characters.


Let ( alpha = "abcdefghijklmnopqrstuvwxyz " ; 

If ( Length ( theText ) > 1; 

Middle ( theCode ; Position ( alpha ; Middle ( theText ; 1 ; 1 ) ; 1 ; 1 ) ; 1 ) & MagicEncoder ( Right ( theText; Length ( theText ) - 1 ); theCode ); 

Middle ( theCode ; Position ( alpha ; theText ; 1; 1 ) ; 1 )

)

)

Contact Us | Privacy | Policies

Copyright © 2006 DataIsland Software LLC. All rights reserved.

Notice: Product specifications and availability are subject to change without notice.