blob: 9f5f22044e0aa605abdaf811e61120502f8e3044 (plain) (blame)

ofs	hex dump	ascii
0000	4e 75 6c 6c 73 6f 66 74 20 41 56 53 20 50 72 65 73 65 74 20 30 2e 32 1a 00 15 00 00 00 1f 00 00	Nullsoft.AVS.Preset.0.2.........
0020	00 1b 00 00 00 53 50 49 4e 44 4c 45 20 62 79 20 45 4c 2d 76 69 73 20 20 28 63 29 32 30 30 34 00	.....SPINDLE.by.EL-vis..(c)2004.
0040	03 00 00 00 08 00 00 00 19 00 00 00 00 00 00 00 28 00 00 00 04 00 00 00 02 cc 01 80 24 00 00 00	................(...........$...
0060	ff 02 00 00 01 00 00 00 00 06 02 00 00 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 31 31 29	.............assign(gmegabuf(11)
0080	2c 68 2f 77 29 3b 0d 0a 66 7a 3d 66 7a 2b 62 6d 7a 3b 6d 7a 3d 30 2e 38 2b 30 2e 34 2a 73 69 6e	,h/w);..fz=fz+bmz;mz=0.8+0.4*sin
00a0	28 66 7a 29 3b 0d 0a 72 74 78 3d 69 66 28 65 71 75 61 6c 28 72 74 78 2c 72 72 78 29 2c 72 72 78	(fz);..rtx=if(equal(rtx,rrx),rrx
00c0	2c 72 74 78 2b 39 29 3b 0d 0a 66 72 78 3d 66 72 78 2b 62 66 72 78 3b 72 78 3d 34 30 2a 73 69 6e	,rtx+9);..frx=frx+bfrx;rx=40*sin
00e0	28 66 72 78 29 2b 72 74 78 3b 0d 0a 66 72 7a 3d 66 72 7a 2b 62 66 72 7a 3b 72 7a 3d 34 30 2a 73	(frx)+rtx;..frz=frz+bfrz;rz=40*s
0100	69 6e 28 66 72 7a 29 3b 0d 0a 0d 0a 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b	in(frz);....rx=rx+rdx;ry=ry+rdy;
0120	72 7a 3d 72 7a 2b 72 64 7a 3b 0d 0a 78 73 3d 73 69 6e 28 72 78 2f 70 33 29 3b 79 73 3d 73 69 6e	rz=rz+rdz;..xs=sin(rx/p3);ys=sin
0140	28 72 79 2f 70 33 29 3b 7a 73 3d 73 69 6e 28 72 7a 2f 70 33 29 3b 0d 0a 78 63 3d 63 6f 73 28 72	(ry/p3);zs=sin(rz/p3);..xc=cos(r
0160	78 2f 70 33 29 3b 79 63 3d 63 6f 73 28 72 79 2f 70 33 29 3b 7a 63 3d 63 6f 73 28 72 7a 2f 70 33	x/p3);yc=cos(ry/p3);zc=cos(rz/p3
0180	29 3b 0d 0a 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 31 29 2c 78 73 29 3b 61 73 73 69 67	);..assign(gmegabuf(1),xs);assig
01a0	6e 28 67 6d 65 67 61 62 75 66 28 32 29 2c 79 73 29 3b 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75	n(gmegabuf(2),ys);assign(gmegabu
01c0	66 28 33 29 2c 7a 73 29 3b 0d 0a 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 34 29 2c 78 63	f(3),zs);..assign(gmegabuf(4),xc
01e0	29 3b 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 35 29 2c 79 63 29 3b 61 73 73 69 67 6e 28	);assign(gmegabuf(5),yc);assign(
0200	67 6d 65 67 61 62 75 66 28 36 29 2c 7a 63 29 3b 0d 0a 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75	gmegabuf(6),zc);..assign(gmegabu
0220	66 28 37 29 2c 6d 78 29 3b 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 38 29 2c 6d 79 29 3b	f(7),mx);assign(gmegabuf(8),my);
0240	61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 39 29 2c 6d 7a 29 3b 0d 0a 61 73 73 69 67 6e 28	assign(gmegabuf(9),mz);..assign(
0260	67 6d 65 67 61 62 75 66 28 31 30 29 2c 64 73 74 29 3b 00 79 00 00 00 62 74 3d 69 66 28 65 71 75	gmegabuf(10),dst);.y...bt=if(equ
0280	61 6c 28 62 74 2c 32 30 29 2c 30 2c 62 74 2b 31 29 3b 0d 0a 72 72 78 3d 69 66 28 65 71 75 61 6c	al(bt,20),0,bt+1);..rrx=if(equal
02a0	28 62 74 2c 30 29 2c 72 72 78 2b 31 38 30 2c 72 72 78 29 3b 0d 0a 62 66 72 7a 3d 72 61 6e 64 28	(bt,0),rrx+180,rrx);..bfrz=rand(
02c0	31 30 29 2f 33 30 30 3b 0d 0a 62 66 72 78 3d 72 61 6e 64 28 31 30 29 2f 33 30 30 3b 0d 0a 62 6d	10)/300;..bfrx=rand(10)/300;..bm
02e0	7a 3d 72 61 6e 64 28 31 30 29 2f 31 30 30 3b 00 5f 00 00 00 6e 3d 31 3b 6d 78 3d 30 3b 6d 79 3d	z=rand(10)/100;._...n=1;mx=0;my=
0300	30 3b 6d 7a 3d 30 2e 39 3b 64 73 74 3d 31 2e 35 3b 0d 0a 72 78 3d 30 3b 72 79 3d 30 3b 72 7a 3d	0;mz=0.9;dst=1.5;..rx=0;ry=0;rz=
0320	30 3b 72 64 78 3d 30 3b 72 64 79 3d 30 3b 72 64 7a 3d 30 3b 0d 0a 70 3d 61 63 6f 73 28 2d 31 29	0;rdx=0;rdy=0;rdz=0;..p=acos(-1)
0340	3b 70 32 3d 32 2e 30 2a 70 3b 70 33 3d 31 38 30 2f 70 00 00 00 00 00 01 00 00 00 00 00 00 00 01	;p2=2.0*p;p3=180/p..............
0360	00 00 00 24 00 00 00 61 03 00 00 01 37 02 00 00 76 74 3d 76 74 2b 31 3b 76 64 3d 76 64 2b 31 3b	...$...a....7...vt=vt+1;vd=vd+1;
0380	70 74 3d 31 2d 70 74 3b 0d 0a 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 76 64 29 2c 69 66	pt=1-pt;..assign(gmegabuf(vd),if
03a0	28 62 6f 72 28 65 71 75 61 6c 28 66 63 74 2c 30 29 2c 62 29 2c 28 67 65 74 6f 73 63 28 69 2c 30	(bor(equal(fct,0),b),(getosc(i,0
03c0	2e 31 2c 30 29 2d 67 6d 65 67 61 62 75 66 28 76 74 29 29 2f 35 2c 69 6e 69 74 2a 67 6d 65 67 61	.1,0)-gmegabuf(vt))/5,init*gmega
03e0	62 75 66 28 76 64 29 29 29 3b 0d 0a 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 76 74 29 2c	buf(vd)));..assign(gmegabuf(vt),
0400	69 6e 69 74 2a 67 6d 65 67 61 62 75 66 28 76 74 29 2b 69 6e 69 74 2a 67 6d 65 67 61 62 75 66 28	init*gmegabuf(vt)+init*gmegabuf(
0420	76 64 29 29 3b 0d 0a 72 3d 28 30 2e 34 2b 30 2e 34 2a 67 6d 65 67 61 62 75 66 28 76 74 29 29 2a	vd));..r=(0.4+0.4*gmegabuf(vt))*
0440	70 6f 77 28 73 69 6e 28 69 2a 24 50 49 29 2c 2e 31 29 3b 72 61 64 3d 69 2a 24 50 49 2a 32 30 30	pow(sin(i*$PI),.1);rad=i*$PI*200
0460	2b 69 2a 24 50 49 2b 66 72 3b 0d 0a 78 31 3d 72 2a 63 6f 73 28 72 61 64 29 3b 79 31 3d 31 2e 35	+i*$PI+fr;..x1=r*cos(rad);y1=1.5
0480	2a 69 2d 30 2e 37 35 3b 7a 31 3d 72 2a 73 69 6e 28 72 61 64 29 3b 0d 0a 79 32 3d 79 31 2a 78 63	*i-0.75;z1=r*sin(rad);..y2=y1*xc
04a0	2d 7a 31 2a 78 73 3b 7a 32 3d 79 31 2a 78 73 2b 7a 31 2a 78 63 3b 0d 0a 78 32 3d 7a 32 2a 79 73	-z1*xs;z2=y1*xs+z1*xc;..x2=z2*ys
04c0	2b 78 31 2a 79 63 3b 7a 33 3d 7a 32 2a 79 63 2d 78 31 2a 79 73 3b 0d 0a 78 33 3d 78 32 2a 7a 63	+x1*yc;z3=z2*yc-x1*ys;..x3=x2*zc
04e0	2d 79 32 2a 7a 73 3b 79 33 3d 79 32 2a 7a 63 2b 78 32 2a 7a 73 3b 0d 0a 78 34 3d 6d 78 2b 78 33	-y2*zs;y3=y2*zc+x2*zs;..x4=mx+x3
0500	3b 79 34 3d 6d 79 2b 79 33 3b 7a 34 3d 6d 7a 2b 7a 33 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 32 2d	;y4=my+y3;z4=mz+z3;..linesize=2-
0520	7a 33 2a 36 2b 72 2a 36 3b 64 69 76 3d 31 2b 7a 34 2f 64 73 74 3b 0d 0a 78 3d 67 6d 65 67 61 62	z3*6+r*6;div=1+z4/dst;..x=gmegab
0540	75 66 28 31 31 29 2a 78 34 2f 64 69 76 3b 0d 0a 79 3d 79 34 2f 64 69 76 3b 0d 0a 63 6f 6c 3d 28	uf(11)*x4/div;..y=y4/div;..col=(
0560	31 2b 2e 31 2a 70 74 29 2a 28 31 2d 30 2e 35 2a 7a 33 29 2a 72 2a 28 31 2b 30 2e 32 35 2a 78 31	1+.1*pt)*(1-0.5*z3)*r*(1+0.25*x1
0580	29 3b 0d 0a 72 65 64 3d 63 6f 6c 2a 31 2e 35 3b 67 72 65 65 6e 3d 63 6f 6c 2a 63 6f 6c 3b 0d 0a	);..red=col*1.5;green=col*col;..
05a0	69 6e 69 74 3d 31 00 e4 00 00 00 6e 3d 34 30 30 30 3b 76 74 3d 31 30 30 30 3b 76 64 3d 36 30 30	init=1.....n=4000;vt=1000;vd=600
05c0	30 3b 0d 0a 66 72 3d 66 72 2b 30 2e 30 35 3b 0d 0a 66 63 74 3d 69 66 28 65 71 75 61 6c 28 66 63	0;..fr=fr+0.05;..fct=if(equal(fc
05e0	74 2c 35 29 2c 30 2c 66 63 74 2b 31 29 3b 0d 0a 78 73 3d 67 6d 65 67 61 62 75 66 28 31 29 3b 79	t,5),0,fct+1);..xs=gmegabuf(1);y
0600	73 3d 67 6d 65 67 61 62 75 66 28 32 29 3b 7a 73 3d 67 6d 65 67 61 62 75 66 28 33 29 3b 0d 0a 78	s=gmegabuf(2);zs=gmegabuf(3);..x
0620	63 3d 67 6d 65 67 61 62 75 66 28 34 29 3b 79 63 3d 67 6d 65 67 61 62 75 66 28 35 29 3b 7a 63 3d	c=gmegabuf(4);yc=gmegabuf(5);zc=
0640	67 6d 65 67 61 62 75 66 28 36 29 3b 0d 0a 6d 78 3d 67 6d 65 67 61 62 75 66 28 37 29 3b 6d 79 3d	gmegabuf(6);..mx=gmegabuf(7);my=
0660	67 6d 65 67 61 62 75 66 28 38 29 3b 6d 7a 3d 67 6d 65 67 61 62 75 66 28 39 29 3b 0d 0a 64 73 74	gmegabuf(8);mz=gmegabuf(9);..dst
0680	3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b 00 00 00 00 00 25 00 00 00 6e 3d 34 30 30 30 3b 64 73	=gmegabuf(10);.....%...n=4000;ds
06a0	74 3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b 69 6e 69 74 3d 30 3b 62 74 3d 30 3b 00 00 00 00 00	t=gmegabuf(10);init=0;bt=0;.....
06c0	01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 7f 02 00 00 01 67 01 00 00 70 74 3d 31 2d 70 74	............$........g...pt=1-pt
06e0	3b 0d 0a 72 3d 30 2e 39 3b 72 61 64 3d 69 2a 24 50 49 2a 34 3b 0d 0a 78 31 3d 72 2a 63 6f 73 28	;..r=0.9;rad=i*$PI*4;..x1=r*cos(
0700	72 61 64 29 3b 79 31 3d 79 70 3b 7a 31 3d 72 2a 73 69 6e 28 72 61 64 29 3b 0d 0a 79 32 3d 79 31	rad);y1=yp;z1=r*sin(rad);..y2=y1
0720	2a 78 63 2d 7a 31 2a 78 73 3b 7a 32 3d 79 31 2a 78 73 2b 7a 31 2a 78 63 3b 0d 0a 78 32 3d 7a 32	*xc-z1*xs;z2=y1*xs+z1*xc;..x2=z2
0740	2a 79 73 2b 78 31 2a 79 63 3b 7a 33 3d 7a 32 2a 79 63 2d 78 31 2a 79 73 3b 0d 0a 78 33 3d 78 32	*ys+x1*yc;z3=z2*yc-x1*ys;..x3=x2
0760	2a 7a 63 2d 79 32 2a 7a 73 3b 79 33 3d 79 32 2a 7a 63 2b 78 32 2a 7a 73 3b 0d 0a 78 34 3d 6d 78	*zc-y2*zs;y3=y2*zc+x2*zs;..x4=mx
0780	2b 78 33 3b 79 34 3d 6d 79 2b 79 33 3b 7a 34 3d 6d 7a 2b 7a 33 3b 0d 0a 6c 69 6e 65 73 69 7a 65	+x3;y4=my+y3;z4=mz+z3;..linesize
07a0	3d 28 34 2d 36 2a 61 62 6f 76 65 28 69 2c 30 2e 35 29 29 2d 7a 33 2a 36 3b 64 69 76 3d 31 2b 7a	=(4-6*above(i,0.5))-z3*6;div=1+z
07c0	34 2f 64 73 74 3b 0d 0a 78 3d 67 6d 65 67 61 62 75 66 28 31 31 29 2a 78 34 2f 64 69 76 3b 0d 0a	4/dst;..x=gmegabuf(11)*x4/div;..
07e0	79 3d 79 34 2f 64 69 76 3b 0d 0a 63 6f 6c 3d 28 31 2d 30 2e 35 2a 7a 33 29 2a 72 2a 28 30 2e 37	y=y4/div;..col=(1-0.5*z3)*r*(0.7
0800	2b 70 74 2a 30 2e 32 2a 61 62 6f 76 65 28 69 2c 30 2e 35 29 29 2a 62 74 3b 0d 0a 62 6c 75 65 3d	+pt*0.2*above(i,0.5))*bt;..blue=
0820	63 6f 6c 3b 67 72 65 65 6e 3d 63 6f 6c 2a 63 6f 6c 2a 30 2e 35 3b 3b 0d 0a 69 6e 69 74 3d 31 00	col;green=col*col*0.5;;..init=1.
0840	cd 00 00 00 6e 3d 34 30 30 3b 66 79 3d 66 79 2b 30 2e 31 2a 62 74 3b 79 70 3d 30 2e 39 2a 73 69	....n=400;fy=fy+0.1*bt;yp=0.9*si
0860	6e 28 66 79 29 3b 62 74 3d 62 74 2a 30 2e 39 3b 0d 0a 78 73 3d 67 6d 65 67 61 62 75 66 28 31 29	n(fy);bt=bt*0.9;..xs=gmegabuf(1)
0880	3b 79 73 3d 67 6d 65 67 61 62 75 66 28 32 29 3b 7a 73 3d 67 6d 65 67 61 62 75 66 28 33 29 3b 0d	;ys=gmegabuf(2);zs=gmegabuf(3);.
08a0	0a 78 63 3d 67 6d 65 67 61 62 75 66 28 34 29 3b 79 63 3d 67 6d 65 67 61 62 75 66 28 35 29 3b 7a	.xc=gmegabuf(4);yc=gmegabuf(5);z
08c0	63 3d 67 6d 65 67 61 62 75 66 28 36 29 3b 0d 0a 6d 78 3d 67 6d 65 67 61 62 75 66 28 37 29 3b 6d	c=gmegabuf(6);..mx=gmegabuf(7);m
08e0	79 3d 67 6d 65 67 61 62 75 66 28 38 29 3b 6d 7a 3d 67 6d 65 67 61 62 75 66 28 39 29 3b 0d 0a 64	y=gmegabuf(8);mz=gmegabuf(9);..d
0900	73 74 3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b 00 06 00 00 00 62 74 3d 31 3b 00 24 00 00 00 6e	st=gmegabuf(10);.....bt=1;.$...n
0920	3d 34 30 30 3b 64 73 74 3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b 69 6e 69 74 3d 30 3b 62 74 3d	=400;dst=gmegabuf(10);init=0;bt=
0940	30 3b 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 96 02 00 00 01 66 01 00 00	0;.................$........f...
0960	70 74 3d 31 2d 70 74 3b 0d 0a 72 3d 30 2e 39 3b 72 61 64 3d 69 2a 24 50 49 2a 34 3b 0d 0a 78 31	pt=1-pt;..r=0.9;rad=i*$PI*4;..x1
0980	3d 72 2a 63 6f 73 28 72 61 64 29 3b 79 31 3d 79 70 3b 7a 31 3d 72 2a 73 69 6e 28 72 61 64 29 3b	=r*cos(rad);y1=yp;z1=r*sin(rad);
09a0	0d 0a 79 32 3d 79 31 2a 78 63 2d 7a 31 2a 78 73 3b 7a 32 3d 79 31 2a 78 73 2b 7a 31 2a 78 63 3b	..y2=y1*xc-z1*xs;z2=y1*xs+z1*xc;
09c0	0d 0a 78 32 3d 7a 32 2a 79 73 2b 78 31 2a 79 63 3b 7a 33 3d 7a 32 2a 79 63 2d 78 31 2a 79 73 3b	..x2=z2*ys+x1*yc;z3=z2*yc-x1*ys;
09e0	0d 0a 78 33 3d 78 32 2a 7a 63 2d 79 32 2a 7a 73 3b 79 33 3d 79 32 2a 7a 63 2b 78 32 2a 7a 73 3b	..x3=x2*zc-y2*zs;y3=y2*zc+x2*zs;
0a00	0d 0a 78 34 3d 6d 78 2b 78 33 3b 79 34 3d 6d 79 2b 79 33 3b 7a 34 3d 6d 7a 2b 7a 33 3b 0d 0a 6c	..x4=mx+x3;y4=my+y3;z4=mz+z3;..l
0a20	69 6e 65 73 69 7a 65 3d 28 34 2d 36 2a 61 62 6f 76 65 28 69 2c 30 2e 35 29 29 2d 7a 33 2a 36 3b	inesize=(4-6*above(i,0.5))-z3*6;
0a40	64 69 76 3d 31 2b 7a 34 2f 64 73 74 3b 0d 0a 78 3d 67 6d 65 67 61 62 75 66 28 31 31 29 2a 78 34	div=1+z4/dst;..x=gmegabuf(11)*x4
0a60	2f 64 69 76 3b 0d 0a 79 3d 79 34 2f 64 69 76 3b 0d 0a 63 6f 6c 3d 28 31 2d 30 2e 35 2a 7a 33 29	/div;..y=y4/div;..col=(1-0.5*z3)
0a80	2a 72 2a 28 30 2e 37 2b 70 74 2a 30 2e 32 2a 61 62 6f 76 65 28 69 2c 30 2e 35 29 29 2a 62 74 3b	*r*(0.7+pt*0.2*above(i,0.5))*bt;
0aa0	0d 0a 62 6c 75 65 3d 63 6f 6c 3b 67 72 65 65 6e 3d 63 6f 6c 2a 63 6f 6c 2a 30 2e 35 3b 0d 0a 69	..blue=col;green=col*col*0.5;..i
0ac0	6e 69 74 3d 31 00 d1 00 00 00 6e 3d 34 30 30 3b 66 79 3d 66 79 2b 30 2e 31 2a 62 74 3b 79 70 3d	nit=1.....n=400;fy=fy+0.1*bt;yp=
0ae0	30 2e 39 2a 73 69 6e 28 66 79 2b 24 50 49 29 3b 62 74 3d 62 74 2a 30 2e 39 3b 0d 0a 78 73 3d 67	0.9*sin(fy+$PI);bt=bt*0.9;..xs=g
0b00	6d 65 67 61 62 75 66 28 31 29 3b 79 73 3d 67 6d 65 67 61 62 75 66 28 32 29 3b 7a 73 3d 67 6d 65	megabuf(1);ys=gmegabuf(2);zs=gme
0b20	67 61 62 75 66 28 33 29 3b 0d 0a 78 63 3d 67 6d 65 67 61 62 75 66 28 34 29 3b 79 63 3d 67 6d 65	gabuf(3);..xc=gmegabuf(4);yc=gme
0b40	67 61 62 75 66 28 35 29 3b 7a 63 3d 67 6d 65 67 61 62 75 66 28 36 29 3b 0d 0a 6d 78 3d 67 6d 65	gabuf(5);zc=gmegabuf(6);..mx=gme
0b60	67 61 62 75 66 28 37 29 3b 6d 79 3d 67 6d 65 67 61 62 75 66 28 38 29 3b 6d 7a 3d 67 6d 65 67 61	gabuf(7);my=gmegabuf(8);mz=gmega
0b80	62 75 66 28 39 29 3b 0d 0a 64 73 74 3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b 00 1a 00 00 00 62	buf(9);..dst=gmegabuf(10);.....b
0ba0	74 3d 31 3b 62 66 79 3d 30 2e 31 2b 72 61 6e 64 28 35 30 29 2f 31 30 30 00 24 00 00 00 6e 3d 34	t=1;bfy=0.1+rand(50)/100.$...n=4
0bc0	30 30 3b 64 73 74 3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b 69 6e 69 74 3d 30 3b 62 74 3d 30 3b	00;dst=gmegabuf(10);init=0;bt=0;
0be0	00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 44 02 00 00 01 3b 01 00 00 72 3d	.................$...D....;...r=
0c00	30 2e 38 2a 69 3b 72 61 64 3d 69 2a 24 50 49 2a 38 30 2d 66 79 3b 0d 0a 78 31 3d 72 2a 63 6f 73	0.8*i;rad=i*$PI*80-fy;..x1=r*cos
0c20	28 72 61 64 29 3b 79 31 3d 2d 30 2e 37 2d 30 2e 32 2a 69 3b 7a 31 3d 72 2a 73 69 6e 28 72 61 64	(rad);y1=-0.7-0.2*i;z1=r*sin(rad
0c40	29 3b 0d 0a 79 32 3d 79 31 2a 78 63 2d 7a 31 2a 78 73 3b 7a 32 3d 79 31 2a 78 73 2b 7a 31 2a 78	);..y2=y1*xc-z1*xs;z2=y1*xs+z1*x
0c60	63 3b 0d 0a 78 32 3d 7a 32 2a 79 73 2b 78 31 2a 79 63 3b 7a 33 3d 7a 32 2a 79 63 2d 78 31 2a 79	c;..x2=z2*ys+x1*yc;z3=z2*yc-x1*y
0c80	73 3b 0d 0a 78 33 3d 78 32 2a 7a 63 2d 79 32 2a 7a 73 3b 79 33 3d 79 32 2a 7a 63 2b 78 32 2a 7a	s;..x3=x2*zc-y2*zs;y3=y2*zc+x2*z
0ca0	73 3b 0d 0a 78 34 3d 6d 78 2b 78 33 3b 79 34 3d 6d 79 2b 79 33 3b 7a 34 3d 6d 7a 2b 7a 33 3b 0d	s;..x4=mx+x3;y4=my+y3;z4=mz+z3;.
0cc0	0a 6c 69 6e 65 73 69 7a 65 3d 33 2d 7a 33 2a 36 3b 64 69 76 3d 31 2b 7a 34 2f 64 73 74 3b 0d 0a	.linesize=3-z3*6;div=1+z4/dst;..
0ce0	78 3d 67 6d 65 67 61 62 75 66 28 31 31 29 2a 78 34 2f 64 69 76 3b 0d 0a 79 3d 79 34 2f 64 69 76	x=gmegabuf(11)*x4/div;..y=y4/div
0d00	3b 0d 0a 63 6f 6c 3d 28 31 2d 30 2e 35 2a 7a 33 29 2a 2e 35 2a 69 3b 0d 0a 62 6c 75 65 3d 63 6f	;..col=(1-0.5*z3)*.5*i;..blue=co
0d20	6c 3b 67 72 65 65 6e 3d 63 6f 6c 2a 63 6f 6c 3b 0d 0a 69 6e 69 74 3d 31 00 be 00 00 00 6e 3d 34	l;green=col*col;..init=1.....n=4
0d40	30 30 3b 66 79 3d 66 79 2b 30 2e 31 2a 62 74 3b 62 74 3d 62 74 2a 30 2e 39 3b 0d 0a 78 73 3d 67	00;fy=fy+0.1*bt;bt=bt*0.9;..xs=g
0d60	6d 65 67 61 62 75 66 28 31 29 3b 79 73 3d 67 6d 65 67 61 62 75 66 28 32 29 3b 7a 73 3d 67 6d 65	megabuf(1);ys=gmegabuf(2);zs=gme
0d80	67 61 62 75 66 28 33 29 3b 0d 0a 78 63 3d 67 6d 65 67 61 62 75 66 28 34 29 3b 79 63 3d 67 6d 65	gabuf(3);..xc=gmegabuf(4);yc=gme
0da0	67 61 62 75 66 28 35 29 3b 7a 63 3d 67 6d 65 67 61 62 75 66 28 36 29 3b 0d 0a 6d 78 3d 67 6d 65	gabuf(5);zc=gmegabuf(6);..mx=gme
0dc0	67 61 62 75 66 28 37 29 3b 6d 79 3d 67 6d 65 67 61 62 75 66 28 38 29 3b 6d 7a 3d 67 6d 65 67 61	gabuf(7);my=gmegabuf(8);mz=gmega
0de0	62 75 66 28 39 29 3b 0d 0a 64 73 74 3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b 00 06 00 00 00 62	buf(9);..dst=gmegabuf(10);.....b
0e00	74 3d 31 3b 00 24 00 00 00 6e 3d 34 30 30 3b 64 73 74 3d 67 6d 65 67 61 62 75 66 28 31 30 29 3b	t=1;.$...n=400;dst=gmegabuf(10);
0e20	69 6e 69 74 3d 30 3b 62 74 3d 30 3b 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00	init=0;bt=0;.................$..
0e40	00 43 02 00 00 01 3a 01 00 00 72 3d 30 2e 38 2a 69 3b 72 61 64 3d 69 2a 24 50 49 2a 38 30 2d 66	.C....:...r=0.8*i;rad=i*$PI*80-f
0e60	79 3b 0d 0a 78 31 3d 72 2a 63 6f 73 28 72 61 64 29 3b 79 31 3d 30 2e 37 2b 30 2e 32 2a 69 3b 7a	y;..x1=r*cos(rad);y1=0.7+0.2*i;z
0e80	31 3d 72 2a 73 69 6e 28 72 61 64 29 3b 0d 0a 79 32 3d 79 31 2a 78 63 2d 7a 31 2a 78 73 3b 7a 32	1=r*sin(rad);..y2=y1*xc-z1*xs;z2
0ea0	3d 79 31 2a 78 73 2b 7a 31 2a 78 63 3b 0d 0a 78 32 3d 7a 32 2a 79 73 2b 78 31 2a 79 63 3b 7a 33	=y1*xs+z1*xc;..x2=z2*ys+x1*yc;z3
0ec0	3d 7a 32 2a 79 63 2d 78 31 2a 79 73 3b 0d 0a 78 33 3d 78 32 2a 7a 63 2d 79 32 2a 7a 73 3b 79 33	=z2*yc-x1*ys;..x3=x2*zc-y2*zs;y3
0ee0	3d 79 32 2a 7a 63 2b 78 32 2a 7a 73 3b 0d 0a 78 34 3d 6d 78 2b 78 33 3b 79 34 3d 6d 79 2b 79 33	=y2*zc+x2*zs;..x4=mx+x3;y4=my+y3
0f00	3b 7a 34 3d 6d 7a 2b 7a 33 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 33 2d 7a 33 2a 36 3b 64 69 76 3d	;z4=mz+z3;..linesize=3-z3*6;div=
0f20	31 2b 7a 34 2f 64 73 74 3b 0d 0a 78 3d 67 6d 65 67 61 62 75 66 28 31 31 29 2a 78 34 2f 64 69 76	1+z4/dst;..x=gmegabuf(11)*x4/div
0f40	3b 0d 0a 79 3d 79 34 2f 64 69 76 3b 0d 0a 63 6f 6c 3d 28 31 2d 30 2e 35 2a 7a 33 29 2a 2e 35 2a	;..y=y4/div;..col=(1-0.5*z3)*.5*
0f60	69 3b 0d 0a 62 6c 75 65 3d 63 6f 6c 3b 67 72 65 65 6e 3d 63 6f 6c 2a 63 6f 6c 3b 0d 0a 69 6e 69	i;..blue=col;green=col*col;..ini
0f80	74 3d 31 00 be 00 00 00 6e 3d 34 30 30 3b 66 79 3d 66 79 2b 30 2e 31 2a 62 74 3b 62 74 3d 62 74	t=1.....n=400;fy=fy+0.1*bt;bt=bt
0fa0	2a 30 2e 39 3b 0d 0a 78 73 3d 67 6d 65 67 61 62 75 66 28 31 29 3b 79 73 3d 67 6d 65 67 61 62 75	*0.9;..xs=gmegabuf(1);ys=gmegabu
0fc0	66 28 32 29 3b 7a 73 3d 67 6d 65 67 61 62 75 66 28 33 29 3b 0d 0a 78 63 3d 67 6d 65 67 61 62 75	f(2);zs=gmegabuf(3);..xc=gmegabu
0fe0	66 28 34 29 3b 79 63 3d 67 6d 65 67 61 62 75 66 28 35 29 3b 7a 63 3d 67 6d 65 67 61 62 75 66 28	f(4);yc=gmegabuf(5);zc=gmegabuf(
1000	36 29 3b 0d 0a 6d 78 3d 67 6d 65 67 61 62 75 66 28 37 29 3b 6d 79 3d 67 6d 65 67 61 62 75 66 28	6);..mx=gmegabuf(7);my=gmegabuf(
1020	38 29 3b 6d 7a 3d 67 6d 65 67 61 62 75 66 28 39 29 3b 0d 0a 64 73 74 3d 67 6d 65 67 61 62 75 66	8);mz=gmegabuf(9);..dst=gmegabuf
1040	28 31 30 29 3b 00 06 00 00 00 62 74 3d 31 3b 00 24 00 00 00 6e 3d 34 30 30 3b 64 73 74 3d 67 6d	(10);.....bt=1;.$...n=400;dst=gm
1060	65 67 61 62 75 66 28 31 30 29 3b 69 6e 69 74 3d 30 3b 62 74 3d 30 3b 00 00 00 00 00 01 00 00 00	egabuf(10);init=0;bt=0;.........
1080	00 00 00 00 01 00 00 00 06 00 00 00 08 00 00 00 01 00 00 00 01 00 00 00	........................