Landon Curt Noll
2ba12ecc3c
Under each yyyy/dir there is a file of the form '*.orig.c' containing the original source code, or as close as we can get to the original source code.
116 lines
3.0 KiB
C
116 lines
3.0 KiB
C
#include <X11/Xlib.h>
|
|
#define M typedef
|
|
#define N( a)=r=(a)+j
|
|
#define S f(; G; )D[B[R=i[--G]]=F+=F<p]++
|
|
#define f for
|
|
#define g [H]
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
M short a; M int b; M
|
|
unsigned c ; M unsigned
|
|
char*d; M XPoint *e; M void
|
|
_; b*h,*i,j,k,l,m,n,o,p ; b O; d A
|
|
,B,C; _*q,*r,*calloc(); e s ,t; Window
|
|
u,v; GC x[256]; b D[256]; b w,y, z;_ Q(b E)
|
|
{ XMapWindow(q,v=XCreateSimpleWindow(q, XRootWindow
|
|
(q,z=XDefaultScreen(q)),!v*n,0,n,n,0,0,0)); XSelectInput
|
|
( q,v,E); } _ P(){ C N(h N(i N(s N(t N(A N(B=calloc(C-B+256,1)
|
|
) )) ))); } _ J(){ b F,G,H; c R =w %4; F=G=m; f(H=0; H<j
|
|
; H++){ h g =l+(R-2?R?R-1?(G-F*F/n)+F*n:(G*G-F*F)
|
|
/m*n+2*F*G/ m: 2*(F*F- G*G)/m+4*F*G/m*n:G+
|
|
F*n);( s g. x= m-F--,s +H) ->y=m-G;F=
|
|
F+m?F:(G--, m);}} _ K(){ b H,R;
|
|
f(H=0;H<j;H ++)D[ B g=(c)(R
|
|
=h g+k)< j? (A[ R]<p)+A
|
|
|
|
|
|
[R
|
|
]:
|
|
1]
|
|
++
|
|
; } _ I ( d F)
|
|
{ F?(_)0:(_
|
|
) (F=B,
|
|
gets(
|
|
B))
|
|
;
|
|
|
|
y=atoi(F);} _ Y(){ b F,
|
|
G; c R ; F = G = 0; K( );
|
|
f( R = k + l ; R < j && ( F =
|
|
B[ R ] ) < p; R = h [R ] + k) { D
|
|
[ F ] -- ; B [ i [ G ++ ] =R ] =p; } if
|
|
( R >= j) F = 1; S; } _ L() { b H, F,G; c R ;
|
|
f( H =0; H < j; H ++) B g =0; O =-1; f( G = R = 0;
|
|
R < j; R++ ){ f(; R < j && !( F = B[ R ]); R = h[ R ]
|
|
+ k) B [i[ G ++] = R ] = p; S; } } _ U() { e X [ 256 ]
|
|
,W; b H; W = t; f ( H = 0; H < o; H ++ ) { X g =
|
|
W; W +=D g ;} f( H =0; H < j; H ++) if(
|
|
A g - B g) * X[ B g ] ++ = s g; {
|
|
XMotionEvent * V = r = t ; W
|
|
= t; f ( H = 0; H < o
|
|
; H ++ ) { XDrawPoints
|
|
|
|
|
|
(q ,
|
|
v ,x g,
|
|
W,X g -W,
|
|
CoordModeOrigin
|
|
) ; W += D
|
|
g ; D g
|
|
|
|
= 0 ;
|
|
} f(;
|
|
XPending(q)+!
|
|
++O; V->type-
|
|
ButtonPress?(
|
|
k =V
|
|
->x+
|
|
|
|
|
|
V -> y * n - l) : (
|
|
O = - 42 ) ) XNextEvent ( q , r
|
|
= V ) ; } } _ main ( b X , d * W ) { b H, F
|
|
,G; c R; if ( X < 3 ) { puts( "tvr: mode size < cmap"
|
|
); exit(0);} P(); I(*++ W); w = y %12; I(*++ W); n = y *2; j
|
|
= n * n ; P ( ) ; m = y ; l = j / 2 + m
|
|
; q=XOpenDisplay ( 0 ) ; Q ( 0 )
|
|
; u = v ; Q ( PointerMotionMask
|
|
|ButtonPressMask ) ; I ( 0 ) ; o
|
|
=y ; p = o -1 ; { XColor F ;
|
|
Colormap G; f ( H = 0 ; H < o
|
|
; H++){ I(0); XParseColor(q,G
|
|
=XDefaultColormap ( q , z ) , r =
|
|
B , & F ) ; XAllocColor
|
|
(q , G , & F ) ;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
XSetForeground
|
|
(q,x g = XCreateGC
|
|
( q, u ,0 , 0 ) , F
|
|
.pixel ) ; } } P ( ); J (); f
|
|
( F =R = G =H = 0; H < j; )
|
|
if(++F >= p || ( R = h [ R ]
|
|
+G)>=j ) { D [ B g = F ] ++; R
|
|
= l + k; G= ++H -R;
|
|
F =0; } H=j; U(); v=
|
|
u; f(F=w/4; ; A+=H-=H+H,B-=H
|
|
)(O<0?L:*("tvr@cs.hut.fi."
|
|
+7*F)?F^1?Y:K:L)()
|
|
,(U)(); }
|