#include <ncurses.h> #define T typedef unsigned T long G; T short CT; #define ATG srand(time(0)); initscr(); cbreak(); noecho(); start_color(); #define GG(T,C) attrset(A_BOLD*!(T)|COLOR_PAIR(C%2+1)); #define AC(G) init_pair(G/2,G,nodelay(stdscr,G/3)); #define TCT(A,G,C) mvaddch(A+CTT*6+4,CGA*12+G,C) #define AGG A&2?119:115:A&1?100:97 #define CAT mvprintw(2,40,"%d",TC) #define GAT int main() #define AAA refresh() #define TAG endwin() #define GCA clear() #define TCA clock() #define CCC rand() #define CC getch() #define GA return #define T(T) #T#T#T#T#T#T T #define G(G) while(G) #define A(A) A { A } G AA[1<<16]; G GT[1<<16]; G CAA, CA, CTG, TA, CG, CTT, CGA, TC, T, GTC; char *ACG="HXXTP02^OCBHL\\XP``T^NDP800SQSW\\X@@@0c13RZLLH<WWWWWWWW��.jW�������Wq.�'9W�������WP'��jb��WW��7F��WWWWWWWWBjPWWbo^^WW^^9WWP^__WW__6,D:^HRioV;:VztZ", *GCC,*AGT,GTT[]=T( ; G AG; G TG; G AC; G C; G A=0; G AAG; G TT; G GG; G AT(CT A){ GA A%4>>A%4-1 ; } CT GC(){ AC=!(AAG&(CA/=2)); CTG=15*CA*CA/4; G A=TG; GA AC||A&& AT(A /CA/CA); } CT GTCA (G C,G A,G CG){ GG(C>=A,C)G(!A)GA (C&&CC,CG^TAG); CG +=(C<A)<<20; G T=TCT(0,C%16*3-34,302 [C%16*2+ GTT]); AAA; G( CG>TCA)A; GA CG^GTCA(C+ 3,A-1,CG ); } G CGAC(CT T,G A,G C,G AA,G AG){ GA(AA&& (CA=4)&& ( CGAC( 1+T,1+A,C, --AA, AG)? CGAC(ACG[ T],AG,0,C,A): ACG[T]&&TCT(AG,A,ACG[T])),C); } CT TGA(G A){ CT T=1; CT C=-T; *AA=A; *GT=3; G(++C^T){ G( (TA=AA [C])/2&!(TT =(TG= GT[C]+16)& 15))GA TG>>4; CA=4; AAG=TA>>2*TT; A(GC()&&(AA[T ]=TA^1<<2*TT<<AT(AAG),GT[T++]=TG^CTG>>AC); )} GA 0 ; } G ACC(){ G T=4; G A=1; G C=1; TC=TGA (GG=CCC); G((A*=2)<C||(C<<=A=1)<T||(T*=C=2)){ G ( TGA(AG=GG^T^C^A)>TC) { G((TC=TGA(GG=AG))>CAA) { CAA=TC; CAT; } G ( TC>>6)GA 1; C = 1; T=2; } G(1+ CC) GA 1; } GA 0; } GAT{ AGT=GCC=GTT; G(T=* ++GCC)72&T^64||(*AGT^=T/4%2<<A%8 ,7&(A+=5))||( *++AGT=CAA =C=0); ATG AC(4); G(! ACC ()); AC(2); G (C+1){ G(!C){ C=TG=3; CG= 1; TA =GG; TC=CAA; } GCA; TT= TG; A(A(A(A( ++TT; A=CG ^=(TT&=15)&3? 1:2; CTT =TT/4 ; CGA=CTT%2*3^3^TT%4 ; AAG=TA>> 2*TT; A=CG^AAG; GG(TT^TG,GTC=TT) CGAC(GTC &&A&2?134: 138,TT &0,6,6,A&1 ?0 :5) ; CGAC(128 |A %2* 3,A&2?3:0,11,3,0) ; ))))CAT ; G(TA/2&!TG)GA GTCA( GCA,CAA/4&16, TCA); )C=CC-114; TT=0; A(G(GC()&&TC &&C+114 ==( CA& 2?AGG) ) { --TC; TG&1&& (A^=2-AT(A )); C=TCA; A(A(T=0; { GG(1,TG); G C; A(A(A(A(A( A(TCT(T%6,T%11,32+55*(ACG[11*AT(TT)+22*AT(A)+( (A^2)& (C=TT/2^TG& 1?2:1) ?65-T:T)%11] >>(3-A&3 -C?65-T:T)%6& 1)); T++; ))))))TT++; AAA; } C+=1 <<16; G(C>TCA); ))CG^=CA; TA ^=1<<AT (AAG)+TG*2; TG ^= CTG>>AC; } ) } GA TAG; }

引用元：https://www.ioccc.org/2006/night/night.c

審査員・作者による説明：https://www.ioccc.org/2006/night/hint.text

動作

パズルゲームの生成。 作者は迷路と言っている。

$ gcc -o night night.c -lncurses

$ ./night

4x4の矢印は、青と緑で市松模様に塗り分けられている（左上は青）。 初期盤面では左上の矢印が太字（少し明るい青）で描画されていて、これは現在地であることを表している。 w、a、s、dで上左下右の隣の矢印に移動できるが、現在地の矢印の方角にしか移動できない。 現在地が左上なら、左か下だが、左は画面端なので移動できない。 そして、青い矢印を離れるとき、その矢印は時計回りに90度回転する。 緑の矢印から離れると反時計回りに回転する。 これを繰り返して、左上矢印から右上矢印に到達するのが目的。

解説

迷路生成を遺伝的アルゴリズムで行っている。 遺伝子は32ビット整数で、交叉はなく突然変異のみ（ランダムに3ビット変える）、解答にもっとも長い手数がかかる盤面の遺伝子だけが生き残る、という設定で、手数が64以上になる盤面を生成するとのこと。

コードは遺伝子の形状。自己生成プログラムではない、とhint.textに書いてある。 識別子はAGTCのようなものばかり。DNAの塩基の4種類（アデニン、グアニン、チミン、シトシン）。 512回の繰り返し処理をループではなくマクロ展開で行っている。 プリプロセスをしたときに巨大になって解読しにくくするために意図的にそうしたとのこと。 そのためコンパイルに少し時間がかかる。

---

チート攻略方法。マクロCCCの定義をrand()から次に置き換える。

#define CCC 2461325420^7

これで、盤面を固定できる。

この盤面の攻略は次の通り。自分の環境ではペーストで動いた。

sdsdaadswdaddadsawaadswdaddwswsadswwwswsswsaaasddaadwswdaddswww

なお、この解は探索によって求めた。

これにより、次のような5フレームのアニメーションでメッセージが出てくる。

  C

  C        G

  C        G        T

  C        G        T        A

  C  O  N  G  R  A  T  U  L  A  T  I  O  N  S

ちなみにこのメッセージは、コード中のT(...)のマクロ内にあるAGTCの出現でエンコードされている。 デコード方法はmain関数（マクロGAT）の冒頭。GTTを（ポインタAGT経由で）破壊的に書き換えているあたり。 デコード方法はわかるが、該当メッセージが埋め込まれているあたりは普通に意味のあるコードに見えるので、どうやって作ったのかわからない。