blob: eda5859810135efd33b4d4a2977235724fce578d (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 01 15 00 00 00 d8 03 00	Nullsoft.AVS.Preset.0.2.........
0020	00 d4 03 00 00 20 57 68 61 63 6b 6f 20 41 56 53 20 56 20 2d 20 52 65 66 6c 65 63 74 6f 63 75 62	......Whacko.AVS.V.-.Reflectocub
0040	65 0d 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d	e..-----------------------------
0060	2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 0d 0a 41 66 74 65 72 20	----------------------....After.
0080	64 6f 69 6e 67 20 74 65 78 74 75 72 65 20 6d 61 70 70 69 6e 67 20 44 4d 27 73 2c 20 49 20 74 68	doing.texture.mapping.DM's,.I.th
00a0	6f 75 67 68 74 20 49 27 64 20 64 6f 20 73 6f 6d 65 74 68 69 6e 67 20 6d 6f 72 65 20 63 6f 6d 70	ought.I'd.do.something.more.comp
00c0	6c 69 63 61 74 65 64 2e 20 45 6e 76 69 72 6f 6e 6d 65 6e 74 20 6d 61 70 70 69 6e 67 20 69 73 20	licated..Environment.mapping.is.
00e0	6e 6f 74 20 61 20 67 6f 6f 64 20 69 64 65 61 20 62 65 63 61 75 73 65 20 69 74 20 6f 6e 6c 79 20	not.a.good.idea.because.it.only.
0100	6c 6f 6f 6b 73 20 63 6f 6f 6c 20 6f 6e 20 63 75 72 76 79 20 73 75 72 66 61 63 65 73 2e 2e 2e 20	looks.cool.on.curvy.surfaces....
0120	77 68 69 63 68 20 69 73 20 68 61 72 64 20 74 6f 20 64 6f 20 63 6c 65 61 72 6c 79 20 77 69 74 68	which.is.hard.to.do.clearly.with
0140	20 61 20 44 4d 2e 0d 0a 0d 0a 48 6f 77 65 76 65 72 20 64 6f 69 6e 67 20 72 65 66 6c 65 63 74 69	.a.DM.....However.doing.reflecti
0160	6f 6e 73 20 69 73 20 6e 6f 74 20 74 6f 6f 20 63 6f 6d 70 6c 69 63 61 74 65 64 20 61 6e 64 20 6c	ons.is.not.too.complicated.and.l
0180	6f 6f 6b 73 20 67 72 65 61 74 20 6f 6e 20 66 6c 61 74 20 73 75 72 66 61 63 65 73 2e 20 53 6f 20	ooks.great.on.flat.surfaces..So.
01a0	49 20 74 6f 6f 6b 20 74 68 65 20 63 75 62 65 20 66 72 6f 6d 20 57 61 74 65 72 43 75 62 65 2c 20	I.took.the.cube.from.WaterCube,.
01c0	63 6f 6d 62 69 6e 65 64 20 69 74 20 77 69 74 68 20 61 20 73 70 68 65 72 65 20 61 6e 64 20 73 6f	combined.it.with.a.sphere.and.so
01e0	6d 65 20 72 65 66 6c 65 63 74 69 6e 67 20 76 65 63 74 6f 72 20 6d 61 74 68 2e 20 54 68 65 20 72	me.reflecting.vector.math..The.r
0200	65 73 75 6c 74 20 69 73 20 74 68 69 73 20 73 68 69 6e 79 2c 20 6d 69 72 72 6f 72 20 63 75 62 65	esult.is.this.shiny,.mirror.cube
0220	2e 20 4c 6f 6f 6b 73 20 63 6f 6f 6c 20 3a 29 2e 0d 0a 0d 0a 54 6f 20 6d 61 6b 65 20 69 74 20 65	..Looks.cool.:).....To.make.it.e
0240	61 73 69 65 72 20 74 6f 20 64 69 73 74 69 6e 67 75 69 73 68 20 49 20 61 64 64 65 64 20 61 20 73	asier.to.distinguish.I.added.a.s
0260	6f 66 74 20 63 6f 6c 6f 72 20 66 69 6c 6c 20 74 6f 20 74 68 65 20 63 75 62 65 2c 20 62 75 74 20	oft.color.fill.to.the.cube,.but.
0280	69 74 20 6c 6f 6f 6b 73 20 63 6f 6f 6c 20 77 69 74 68 6f 75 74 20 69 74 20 74 6f 6f 20 28 74 75	it.looks.cool.without.it.too.(tu
02a0	72 6e 20 6f 66 66 20 27 62 6c 65 6e 64 27 20 6f 6e 20 74 68 65 20 6c 61 73 74 20 44 4d 29 2e 0d	rn.off.'blend'.on.the.last.DM)..
02c0	0a 0d 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d	...-----------------------------
02e0	2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 55 6e 43 6f 6e 65 44 20 2f 20 53	-------------------..UnConeD./.S
0300	74 65 76 65 6e 20 57 69 74 74 65 6e 73 0d 0a 5b 20 73 74 65 76 65 6e 40 61 63 6b 6f 2e 6e 65 74	teven.Wittens..[.steven@acko.net
0320	20 2d 20 77 77 77 2e 61 63 6b 6f 2e 6e 65 74 20 5d 0d 0a 0d 0a 28 49 66 20 79 6f 75 20 77 69 73	.-.www.acko.net.]....(If.you.wis
0340	68 20 74 6f 20 75 73 65 20 74 68 69 73 20 70 72 65 73 65 74 20 70 61 72 74 69 61 6c 6c 79 20 6f	h.to.use.this.preset.partially.o
0360	72 20 77 68 6f 6c 65 20 69 6e 20 79 6f 75 72 20 6f 77 6e 20 70 72 65 73 65 74 73 20 6f 72 20 70	r.whole.in.your.own.presets.or.p
0380	61 63 6b 73 2c 20 79 6f 75 20 6d 61 79 20 64 6f 20 73 6f 20 70 72 6f 76 69 64 65 64 20 74 68 61	acks,.you.may.do.so.provided.tha
03a0	74 20 61 20 63 6c 65 61 72 20 63 72 65 64 69 74 20 6d 65 73 73 61 67 65 20 69 73 20 69 6e 63 6c	t.a.clear.credit.message.is.incl
03c0	75 64 65 64 20 69 6e 20 79 6f 75 72 20 70 72 65 73 65 74 2c 20 61 6c 6f 6e 67 20 77 69 74 68 20	uded.in.your.preset,.along.with.
03e0	6d 79 20 63 6f 6e 74 61 63 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 29 00 fe ff ff ff ed 01 00	my.contact.information.)........
0400	00 80 00 00 01 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.....$..........................
0420	00 00 04 00 00 00 28 00 00 00 04 00 00 00 01 00 14 80 24 00 00 00 dc 00 00 00 01 31 00 00 00 78	......(...........$........1...x
0440	3d 63 6f 73 28 69 2a 74 70 69 2b 68 70 69 29 2a 31 2e 34 31 34 3b 79 3d 73 69 6e 28 69 2a 74 70	=cos(i*tpi+hpi)*1.414;y=sin(i*tp
0460	69 2b 68 70 69 29 2a 31 2e 34 31 34 3b 0d 0a 00 56 00 00 00 74 3d 74 2b 30 2e 30 32 3b 72 65 64	i+hpi)*1.414;...V...t=t+0.02;red
0480	3d 73 69 6e 28 68 75 65 2b 74 29 2a 2e 35 2b 2e 32 3b 67 72 65 65 6e 3d 73 69 6e 28 68 75 65 2b	=sin(hue+t)*.5+.2;green=sin(hue+
04a0	32 2e 30 39 2b 74 29 2a 2e 35 2b 2e 32 3b 62 6c 75 65 3d 73 69 6e 28 68 75 65 2b 34 2e 31 38 2b	2.09+t)*.5+.2;blue=sin(hue+4.18+
04c0	74 29 2a 2e 35 2b 2e 32 3b 00 16 00 00 00 68 75 65 3d 68 75 65 2b 72 61 6e 64 28 33 31 34 29 2a	t)*.5+.2;.....hue=hue+rand(314)*
04e0	2e 30 31 00 1e 00 00 00 6e 3d 35 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 68 70 69 3d 74	.01.....n=5;tpi=acos(-1)*2;hpi=t
0500	70 69 2f 38 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 04 00 00 00 14 00 00 00 1f 00	pi/8;...........................
0520	00 00 24 00 00 00 00 00 00 00 01 00 00 00 01 00 00 00 28 00 00 00 04 00 00 00 00 00 01 80 24 00	..$...............(...........$.
0540	00 00 74 00 00 00 01 36 00 00 00 78 3d 67 65 74 6f 73 63 28 69 2a 2e 35 2c 30 2c 30 29 2a 2e 35	..t....6...x=getosc(i*.5,0,0)*.5
0560	2a 72 3b 0d 0a 79 3d 67 65 74 6f 73 63 28 69 2a 2e 35 2b 2e 35 2c 30 2c 30 29 2a 2e 35 2a 72 3b	*r;..y=getosc(i*.5+.5,0,0)*.5*r;
0580	00 13 00 00 00 74 3d 74 2d 30 2e 30 32 3b 72 3d 72 2a 2e 39 2b 2e 31 00 04 00 00 00 72 3d 32 00	.....t=t-0.02;r=r*.9+.1.....r=2.
05a0	06 00 00 00 6e 3d 32 30 30 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 00 00 00 28 00 00 00 04 00	....n=200.................(.....
05c0	00 00 01 00 01 80 00 00 00 00 0c 00 00 00 6a 00 00 00 01 00 00 00 80 80 80 00 12 00 00 00 0c 00	..............j.................
05e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 00 00 00 9f 00 00 00 01 09 00 00 00 78 3d 30 3b 79	..............$............x=0;y
0600	3d 30 3b 00 56 00 00 00 74 3d 74 2b 30 2e 30 32 3b 72 65 64 3d 73 69 6e 28 68 75 65 2b 74 29 2a	=0;.V...t=t+0.02;red=sin(hue+t)*
0620	2e 35 2b 2e 36 3b 67 72 65 65 6e 3d 73 69 6e 28 68 75 65 2b 32 2e 30 39 2b 74 29 2a 2e 35 2b 2e	.5+.6;green=sin(hue+2.09+t)*.5+.
0640	36 3b 62 6c 75 65 3d 73 69 6e 28 68 75 65 2b 34 2e 31 38 2b 74 29 2a 2e 35 2b 2e 36 3b 00 17 00	6;blue=sin(hue+4.18+t)*.5+.6;...
0660	00 00 68 75 65 3d 68 75 65 2b 72 61 6e 64 28 33 31 34 29 2a 2e 30 31 3b 00 08 00 00 00 6e 3d 31	..hue=hue+rand(314)*.01;.....n=1
0680	3b 74 3d 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 00 00 00 0f 00 00 00 25 00 00 00 ff 7f 00	;t=2.....................%......
06a0	00 01 08 00 00 00 78 3d 30 3b 79 3d 30 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00	......x=0;y=0...................
06c0	00 00 2b 00 00 00 21 08 00 00 01 df 04 00 00 79 3d 79 2a 61 66 3b 0d 0a a9 72 6f 74 61 74 65 20	..+...!........y=y*af;...rotate.
06e0	72 61 79 3b 0d 0a 64 78 31 3d 78 2a 63 7a 2d 79 2a 73 7a 3b 0d 0a 64 79 31 3d 78 2a 73 7a 2b 79	ray;..dx1=x*cz-y*sz;..dy1=x*sz+y
0700	2a 63 7a 3b 0d 0a 64 79 32 3d 64 79 31 2a 63 78 2d 31 2a 73 78 3b 0d 0a 64 7a 32 3d 64 79 31 2a	*cz;..dy2=dy1*cx-1*sx;..dz2=dy1*
0720	73 78 2b 31 2a 63 78 3b 0d 0a 64 78 33 3d 64 78 31 2a 63 79 2d 64 7a 32 2a 73 79 3b 0d 0a 64 7a	sx+1*cx;..dx3=dx1*cy-dz2*sy;..dz
0740	32 3d 64 78 31 2a 73 79 2b 64 7a 32 2a 63 79 3b 0d 0a a9 69 6e 74 65 72 73 65 63 74 20 77 69 74	2=dx1*sy+dz2*cy;...intersect.wit
0760	68 20 63 75 62 65 3b 0d 0a 6b 31 3d 28 28 6f 7a 2d 69 66 28 61 62 6f 76 65 28 64 7a 32 2c 30 29	h.cube;..k1=((oz-if(above(dz2,0)
0780	2c 77 64 2c 2d 77 64 29 29 2f 64 7a 32 29 2a 32 3b 0d 0a 6b 32 3d 28 28 6f 79 2d 69 66 28 61 62	,wd,-wd))/dz2)*2;..k2=((oy-if(ab
07a0	6f 76 65 28 64 79 32 2c 30 29 2c 77 64 2c 2d 77 64 29 29 2f 64 79 32 29 2a 32 3b 0d 0a 6b 33 3d	ove(dy2,0),wd,-wd))/dy2)*2;..k3=
07c0	28 28 6f 78 2d 69 66 28 61 62 6f 76 65 28 64 78 33 2c 30 29 2c 77 64 2c 2d 77 64 29 29 2f 64 78	((ox-if(above(dx3,0),wd,-wd))/dx
07e0	33 29 2a 32 3b 0d 0a 6b 3d 6d 61 78 28 6d 61 78 28 6b 31 2c 6b 32 29 2c 6b 33 29 3b 0d 0a 69 78	3)*2;..k=max(max(k1,k2),k3);..ix
0800	3d 2d 6f 78 2b 64 78 33 2a 6b 3b 69 79 3d 2d 6f 79 2b 64 79 32 2a 6b 3b 69 7a 3d 2d 6f 7a 2b 64	=-ox+dx3*k;iy=-oy+dy2*k;iz=-oz+d
0820	7a 32 2a 6b 3b 0d 0a 64 78 31 3d 61 62 73 28 69 66 28 65 71 75 61 6c 28 6b 2c 6b 33 29 2c 69 79	z2*k;..dx1=abs(if(equal(k,k3),iy
0840	2d 6f 79 2c 69 78 2d 6f 78 29 29 3b 0d 0a 64 79 31 3d 61 62 73 28 69 66 28 65 71 75 61 6c 28 6b	-oy,ix-ox));..dy1=abs(if(equal(k
0860	2c 6b 31 29 2c 69 79 2d 6f 79 2c 69 7a 2d 6f 7a 29 29 3b 0d 0a 6f 6c 3d 6d 61 78 28 64 78 31 2c	,k1),iy-oy,iz-oz));..ol=max(dx1,
0880	64 79 31 29 3b 0d 0a 61 6c 70 68 61 3d 69 66 28 65 71 75 61 6c 28 6b 2c 2d 31 30 30 30 29 2c 30	dy1);..alpha=if(equal(k,-1000),0
08a0	2c 62 65 6c 6f 77 28 6f 6c 2c 77 64 2a 32 29 29 3b 0d 0a 79 3d 61 6c 70 68 61 2b 61 6c 70 68 61	,below(ol,wd*2));..y=alpha+alpha
08c0	2a 28 63 6f 73 28 69 79 29 2b 63 6f 73 28 69 78 29 29 2a 2e 34 3b 0d 0a a9 63 61 6c 63 75 6c 61	*(cos(iy)+cos(ix))*.4;...calcula
08e0	74 65 20 6e 6f 72 6d 61 6c 3b 0d 0a 6b 33 3d 65 71 75 61 6c 28 6b 2c 6b 33 29 3b 0d 0a 6b 32 3d	te.normal;..k3=equal(k,k3);..k2=
0900	65 71 75 61 6c 28 6b 2c 6b 32 29 3b 0d 0a 6b 31 3d 65 71 75 61 6c 28 6b 2c 6b 31 29 3b 0d 0a a9	equal(k,k2);..k1=equal(k,k1);...
0920	72 65 66 6c 65 63 74 20 72 61 79 20 69 66 20 69 74 20 69 6e 74 65 72 73 65 63 74 73 20 74 68 65	reflect.ray.if.it.intersects.the
0940	20 63 75 62 65 3b 0d 0a 64 78 33 3d 69 66 28 62 61 6e 64 28 61 6c 70 68 61 2c 6b 33 29 2c 2d 64	.cube;..dx3=if(band(alpha,k3),-d
0960	78 33 2c 64 78 33 29 3b 0d 0a 64 79 32 3d 69 66 28 62 61 6e 64 28 61 6c 70 68 61 2c 6b 32 29 2c	x3,dx3);..dy2=if(band(alpha,k2),
0980	2d 64 79 32 2c 64 79 32 29 3b 0d 0a 64 7a 32 3d 69 66 28 62 61 6e 64 28 61 6c 70 68 61 2c 6b 31	-dy2,dy2);..dz2=if(band(alpha,k1
09a0	29 2c 2d 64 7a 32 2c 64 7a 32 29 3b 0d 0a a9 6d 6f 76 65 20 6f 72 69 67 69 6e 20 69 66 20 77 65	),-dz2,dz2);...move.origin.if.we
09c0	20 61 72 65 20 72 65 66 6c 65 63 74 69 6e 67 3b 0d 0a 69 78 3d 69 66 28 61 6c 70 68 61 2c 2d 69	.are.reflecting;..ix=if(alpha,-i
09e0	78 2c 6f 78 29 3b 0d 0a 69 79 3d 69 66 28 61 6c 70 68 61 2c 2d 69 79 2c 6f 79 29 3b 0d 0a 69 7a	x,ox);..iy=if(alpha,-iy,oy);..iz
0a00	3d 69 66 28 61 6c 70 68 61 2c 2d 69 7a 2c 6f 7a 29 3b 0d 0a a9 69 6e 74 65 72 73 65 63 74 20 77	=if(alpha,-iz,oz);...intersect.w
0a20	69 74 68 20 73 70 68 65 72 65 3b 0d 0a 64 78 31 3d 73 71 72 28 64 78 33 29 2b 73 71 72 28 64 79	ith.sphere;..dx1=sqr(dx3)+sqr(dy
0a40	32 29 2b 73 71 72 28 64 7a 32 29 3b 0d 0a 64 79 31 3d 28 64 7a 32 2a 69 7a 2b 64 79 32 2a 69 79	2)+sqr(dz2);..dy1=(dz2*iz+dy2*iy
0a60	2b 64 78 33 2a 69 78 29 3b 0d 0a 6f 6c 3d 73 71 72 28 69 7a 29 2b 73 71 72 28 69 79 29 2b 73 71	+dx3*ix);..ol=sqr(iz)+sqr(iy)+sq
0a80	72 28 69 78 29 2d 33 30 3b 0d 0a 6b 3d 28 64 79 31 2b 73 71 72 74 28 73 71 72 28 64 79 31 29 2d	r(ix)-30;..k=(dy1+sqrt(sqr(dy1)-
0aa0	64 78 31 2a 6f 6c 29 29 2f 64 78 31 3b 0d 0a 69 78 3d 69 78 2d 64 78 33 2a 6b 3b 69 79 3d 69 79	dx1*ol))/dx1;..ix=ix-dx3*k;iy=iy
0ac0	2d 64 79 32 2a 6b 3b 69 7a 3d 69 7a 2d 64 7a 32 2a 6b 3b 0d 0a a9 72 6f 74 61 74 65 20 73 70 68	-dy2*k;iz=iz-dz2*k;...rotate.sph
0ae0	65 72 65 20 61 72 6f 75 6e 64 20 63 75 62 65 3b 0d 0a 6f 6c 3d 69 79 2a 63 62 2d 69 7a 2a 73 62	ere.around.cube;..ol=iy*cb-iz*sb
0b00	3b 0d 0a 69 7a 3d 69 79 2a 73 62 2b 69 7a 2a 63 62 3b 0d 0a 6b 3d 69 78 2a 63 61 2d 69 7a 2a 73	;..iz=iy*sb+iz*cb;..k=ix*ca-iz*s
0b20	61 3b 0d 0a 69 7a 3d 69 78 2a 73 61 2b 69 7a 2a 63 61 3b 0d 0a 69 78 3d 6b 2a 63 63 2d 6f 6c 2a	a;..iz=ix*sa+iz*ca;..ix=k*cc-ol*
0b40	73 63 3b 0d 0a 69 79 3d 6b 2a 73 63 2b 6f 6c 2a 63 63 3b 0d 0a 61 6c 70 68 61 3d 31 2d 79 2a 2e	sc;..iy=k*sc+ol*cc;..alpha=1-y*.
0b60	33 3b 0d 0a 78 3d 61 73 69 6e 28 73 69 6e 28 61 74 61 6e 32 28 69 7a 2c 69 78 29 29 29 2a 32 2e	3;..x=asin(sin(atan2(iz,ix)))*2.
0b80	35 34 36 3b 0d 0a 79 3d 2d 61 74 61 6e 32 28 73 71 72 74 28 73 71 72 28 69 7a 29 2b 73 71 72 28	546;..y=-atan2(sqrt(sqr(iz)+sqr(
0ba0	69 78 29 29 2c 69 79 29 2a 33 3b 0d 0a 00 e3 02 00 00 74 3d 74 2b 30 2e 31 36 2b 74 69 2a 2e 35	ix)),iy)*3;.......t=t+0.16+ti*.5
0bc0	3b 70 74 3d 70 74 2b 30 2e 33 2b 74 69 2a 2e 35 3b 0d 0a 6f 78 3d 73 69 6e 28 70 74 2a 2e 31 32	;pt=pt+0.3+ti*.5;..ox=sin(pt*.12
0be0	33 31 29 3b 6f 79 3d 73 69 6e 28 70 74 2a 2e 31 29 3b 6f 7a 3d 63 6f 73 28 70 74 2a 2e 30 39 31	31);oy=sin(pt*.1);oz=cos(pt*.091
0c00	33 29 3b 0d 0a 6f 6c 3d 2e 33 2b 32 2e 35 2f 73 71 72 74 28 73 71 72 28 6f 78 29 2b 73 71 72 28	3);..ol=.3+2.5/sqrt(sqr(ox)+sqr(
0c20	6f 79 29 2b 73 71 72 28 6f 7a 29 29 3b 0d 0a 6f 78 3d 6f 78 2a 6f 6c 3b 6f 79 3d 6f 79 2a 6f 6c	oy)+sqr(oz));..ox=ox*ol;oy=oy*ol
0c40	3b 6f 7a 3d 6f 7a 2a 6f 6c 3b 0d 0a 72 78 6f 3d 73 69 6e 28 74 2a 2e 30 33 37 33 29 2a 63 6f 73	;oz=oz*ol;..rxo=sin(t*.0373)*cos
0c60	28 74 2a 30 2e 30 35 36 33 29 2a 73 69 6e 28 63 6f 73 28 74 2a 2e 30 36 33 31 29 29 2a 2e 35 3b	(t*0.0563)*sin(cos(t*.0631))*.5;
0c80	0d 0a 72 79 6f 3d 73 69 6e 28 74 2a 2e 30 35 31 31 29 2a 63 6f 73 28 74 2a 30 2e 30 37 31 29 2a	..ryo=sin(t*.0511)*cos(t*0.071)*
0ca0	73 69 6e 28 63 6f 73 28 74 2a 2e 30 34 31 35 29 29 2a 2e 35 3b 0d 0a 72 79 3d 2d 61 74 61 6e 32	sin(cos(t*.0415))*.5;..ry=-atan2
0cc0	28 6f 78 2c 6f 7a 29 2b 72 79 6f 3b 0d 0a 72 78 3d 2d 61 74 61 6e 32 28 6f 79 2c 73 71 72 74 28	(ox,oz)+ryo;..rx=-atan2(oy,sqrt(
0ce0	73 71 72 28 6f 78 29 2b 73 71 72 28 6f 7a 29 29 29 2b 72 78 6f 3b 0d 0a 72 7a 3d 72 7a 2b 2e 30	sqr(ox)+sqr(oz)))+rxo;..rz=rz+.0
0d00	31 2b 73 69 6e 28 74 2a 2e 30 35 33 29 2a 63 6f 73 28 74 2a 2e 31 31 37 29 2a 73 69 6e 28 63 6f	1+sin(t*.053)*cos(t*.117)*sin(co
0d20	73 28 74 2a 2e 30 36 35 31 29 29 2a 2e 30 31 3b 0d 0a 63 78 3d 63 6f 73 28 72 78 29 3b 73 78 3d	s(t*.0651))*.01;..cx=cos(rx);sx=
0d40	73 69 6e 28 72 78 29 3b 63 79 3d 63 6f 73 28 72 79 29 3b 73 79 3d 73 69 6e 28 72 79 29 3b 63 7a	sin(rx);cy=cos(ry);sy=sin(ry);cz
0d60	3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 0d 0a 62 74 3d 62 74 2a 2e 39 3b 61	=cos(rz);sz=sin(rz);..bt=bt*.9;a
0d80	66 3d 68 2f 77 3b 0d 0a 6e 76 3d 28 67 65 74 73 70 65 63 28 30 2c 30 2e 30 35 2c 30 29 2b 6e 76	f=h/w;..nv=(getspec(0,0.05,0)+nv
0da0	29 2a 2e 35 3b 78 3d 6d 61 78 28 30 2c 6d 69 6e 28 31 2c 28 6e 76 2d 6c 61 29 2a 32 29 29 3b 6c	)*.5;x=max(0,min(1,(nv-la)*2));l
0dc0	61 3d 6e 76 3b 0d 0a 77 64 3d 28 77 64 2b 78 2a 32 29 2a 2e 35 2b 2e 35 3b 0d 0a 6f 6c 3d 63 6f	a=nv;..wd=(wd+x*2)*.5+.5;..ol=co
0de0	73 28 74 2a 2e 30 31 31 37 29 2a 73 69 6e 28 74 2a 2e 30 30 37 31 33 29 2a 33 32 3b 0d 0a 63 61	s(t*.0117)*sin(t*.00713)*32;..ca
0e00	3d 63 6f 73 28 6f 6c 29 3b 73 61 3d 73 69 6e 28 6f 6c 29 3b 0d 0a 6f 6c 3d 63 6f 73 28 74 2a 2e	=cos(ol);sa=sin(ol);..ol=cos(t*.
0e20	30 30 36 31 29 2a 73 69 6e 28 74 2a 2e 30 30 34 37 29 2a 31 32 3b 0d 0a 63 62 3d 63 6f 73 28 6f	0061)*sin(t*.0047)*12;..cb=cos(o
0e40	6c 29 3b 73 62 3d 73 69 6e 28 6f 6c 29 3b 0d 0a 74 69 3d 74 69 2a 2e 37 3b 0d 0a 6f 6c 3d 63 6f	l);sb=sin(ol);..ti=ti*.7;..ol=co
0e60	73 28 74 2a 2e 30 30 34 37 29 2a 73 69 6e 28 74 2a 2e 30 30 39 36 36 29 2a 31 32 3b 0d 0a 63 63	s(t*.0047)*sin(t*.00966)*12;..cc
0e80	3d 63 6f 73 28 6f 6c 29 3b 73 63 3d 73 69 6e 28 6f 6c 29 3b 00 0c 00 00 00 74 69 3d 31 3b 77 64	=cos(ol);sc=sin(ol);.....ti=1;wd
0ea0	3d 31 2e 35 00 22 00 00 00 74 3d 30 3b 72 78 3d 30 3b 72 79 3d 30 3b 70 74 3d 30 3b 62 74 3d 30	=1.5."...t=0;rx=0;ry=0;pt=0;bt=0
0ec0	3b 6c 61 3d 30 3b 77 64 3d 30 00 00 00 00 00 01 00 00 00 1f 00 00 00 1e 00 00 00 01 00 00 00 01	;la=0;wd=0......................
0ee0	00 00 00 01 00 00 00 00 00 00 00	...........