Most Well Rounded

もっともよく練り上げられている

Line wrap

Highlight

/** J.K.Bonfield **
^	<						 	 							
^	>						 	 							
<			#				>						v		
<			 				 			<					
<			>				>			<		v		
X			 				 			X				j
x			 				 			X				j
X	 						x	^						k
^	 						 	^							
^	#						 									
X			 				X			X				X

^	v						 	 							
v						 	 						v		
v						#	 									
v						X	 						 		
v						x	 						 		
>				#			<						v		
>				 			 				>				
X				 			 				X			l
x				 			 				X			l

41 20
########################################
#                                      #
#  <   <   <   <   <>  <   <   <       #
#       >   >   >  <>   >   >   >   >  #
#  <   <   <   <   <>  <   <   <       #
#       >   >   >  <>   >   >   >   >  #
#  <   <   <   <   <>  <   <   <       #
#       >   >   >  <>   >   >   >   >  #
#                                      #
#                                      #
#                                      #
#                                      #
#                                      #
#                                      #
#                                      #
#                                      #
#                                      #
#                                      #
#           X                          #
########################################*/
#include <stdio.h>
#include <curses.h>
#include <stdlib.h>
#include <setjmp.h>
#include <sys/time.h>
int _tty_ch;
bool _echoit;
bool _rawmode;
SGTTY _tty;
#define U char
#define G for(
#define I )malloc(sizeof(

typedef struct z {U x[20]; struct z*y; } j; j*J[2][256];
struct timeval v= {0,1<<17} ;
U**X,c,*P="noopoqqnr",d;

j*a(int Q, int i) {
    G
    clear(),noecho(),cbreak(); ;
)

{
    int x=0,y=0,W=Q,Q=i-1,k;
    G;
    y<=Q;
    (mvaddch(y,x,X[y][x]),++x^W-1)||(x=0,y++));
    k=y=- --x;
    G
    refresh(),c=select(k,&y,0,0,&v)?getch():0;
    k?++x-W||(x=1,++y-Q||(--k,x=W-1,y=Q-1)):--x||(y--,x=W-1),k|y;
)

{
    j *t;
    G
    t=J[1-k][X[y][x]]; t; t=t->y) {
	U*f=t->x;
	if (d==f[17]|f[17]==c) {
	    int i=k&2,u=9,k=1,w=x,_=y,T;
	    G;
	    --u||(d-f[8]&&(X[y][x]=f[8]),w---_--,i=0,u=8,k--);) {
	        _+=P[T=i>u?u:i]-'o';
	        w+=P[4+T]-'p';
	        if(k) {
		    if (d-f[i]&&f[i]-X[_][w]) break;
		        i++;
	        } else
		    f[++i+8]-d && (X[_][w]=f[i+8]);
}   }   }   }   }   }

jmp_buf E;

int main(int open, U**exit) {
    FILE*C=fopen (
	open-2?__FILE__:*++exit,P+8);
	j*t;
	volatile int Q,Y=0;
	int i,q; d=open-2?'\t':'*'; L:

	Q=0; G; setjmp(E)<256; Q--
    )
    longjmp(E,(J[Y][Q]=0,Q++));
    G; ; ) {
	if(!C)return 1;
	if('\n'==(c=getc(C)))
	    if(!Y++)goto L; else
	    {	fscanf(C,"%d %d\n",&i,&q);
		X=(U**I P++)*q*(i+1));
	    Q=0; G; Q<q; Q++)
        X[Q]=(U*)&X[q]+Q*i;
    
	fread(*X,(initscr(),q*i),1,C);
	a(i,Q);
    }
    t=(j*I*a(Q--,--Q)));
    t->y=J[Y][c]; J[Y][c]=t;
    fgets(t->x,20,C); }
}

引用元：https://www.ioccc.org/1993/rince.c

審査員・作者による説明：https://github.com/ioccc-src/winner/blob/main/1993/rince.hint

動作

セルオートマトンに基づいたゲーム詰め合わせ。次のようにコンパイル・実行する。

$ gcc -o rince rince.c -lncurses

$ ./rince

デフォルトではシューティング。jで左、lで右、kでミサイル発射。連射できないよう、1回撃ったら1度動かないと次が発射できない。

########################################
#                                      #
#      >   >   >   ><   >   >   >   >  #
#    <  <  <  <  <      <  <           #
#      >   >   >      v>   >   >   >   #
#    <  <  <  <  <  <  <v> <           #
#   >   >      >          v>   >   >   #
#    <  <  <  <  <  < ><v <            #
#v                    v     v          #
#                   vv                 #
#v v              vv                   #
#v              vv                     #
#v v v        vv                       #
#  v v      vv                         #
#v v       v       ^                   #
#v v   v                              v#
#     v  v                             #
#v   v   v v                         v #
#v  v  v           x                  v#
########################################

./rince rince.data1で起動するとブロック崩し。,で左、/で右、.でボール発射。

###################################
#                                 #
#$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$#
#$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$#
#$$$$$$$$$$$$$#$$$#$$$$$$$$$$$$$$$#
#$$$$$$$$$$$$$#$$$#$$$$$$$$$$$$$$$#
#$$$$$$$$$$$$$#$$$#$$$$$$$$$$$$$$$#
#                                 #
#                                 #
#      #   #    #        \        #
#      #   #                      #
#      #   #                      #
#                                 #
#                                 #
#                                 #
#                           ====  #
#                                 #
-----------------------------------

./rince rince.data2では[[1991/rince]]と同じパズルゲームができる。

######################
#do#.......#..o.o.#..#
#oo#.#K###.#j.#.#.#h.#
#.@..#..H.....hh#.#od#
#oo..H..####k#d...#.o#
#######J#o.#..o#.##.o#
#dd##oo.#o.###ddo#...#
#.Od###.#.o####do#..d#
#.o.H........#####o..#
#.oo##..#O....O.O.O.o#
#d..#ooooO.o#...O....#
######################

./rince rince.data3は倉庫番のステージ11、./rince rince.data4はステージ13。

.         ####
     #### #  #
   ### o###m #
  ##      m  #
 ##  m mm## ##
 #  #m##     #
 # # m mm # ###
 #   m #  # m #####
####    #  mm #   #
#### ## m         #
#.    ###  ########
#.. ..# ####
#...#.#
#.....#
#######

解説

データファイルはセルオートマトンのルールを書いたもので、これによってゲームをエンコードしているとのこと。

コードは、先頭にシューティングのマップがあることを除けば、細かい難読化テクニックが中心で、わりと普通に見える。 #define I )malloc(sizeof(として(j*I*a(Q--,--Q))と書くのは小洒落ててちょっと面白かった。

現代で動かすには2点の修正が必要だった。

SGTTYという型は現代では消滅しているようなので単にintに置き換えた。
rince.hintによると、selectの挙動にSunOSとLinuxで互換性の問題があるようで、hintにあるとおりに修正した。

パッチ

--- rince.c
+++ rince.c
@@ -50,7 +50,7 @@
 int _tty_ch;
 bool _echoit;
 bool _rawmode;
-SGTTY _tty;
+int _tty;
 #define U char
 #define G for(
 #define I )malloc(sizeof(
@@ -71,7 +71,7 @@
     (mvaddch(y,x,X[y][x]),++x^W-1)||(x=0,y++));
     k=y=- --x;
     G
-    refresh(),c=select(k,&y,0,0,&v)?getch():0;
+    refresh(),c=select(k,&y,0,0,(v.tv_usec=1<<17,&v))?getch():0;
     k?++x-W||(x=1,++y-Q||(--k,x=W-1,y=Q-1)):--x||(y--,x=W-1),k|y;
 )

パッチをダウンロード