diff options
Diffstat (limited to '3544/CH2/EX2.5/Ex2_5.sce')
| -rw-r--r-- | 3544/CH2/EX2.5/Ex2_5.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3544/CH2/EX2.5/Ex2_5.sce b/3544/CH2/EX2.5/Ex2_5.sce new file mode 100644 index 000000000..995225338 --- /dev/null +++ b/3544/CH2/EX2.5/Ex2_5.sce @@ -0,0 +1,19 @@ +// Substitutition scheme of Caesar cipher + +// Move scilab to current file directory +[u,t,n] = file() +n = strcat(n) +file_name = basename(n)+fileext(n) +file_name = strcat(file_name) +ind=strindex(n,file_name) +path = part(n,1:ind-1) +chdir(path) + +exec("Chapter_2.sci",-1) + +a = ascii('A') +for i =0:25 + printf("%c : %c\n",ascii(a+i),encrypt_caesar(ascii(a+i))) +end +// A scheme for codifying messages +//(replacing each alphabet with an alphabet three places down the line) |