DCIP1 - шифрование данных

[darkart]

Написал простой алгоритм шифрования данных, назвал его (DCIP1 - Darkart Cipher). Суть крайне простая - с помощью ключа и некоторых операций (посмотрите в коде) получаем уникальное число M, после этого считываем два байта из файла1 и XORим их на M, после чего друг на друга, после этого выводим в файл2. Повторяем до конца файла. Дешифрование происходит таким же образом, только после нахождения числа М и считывания байтов мы сначала XORим их друг на друга, а потом на М.

DCIP1_C:
fn=argument0;
key=argument1;
m=0;s=string_length(key);
for(i=0;i<s;i+=1){m+=ord(string_char_at(key,i));}
m=round(m/s);
infile=file_bin_open(fn,0);
outfile=file_bin_open(fn+".dc1",1);
fs=file_bin_size(infile);
while(file_bin_position(infile)<fs-1){
    c=file_bin_read_byte(infile);
    b=file_bin_read_byte(infile);
    b^=m;b^=c;c^=m;c^=b;
    file_bin_write_byte(outfile,c);
    file_bin_write_byte(outfile,b);
}
file_bin_write_byte(outfile,file_bin_read_byte(infile));
file_bin_close(infile);
file_bin_close(outfile);

DCIP1_D:
fn=argument0;
fn2=argument1;
key=argument2;
m=0;s=string_length(key);
for(i=0;i<s;i+=1){m+=ord(string_char_at(key,i));}
m=round(m/s);
infile=file_bin_open(fn,0);
outfile=file_bin_open(fn2,1);
fs=file_bin_size(infile);
while(file_bin_position(infile)<fs-1){
    c=file_bin_read_byte(infile);
    b=file_bin_read_byte(infile);
    c^=b;c^=m;b^=c;b^=m;
    file_bin_write_byte(outfile,c);
    file_bin_write_byte(outfile,b);
}
file_bin_write_byte(outfile,file_bin_read_byte(infile));
file_bin_close(infile);
file_bin_close(outfile);

[DmitryDS]

Шифр Вернама, который вы пытаетесь модифицировать, абсолютно криптостоек, коль скоро ключ не используют повторно. Единственно, можно поколдовать с ключом, чтобы попытаться повысить его "случайность". А если вы там ключ пытаетесь в шифре спрятать, то это очень плохая идея.
Напомнило:

Мы не просто разобьем шифр Вернама, который просто невозможно расшифровать. Мы пойдем на Большое Дело, истинно неразрушимый 128-битный шифр Вернама. Хотя не, это слишком просто. Чтобы все пошло как надо, мы расшифруем цельнонеразрушимый 512-битный шифр Вернама, который как минимум в 2^384 раз более неразрушим, чем обычный. Верните Холли!