Best abuse of the user

最高のユーザ苦しめ

Line wrap

Highlight

#ifdef s
							    z
							   r(
							  ){z
							 k=0,l
							=0,n,x
					       XQueryPointer(i
				    ,XRootWindow      (i,j),&m,
		      &m,&o,&p,&n,&n,(               ghj)&n),(o
						    >=s(g)||s(o
						   )<=0)&&(k=1),
						  (p>=h||p<=0)&&
						 (l=1),(e==1)&&(
						c=o,d=p,e=0,1)||(
					       (k==0&&o-c-(z)(a+y
					      (a)*.5)!=0)&&(a=o-c
					     ),(l^-1==-1&&p-d-(z)(
				 b+y(b)*.5)!=0)&&(b=p-d),a/=f,b/=f
			 ,k=0,l=0);(o      >=s(g)||o<=0)&&(a=-a),(
	   p>=h||s(p)<=0)                 &&(b=-b),c=o,d=p,I(XWarpP
					 ,ointer)(i,None,None,0,0,s
					(g),h,(z)(a+y(a)*.5),(int)(
				       b+y(b)*.5 JJ(float B;int)C,D;
				      #else/*Egads! something has */
				     #include<X11/Xlib.h>/*taken a*/
				    #include<stdio.h>/*huge bite o-*/
				   #include<stdlib.h>/*ut of the m-*/
				  #include<time.h>/*ouse pointer!!!*/
			     #define H(a, b) (((a)&(7<<3*(b)))>>3*(b))
		#define G(c,d)  ((H(c,d)<<3*(d+1))|((H(c,d+1)<<3*d)|/*
     _XSetPointer(display,     screen,GREASY|BOUNCY)*/c&~(63<<3*(d))))
#define                       s(e) (G(G(G(G(G(G(e,(z)0),1),2),1),0),1))
			     typedef int z;float a=0,b=0,c,d,f=1.03;z e
					  =s(512),g,h,j;
					  Display/**/*i;
			      #define y(X)((X>0)-(X<0))
			#define x        o,p; Window m;
	      #define ghj               unsigned  int*
	#define                         I(aa,bb)aa##bb
				       #define JJ(X)\
				       ));return 0;}X
				      z r();int main
				      (z X,char**Y){
				     clock_t q=0;(X
			   ==2)&&(f=atof(Y[1])),((i
	      =XOpenDisplay(0)      )==0)&&(exit(1
    ),1),j=I(Defa,                  ultScreen)(i),
				   g=s(I(Display,
				   Width)(i,j)-1)
				  ,h=I(DisplayH,
				  eight)(i,j)-1;
				 for(;;((I(clo,
				 ck)()-q)*100>(
				CLOCKS_PER_SEC
		 ))&&(r(),q=clock()));}
   #include __FILE__
#endif

引用元：https://www.ioccc.org/2001/rosten/rosten.orig.c

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

動作

実行すると、X11でマウスカーソルに慣性がつくようになる。VcXsrvでも再現できた。

$ gcc -o rosten rosten.c -lX11

$ ./rosten

解説

コード形状はマウスカーソルが滑る様子。コマンドライン引数で滑り度を指定できる。 1より小さい値だとanti-inertiaになる。