UnConeD - Jello Cube.avs « Winamp 5 Picks « avs « data « resources « Src - gh_mirror/jhunkeler/winamp.git

blob: ff7840a3bb18fc7fb539237742c827f004cc3308 (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 7d 03 00	Nullsoft.AVS.Preset.0.2......}..
0020	00 79 03 00 00 20 57 68 61 63 6b 6f 20 41 56 53 20 56 49 20 2d 20 4a 65 6c 6c 6f 20 43 75 62 65	.y....Whacko.AVS.VI.-.Jello.Cube
0040	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 2d	..------------------------------
0060	2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 0d 0a 41 20 66 6c 6f 61 74 69 6e 67	------------------....A.floating
0080	20 63 75 62 65 20 74 68 61 74 20 62 6f 75 6e 63 65 73 20 61 6e 64 20 6d 6f 72 70 68 73 20 61 72	.cube.that.bounces.and.morphs.ar
00a0	6f 75 6e 64 20 74 6f 20 74 68 65 20 6d 75 73 69 63 2e 2e 2e 20 69 74 27 73 20 62 75 69 6c 74 20	ound.to.the.music....it's.built.
00c0	6f 75 74 20 6f 66 20 36 20 62 69 2d 63 75 62 69 63 20 70 61 74 63 68 65 73 20 28 34 78 34 20 63	out.of.6.bi-cubic.patches.(4x4.c
00e0	6f 6e 74 72 6f 6c 20 70 6f 69 6e 74 73 29 2e 20 45 76 65 72 79 20 63 6f 6e 74 72 6f 6c 20 70 6f	ontrol.points)..Every.control.po
0100	69 6e 74 20 72 65 70 72 65 73 65 6e 74 73 20 61 20 73 6d 6f 6f 74 68 65 64 20 70 6f 69 6e 74 20	int.represents.a.smoothed.point.
0120	6f 66 20 74 68 65 20 6f 73 63 69 6c 6c 6f 73 63 6f 70 65 20 73 69 67 6e 61 6c 2e 20 54 6f 20 73	of.the.oscilloscope.signal..To.s
0140	65 74 20 75 70 20 74 68 65 20 6d 61 74 63 68 69 6e 67 20 65 64 67 65 73 2c 20 49 20 61 73 73 69	et.up.the.matching.edges,.I.assi
0160	67 6e 65 64 20 65 76 65 72 79 20 70 6f 69 6e 74 20 6f 6e 20 70 61 70 65 72 20 62 65 66 6f 72 65	gned.every.point.on.paper.before
0180	20 77 72 69 74 69 6e 67 20 74 68 65 20 73 63 6f 70 65 73 2e 20 54 6f 20 63 6c 6f 73 65 20 74 68	.writing.the.scopes..To.close.th
01a0	65 20 70 61 74 63 68 65 73 2c 20 74 68 65 20 64 65 66 6f 72 6d 61 74 69 6f 6e 73 20 61 72 65 20	e.patches,.the.deformations.are.
01c0	61 70 70 6c 69 65 64 20 74 6f 20 74 68 65 20 76 65 72 74 65 78 2d 6e 6f 72 6d 61 6c 73 20 6f 66	applied.to.the.vertex-normals.of
01e0	20 61 74 20 65 76 65 72 79 20 70 6f 69 6e 74 2c 20 72 61 74 68 65 72 20 74 68 61 6e 20 73 69 6d	.at.every.point,.rather.than.sim
0200	70 6c 79 20 6f 75 74 77 61 72 64 73 2e 0d 0a 0d 0a 54 68 65 20 62 61 63 6b 67 72 6f 75 6e 64 20	ply.outwards.....The.background.
0220	69 73 20 66 69 6c 6c 65 64 20 6f 6e 62 65 61 74 20 77 69 74 68 20 74 68 65 20 63 75 72 72 65 6e	is.filled.onbeat.with.the.curren
0240	74 20 63 75 62 65 2c 20 74 68 6f 75 67 68 20 69 6e 20 74 68 65 20 6f 70 70 6f 73 69 74 65 20 63	t.cube,.though.in.the.opposite.c
0260	6f 6c 6f 72 20 74 6f 6e 65 3a 20 63 79 61 6e 2f 62 6c 75 65 2e 20 54 68 69 73 20 6d 61 6b 65 73	olor.tone:.cyan/blue..This.makes
0280	20 74 68 65 20 72 65 64 20 65 64 67 65 73 20 6f 66 20 74 68 65 20 63 75 62 65 20 73 68 69 6d 6d	.the.red.edges.of.the.cube.shimm
02a0	65 72 20 61 77 61 79 20 70 61 72 74 69 61 6c 6c 79 20 61 6e 64 20 67 69 76 65 73 20 69 74 20 73	er.away.partially.and.gives.it.s
02c0	6f 6d 65 20 65 78 74 72 61 20 6b 69 63 6b 2e 0d 0a 0d 0a 53 74 65 76 65 6e 20 57 69 74 74 65 6e	ome.extra.kick.....Steven.Witten
02e0	73 20 2f 20 55 6e 43 6f 6e 65 44 0d 0a 73 74 65 76 65 6e 40 61 63 6b 6f 2e 6e 65 74 20 2d 20 77	s./.UnConeD..steven@acko.net.-.w
0300	77 77 2e 61 63 6b 6f 2e 6e 65 74 0d 0a 0d 0a 28 49 66 20 79 6f 75 20 77 69 73 68 20 74 6f 20 75	ww.acko.net....(If.you.wish.to.u
0320	73 65 20 61 6e 79 20 70 61 72 74 20 6f 66 20 74 68 69 73 20 70 72 65 73 65 74 20 69 6e 20 79 6f	se.any.part.of.this.preset.in.yo
0340	75 72 20 6f 77 6e 20 70 61 63 6b 73 20 79 6f 75 20 61 72 65 20 66 72 65 65 20 74 6f 20 64 6f 20	ur.own.packs.you.are.free.to.do.
0360	73 6f 2c 20 6f 6e 20 74 68 65 20 63 6f 6e 64 69 74 69 6f 6e 20 74 68 61 74 20 79 6f 75 20 69 6e	so,.on.the.condition.that.you.in
0380	63 6c 75 64 65 20 6d 79 20 63 6f 6e 74 61 63 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 29 00 fe ff	clude.my.contact.information)...
03a0	ff ff d2 00 00 00 80 00 00 00 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	..........$.....................
03c0	00 00 00 00 00 00 00 01 00 00 00 0f 00 00 00 4c 00 00 00 ff 7f 00 00 01 2f 00 00 00 64 3d 73 69	...............L......../...d=si
03e0	6e 28 64 2a 28 31 2b 64 2a 73 69 6e 28 72 2a 31 35 30 29 2a 2e 31 35 29 29 2a 2e 35 2b 64 2a 2e	n(d(1+dsin(r150).15)).5+d.
0400	35 3b 72 3d 72 2b 2e 30 31 3b 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 fe	5;r=r+.01;......................
0420	ff ff ff 51 00 00 00 82 02 00 02 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	...Q.......$....................
0440	00 00 00 00 01 00 00 00 01 00 00 00 12 00 00 00 0c 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00	................................
0460	0c 00 00 00 10 00 00 00 02 00 00 00 9f 9f 9f 00 9f 9f 9f 00 0a 00 00 00 68 f3 7a 03 43 6f 6c 6f	........................h.z.Colo
0480	72 20 4d 61 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 bc 02 00 00	r.Map...........................
04a0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 03 00 00 00 b8 1f 7c 03 00 00 00 00	..........................\|.....
04c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
04e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 90 1f 7c 03 00 00 00 00 00 00 00 00	......................\|.........
0500	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0520	00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 68 1f 7c 03 00 00 00 00 00 00 00 00 00 00 00 00	................h.\|.............
0540	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0560	00 00 00 00 00 00 00 00 02 00 00 00 40 1f 7c 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	............@.\|.................
0580	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
05a0	00 00 00 00 02 00 00 00 18 1f 7c 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	..........\|.....................
05c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
05e0	02 00 00 00 f0 1f 7c 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	......\|.........................
0600	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00	................................
0620	18 20 7c 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	..\|.............................
0640	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 40 20 7c 03	............................@.\|.
0660	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0680	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 34 00 00 00 ff ff ff 00 01 00 00 00 82 00 00 00	................4...............
06a0	f0 a7 0f 00 6b 0a 00 00 ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	....k...........................
06c0	ff 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff 00 00 00 ff ff ff 00	................................
06e0	01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00	................................
0700	00 00 00 00 00 00 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
0720	ff 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff 00 00 00 ff ff ff 00	................................
0740	01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 fe ff ff ff	................................
0760	bb 5a 00 00 81 01 00 04 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.Z......$.......................
0780	00 00 00 00 00 01 00 00 00 28 00 00 00 04 00 00 00 01 00 01 80 1b 00 00 00 24 00 00 00 01 00 00	.........(...............$......
07a0	00 ff ff 00 00 00 00 00 00 00 00 00 00 a4 70 0d 41 64 01 00 00 00 00 00 00 00 00 80 40 0f 00 00	..............p.Ad..........@...
07c0	00 24 00 00 00 69 07 00 00 01 10 03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64 78 2d	.$...i........gy=if(equal(gx,dx-
07e0	31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d 31 29	1),gy+1,gy);gx=if(below(gx,dx-1)
0800	2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d 67 78 2a 69 64 31 3b 79 32 3d 67 79 2a 69 64 31 3b 0d	,gx+1,0);..x1=gxid1;y2=gyid1;.
0820	0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28 72 65	.red=1-x1;green=1-y2;..c1=sqr(re
0840	64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30 20 2b	d)redp00.+.3sqr(red)x1*p10.+
0860	20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a	.3redsqr(x1)p20.+.sqr(x1)x1*
0880	70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a 73 71	p30;..c2=sqr(red)redp01.+.3*sq
08a0	72 28 72 65 64 29 2a 78 31 2a 70 31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32	r(red)x1p11.+.3redsqr(x1)*p2
08c0	31 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65 64 29	1.+.sqr(x1)x1p31;..c3=sqr(red)
08e0	2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b 20 33	redp02.+.3sqr(red)x1*p12.+.3
0900	2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33	redsqr(x1)p22.+.sqr(x1)x1*p3
0920	32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71 72 28	2;..c4=sqr(red)redp03.+.3*sqr(
0940	72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 33 20	red)x1p13.+.3redsqr(x1)*p23.
0960	2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67 72 65	+.sqr(x1)x1p33;..c1=3*(sqr(gre
0980	65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32 2a 63	en)greenc1.+.3sqr(green)y2*c
09a0	32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79 32 29	2.+.3greensqr(y2)*c3.+.sqr(y2)
09c0	2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a 70 78 3d 78 31 2a 32 2d 31 3b 70 79 3d 79 32 2a 32 2d	y2c4).+.1;..px=x12-1;py=y22-
09e0	31 3b 70 7a 3d 2d 31 3b 0d 0a 70 78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d 70	1;pz=-1;..px=pxc1;py=pyc1;pz=p
0a00	7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d 70	zc1;..x1=pxcz+pysz;py=pxsz-p
0a20	79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a 73	ycz;..y2=pycx+pzsx+yo;z2=pys
0a40	78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d 78	x-pzcx;..x3=x1cy+z2*sy+xo;z2=x
0a60	31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e	1sy-z2cy+dt;..x1=if(above(z2,.
0a80	31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66 3b	1),1/z2,0);..x=x3x1;y=y2x1*af;
0aa0	0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72 65	..x1=bnot(equal(gx,0))x12;..re
0ac0	64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64 03	d=x1.5;green=x12;blue=x1*2;.d.
0ae0	00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b 31	..t=t-.05;dt=sin(t)sin(t.411+1
0b00	29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67 79	)cos(sin(t.117))*.5+3;gx=-1;gy
0b20	3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b 72	=0;rx=rx.95+rxt.05;ry=ry*.95+r
0b40	79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73 28	yt.05;rz=rz.95+rzt*.05;cx=cos(
0b60	72 78 29 3b 73 78 3d 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	rx);sx=sin(rx);cy=cos(ry);sy=sin
0b80	28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77 2f	(ry);cz=cos(rz);sz=sin(rz);af=w/
0ba0	68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e 34 31 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a 2e	h;p00=getosc(0.41,0,0).35+p00.
0bc0	36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30 2e 30 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30 2a	65;p10=getosc(0.00,0,0).35+p10
0be0	2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28 30 2e 39 32 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 30	.65;p20=getosc(0.92,0,0)*.35+p20
0c00	2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63 28 30 2e 33 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 33	.65;p30=getosc(0.36,0,0).35+p3
0c20	30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73 63 28 30 2e 36 30 2c 30 2c 30 29 2a 2e 33 35 2b 70	0.65;p01=getosc(0.60,0,0).35+p
0c40	30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f 73 63 28 30 2e 35 39 2c 30 2c 30 29 2a 2e 35 35 2b	01.65;p11=getosc(0.59,0,0).55+
0c60	70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74 6f 73 63 28 30 2e 37 37 2c 30 2c 30 29 2a 2e 35 35	p11.65;p21=getosc(0.77,0,0).55
0c80	2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65 74 6f 73 63 28 30 2e 38 34 2c 30 2c 30 29 2a 2e 33	+p21.65;p31=getosc(0.84,0,0).3
0ca0	35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67 65 74 6f 73 63 28 30 2e 37 34 2c 30 2c 30 29 2a 2e	5+p31.65;p02=getosc(0.74,0,0).
0cc0	33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d 67 65 74 6f 73 63 28 30 2e 35 32 2c 30 2c 30 29 2a	35+p02.65;p12=getosc(0.52,0,0)
0ce0	2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 31 33 2c 30 2c 30 29	.55+p12*.65;p22=getosc(0.13,0,0)
0d00	2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 32 30 2c 30 2c 30	.55+p22.65;p32=getosc(0.20,0,0
0d20	29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 36 37 2c 30 2c	).35+p32.65;p03=getosc(0.67,0,
0d40	30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e 37 36 2c 30	0).35+p03.65;p13=getosc(0.76,0
0d60	2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 33 37 2c	,0).35+p13.65;p23=getosc(0.37,
0d80	30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 31 37	0,0).35+p23.65;p33=getosc(0.17
0da0	2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35 2b	,0,0).35+p33.65;cr=sin(hu)*.5+
0dc0	2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e 28	.9;cg=sin(hu+2.09)*.5+.9;cb=sin(
0de0	68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73 69	hu+4.18).5+.9;xo=sin(t.741)*si
0e00	6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69 6e	n(t.114)cos(sin(t*.41));yo=sin
0e20	28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e	(t.574)sin(t.319)cos(sin(t*.
0e40	33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30	33));.....rxt=(abs((getosc(.55,0
0e60	2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a	,0)+getosc(.91,0,0))2000)%628)
0e80	2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67 65	.01;ryt=(abs((getosc(.12,0,0)+ge
0ea0	74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 7a	tosc(.41,0,0))2000)%628).01;rz
0ec0	74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e	t=(abs((getosc(.55,0,0)+getosc(.
0ee0	39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78 3d	91,0,0))2000)%628).01;.%...dx=
0f00	38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31 29	8;n=sqr(dx);id=2/dx;id1=1/(dx-1)
0f20	3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 69 07 00 00 01 10 03 00 00 67	;.................$...i........g
0f40	79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78 3d	y=if(equal(gx,dx-1),gy+1,gy);gx=
0f60	69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d 67	if(below(gx,dx-1),gx+1,0);..x1=g
0f80	79 2a 69 64 31 3b 79 32 3d 67 78 2a 69 64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65 6e	yid1;y2=gxid1;..red=1-x1;green
0fa0	3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33 2a	=1-y2;..c1=sqr(red)redp00.+.3*
0fc0	73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a	sqr(red)x1p10.+.3redsqr(x1)*
0fe0	70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72 65	p20.+.sqr(x1)x1p30;..c2=sqr(re
1000	64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20 2b	d)redp01.+.3sqr(red)x1*p11.+
1020	20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a	.3redsqr(x1)p21.+.sqr(x1)x1*
1040	70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73 71	p31;..c3=sqr(red)redp02.+.3*sq
1060	72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32	r(red)x1p12.+.3redsqr(x1)*p2
1080	32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64 29	2.+.sqr(x1)x1p32;..c4=sqr(red)
10a0	2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20 33	redp03.+.3sqr(red)x1*p13.+.3
10c0	2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33	redsqr(x1)p23.+.sqr(x1)x1*p3
10e0	33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b 20	3;..c1=3(sqr(green)green*c1.+.
1100	33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71 72	3sqr(green)y2c2.+.3green*sqr
1120	28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a 70	(y2)c3.+.sqr(y2)y2*c4).+.1;..p
1140	78 3d 78 31 2a 32 2d 31 3b 70 79 3d 79 32 2a 32 2d 31 3b 70 7a 3d 2d 31 3b 0d 0a 70 78 3d 70 78	x=x12-1;py=y22-1;pz=-1;..px=px
1160	2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a	c1;py=pyc1;pz=pzc1;..x1=pxcz
1180	2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78	+pysz;py=pxsz-pycz;..y2=pycx
11a0	2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31	+pzsx+yo;z2=pysx-pz*cx;..x3=x1
11c0	2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d	cy+z2sy+xo;z2=x1sy-z2cy+dt;.
11e0	0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d	.x1=if(above(z2,.1),1/z2,0);..x=
1200	78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c	x3x1;y=y2x1*af;..x1=bnot(equal
1220	28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78	(gx,0))x12;..red=x1*.5;green=x
1240	31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69	12;blue=x12;.d...t=t-.05;dt=si
1260	6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31	n(t)sin(t.411+1)cos(sin(t.11
1280	37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78	7)).5+3;gx=-1;gy=0;rx=rx.95+rx
12a0	74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39	t.05;ry=ry.95+ryt.05;rz=rz.9
12c0	35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b	5+rzt*.05;cx=cos(rx);sx=sin(rx);
12e0	63 79 3d 63 6f 73 28 72 79 29 3b 73 79 3d 73 69 6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29	cy=cos(ry);sy=sin(ry);cz=cos(rz)
1300	3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e	;sz=sin(rz);af=w/h;p00=getosc(0.
1320	34 31 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30	41,0,0).35+p00.65;p10=getosc(0
1340	2e 30 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28	.00,0,0).35+p10.65;p20=getosc(
1360	30 2e 39 32 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63	0.92,0,0).35+p20.65;p30=getosc
1380	28 30 2e 33 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73	(0.36,0,0).35+p30.65;p01=getos
13a0	63 28 30 2e 36 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f	c(0.60,0,0).35+p01.65;p11=geto
13c0	73 63 28 30 2e 35 39 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74	sc(0.59,0,0).55+p11.65;p21=get
13e0	6f 73 63 28 30 2e 37 37 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65	osc(0.77,0,0).55+p21.65;p31=ge
1400	74 6f 73 63 28 30 2e 38 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67	tosc(0.84,0,0).35+p31.65;p02=g
1420	65 74 6f 73 63 28 30 2e 37 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d	etosc(0.74,0,0).35+p02.65;p12=
1440	67 65 74 6f 73 63 28 30 2e 35 32 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32	getosc(0.52,0,0).55+p12.65;p22
1460	3d 67 65 74 6f 73 63 28 30 2e 31 33 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33	=getosc(0.13,0,0).55+p22.65;p3
1480	32 3d 67 65 74 6f 73 63 28 30 2e 32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70	2=getosc(0.20,0,0).35+p32.65;p
14a0	30 33 3d 67 65 74 6f 73 63 28 30 2e 36 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b	03=getosc(0.67,0,0).35+p03.65;
14c0	70 31 33 3d 67 65 74 6f 73 63 28 30 2e 37 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35	p13=getosc(0.76,0,0).35+p13.65
14e0	3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 33 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36	;p23=getosc(0.37,0,0).35+p23.6
1500	35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 31 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e	5;p33=getosc(0.17,0,0).35+p33.
1520	36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e	65;cr=sin(hu)*.5+.9;cg=sin(hu+2.
1540	30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b	09).5+.9;cb=sin(hu+4.18).5+.9;
1560	78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73	xo=sin(t.741)sin(t.114)cos(s
1580	69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a	in(t.41));yo=sin(t.574)sin(t
15a0	2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28	.319)cos(sin(t.33));.....rxt=(
15c0	61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c	abs((getosc(.55,0,0)+getosc(.91,
15e0	30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67	0,0))2000)%628).01;ryt=(abs((g
1600	65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a	etosc(.12,0,0)+getosc(.41,0,0))*
1620	32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28	2000)%628)*.01;rzt=(abs((getosc(
1640	2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25	.55,0,0)+getosc(.91,0,0))*2000)%
1660	36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d	628)*.01;.%...dx=8;n=sqr(dx);id=
1680	32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01	2/dx;id1=1/(dx-1);..............
16a0	00 00 00 24 00 00 00 68 07 00 00 01 0f 03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64	...$...h........gy=if(equal(gx,d
16c0	78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d	x-1),gy+1,gy);gx=if(below(gx,dx-
16e0	31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d 67 78 2a 69 64 31 3b 79 32 3d 67 79 2a 69 64 31	1),gx+1,0);..x1=gxid1;y2=gyid1
1700	3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28	;..red=1-x1;green=1-y2;..c1=sqr(
1720	72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30	red)redp00.+.3sqr(red)x1*p10
1740	20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78	.+.3redsqr(x1)p20.+.sqr(x1)x
1760	31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a	1p30;..c2=sqr(red)redp01.+.3
1780	73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a	sqr(red)x1p11.+.3redsqr(x1)*
17a0	70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65	p21.+.sqr(x1)x1p31;..c3=sqr(re
17c0	64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b	d)redp02.+.3sqr(red)x1*p12.+
17e0	20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a	.3redsqr(x1)p22.+.sqr(x1)x1*
1800	70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71	p32;..c4=sqr(red)redp03.+.3*sq
1820	72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32	r(red)x1p13.+.3redsqr(x1)*p2
1840	33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67	3.+.sqr(x1)x1p33;..c1=3*(sqr(g
1860	72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32	reen)greenc1.+.3sqr(green)y2
1880	2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79	c2.+.3greensqr(y2)c3.+.sqr(y
18a0	32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a 70 78 3d 78 31 2a 32 2d 31 3b 70 79 3d 79 32 2a	2)y2c4).+.1;..px=x12-1;py=y2
18c0	32 2d 31 3b 70 7a 3d 31 3b 0d 0a 70 78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d	2-1;pz=1;..px=pxc1;py=pyc1;pz=
18e0	70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d	pzc1;..x1=pxcz+pysz;py=pxsz-
1900	70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a	pycz;..y2=pycx+pzsx+yo;z2=py
1920	73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d	sx-pzcx;..x3=x1cy+z2*sy+xo;z2=
1940	78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c	x1sy-z2cy+dt;..x1=if(above(z2,
1960	2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66	.1),1/z2,0);..x=x3x1;y=y2x1*af
1980	3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72	;..x1=bnot(equal(gx,0))x12;..r
19a0	65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64	ed=x1.5;green=x12;blue=x1*2;.d
19c0	03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b	...t=t-.05;dt=sin(t)sin(t.411+
19e0	31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67	1)cos(sin(t.117))*.5+3;gx=-1;g
1a00	79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b	y=0;rx=rx.95+rxt.05;ry=ry*.95+
1a20	72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73	ryt.05;rz=rz.95+rzt*.05;cx=cos
1a40	28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b 63 79 3d 63 6f 73 28 72 79 29 3b 73 79 3d 73 69	(rx);sx=sin(rx);cy=cos(ry);sy=si
1a60	6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77	n(ry);cz=cos(rz);sz=sin(rz);af=w
1a80	2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e 34 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a	/h;p00=getosc(0.49,0,0).35+p00
1aa0	2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30 2e 31 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30	.65;p10=getosc(0.15,0,0)*.35+p10
1ac0	2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28 30 2e 38 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 32	.65;p20=getosc(0.84,0,0).35+p2
1ae0	30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63 28 30 2e 33 38 2c 30 2c 30 29 2a 2e 33 35 2b 70	0.65;p30=getosc(0.38,0,0).35+p
1b00	33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73 63 28 30 2e 32 36 2c 30 2c 30 29 2a 2e 33 35 2b	30.65;p01=getosc(0.26,0,0).35+
1b20	70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f 73 63 28 30 2e 34 38 2c 30 2c 30 29 2a 2e 35 35	p01.65;p11=getosc(0.48,0,0).55
1b40	2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74 6f 73 63 28 30 2e 31 31 2c 30 2c 30 29 2a 2e 35	+p11.65;p21=getosc(0.11,0,0).5
1b60	35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65 74 6f 73 63 28 30 2e 32 35 2c 30 2c 30 29 2a 2e	5+p21.65;p31=getosc(0.25,0,0).
1b80	33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67 65 74 6f 73 63 28 30 2e 31 39 2c 30 2c 30 29 2a	35+p31.65;p02=getosc(0.19,0,0)
1ba0	2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d 67 65 74 6f 73 63 28 31 2e 30 30 2c 30 2c 30 29	.35+p02*.65;p12=getosc(1.00,0,0)
1bc0	2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 37 35 2c 30 2c 30	.55+p12.65;p22=getosc(0.75,0,0
1be0	29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 37 34 2c 30 2c	).55+p22.65;p32=getosc(0.74,0,
1c00	30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 32 30 2c 30	0).35+p32.65;p03=getosc(0.20,0
1c20	2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e 39 34 2c	,0).35+p03.65;p13=getosc(0.94,
1c40	30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 33 35	0,0).35+p13.65;p23=getosc(0.35
1c60	2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 39	,0,0).35+p23.65;p33=getosc(0.9
1c80	33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35	3,0,0).35+p33.65;cr=sin(hu)*.5
1ca0	2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e	+.9;cg=sin(hu+2.09)*.5+.9;cb=sin
1cc0	28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73	(hu+4.18).5+.9;xo=sin(t.741)*s
1ce0	69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69	in(t.114)cos(sin(t*.41));yo=si
1d00	6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a	n(t.574)sin(t.319)cos(sin(t*
1d20	2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c	.33));.....rxt=(abs((getosc(.55,
1d40	30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29	0,0)+getosc(.91,0,0))*2000)%628)
1d60	2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67	*.01;ryt=(abs((getosc(.12,0,0)+g
1d80	65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72	etosc(.41,0,0))2000)%628).01;r
1da0	7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28	zt=(abs((getosc(.55,0,0)+getosc(
1dc0	2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78	.91,0,0))2000)%628).01;.%...dx
1de0	3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31	=8;n=sqr(dx);id=2/dx;id1=1/(dx-1
1e00	29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 68 07 00 00 01 0f 03 00 00	);.................$...h........
1e20	67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78	gy=if(equal(gx,dx-1),gy+1,gy);gx
1e40	3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d	=if(below(gx,dx-1),gx+1,0);..x1=
1e60	67 79 2a 69 64 31 3b 79 32 3d 67 78 2a 69 64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65	gyid1;y2=gxid1;..red=1-x1;gree
1e80	6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33	n=1-y2;..c1=sqr(red)redp00.+.3
1ea0	2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29	sqr(red)x1p10.+.3red*sqr(x1)
1ec0	2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72	p20.+.sqr(x1)x1*p30;..c2=sqr(r
1ee0	65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20	ed)redp01.+.3sqr(red)x1*p11.
1f00	2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31	+.3redsqr(x1)p21.+.sqr(x1)x1
1f20	2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73	p31;..c3=sqr(red)redp02.+.3s
1f40	71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70	qr(red)x1p12.+.3redsqr(x1)*p
1f60	32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64	22.+.sqr(x1)x1p32;..c4=sqr(red
1f80	29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20	)redp03.+.3sqr(red)x1*p13.+.
1fa0	33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70	3redsqr(x1)p23.+.sqr(x1)x1*p
1fc0	33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b	33;..c1=3(sqr(green)green*c1.+
1fe0	20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71	.3sqr(green)y2c2.+.3green*sq
2000	72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a	r(y2)c3.+.sqr(y2)y2*c4).+.1;..
2020	70 78 3d 78 31 2a 32 2d 31 3b 70 79 3d 79 32 2a 32 2d 31 3b 70 7a 3d 31 3b 0d 0a 70 78 3d 70 78	px=x12-1;py=y22-1;pz=1;..px=px
2040	2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a	c1;py=pyc1;pz=pzc1;..x1=pxcz
2060	2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78	+pysz;py=pxsz-pycz;..y2=pycx
2080	2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31	+pzsx+yo;z2=pysx-pz*cx;..x3=x1
20a0	2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d	cy+z2sy+xo;z2=x1sy-z2cy+dt;.
20c0	0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d	.x1=if(above(z2,.1),1/z2,0);..x=
20e0	78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c	x3x1;y=y2x1*af;..x1=bnot(equal
2100	28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78	(gx,0))x12;..red=x1*.5;green=x
2120	31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69	12;blue=x12;.d...t=t-.05;dt=si
2140	6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31	n(t)sin(t.411+1)cos(sin(t.11
2160	37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78	7)).5+3;gx=-1;gy=0;rx=rx.95+rx
2180	74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39	t.05;ry=ry.95+ryt.05;rz=rz.9
21a0	35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b	5+rzt*.05;cx=cos(rx);sx=sin(rx);
21c0	63 79 3d 63 6f 73 28 72 79 29 3b 73 79 3d 73 69 6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29	cy=cos(ry);sy=sin(ry);cz=cos(rz)
21e0	3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e	;sz=sin(rz);af=w/h;p00=getosc(0.
2200	34 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30	49,0,0).35+p00.65;p10=getosc(0
2220	2e 31 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28	.15,0,0).35+p10.65;p20=getosc(
2240	30 2e 38 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63	0.84,0,0).35+p20.65;p30=getosc
2260	28 30 2e 33 38 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73	(0.38,0,0).35+p30.65;p01=getos
2280	63 28 30 2e 32 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f	c(0.26,0,0).35+p01.65;p11=geto
22a0	73 63 28 30 2e 34 38 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74	sc(0.48,0,0).55+p11.65;p21=get
22c0	6f 73 63 28 30 2e 31 31 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65	osc(0.11,0,0).55+p21.65;p31=ge
22e0	74 6f 73 63 28 30 2e 32 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67	tosc(0.25,0,0).35+p31.65;p02=g
2300	65 74 6f 73 63 28 30 2e 31 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d	etosc(0.19,0,0).35+p02.65;p12=
2320	67 65 74 6f 73 63 28 31 2e 30 30 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32	getosc(1.00,0,0).55+p12.65;p22
2340	3d 67 65 74 6f 73 63 28 30 2e 37 35 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33	=getosc(0.75,0,0).55+p22.65;p3
2360	32 3d 67 65 74 6f 73 63 28 30 2e 37 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70	2=getosc(0.74,0,0).35+p32.65;p
2380	30 33 3d 67 65 74 6f 73 63 28 30 2e 32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b	03=getosc(0.20,0,0).35+p03.65;
23a0	70 31 33 3d 67 65 74 6f 73 63 28 30 2e 39 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35	p13=getosc(0.94,0,0).35+p13.65
23c0	3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 33 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36	;p23=getosc(0.35,0,0).35+p23.6
23e0	35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 39 33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e	5;p33=getosc(0.93,0,0).35+p33.
2400	36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e	65;cr=sin(hu)*.5+.9;cg=sin(hu+2.
2420	30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b	09).5+.9;cb=sin(hu+4.18).5+.9;
2440	78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73	xo=sin(t.741)sin(t.114)cos(s
2460	69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a	in(t.41));yo=sin(t.574)sin(t
2480	2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28	.319)cos(sin(t.33));.....rxt=(
24a0	61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c	abs((getosc(.55,0,0)+getosc(.91,
24c0	30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67	0,0))2000)%628).01;ryt=(abs((g
24e0	65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a	etosc(.12,0,0)+getosc(.41,0,0))*
2500	32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28	2000)%628)*.01;rzt=(abs((getosc(
2520	2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25	.55,0,0)+getosc(.91,0,0))*2000)%
2540	36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d	628)*.01;.%...dx=8;n=sqr(dx);id=
2560	32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01	2/dx;id1=1/(dx-1);..............
2580	00 00 00 24 00 00 00 68 07 00 00 01 0f 03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64	...$...h........gy=if(equal(gx,d
25a0	78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d	x-1),gy+1,gy);gx=if(below(gx,dx-
25c0	31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d 67 78 2a 69 64 31 3b 79 32 3d 67 79 2a 69 64 31	1),gx+1,0);..x1=gxid1;y2=gyid1
25e0	3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28	;..red=1-x1;green=1-y2;..c1=sqr(
2600	72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30	red)redp00.+.3sqr(red)x1*p10
2620	20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78	.+.3redsqr(x1)p20.+.sqr(x1)x
2640	31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a	1p30;..c2=sqr(red)redp01.+.3
2660	73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a	sqr(red)x1p11.+.3redsqr(x1)*
2680	70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65	p21.+.sqr(x1)x1p31;..c3=sqr(re
26a0	64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b	d)redp02.+.3sqr(red)x1*p12.+
26c0	20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a	.3redsqr(x1)p22.+.sqr(x1)x1*
26e0	70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71	p32;..c4=sqr(red)redp03.+.3*sq
2700	72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32	r(red)x1p13.+.3redsqr(x1)*p2
2720	33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67	3.+.sqr(x1)x1p33;..c1=3*(sqr(g
2740	72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32	reen)greenc1.+.3sqr(green)y2
2760	2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79	c2.+.3greensqr(y2)c3.+.sqr(y
2780	32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a 70 79 3d 78 31 2a 32 2d 31 3b 70 7a 3d 79 32 2a	2)y2c4).+.1;..py=x12-1;pz=y2
27a0	32 2d 31 3b 70 78 3d 31 3b 0d 0a 70 78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d	2-1;px=1;..px=pxc1;py=pyc1;pz=
27c0	70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d	pzc1;..x1=pxcz+pysz;py=pxsz-
27e0	70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a	pycz;..y2=pycx+pzsx+yo;z2=py
2800	73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d	sx-pzcx;..x3=x1cy+z2*sy+xo;z2=
2820	78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c	x1sy-z2cy+dt;..x1=if(above(z2,
2840	2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66	.1),1/z2,0);..x=x3x1;y=y2x1*af
2860	3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72	;..x1=bnot(equal(gx,0))x12;..r
2880	65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64	ed=x1.5;green=x12;blue=x1*2;.d
28a0	03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b	...t=t-.05;dt=sin(t)sin(t.411+
28c0	31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67	1)cos(sin(t.117))*.5+3;gx=-1;g
28e0	79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b	y=0;rx=rx.95+rxt.05;ry=ry*.95+
2900	72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73	ryt.05;rz=rz.95+rzt*.05;cx=cos
2920	28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b 63 79 3d 63 6f 73 28 72 79 29 3b 73 79 3d 73 69	(rx);sx=sin(rx);cy=cos(ry);sy=si
2940	6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77	n(ry);cz=cos(rz);sz=sin(rz);af=w
2960	2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e 33 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a	/h;p00=getosc(0.36,0,0).35+p00
2980	2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30 2e 32 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30	.65;p10=getosc(0.24,0,0)*.35+p10
29a0	2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28 30 2e 32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 32	.65;p20=getosc(0.20,0,0).35+p2
29c0	30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63 28 30 2e 31 37 2c 30 2c 30 29 2a 2e 33 35 2b 70	0.65;p30=getosc(0.17,0,0).35+p
29e0	33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73 63 28 30 2e 31 39 2c 30 2c 30 29 2a 2e 33 35 2b	30.65;p01=getosc(0.19,0,0).35+
2a00	70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f 73 63 28 30 2e 35 34 2c 30 2c 30 29 2a 2e 35 35	p01.65;p11=getosc(0.54,0,0).55
2a20	2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74 6f 73 63 28 30 2e 34 31 2c 30 2c 30 29 2a 2e 35	+p11.65;p21=getosc(0.41,0,0).5
2a40	35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65 74 6f 73 63 28 30 2e 30 31 2c 30 2c 30 29 2a 2e	5+p21.65;p31=getosc(0.01,0,0).
2a60	33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67 65 74 6f 73 63 28 30 2e 33 33 2c 30 2c 30 29 2a	35+p31.65;p02=getosc(0.33,0,0)
2a80	2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d 67 65 74 6f 73 63 28 30 2e 30 37 2c 30 2c 30 29	.35+p02*.65;p12=getosc(0.07,0,0)
2aa0	2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 32 37 2c 30 2c 30	.55+p12.65;p22=getosc(0.27,0,0
2ac0	29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 39 33 2c 30 2c	).55+p22.65;p32=getosc(0.93,0,
2ae0	30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 33 38 2c 30	0).35+p32.65;p03=getosc(0.38,0
2b00	2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e 32 35 2c	,0).35+p03.65;p13=getosc(0.25,
2b20	30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 37 34	0,0).35+p13.65;p23=getosc(0.74
2b40	2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 39	,0,0).35+p23.65;p33=getosc(0.9
2b60	33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35	3,0,0).35+p33.65;cr=sin(hu)*.5
2b80	2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e	+.9;cg=sin(hu+2.09)*.5+.9;cb=sin
2ba0	28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73	(hu+4.18).5+.9;xo=sin(t.741)*s
2bc0	69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69	in(t.114)cos(sin(t*.41));yo=si
2be0	6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a	n(t.574)sin(t.319)cos(sin(t*
2c00	2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c	.33));.....rxt=(abs((getosc(.55,
2c20	30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29	0,0)+getosc(.91,0,0))*2000)%628)
2c40	2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67	*.01;ryt=(abs((getosc(.12,0,0)+g
2c60	65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72	etosc(.41,0,0))2000)%628).01;r
2c80	7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28	zt=(abs((getosc(.55,0,0)+getosc(
2ca0	2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78	.91,0,0))2000)%628).01;.%...dx
2cc0	3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31	=8;n=sqr(dx);id=2/dx;id1=1/(dx-1
2ce0	29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 68 07 00 00 01 0f 03 00 00	);.................$...h........
2d00	67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78	gy=if(equal(gx,dx-1),gy+1,gy);gx
2d20	3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d	=if(below(gx,dx-1),gx+1,0);..x1=
2d40	67 79 2a 69 64 31 3b 79 32 3d 67 78 2a 69 64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65	gyid1;y2=gxid1;..red=1-x1;gree
2d60	6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33	n=1-y2;..c1=sqr(red)redp00.+.3
2d80	2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29	sqr(red)x1p10.+.3red*sqr(x1)
2da0	2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72	p20.+.sqr(x1)x1*p30;..c2=sqr(r
2dc0	65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20	ed)redp01.+.3sqr(red)x1*p11.
2de0	2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31	+.3redsqr(x1)p21.+.sqr(x1)x1
2e00	2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73	p31;..c3=sqr(red)redp02.+.3s
2e20	71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70	qr(red)x1p12.+.3redsqr(x1)*p
2e40	32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64	22.+.sqr(x1)x1p32;..c4=sqr(red
2e60	29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20	)redp03.+.3sqr(red)x1*p13.+.
2e80	33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70	3redsqr(x1)p23.+.sqr(x1)x1*p
2ea0	33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b	33;..c1=3(sqr(green)green*c1.+
2ec0	20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71	.3sqr(green)y2c2.+.3green*sq
2ee0	72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a	r(y2)c3.+.sqr(y2)y2*c4).+.1;..
2f00	70 79 3d 78 31 2a 32 2d 31 3b 70 7a 3d 79 32 2a 32 2d 31 3b 70 78 3d 31 3b 0d 0a 70 78 3d 70 78	py=x12-1;pz=y22-1;px=1;..px=px
2f20	2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a	c1;py=pyc1;pz=pzc1;..x1=pxcz
2f40	2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78	+pysz;py=pxsz-pycz;..y2=pycx
2f60	2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31	+pzsx+yo;z2=pysx-pz*cx;..x3=x1
2f80	2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d	cy+z2sy+xo;z2=x1sy-z2cy+dt;.
2fa0	0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d	.x1=if(above(z2,.1),1/z2,0);..x=
2fc0	78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c	x3x1;y=y2x1*af;..x1=bnot(equal
2fe0	28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78	(gx,0))x12;..red=x1*.5;green=x
3000	31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69	12;blue=x12;.d...t=t-.05;dt=si
3020	6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31	n(t)sin(t.411+1)cos(sin(t.11
3040	37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78	7)).5+3;gx=-1;gy=0;rx=rx.95+rx
3060	74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39	t.05;ry=ry.95+ryt.05;rz=rz.9
3080	35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b	5+rzt*.05;cx=cos(rx);sx=sin(rx);
30a0	63 79 3d 63 6f 73 28 72 79 29 3b 73 79 3d 73 69 6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29	cy=cos(ry);sy=sin(ry);cz=cos(rz)
30c0	3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e	;sz=sin(rz);af=w/h;p00=getosc(0.
30e0	33 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30	36,0,0).35+p00.65;p10=getosc(0
3100	2e 32 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28	.24,0,0).35+p10.65;p20=getosc(
3120	30 2e 32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63	0.20,0,0).35+p20.65;p30=getosc
3140	28 30 2e 31 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73	(0.17,0,0).35+p30.65;p01=getos
3160	63 28 30 2e 31 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f	c(0.19,0,0).35+p01.65;p11=geto
3180	73 63 28 30 2e 35 34 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74	sc(0.54,0,0).55+p11.65;p21=get
31a0	6f 73 63 28 30 2e 34 31 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65	osc(0.41,0,0).55+p21.65;p31=ge
31c0	74 6f 73 63 28 30 2e 30 31 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67	tosc(0.01,0,0).35+p31.65;p02=g
31e0	65 74 6f 73 63 28 30 2e 33 33 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d	etosc(0.33,0,0).35+p02.65;p12=
3200	67 65 74 6f 73 63 28 30 2e 30 37 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32	getosc(0.07,0,0).55+p12.65;p22
3220	3d 67 65 74 6f 73 63 28 30 2e 32 37 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33	=getosc(0.27,0,0).55+p22.65;p3
3240	32 3d 67 65 74 6f 73 63 28 30 2e 39 33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70	2=getosc(0.93,0,0).35+p32.65;p
3260	30 33 3d 67 65 74 6f 73 63 28 30 2e 33 38 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b	03=getosc(0.38,0,0).35+p03.65;
3280	70 31 33 3d 67 65 74 6f 73 63 28 30 2e 32 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35	p13=getosc(0.25,0,0).35+p13.65
32a0	3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 37 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36	;p23=getosc(0.74,0,0).35+p23.6
32c0	35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 39 33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e	5;p33=getosc(0.93,0,0).35+p33.
32e0	36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e	65;cr=sin(hu)*.5+.9;cg=sin(hu+2.
3300	30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b	09).5+.9;cb=sin(hu+4.18).5+.9;
3320	78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73	xo=sin(t.741)sin(t.114)cos(s
3340	69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a	in(t.41));yo=sin(t.574)sin(t
3360	2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28	.319)cos(sin(t.33));.....rxt=(
3380	61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c	abs((getosc(.55,0,0)+getosc(.91,
33a0	30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67	0,0))2000)%628).01;ryt=(abs((g
33c0	65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a	etosc(.12,0,0)+getosc(.41,0,0))*
33e0	32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28	2000)%628)*.01;rzt=(abs((getosc(
3400	2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25	.55,0,0)+getosc(.91,0,0))*2000)%
3420	36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d	628)*.01;.%...dx=8;n=sqr(dx);id=
3440	32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01	2/dx;id1=1/(dx-1);..............
3460	00 00 00 24 00 00 00 69 07 00 00 01 10 03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64	...$...i........gy=if(equal(gx,d
3480	78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d	x-1),gy+1,gy);gx=if(below(gx,dx-
34a0	31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d 67 78 2a 69 64 31 3b 79 32 3d 67 79 2a 69 64 31	1),gx+1,0);..x1=gxid1;y2=gyid1
34c0	3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28	;..red=1-x1;green=1-y2;..c1=sqr(
34e0	72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30	red)redp00.+.3sqr(red)x1*p10
3500	20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78	.+.3redsqr(x1)p20.+.sqr(x1)x
3520	31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a	1p30;..c2=sqr(red)redp01.+.3
3540	73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a	sqr(red)x1p11.+.3redsqr(x1)*
3560	70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65	p21.+.sqr(x1)x1p31;..c3=sqr(re
3580	64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b	d)redp02.+.3sqr(red)x1*p12.+
35a0	20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a	.3redsqr(x1)p22.+.sqr(x1)x1*
35c0	70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71	p32;..c4=sqr(red)redp03.+.3*sq
35e0	72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32	r(red)x1p13.+.3redsqr(x1)*p2
3600	33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67	3.+.sqr(x1)x1p33;..c1=3*(sqr(g
3620	72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32	reen)greenc1.+.3sqr(green)y2
3640	2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79	c2.+.3greensqr(y2)c3.+.sqr(y
3660	32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a 70 79 3d 78 31 2a 32 2d 31 3b 70 7a 3d 79 32 2a	2)y2c4).+.1;..py=x12-1;pz=y2
3680	32 2d 31 3b 70 78 3d 2d 31 3b 0d 0a 70 78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a	2-1;px=-1;..px=pxc1;py=pyc1;pz
36a0	3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a	=pzc1;..x1=pxcz+pysz;py=pxsz
36c0	2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79	-pycz;..y2=pycx+pz*sx+yo;z2=py
36e0	2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32	sx-pzcx;..x3=x1cy+z2sy+xo;z2
3700	3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32	=x1sy-z2cy+dt;..x1=if(above(z2
3720	2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61	,.1),1/z2,0);..x=x3x1;y=y2x1*a
3740	66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a	f;..x1=bnot(equal(gx,0))x12;..
3760	72 65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00	red=x1.5;green=x12;blue=x1*2;.
3780	64 03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31	d...t=t-.05;dt=sin(t)sin(t.411
37a0	2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b	+1)cos(sin(t.117))*.5+3;gx=-1;
37c0	67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35	gy=0;rx=rx.95+rxt.05;ry=ry*.95
37e0	2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f	+ryt.05;rz=rz.95+rzt*.05;cx=co
3800	73 28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b 63 79 3d 63 6f 73 28 72 79 29 3b 73 79 3d 73	s(rx);sx=sin(rx);cy=cos(ry);sy=s
3820	69 6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d	in(ry);cz=cos(rz);sz=sin(rz);af=
3840	77 2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e 34 31 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30	w/h;p00=getosc(0.41,0,0)*.35+p00
3860	2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30 2e 36 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 31	.65;p10=getosc(0.60,0,0).35+p1
3880	30 2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28 30 2e 37 34 2c 30 2c 30 29 2a 2e 33 35 2b 70	0.65;p20=getosc(0.74,0,0).35+p
38a0	32 30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63 28 30 2e 36 37 2c 30 2c 30 29 2a 2e 33 35 2b	20.65;p30=getosc(0.67,0,0).35+
38c0	70 33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73 63 28 30 2e 30 36 2c 30 2c 30 29 2a 2e 33 35	p30.65;p01=getosc(0.06,0,0).35
38e0	2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f 73 63 28 30 2e 34 32 2c 30 2c 30 29 2a 2e 35	+p01.65;p11=getosc(0.42,0,0).5
3900	35 2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74 6f 73 63 28 30 2e 35 36 2c 30 2c 30 29 2a 2e	5+p11.65;p21=getosc(0.56,0,0).
3920	35 35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65 74 6f 73 63 28 30 2e 39 37 2c 30 2c 30 29 2a	55+p21.65;p31=getosc(0.97,0,0)
3940	2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67 65 74 6f 73 63 28 30 2e 34 39 2c 30 2c 30 29	.35+p31*.65;p02=getosc(0.49,0,0)
3960	2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d 67 65 74 6f 73 63 28 30 2e 37 35 2c 30 2c 30	.35+p02.65;p12=getosc(0.75,0,0
3980	29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 38 33 2c 30 2c	).55+p12.65;p22=getosc(0.83,0,
39a0	30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 37 30 2c 30	0).55+p22.65;p32=getosc(0.70,0
39c0	2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 34 39 2c	,0).35+p32.65;p03=getosc(0.49,
39e0	30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e 32 36	0,0).35+p03.65;p13=getosc(0.26
3a00	2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 31	,0,0).35+p13.65;p23=getosc(0.1
3a20	39 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e	9,0,0).35+p23.65;p33=getosc(0.
3a40	32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e	20,0,0).35+p33.65;cr=sin(hu)*.
3a60	35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69	5+.9;cg=sin(hu+2.09)*.5+.9;cb=si
3a80	6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a	n(hu+4.18).5+.9;xo=sin(t.741)*
3aa0	73 69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73	sin(t.114)cos(sin(t*.41));yo=s
3ac0	69 6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74	in(t.574)sin(t.319)cos(sin(t
3ae0	2a 2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35	*.33));.....rxt=(abs((getosc(.55
3b00	2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38	,0,0)+getosc(.91,0,0))*2000)%628
3b20	29 2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b	)*.01;ryt=(abs((getosc(.12,0,0)+
3b40	67 65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b	getosc(.41,0,0))2000)%628).01;
3b60	72 7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63	rzt=(abs((getosc(.55,0,0)+getosc
3b80	28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64	(.91,0,0))2000)%628).01;.%...d
3ba0	78 3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d	x=8;n=sqr(dx);id=2/dx;id1=1/(dx-
3bc0	31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 69 07 00 00 01 10 03 00	1);.................$...i.......
3be0	00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67	.gy=if(equal(gx,dx-1),gy+1,gy);g
3c00	78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31	x=if(below(gx,dx-1),gx+1,0);..x1
3c20	3d 67 79 2a 69 64 31 3b 79 32 3d 67 78 2a 69 64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65	=gyid1;y2=gxid1;..red=1-x1;gre
3c40	65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20	en=1-y2;..c1=sqr(red)redp00.+.
3c60	33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31	3sqr(red)x1p10.+.3red*sqr(x1
3c80	29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28	)p20.+.sqr(x1)x1*p30;..c2=sqr(
3ca0	72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31	red)redp01.+.3sqr(red)x1*p11
3cc0	20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78	.+.3redsqr(x1)p21.+.sqr(x1)x
3ce0	31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a	1p31;..c3=sqr(red)redp02.+.3
3d00	73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a	sqr(red)x1p12.+.3redsqr(x1)*
3d20	70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65	p22.+.sqr(x1)x1p32;..c4=sqr(re
3d40	64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b	d)redp03.+.3sqr(red)x1*p13.+
3d60	20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a	.3redsqr(x1)p23.+.sqr(x1)x1*
3d80	70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20	p33;..c1=3(sqr(green)green*c1.
3da0	2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73	+.3sqr(green)y2c2.+.3green*s
3dc0	71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d	qr(y2)c3.+.sqr(y2)y2*c4).+.1;.
3de0	0a 70 79 3d 78 31 2a 32 2d 31 3b 70 7a 3d 79 32 2a 32 2d 31 3b 70 78 3d 2d 31 3b 0d 0a 70 78 3d	.py=x12-1;pz=y22-1;px=-1;..px=
3e00	70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a	pxc1;py=pyc1;pz=pzc1;..x1=px
3e20	63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a	cz+pysz;py=pxsz-pycz;..y2=py
3e40	63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d	cx+pzsx+yo;z2=pysx-pz*cx;..x3=
3e60	78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74	x1cy+z2sy+xo;z2=x1sy-z2cy+dt
3e80	3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a	;..x1=if(above(z2,.1),1/z2,0);..
3ea0	78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75	x=x3x1;y=y2x1*af;..x1=bnot(equ
3ec0	61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e	al(gx,0))x12;..red=x1*.5;green
3ee0	3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d	=x12;blue=x12;.d...t=t-.05;dt=
3f00	73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e	sin(t)sin(t.411+1)cos(sin(t.
3f20	31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b	117)).5+3;gx=-1;gy=0;rx=rx.95+
3f40	72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a	rxt.05;ry=ry.95+ryt.05;rz=rz
3f60	2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78	.95+rzt*.05;cx=cos(rx);sx=sin(rx
3f80	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 3d 63 6f 73 28 72	);cy=cos(ry);sy=sin(ry);cz=cos(r
3fa0	7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28	z);sz=sin(rz);af=w/h;p00=getosc(
3fc0	30 2e 34 31 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63	0.41,0,0).35+p00.65;p10=getosc
3fe0	28 30 2e 36 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73	(0.60,0,0).35+p10.65;p20=getos
4000	63 28 30 2e 37 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f	c(0.74,0,0).35+p20.65;p30=geto
4020	73 63 28 30 2e 36 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74	sc(0.67,0,0).35+p30.65;p01=get
4040	6f 73 63 28 30 2e 30 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65	osc(0.06,0,0).35+p01.65;p11=ge
4060	74 6f 73 63 28 30 2e 34 32 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67	tosc(0.42,0,0).55+p11.65;p21=g
4080	65 74 6f 73 63 28 30 2e 35 36 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d	etosc(0.56,0,0).55+p21.65;p31=
40a0	67 65 74 6f 73 63 28 30 2e 39 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32	getosc(0.97,0,0).35+p31.65;p02
40c0	3d 67 65 74 6f 73 63 28 30 2e 34 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31	=getosc(0.49,0,0).35+p02.65;p1
40e0	32 3d 67 65 74 6f 73 63 28 30 2e 37 35 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70	2=getosc(0.75,0,0).55+p12.65;p
4100	32 32 3d 67 65 74 6f 73 63 28 30 2e 38 33 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b	22=getosc(0.83,0,0).55+p22.65;
4120	70 33 32 3d 67 65 74 6f 73 63 28 30 2e 37 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35	p32=getosc(0.70,0,0).35+p32.65
4140	3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 34 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36	;p03=getosc(0.49,0,0).35+p03.6
4160	35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e 32 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e	5;p13=getosc(0.26,0,0).35+p13.
4180	36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 31 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a	65;p23=getosc(0.19,0,0).35+p23
41a0	2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33	.65;p33=getosc(0.20,0,0)*.35+p33
41c0	2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b	.65;cr=sin(hu).5+.9;cg=sin(hu+
41e0	32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e	2.09).5+.9;cb=sin(hu+4.18).5+.
4200	39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73	9;xo=sin(t.741)sin(t.114)cos
4220	28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28	(sin(t.41));yo=sin(t.574)*sin(
4240	74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72 78 74	t.319)cos(sin(t*.33));.....rxt
4260	3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39	=(abs((getosc(.55,0,0)+getosc(.9
4280	31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28	1,0,0))2000)%628).01;ryt=(abs(
42a0	28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29	(getosc(.12,0,0)+getosc(.41,0,0)
42c0	29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73	)2000)%628).01;rzt=(abs((getos
42e0	63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30	c(.55,0,0)+getosc(.91,0,0))*2000
4300	29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69	)%628)*.01;.%...dx=8;n=sqr(dx);i
4320	64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff	d=2/dx;id1=1/(dx-1);............
4340	00 01 00 00 00 24 00 00 00 69 07 00 00 01 10 03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78	.....$...i........gy=if(equal(gx
4360	2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64	,dx-1),gy+1,gy);gx=if(below(gx,d
4380	78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d 67 78 2a 69 64 31 3b 79 32 3d 67 79 2a 69	x-1),gx+1,0);..x1=gxid1;y2=gyi
43a0	64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71	d1;..red=1-x1;green=1-y2;..c1=sq
43c0	72 28 72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70	r(red)redp00.+.3sqr(red)x1*p
43e0	31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29	10.+.3redsqr(x1)*p20.+.sqr(x1)
4400	2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20	x1p30;..c2=sqr(red)redp01.+.
4420	33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31	3sqr(red)x1p11.+.3red*sqr(x1
4440	29 2a 70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28	)p21.+.sqr(x1)x1*p31;..c3=sqr(
4460	72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32	red)redp02.+.3sqr(red)x1*p12
4480	20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78	.+.3redsqr(x1)p22.+.sqr(x1)x
44a0	31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a	1p32;..c4=sqr(red)redp03.+.3
44c0	73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a	sqr(red)x1p13.+.3redsqr(x1)*
44e0	70 32 33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72	p23.+.sqr(x1)x1p33;..c1=3*(sqr
4500	28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a	(green)greenc1.+.3sqr(green)
4520	79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72	y2c2.+.3greensqr(y2)c3.+.sqr
4540	28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a 70 78 3d 78 31 2a 32 2d 31 3b 70 7a 3d 79	(y2)y2c4).+.1;..px=x1*2-1;pz=y
4560	32 2a 32 2d 31 3b 70 79 3d 2d 31 3b 0d 0a 70 78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b	22-1;py=-1;..px=pxc1;py=py*c1;
4580	70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a	pz=pzc1;..x1=pxcz+pysz;py=px
45a0	73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d	sz-pycz;..y2=pycx+pz*sx+yo;z2=
45c0	70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b	pysx-pzcx;..x3=x1cy+z2sy+xo;
45e0	7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28	z2=x1sy-z2cy+dt;..x1=if(above(
4600	7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31	z2,.1),1/z2,0);..x=x3x1;y=y2x1
4620	2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b	af;..x1=bnot(equal(gx,0))x1*2;
4640	0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32	..red=x1.5;green=x12;blue=x1*2
4660	3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34	;.d...t=t-.05;dt=sin(t)sin(t.4
4680	31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d	11+1)cos(sin(t.117))*.5+3;gx=-
46a0	31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e	1;gy=0;rx=rx.95+rxt.05;ry=ry*.
46c0	39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d	95+ryt.05;rz=rz.95+rzt*.05;cx=
46e0	63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b 63 79 3d 63 6f 73 28 72 79 29 3b 73 79	cos(rx);sx=sin(rx);cy=cos(ry);sy
4700	3d 73 69 6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61	=sin(ry);cz=cos(rz);sz=sin(rz);a
4720	66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e 34 31 2c 30 2c 30 29 2a 2e 33 35 2b 70	f=w/h;p00=getosc(0.41,0,0)*.35+p
4740	30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30 2e 30 30 2c 30 2c 30 29 2a 2e 33 35 2b	00.65;p10=getosc(0.00,0,0).35+
4760	70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28 30 2e 39 32 2c 30 2c 30 29 2a 2e 33 35	p10.65;p20=getosc(0.92,0,0).35
4780	2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63 28 30 2e 33 36 2c 30 2c 30 29 2a 2e 33	+p20.65;p30=getosc(0.36,0,0).3
47a0	35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73 63 28 30 2e 30 36 2c 30 2c 30 29 2a 2e	5+p30.65;p01=getosc(0.06,0,0).
47c0	33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f 73 63 28 30 2e 38 35 2c 30 2c 30 29 2a	35+p01.65;p11=getosc(0.85,0,0)
47e0	2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74 6f 73 63 28 30 2e 33 39 2c 30 2c 30 29	.55+p11*.65;p21=getosc(0.39,0,0)
4800	2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65 74 6f 73 63 28 30 2e 31 39 2c 30 2c 30	.55+p21.65;p31=getosc(0.19,0,0
4820	29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67 65 74 6f 73 63 28 30 2e 34 39 2c 30 2c	).35+p31.65;p02=getosc(0.49,0,
4840	30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d 67 65 74 6f 73 63 28 30 2e 36 31 2c 30	0).35+p02.65;p12=getosc(0.61,0
4860	2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 37 33 2c	,0).55+p12.65;p22=getosc(0.73,
4880	30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 33 33	0,0).55+p22.65;p32=getosc(0.33
48a0	2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 34	,0,0).35+p32.65;p03=getosc(0.4
48c0	39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e	9,0,0).35+p03.65;p13=getosc(0.
48e0	31 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30	15,0,0).35+p13.65;p23=getosc(0
4900	2e 38 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28	.84,0,0).35+p23.65;p33=getosc(
4920	30 2e 33 38 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29	0.38,0,0).35+p33.65;cr=sin(hu)
4940	2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d	.5+.9;cg=sin(hu+2.09).5+.9;cb=
4960	73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31	sin(hu+4.18).5+.9;xo=sin(t.741
4980	29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f	)sin(t.114)cos(sin(t.41));yo
49a0	3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e	=sin(t.574)sin(t.319)cos(sin
49c0	28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e	(t*.33));.....rxt=(abs((getosc(.
49e0	35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36	55,0,0)+getosc(.91,0,0))*2000)%6
4a00	32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30	28)*.01;ryt=(abs((getosc(.12,0,0
4a20	29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30	)+getosc(.41,0,0))2000)%628).0
4a40	31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f	1;rzt=(abs((getosc(.55,0,0)+geto
4a60	73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00	sc(.91,0,0))2000)%628).01;.%..
4a80	00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64	.dx=8;n=sqr(dx);id=2/dx;id1=1/(d
4aa0	78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 69 07 00 00 01 10	x-1);.................$...i.....
4ac0	03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79 29	...gy=if(equal(gx,dx-1),gy+1,gy)
4ae0	3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a	;gx=if(below(gx,dx-1),gx+1,0);..
4b00	78 31 3d 67 79 2a 69 64 31 3b 79 32 3d 67 78 2a 69 64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67	x1=gyid1;y2=gxid1;..red=1-x1;g
4b20	72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 30 20	reen=1-y2;..c1=sqr(red)redp00.
4b40	2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72 28	+.3sqr(red)x1p10.+.3red*sqr(
4b60	78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71	x1)p20.+.sqr(x1)x1*p30;..c2=sq
4b80	72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70	r(red)redp01.+.3sqr(red)x1*p
4ba0	31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 31 20 2b 20 73 71 72 28 78 31 29	11.+.3redsqr(x1)*p21.+.sqr(x1)
4bc0	2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b 20	x1p31;..c3=sqr(red)redp02.+.
4be0	33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31	3sqr(red)x1p12.+.3red*sqr(x1
4c00	29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72 28	)p22.+.sqr(x1)x1*p32;..c4=sqr(
4c20	72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 33	red)redp03.+.3sqr(red)x1*p13
4c40	20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 33 20 2b 20 73 71 72 28 78 31 29 2a 78	.+.3redsqr(x1)p23.+.sqr(x1)x
4c60	31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a 63	1p33;..c1=3(sqr(green)greenc
4c80	31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65 6e	1.+.3sqr(green)y2c2.+.3green
4ca0	2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20 31	sqr(y2)c3.+.sqr(y2)y2c4).+.1
4cc0	3b 0d 0a 70 78 3d 78 31 2a 32 2d 31 3b 70 7a 3d 79 32 2a 32 2d 31 3b 70 79 3d 2d 31 3b 0d 0a 70	;..px=x12-1;pz=y22-1;py=-1;..p
4ce0	78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70	x=pxc1;py=pyc1;pz=pz*c1;..x1=p
4d00	78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70	xcz+pysz;py=pxsz-pycz;..y2=p
4d20	79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78	ycx+pzsx+yo;z2=pysx-pzcx;..x
4d40	33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b	3=x1cy+z2sy+xo;z2=x1sy-z2cy+
4d60	64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b	dt;..x1=if(above(z2,.1),1/z2,0);
4d80	0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65	..x=x3x1;y=y2x1*af;..x1=bnot(e
4da0	71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65	qual(gx,0))x12;..red=x1*.5;gre
4dc0	65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64	en=x12;blue=x12;.d...t=t-.05;d
4de0	74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74	t=sin(t)sin(t.411+1)*cos(sin(t
4e00	2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39	.117)).5+3;gx=-1;gy=0;rx=rx*.9
4e20	35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72	5+rxt.05;ry=ry.95+ryt*.05;rz=r
4e40	7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28	z.95+rzt.05;cx=cos(rx);sx=sin(
4e60	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 3d 63 6f 73	rx);cy=cos(ry);sy=sin(ry);cz=cos
4e80	28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73	(rz);sz=sin(rz);af=w/h;p00=getos
4ea0	63 28 30 2e 34 31 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f	c(0.41,0,0).35+p00.65;p10=geto
4ec0	73 63 28 30 2e 30 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74	sc(0.00,0,0).35+p10.65;p20=get
4ee0	6f 73 63 28 30 2e 39 32 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65	osc(0.92,0,0).35+p20.65;p30=ge
4f00	74 6f 73 63 28 30 2e 33 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67	tosc(0.36,0,0).35+p30.65;p01=g
4f20	65 74 6f 73 63 28 30 2e 30 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d	etosc(0.06,0,0).35+p01.65;p11=
4f40	67 65 74 6f 73 63 28 30 2e 38 35 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31	getosc(0.85,0,0).55+p11.65;p21
4f60	3d 67 65 74 6f 73 63 28 30 2e 33 39 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33	=getosc(0.39,0,0).55+p21.65;p3
4f80	31 3d 67 65 74 6f 73 63 28 30 2e 31 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70	1=getosc(0.19,0,0).35+p31.65;p
4fa0	30 32 3d 67 65 74 6f 73 63 28 30 2e 34 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b	02=getosc(0.49,0,0).35+p02.65;
4fc0	70 31 32 3d 67 65 74 6f 73 63 28 30 2e 36 31 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35	p12=getosc(0.61,0,0).55+p12.65
4fe0	3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 37 33 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36	;p22=getosc(0.73,0,0).55+p22.6
5000	35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 33 33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e	5;p32=getosc(0.33,0,0).35+p32.
5020	36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 34 39 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a	65;p03=getosc(0.49,0,0).35+p03
5040	2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e 31 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33	.65;p13=getosc(0.15,0,0)*.35+p13
5060	2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 38 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 32	.65;p23=getosc(0.84,0,0).35+p2
5080	33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 33 38 2c 30 2c 30 29 2a 2e 33 35 2b 70	3.65;p33=getosc(0.38,0,0).35+p
50a0	33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68	33.65;cr=sin(hu).5+.9;cg=sin(h
50c0	75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35	u+2.09).5+.9;cb=sin(hu+4.18).5
50e0	2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63	+.9;xo=sin(t.741)sin(t.114)c
5100	6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69	os(sin(t.41));yo=sin(t.574)*si
5120	6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72	n(t.319)cos(sin(t*.33));.....r
5140	78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28	xt=(abs((getosc(.55,0,0)+getosc(
5160	2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62	.91,0,0))2000)%628).01;ryt=(ab
5180	73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c	s((getosc(.12,0,0)+getosc(.41,0,
51a0	30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74	0))2000)%628).01;rzt=(abs((get
51c0	6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30	osc(.55,0,0)+getosc(.91,0,0))*20
51e0	30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29	00)%628)*.01;.%...dx=8;n=sqr(dx)
5200	3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff	;id=2/dx;id1=1/(dx-1);..........
5220	ff ff 00 01 00 00 00 24 00 00 00 68 07 00 00 01 0f 03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28	.......$...h........gy=if(equal(
5240	67 78 2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79 29 3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78	gx,dx-1),gy+1,gy);gx=if(below(gx
5260	2c 64 78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d 0a 78 31 3d 67 78 2a 69 64 31 3b 79 32 3d 67 79	,dx-1),gx+1,0);..x1=gx*id1;y2=gy
5280	2a 69 64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b 67 72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d	*id1;..red=1-x1;green=1-y2;..c1=
52a0	73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 30 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31	sqr(red)redp00.+.3sqr(red)x1
52c0	2a 70 31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78	p10.+.3redsqr(x1)p20.+.sqr(x
52e0	31 29 2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20	1)x1p30;..c2=sqr(red)redp01.
5300	2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28	+.3sqr(red)x1p11.+.3red*sqr(
5320	78 31 29 2a 70 32 31 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71	x1)p21.+.sqr(x1)x1*p31;..c3=sq
5340	72 28 72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70	r(red)redp02.+.3sqr(red)x1*p
5360	31 32 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29	12.+.3redsqr(x1)*p22.+.sqr(x1)
5380	2a 78 31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20	x1p32;..c4=sqr(red)redp03.+.
53a0	33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 33 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31	3sqr(red)x1p13.+.3red*sqr(x1
53c0	29 2a 70 32 33 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73	)p23.+.sqr(x1)x1p33;..c1=3(s
53e0	71 72 28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a 63 31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e	qr(green)greenc1.+.3*sqr(green
5400	29 2a 79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65 6e 2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73	)y2c2.+.3greensqr(y2)*c3.+.s
5420	71 72 28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20 31 3b 0d 0a 70 78 3d 78 31 2a 32 2d 31 3b 70 7a	qr(y2)y2c4).+.1;..px=x1*2-1;pz
5440	3d 79 32 2a 32 2d 31 3b 70 79 3d 31 3b 0d 0a 70 78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31	=y22-1;py=1;..px=pxc1;py=py*c1
5460	3b 70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78	;pz=pzc1;..x1=pxcz+py*sz;py=px
5480	2a 73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70 79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32	sz-pycz;..y2=pycx+pzsx+yo;z2
54a0	3d 70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f	=pysx-pzcx;..x3=x1cy+z2sy+xo
54c0	3b 7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b 64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65	;z2=x1sy-z2cy+dt;..x1=if(above
54e0	28 7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78	(z2,.1),1/z2,0);..x=x3x1;y=y2x
5500	31 2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65 71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32	1af;..x1=bnot(equal(gx,0))x1*2
5520	3b 0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65 65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a	;..red=x1.5;green=x12;blue=x1*
5540	32 3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64 74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e	2;.d...t=t-.05;dt=sin(t)sin(t.
5560	34 31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d	411+1)cos(sin(t.117))*.5+3;gx=
5580	2d 31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39 35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a	-1;gy=0;rx=rx.95+rxt.05;ry=ry*
55a0	2e 39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72 7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78	.95+ryt.05;rz=rz.95+rzt*.05;cx
55c0	3d 63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28 72 78 29 3b 63 79 3d 63 6f 73 28 72 79 29 3b 73	=cos(rx);sx=sin(rx);cy=cos(ry);s
55e0	79 3d 73 69 6e 28 72 79 29 3b 63 7a 3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b	y=sin(ry);cz=cos(rz);sz=sin(rz);
5600	61 66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73 63 28 30 2e 36 37 2c 30 2c 30 29 2a 2e 33 35 2b	af=w/h;p00=getosc(0.67,0,0)*.35+
5620	70 30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f 73 63 28 30 2e 37 36 2c 30 2c 30 29 2a 2e 33 35	p00.65;p10=getosc(0.76,0,0).35
5640	2b 70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74 6f 73 63 28 30 2e 33 37 2c 30 2c 30 29 2a 2e 33	+p10.65;p20=getosc(0.37,0,0).3
5660	35 2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65 74 6f 73 63 28 30 2e 31 37 2c 30 2c 30 29 2a 2e	5+p20.65;p30=getosc(0.17,0,0).
5680	33 35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67 65 74 6f 73 63 28 30 2e 39 37 2c 30 2c 30 29 2a	35+p30.65;p01=getosc(0.97,0,0)
56a0	2e 33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d 67 65 74 6f 73 63 28 30 2e 32 33 2c 30 2c 30 29	.35+p01*.65;p11=getosc(0.23,0,0)
56c0	2a 2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31 3d 67 65 74 6f 73 63 28 30 2e 33 30 2c 30 2c 30	.55+p11.65;p21=getosc(0.30,0,0
56e0	29 2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33 31 3d 67 65 74 6f 73 63 28 30 2e 30 31 2c 30 2c	).55+p21.65;p31=getosc(0.01,0,
5700	30 29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70 30 32 3d 67 65 74 6f 73 63 28 30 2e 37 30 2c 30	0).35+p31.65;p02=getosc(0.70,0
5720	2c 30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b 70 31 32 3d 67 65 74 6f 73 63 28 30 2e 36 31 2c	,0).35+p02.65;p12=getosc(0.61,
5740	30 2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35 3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 34 33	0,0).55+p12.65;p22=getosc(0.43
5760	2c 30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36 35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 39	,0,0).55+p22.65;p32=getosc(0.9
5780	33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e 36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e	3,0,0).35+p32.65;p03=getosc(0.
57a0	32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a 2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30	20,0,0).35+p03.65;p13=getosc(0
57c0	2e 39 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33 2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28	.94,0,0).35+p13.65;p23=getosc(
57e0	30 2e 33 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63	0.35,0,0).35+p23.65;p33=getosc
5800	28 30 2e 39 33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75	(0.93,0,0).35+p33.65;cr=sin(hu
5820	29 2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68 75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62	).5+.9;cg=sin(hu+2.09).5+.9;cb
5840	3d 73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35 2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34	=sin(hu+4.18).5+.9;xo=sin(t.74
5860	31 29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79	1)sin(t.114)cos(sin(t.41));y
5880	6f 3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69 6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69	o=sin(t.574)sin(t.319)cos(si
58a0	6e 28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72 78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28	n(t*.33));.....rxt=(abs((getosc(
58c0	2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25	.55,0,0)+getosc(.91,0,0))*2000)%
58e0	36 32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c	628)*.01;ryt=(abs((getosc(.12,0,
5900	30 29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e	0)+getosc(.41,0,0))2000)%628).
5920	30 31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74	01;rzt=(abs((getosc(.55,0,0)+get
5940	6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00	osc(.91,0,0))2000)%628).01;.%.
5960	00 00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29 3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28	..dx=8;n=sqr(dx);id=2/dx;id1=1/(
5980	64 78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 68 07 00 00 01	dx-1);.................$...h....
59a0	0f 03 00 00 67 79 3d 69 66 28 65 71 75 61 6c 28 67 78 2c 64 78 2d 31 29 2c 67 79 2b 31 2c 67 79	....gy=if(equal(gx,dx-1),gy+1,gy
59c0	29 3b 67 78 3d 69 66 28 62 65 6c 6f 77 28 67 78 2c 64 78 2d 31 29 2c 67 78 2b 31 2c 30 29 3b 0d	);gx=if(below(gx,dx-1),gx+1,0);.
59e0	0a 78 31 3d 67 79 2a 69 64 31 3b 79 32 3d 67 78 2a 69 64 31 3b 0d 0a 72 65 64 3d 31 2d 78 31 3b	.x1=gyid1;y2=gxid1;..red=1-x1;
5a00	67 72 65 65 6e 3d 31 2d 79 32 3b 0d 0a 63 31 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 30	green=1-y2;..c1=sqr(red)redp00
5a20	20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 30 20 2b 20 33 2a 72 65 64 2a 73 71 72	.+.3sqr(red)x1p10.+.3red*sqr
5a40	28 78 31 29 2a 70 32 30 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 30 3b 0d 0a 63 32 3d 73	(x1)p20.+.sqr(x1)x1*p30;..c2=s
5a60	71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 31 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a	qr(red)redp01.+.3sqr(red)x1*
5a80	70 31 31 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 31 20 2b 20 73 71 72 28 78 31	p11.+.3redsqr(x1)*p21.+.sqr(x1
5aa0	29 2a 78 31 2a 70 33 31 3b 0d 0a 63 33 3d 73 71 72 28 72 65 64 29 2a 72 65 64 2a 70 30 32 20 2b	)x1p31;..c3=sqr(red)redp02.+
5ac0	20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31 32 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78	.3sqr(red)x1p12.+.3red*sqr(x
5ae0	31 29 2a 70 32 32 20 2b 20 73 71 72 28 78 31 29 2a 78 31 2a 70 33 32 3b 0d 0a 63 34 3d 73 71 72	1)p22.+.sqr(x1)x1*p32;..c4=sqr
5b00	28 72 65 64 29 2a 72 65 64 2a 70 30 33 20 2b 20 33 2a 73 71 72 28 72 65 64 29 2a 78 31 2a 70 31	(red)redp03.+.3sqr(red)x1*p1
5b20	33 20 2b 20 33 2a 72 65 64 2a 73 71 72 28 78 31 29 2a 70 32 33 20 2b 20 73 71 72 28 78 31 29 2a	3.+.3redsqr(x1)p23.+.sqr(x1)
5b40	78 31 2a 70 33 33 3b 0d 0a 63 31 3d 33 2a 28 73 71 72 28 67 72 65 65 6e 29 2a 67 72 65 65 6e 2a	x1p33;..c1=3(sqr(green)green
5b60	63 31 20 2b 20 33 2a 73 71 72 28 67 72 65 65 6e 29 2a 79 32 2a 63 32 20 2b 20 33 2a 67 72 65 65	c1.+.3sqr(green)y2c2.+.3gree
5b80	6e 2a 73 71 72 28 79 32 29 2a 63 33 20 2b 20 73 71 72 28 79 32 29 2a 79 32 2a 63 34 29 20 2b 20	nsqr(y2)c3.+.sqr(y2)y2c4).+.
5ba0	31 3b 0d 0a 70 78 3d 78 31 2a 32 2d 31 3b 70 7a 3d 79 32 2a 32 2d 31 3b 70 79 3d 31 3b 0d 0a 70	1;..px=x12-1;pz=y22-1;py=1;..p
5bc0	78 3d 70 78 2a 63 31 3b 70 79 3d 70 79 2a 63 31 3b 70 7a 3d 70 7a 2a 63 31 3b 0d 0a 78 31 3d 70	x=pxc1;py=pyc1;pz=pz*c1;..x1=p
5be0	78 2a 63 7a 2b 70 79 2a 73 7a 3b 70 79 3d 70 78 2a 73 7a 2d 70 79 2a 63 7a 3b 0d 0a 79 32 3d 70	xcz+pysz;py=pxsz-pycz;..y2=p
5c00	79 2a 63 78 2b 70 7a 2a 73 78 2b 79 6f 3b 7a 32 3d 70 79 2a 73 78 2d 70 7a 2a 63 78 3b 0d 0a 78	ycx+pzsx+yo;z2=pysx-pzcx;..x
5c20	33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 2b 78 6f 3b 7a 32 3d 78 31 2a 73 79 2d 7a 32 2a 63 79 2b	3=x1cy+z2sy+xo;z2=x1sy-z2cy+
5c40	64 74 3b 0d 0a 78 31 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 31 29 2c 31 2f 7a 32 2c 30 29 3b	dt;..x1=if(above(z2,.1),1/z2,0);
5c60	0d 0a 78 3d 78 33 2a 78 31 3b 79 3d 79 32 2a 78 31 2a 61 66 3b 0d 0a 78 31 3d 62 6e 6f 74 28 65	..x=x3x1;y=y2x1*af;..x1=bnot(e
5c80	71 75 61 6c 28 67 78 2c 30 29 29 2a 78 31 2a 32 3b 0d 0a 72 65 64 3d 78 31 2a 2e 35 3b 67 72 65	qual(gx,0))x12;..red=x1*.5;gre
5ca0	65 6e 3d 78 31 2a 32 3b 62 6c 75 65 3d 78 31 2a 32 3b 00 64 03 00 00 74 3d 74 2d 2e 30 35 3b 64	en=x12;blue=x12;.d...t=t-.05;d
5cc0	74 3d 73 69 6e 28 74 29 2a 73 69 6e 28 74 2a 2e 34 31 31 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74	t=sin(t)sin(t.411+1)*cos(sin(t
5ce0	2a 2e 31 31 37 29 29 2a 2e 35 2b 33 3b 67 78 3d 2d 31 3b 67 79 3d 30 3b 72 78 3d 72 78 2a 2e 39	.117)).5+3;gx=-1;gy=0;rx=rx*.9
5d00	35 2b 72 78 74 2a 2e 30 35 3b 72 79 3d 72 79 2a 2e 39 35 2b 72 79 74 2a 2e 30 35 3b 72 7a 3d 72	5+rxt.05;ry=ry.95+ryt*.05;rz=r
5d20	7a 2a 2e 39 35 2b 72 7a 74 2a 2e 30 35 3b 63 78 3d 63 6f 73 28 72 78 29 3b 73 78 3d 73 69 6e 28	z.95+rzt.05;cx=cos(rx);sx=sin(
5d40	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 3d 63 6f 73	rx);cy=cos(ry);sy=sin(ry);cz=cos
5d60	28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 61 66 3d 77 2f 68 3b 70 30 30 3d 67 65 74 6f 73	(rz);sz=sin(rz);af=w/h;p00=getos
5d80	63 28 30 2e 36 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 30 2a 2e 36 35 3b 70 31 30 3d 67 65 74 6f	c(0.67,0,0).35+p00.65;p10=geto
5da0	73 63 28 30 2e 37 36 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 30 2a 2e 36 35 3b 70 32 30 3d 67 65 74	sc(0.76,0,0).35+p10.65;p20=get
5dc0	6f 73 63 28 30 2e 33 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 32 30 2a 2e 36 35 3b 70 33 30 3d 67 65	osc(0.37,0,0).35+p20.65;p30=ge
5de0	74 6f 73 63 28 30 2e 31 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 30 2a 2e 36 35 3b 70 30 31 3d 67	tosc(0.17,0,0).35+p30.65;p01=g
5e00	65 74 6f 73 63 28 30 2e 39 37 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 31 2a 2e 36 35 3b 70 31 31 3d	etosc(0.97,0,0).35+p01.65;p11=
5e20	67 65 74 6f 73 63 28 30 2e 32 33 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 31 2a 2e 36 35 3b 70 32 31	getosc(0.23,0,0).55+p11.65;p21
5e40	3d 67 65 74 6f 73 63 28 30 2e 33 30 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 31 2a 2e 36 35 3b 70 33	=getosc(0.30,0,0).55+p21.65;p3
5e60	31 3d 67 65 74 6f 73 63 28 30 2e 30 31 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 31 2a 2e 36 35 3b 70	1=getosc(0.01,0,0).35+p31.65;p
5e80	30 32 3d 67 65 74 6f 73 63 28 30 2e 37 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 32 2a 2e 36 35 3b	02=getosc(0.70,0,0).35+p02.65;
5ea0	70 31 32 3d 67 65 74 6f 73 63 28 30 2e 36 31 2c 30 2c 30 29 2a 2e 35 35 2b 70 31 32 2a 2e 36 35	p12=getosc(0.61,0,0).55+p12.65
5ec0	3b 70 32 32 3d 67 65 74 6f 73 63 28 30 2e 34 33 2c 30 2c 30 29 2a 2e 35 35 2b 70 32 32 2a 2e 36	;p22=getosc(0.43,0,0).55+p22.6
5ee0	35 3b 70 33 32 3d 67 65 74 6f 73 63 28 30 2e 39 33 2c 30 2c 30 29 2a 2e 33 35 2b 70 33 32 2a 2e	5;p32=getosc(0.93,0,0).35+p32.
5f00	36 35 3b 70 30 33 3d 67 65 74 6f 73 63 28 30 2e 32 30 2c 30 2c 30 29 2a 2e 33 35 2b 70 30 33 2a	65;p03=getosc(0.20,0,0).35+p03
5f20	2e 36 35 3b 70 31 33 3d 67 65 74 6f 73 63 28 30 2e 39 34 2c 30 2c 30 29 2a 2e 33 35 2b 70 31 33	.65;p13=getosc(0.94,0,0)*.35+p13
5f40	2a 2e 36 35 3b 70 32 33 3d 67 65 74 6f 73 63 28 30 2e 33 35 2c 30 2c 30 29 2a 2e 33 35 2b 70 32	.65;p23=getosc(0.35,0,0).35+p2
5f60	33 2a 2e 36 35 3b 70 33 33 3d 67 65 74 6f 73 63 28 30 2e 39 33 2c 30 2c 30 29 2a 2e 33 35 2b 70	3.65;p33=getosc(0.93,0,0).35+p
5f80	33 33 2a 2e 36 35 3b 63 72 3d 73 69 6e 28 68 75 29 2a 2e 35 2b 2e 39 3b 63 67 3d 73 69 6e 28 68	33.65;cr=sin(hu).5+.9;cg=sin(h
5fa0	75 2b 32 2e 30 39 29 2a 2e 35 2b 2e 39 3b 63 62 3d 73 69 6e 28 68 75 2b 34 2e 31 38 29 2a 2e 35	u+2.09).5+.9;cb=sin(hu+4.18).5
5fc0	2b 2e 39 3b 78 6f 3d 73 69 6e 28 74 2a 2e 37 34 31 29 2a 73 69 6e 28 74 2a 2e 31 31 34 29 2a 63	+.9;xo=sin(t.741)sin(t.114)c
5fe0	6f 73 28 73 69 6e 28 74 2a 2e 34 31 29 29 3b 79 6f 3d 73 69 6e 28 74 2a 2e 35 37 34 29 2a 73 69	os(sin(t.41));yo=sin(t.574)*si
6000	6e 28 74 2a 2e 33 31 39 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 33 33 29 29 3b 00 af 00 00 00 72	n(t.319)cos(sin(t*.33));.....r
6020	78 74 3d 28 61 62 73 28 28 67 65 74 6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28	xt=(abs((getosc(.55,0,0)+getosc(
6040	2e 39 31 2c 30 2c 30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 79 74 3d 28 61 62	.91,0,0))2000)%628).01;ryt=(ab
6060	73 28 28 67 65 74 6f 73 63 28 2e 31 32 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 34 31 2c 30 2c	s((getosc(.12,0,0)+getosc(.41,0,
6080	30 29 29 2a 32 30 30 30 29 25 36 32 38 29 2a 2e 30 31 3b 72 7a 74 3d 28 61 62 73 28 28 67 65 74	0))2000)%628).01;rzt=(abs((get
60a0	6f 73 63 28 2e 35 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 31 2c 30 2c 30 29 29 2a 32 30	osc(.55,0,0)+getosc(.91,0,0))*20
60c0	30 30 29 25 36 32 38 29 2a 2e 30 31 3b 00 25 00 00 00 64 78 3d 38 3b 6e 3d 73 71 72 28 64 78 29	00)%628)*.01;.%...dx=8;n=sqr(dx)
60e0	3b 69 64 3d 32 2f 64 78 3b 69 64 31 3d 31 2f 28 64 78 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff	;id=2/dx;id1=1/(dx-1);..........
6100	ff ff 00 01 00 00 00 6c ab 73 03 48 6f 6c 64 65 6e 30 33 3a 20 43 6f 6e 76 6f 6c 75 74 69 6f 6e	.......l.s.Holden03:.Convolution
6120	20 46 69 6c 74 65 72 00 00 00 00 dc 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	.Filter.........................
6140	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
6160	00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02	................................
6180	00 00 00 04 00 00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 04 00 00 00 02	................................
61a0	00 00 00 04 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 04 00 00 00 02	................................
61c0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00	................................
61e0	00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	................................
6200	00 00 00 00 00 00 00 08 00 00 00 12 00 00 00 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00	...............................