Don't tread on me award

俺を踏みにじるな賞

Line wrap

Highlight

					    #define d =strtoul(z,NULL,0));
					       #define m(n) COLOR_%:%:n
					           #define v stdscr

					          #define q mvaddch(
					           #define Z(x) %:x
					   #define F(x)z=getenv(Z(x)); z&&(
		       #define J Z(X:%d/%d Y:%d/%d S:%zu/%zu B:%zu\n),Y,y[-2],X, *y, A, g, c );
					          #include  <curses.h>

					          #include  <unistd.h>
					          #include    <time.h>
					          #include  <stdlib.h>

    typedef size_t  a;  typedef  unsigned	long k; static a	g= 997,c,A=5,I,N=5	,G=5; static k  p <:5:>=
    <% 1   %>,W = 300;  static int Y,X,*j	=(int<:8])<% 231	%>,*U, *V,*e,*n, Q	,P,x,*y,l=4, * D; static
    void b(a h) { c+=h	; mvprintw(0, 0,J	} static int  E(	const char  * L)<%	static int h; !h&&endwin
    (); h=l; L&&puts(L	); return 1;    }	static void  C (	int L, int    h) {	attroff(m(PAIR(L))); h&&
    attron(m(PAIR(L)))	; } static int	R	(int h, int L) {	return (rand  () %	(L - h + 1))+h; } static
    void S(a o){static  const char*s  =Z(	; +<>^v); q n[0]	,e[0],' '); A = f(	A+o,g	); if (A >= g) {
    E(Z(YOU WIN!));  Q  = l; return; } C(	3, 1); for (I  =        0; A && I < A -  1	; ++I) { I && q n[I], e[
    I], 'o'); e[I] = e	[I + 1]; n[I] =n[	I+1]; } A > 1 &&	q n[I],e[I], 'o');	e[I] = Y; n[I]= X; while
    (++I < g) e[I] = n	[I] = 0; C(2, 1);	q X,Y,s[*D+2& (1	<<3)-!Q]); }static	void B(a o){ if (o) { S(
    N); b(1); } if (Q)	return; p[1] = 0;	!o && q*U,*V,' '	); x: y[3] = R(1,y	[-2]-1); y[2] = R(2,*y-1
    ); for (I = 0; I <	A; ++I) if (*V ==	e[I] && *U == n[	I]) goto x; }  int	main(void) { char *z; y=


    j+3; void (*H[])(a	)={b,S,B} ; srand	((unsigned)time(	NULL));if(!initscr	( ) )  return  puts (Z (
    curses error)  ) ;	getmaxyx(v, *y, y	[-2]); --*y; --y	[-2]; if(y[-2]<9||	* y < 9 )  return   E (Z
    (screen too small)	); F(MAXSIZE)g  d	g = f((a)((*y-2)	*(y[-2]-2)),g); F(	GROW)N d  F (SIZE) A d F
    (WAIT)y [-3]=(int)  strtol(z,NULL,0))	; F(EVADE)W d U=	y+2; F(WALLS) *p d	F(CANNIBAL)p[4] d F(SHED
    ) p[3]  d F	(SHEDS	)G d e = calloc	(	g+1,sizeof * e);	n = calloc (g +  1	,sizeof *n); if (!e || !
    n)  return  E  ( Z  (memory error)) ;	V=U+1; Y = y[-2]	/ 2; X = *y / 2; D	 = 1 + V; attron(A_BOLD)
    ; curs_set(0);nonl  (); intrflush(v,0	); keypad(v, 1);	noecho(); cbreak()	;start_color();init_pair

    ( 1, WALL , WB ) ;	init_pair(2,HEAD,	HB); init_pair(3	, BODY, BS); S(0);	B(0);	x:  if	     (Q)

						       #undef d

    goto  y ; x = *y ;	getmaxyx(v,1[y],y	[ - 1 ] ); C(1,1	); mvhline(1,0,'#'	,y[-2]); mvvline(1,0,'#'
    ,*y); mvhline(*y,0	, '#' , y [ -2]);	mvvline(1,y[-2],	'#', *y); C(1,0) ;	q *U,*V,'*');  (*H) (0);
    refresh(); timeout  ( y  [ - 3  ] ) ;	switch	(getch()	){ case KEY_LEFT:V	[ 1 ] = l - 3 ;   break;
    case KEY_RIGHT: V[	l/l] = l/2; break	; case KEY_UP:V[	l-3] = l-1; break;	case KEY_DOWN: V[l/4]=l;
    break;  case  'q':	case'Q':Q=l; case	' ':(!P && (P =1	))||(P=0); default	:x = 0;	} if(x) P=!*y;if


    (Q||P)goto x; if(!	Q && ! 1[V]) goto	x; switch (1[V])	{ case 1:--Y;break	; case  2 : ++ Y;  break
    ;  case 3:   -- X;  break;	case 4:++	X; break; } if (	Y <1 || Y >= y[-2]	|| X < 2 || X	>= *y ||
    y[-2] >= y[-1] ||*	y >= 1[y]) { if (	*p && !(*y>=1[y]	||y[-2]>=y[-1])) {	if (Y<1||Y >= y[-2]) Y =
    Y<1?y[-2]-1:1; if(	X<2||X>=*y) X = X	<2 ? * y -1:2; }	else<% E(Z(OUCH!))	; goto y; } } for (I = 0
    ; !4[p] && I <  A;	++I) if (Y == e[I	] && X == n[I]){	E(Z(OW!)); goto y;	} if (Y == *V && X == *U
    )B(1); else {  if(	W&& !(++1[p] % W)	) H[2](0); if (3	[p]) { if (!(++p[2	] % 3[p])) { H[1](G); 2[
    p]=0; } else S(0);	} else  S (0);  }	goto x; y:E(NULL	); printf(J free(e	); free(n); return 0;  }

引用元：https://www.ioccc.org/2020/ferguson1/prog.c

審査員・作者による説明：https://www.ioccc.org/2020/ferguson1/index.html

動作

snake game。

$ gcc -D_XOPEN_SOURCE -D_POSIX_C_SOURCE -D'f(a,b)'='((a)<(b)?(a):(b))' -DWALL='COLOR_CYAN' -DHEAD='COLOR_RED' -DBODY='COLOR_GREEN' -DWB='COLOR_BLACK' -DHB='COLOR_BLACK' -DBS='COLOR_BLACK' -DBG='COLOR_WHITE' -DBB='COLOR_BLACK' -o prog prog.c -lcurses

$ ./prog

<が蛇の頭（向きによってキャラクタが変わる）。上下左右で移動、スペースでポーズと再開、qで終了。 *が虫で、これを餌として集める。

解説

環境変数でいろいろな設定が可能。

WALL=0としたら、壁に当たると死ぬ（デフォルトではトーラスになっている）
CANNIBAL=0としたら、自分自身に当たっても死ななくなる（デフォルトでは当然死ぬ）
SHEDだけ動くごとにSHEDSだけ胴体が伸びる
胴体の長さの初期値はSIZE、MAXSIZEまで伸びたら勝利（SIZE=-1とすれば即時に勝利）
WAITを小さくするとすべてが速くなる
EVADEを小さくすると虫の位置が変わるスピードが速くなる

ドキュメントがとんでもなく長い。

$ wc *.markdown COMPILING HACKING HISTORY README
   293   2657  14817 bugs.markdown
   170   1067   6293 chocolate-cake.markdown
   773   4555  34107 gameplay.markdown
    52    150   1161 judges.markdown
   773   4555  34107 remarks.markdown
   890   7762  42421 spoilers.markdown
   328   1955  11850 terminals.markdown
   409   3027  16822 troubleshooting.markdown
   595   4570  27663 COMPILING
   515   3643  20407 HACKING
   132   1543   8186 HISTORY
   148   1385   7640 README
  5078  36869 225474 total

コード形状は、遊んでいたらなんとなくできたパターンらしい。全体の行数やブロックの行数が素数になっている。

賞名は、アメリカの昔の軍人クリストファー・ガズデンがデザインしたアメリカ軍旗（ガズデン旗）に基づく。