暗号化：
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,
復号化：
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/
2つのプログラムは3オフセットされており、次の形式の入力を受け取ります。
<2-digit offset> <text>
オフセットは 2桁である必要があるため、5のオフセットをとして入力する必要があります05。
これは長い提出ですが、ほとんどすべての非フィラー文字が両方のプログラムで使用されます。間違いなくゴルフアウトできる空白はたくさんありますが、この方法のほうがプログラムがもっと面白いと思いました。
この画像は、両方のプログラムで使用される文字を強調しています。
説明
これを可能にする主な構成要素は_{} -> b~!であり、これにより、復号化プログラムで文字を任意にスキップできます。どうやって？
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
全体として、暗号化プログラムは何も行いませんが、復号化プログラムは次の命令をスキップします。これはに拡張でき、代わりに暗号化プログラム_{}! -> b~!$で文字を任意にスキップできます。
これとは別に、プログラムの残りのほとんどは数字をプッシュし、それらの数字に対して操作を実行してから、それらをポップする方法を見つけています。たとえば、便利な構成要素の1つは~~ -> ""、暗号化プログラムに2つの値をポップしますが、復号化プログラムには何もプッシュしません。
> <>、149バイト
これはあまりおもしろいバージョンではありません。これは、パススルーされない命令が事実上2D言語のコメントであるという事実を使用しています。
暗号化：
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
復号化：
^+-~/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~^
2つのプログラムは84オフセットされており、上記と同じ方法で入力します。最初の命令は、プログラムのどの半分を実行するかを決定し、i（入力）暗号化プログラムでプログラムフローを右方向に維持します。^プログラムフローを上方向にリダイレクトします（ループして下から戻る）。
説明
暗号化プログラムの関連する半分について（復号化プログラムも同様です）：
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
コーディングツール
これは上記の投稿の残りの部分とは関係ありませんが、使用する必要があるため、これを投稿すると思いました：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>