Criptografar:
ffii{{~~__:0a('0'*!.0a('0'*22(!'(~$~_:}-}$-a*}+{{if~~:i:0({}?;__:{}84{}*__({}?\__:{} _{}70{}g_{})_{}?\4__{}8*-_{}+{}80{}g_%4_{}8*{}+\\sl||||||||||||||||||||||||||||9||||||||||||||9||||||||||||||||||||||||||||||||||||||||||||||||||||9
> > >!;7f7-_{}!%_{}!<872-d_{}!&_{}!<[755(7(%~~_{}!<[55(7(_{}!*!*23a(_{}!'_{}!"55(7((~~_{}~~~o__'4'0.{{{o,
Descriptografar:
iill~~""bb=3d+*3*-$13d+*3*-55+$*+"'"b=!0!'0d-!.~~li""=l=3+~!B>bb=~!;7~!-bb+~!B_bb=~!#b~!:3~!jb~!,b~!B_7bb~!;-0b~!.~!;3~!jb(7b~!;-~!.__vo < < <
##############################################################################A######################A##############################A$>:i:0b~!$(b~!$?;:50gb~!$)b~!$?^:88+:+(""b~!$?^88+:+b~!$-$-56d+b~!$*b~!$%88+:++""b~!"""rbb*7*31~~~r/
Os dois programas são compensados por 3 e recebem a entrada do formulário:
<2-digit offset> <text>
O deslocamento deve ter 2 dígitos, portanto, um deslocamento de 5 precisa ser inserido como 05.
Esse é um envio longo, mas quase todos os caracteres não preenchidos são usados pelos dois programas . Há muito espaço em branco que definitivamente pode ser jogado fora, mas achei que o programa seria mais interessante dessa maneira.
Esta imagem destaca os caracteres usados pelos dois programas.
Explicação
A principal construção que torna isso possível é _{} -> b~!, o que permite ignorar arbitrariamente os caracteres no programa de descriptografia. Quão?
Encrypt:
_ : Mirror, but is a no-op if the program flow is horizontal
{ : Shift stack left
} : Shift stack right
Decrypt:
b : Push 11 to stack
~ : Pop top of stack
! : Skip the next instruction
Em suma, o programa de criptografia não faz nada, mas o programa de descriptografia ignora a próxima instrução. Isso pode ser estendido para _{}! -> b~!$, o que permite ignorar arbitrariamente os caracteres no programa de criptografia .
Além disso, a maior parte do restante do programa está empurrando números, realizando operações nesses números e encontrando maneiras de exibi-los. Por exemplo, uma construção útil é ~~ -> "", que exibe dois valores para o programa de criptografia, mas não empurra nada no programa de descriptografia.
> <>, 149 bytes
Aqui está a versão menos interessante, que usa o fato de que as instruções não passadas são efetivamente comentários em linguagens 2D.
Criptografar:
i68*:@-a*i@@-+i~v
4:v?)g31:;?(0:i:/8
(?v48*-+03g%48*+\*
_~\of0. .1+1fo/
j*+:zq<6B99A6=qz6g
53Ji?C58/8;?r0?C5:
C?EiJ4r?<EFJ3;EtEg
:tAC5EK8l5tKK86t*i
Descriptografar:
^+-~/5"V~^55" ^sk
)/k4}\(&/04|%/^/$-
|4k)-~" %(\y)-~ Q~
TsQd[%#ttt#& &[d$
_~ /of1+7..6+2fo+\
*(?^48*-$-04g%48*/
84:^?)g41:;?(0:i:\
/i68*:@-a*i@@-+i~^
Os dois programas são deslocados em 84 e recebem a entrada da mesma maneira que acima. A primeira instrução decide qual metade do programa deve ser executada, imantendo (entrada) o fluxo do programa para a direita no programa de criptografia e ^redirecionando o fluxo do programa para cima (circulando e retornando de baixo) no programa de descriptografia.
Explicação
Para a metade relevante do programa de criptografia (o programa de descriptografia é semelhante):
i read first input digit as char
68*:@-a* subtract 48 (ASCII "0") and multiply by 10, keeping another 48 on the stack
i read second input digit as char
@@-+ subtract 48 and add to 10*(first digit), giving the offset
i~ read in space and discard it
--- LOOP ---
: copy the offset
i: read input char
:0)?; check if less than 0 (i.e. EOF) and terminate if so
:13g)?v check if greater than ~ in cell (1,3) and drop down if so
48*(?v check if less than 32 and drop down if so
48*-+03g%48*+ calculate Caesar shift of the char, fetching 95 from (0,3)
of1+1. repeat loop
of0. repeat loop
Ferramenta de codificação
Isso não está relacionado ao restante da postagem acima, mas pensei em publicá-la porque preciso usá-la: P
for(var i=0;i<95;++i){var option=document.createElement("option");option.text=i;document.getElementById("offset").add(option)};function update(m){if(m==1)var code=document.getElementById("in").value;else var code=document.getElementById("out").value;var offset=parseInt(document.getElementById("offset").value);var output="";for(var i=0;i<code.length;i++){var n=code[i].charCodeAt(0);if(n<32||n>127)output+=code[i];else{var c=(n-32+offset*m)%95;output+=String.fromCharCode(c<0?c+95+32:c+32)}}if(m==1)document.getElementById("out").value=output;else document.getElementById("in").value=output};
<html><body><textarea id="in" onkeyup="update(1)" rows=5 style="width:100%"></textarea><textarea id="out" rows=5 style="width:100%" onkeyup="update(-1)"></textarea><select id="offset" onchange="update(1)"></select></body></html>