#include<stdio.h> #include<stdlib.h> #include<unistd.h> //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ //@ // char _int[]={37,99,0,10,0,71,111, 111,100,98,121,101,32,58,45,41,10,0,27,91, 72, 27, 91,74,0,27,91,37,100,59,37, 100,72,0,27,91,37,100,109,0,0,0,-30,-108, -125,0,- 30, -108,-127,0,-30,-108,-109,0, -30,-108,-113,0,-30,-108,-101,0,-30,-108, -105,0, 33, 0x20,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 ,0,0,0,0 ,0,0 ,0,0,0};main(){void* y3=stdout,*s0=stdin,*(*mv)(size_t)=& malloc;int qq_,*hh, qf,(*g4) (void*)=&fflush,(* z1)(const char*,...)=&printf,(*p0)(int)= &putchar,c=0, i,dd,sz,h ,s,e,pr,*trundle,* vp5,*nqd,oo[10];char*p5;goto cow;pic:g4(y3 ); sz=dd*h; hh=mv( sizeof(int)*sz); z1(_int+18);goto china;tokyo:;if(qq_== qf) goto ten ;c=hh [ qq_++]; oo[0]=dd;oo[1]=h;oo [2]=c%dd;oo[3]=c/dd;oo[4]=0;{int x= oo[2], y=oo[3],dd=* oo,h= oo[1],i=x+y*dd;if(x+ 1<dd&&(p5[i+1]==32||p5[i+1]==33)) oo[5+oo[4]++ ]=i+1;if( x-1> -1&&(p5[i-1]==_int[66] ||p5[i-1]==_int[67]))chew: oo [5+oo[4]++]=i -1;if(y+1<h &&p5 [i+dd]==_int[67]||p5[i +dd]==_int[66])oo[5+oo[4]++]= i+ dd;if(y-1>-1&& p5[i-dd] ==_int [67]||p5[i-dd]==_int [66])chun:oo[5+oo[4] ++]=i -dd;}if(c&1?nqd [c]:vp5[c] ) goto tokyo;wow:;if(oo[4]-- <=0) goto chin;i=oo[5+oo [4]]; if((i&1?vp5[i]: nqd[i])==0 ){ trundle[i]=c;usleep( 25000) ;g4(y3);z1(_int+34 ,_int[ 67]);z1(_int+25, 1+i/dd,1+i% dd); p0(88);if(i==e)goto z; i&1?(vp5 [i]=1):(nqd[i] =1);hh[ qf++]=i;}goto wow;chin:c &1?( nqd[c]=1):(vp5[c]=1); goto tokyo; z:;z1(_int+34, 36);z1( _int+25,1+e/ dd, 1+e%dd) ;p0( 33);tww:;if(trundle [i]==s)goto ten;i=trundle [i]; usleep(50000) ;z1( _int+34,35 );z1( _int+25,1+i/dd, 1+i%dd);p0(47) ;g4(y3);z1( _int+34 ,33);z1(_int +25,1 + s/dd,1+s% dd);p0 (95);goto tww;ten:;z1(_int +25,h+3,1); g4(y3); goto pio; cow:; {int c=0;s=e=-1 ;char** strs=mv (1000),d;h=0;for(; h<1000;){ char*s= mv(512);if (fgets (s, 512, s0) || feof(s0)) { dd= strlen(s)>dd?strlen( s):dd; strs[h]= s;h+=1;if (feof(s0 ) &&(h--|1))goto tau;}else goto ten; }tau:p5=mv(dd*h);for( int i=0; i<dd*h;i +=1)p5[i] =040;for (int i =0;i<h;i ++){ memcpy(p5+i*dd,strs[i], strlen( strs[i])) ;for(int q=0; ((d=strs[i][q]) ||1)&&q<dd&&((d== 64?s=i*dd+q:d==33?e=i *dd+q:d== 10?p5 [i*dd+q]= 040:13)||1);q++); } if(s==-1||e==-1)goto ten; goto pic;}china:;for(int r=0;r<sz; r++){z1(_int+ 25,1+(r /dd),1+r%dd);p0(p5[r]);} trundle=mv(sizeof(int)*sz);vp5=mv(sizeof(int)*sz);nqd = // mv(sizeof(int)*sz);trundle [s]=0;hh[0]=s;qf=1;qq_=0;goto tokyo;pio:; //! // (_int[0]=27)&&(_int[1]=91)&&(_int[2]=48)&&(_int[3]=109)&&(_int[4]=10)&&(_int[5]=0)&&z1(_int);}

引用元：https://www.ioccc.org/2019/karns/prog.c

審査員・作者による説明：https://www.ioccc.org/2019/karns/hint.html

動作

幅優先探索で迷路を解く。

$ gcc -o prog prog.c

$ ./prog < maze

@がスタート、!がゴール。 到達したところはXで表示され、アニメーションで徐々に探索範囲が広がっていく。

ゴールに到達したら、ゴールからスタートに向かって最短パスが表示される。

解説

探索を行っているアニメーションが面白いので実際に実行して欲しい。

幅優先探索を行うので遅いとのこと。 A*も作ったが大きすぎたらしい。

コード自体も迷路として解ける。

$ ./prog < prog.c

賞名は[[2019/endoh]]、[[2019/giles]]と対称的になっている。