Substitution cipher: Difference between revisions

Line 1,583:
 
[ [] 95 times [ i^ join ]
shuffle encryption put ] is makeencrypt ( --> )
 
dup[ encryption putshare
0 95 of swap
witheach
[ i^ unrot poke ]
decryption put ] is makekeys makedecrypt ( --> )
 
[ makeencrypt makedecrypt ] is makekeys ( --> )
 
[ witheach [ char ! + emit ] ] is echokey ( s --> )
[ encryption release
1,462

edits