aboutsummaryrefslogtreecommitdiff
path: root/Src/resources/data/avs/Community Picks/Zevensoft - Ocean4.avs
blob: ac63c413b35e6ca640315fae0c16374a7e926bfd (plain) (blame)
ofshex dumpascii
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 24 00 00 00 79 01 00 Nullsoft.AVS.Preset.0.2..$...y..
0020 00 01 ff 00 00 00 6c 78 3d 69 66 28 65 71 75 61 6c 28 6c 78 2c 31 29 2c 2d 31 2c 31 29 3b 0d 0a ......lx=if(equal(lx,1),-1,1);..
0040 78 3d 6c 78 3b 79 3d 2d 69 3b 0d 0a 62 31 3d 6d 61 78 28 28 63 61 6e 67 2d 2e 35 29 2a 32 2c 30 x=lx;y=-i;..b1=max((cang-.5)*2,0
0060 29 3b 62 32 3d 6d 61 78 28 63 61 6e 67 2c 30 29 2b 6d 61 78 28 2d 63 61 6e 67 2a 2e 35 2c 30 29 );b2=max(cang,0)+max(-cang*.5,0)
0080 3b 0d 0a 72 31 3d 28 63 61 6e 67 2d 2e 35 29 2a 2e 38 3b 72 32 3d 6d 61 78 28 61 62 73 28 61 6e ;..r1=(cang-.5)*.8;r2=max(abs(an
00a0 67 29 2d 2e 35 2c 30 29 2b 6d 61 78 28 63 61 6e 67 2c 30 29 3b 0d 0a 67 31 3d 28 63 61 6e 67 2d g)-.5,0)+max(cang,0);..g1=(cang-
00c0 2e 35 29 2a 31 3b 67 32 3d 6d 61 78 28 61 62 73 28 61 6e 67 29 2d 2e 38 2c 30 29 2b 6d 61 78 28 .5)*1;g2=max(abs(ang)-.8,0)+max(
00e0 63 61 6e 67 2c 30 29 3b 0d 0a 62 6c 75 65 3d 69 2a 28 62 31 2d 62 32 29 2b 62 32 3b 0d 0a 72 65 cang,0);..blue=i*(b1-b2)+b2;..re
0100 64 3d 69 2a 28 72 31 2d 72 32 29 2b 72 32 3b 0d 0a 67 72 65 65 6e 3d 69 2a 28 67 31 2d 67 32 29 d=i*(r1-r2)+r2;..green=i*(g1-g2)
0120 2b 67 32 3b 00 4c 00 00 00 6e 3d 68 2a 32 2b 32 3b 6c 78 3d 2d 31 3b 6a 3d 69 66 28 61 62 6f 76 +g2;.L...n=h*2+2;lx=-1;j=if(abov
0140 65 28 6a 2c 31 29 2c 2d 31 2b 2e 30 30 32 2c 6a 2b 2e 30 30 31 29 3b 61 6e 67 3d 73 69 6e 28 6a e(j,1),-1+.002,j+.001);ang=sin(j
0160 2a 70 69 29 3b 63 61 6e 67 3d 63 6f 73 28 6a 2a 70 69 29 3b 00 00 00 00 00 0d 00 00 00 70 69 3d *pi);cang=cos(j*pi);.........pi=
0180 61 63 6f 73 28 2d 31 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 fe ff ff ff e6 00 acos(-1);.......................
01a0 00 00 80 00 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 00 00 ......$.........................
01c0 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 66 66 65 63 74 20 4c 69 73 74 20 ........@..AVS.2.8+.Effect.List.
01e0 43 6f 6e 66 69 67 00 00 00 00 00 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 00 00 1d Config.....................*....
0200 00 00 00 01 00 00 00 00 08 00 00 00 78 3d 31 3b 79 3d 30 00 00 00 00 00 00 00 00 00 00 00 00 00 ............x=1;y=0.............
0220 24 00 00 00 60 00 00 00 01 10 00 00 00 79 3d 2d 69 2a 62 74 3b 0d 0a 78 3d 2d 31 3b 00 10 00 00 $...`........y=-i*bt;..x=-1;....
0240 00 62 74 3d 62 69 2a 2e 31 2b 62 74 2a 2e 39 3b 00 1b 00 00 00 62 69 3d 67 65 74 73 70 65 63 28 .bt=bi*.1+bt*.9;.....bi=getspec(
0260 2e 31 2c 2e 31 2c 30 29 2a 2e 35 2b 2e 31 3b 00 04 00 00 00 6e 3d 32 00 02 00 00 00 01 00 00 00 .1,.1,0)*.5+.1;.....n=2.........
0280 40 40 40 00 01 00 00 00 fe ff ff ff 79 03 00 00 81 01 00 05 24 80 00 00 00 80 00 00 00 00 00 00 @@@.........y.......$...........
02a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 ......................@..AVS.2.8
02c0 2b 20 45 66 66 65 63 74 20 4c 69 73 74 20 43 6f 6e 66 69 67 00 00 00 00 00 0c 00 00 00 00 00 00 +.Effect.List.Config............
02e0 00 00 00 00 00 00 00 00 00 28 00 00 00 04 00 00 00 01 00 06 80 24 00 00 00 0e 02 00 00 01 ed 00 .........(...........$..........
0300 00 00 6c 72 3d 69 66 28 61 62 6f 76 65 28 6c 72 2c 30 29 2c 30 2c 32 29 3b 0d 0a 6c 62 3d 28 73 ..lr=if(above(lr,0),0,2);..lb=(s
0320 69 6e 28 69 2a 70 69 29 2a 70 31 2b 73 69 6e 28 28 69 2b 74 74 29 2a 70 69 29 2a 70 32 2b 73 69 in(i*pi)*p1+sin((i+tt)*pi)*p2+si
0340 6e 28 28 69 2d 74 74 29 2a 70 69 29 2a 70 33 29 2b 2e 35 3b 0d 0a 78 3d 63 6f 73 28 69 2a 32 2a n((i-tt)*pi)*p3)+.5;..x=cos(i*2*
0360 70 69 29 2a 6c 72 2b 78 6f 3b 79 3d 73 69 6e 28 69 2a 70 69 2a 32 29 2a 6c 72 2b 79 6f 3b 0d 0a pi)*lr+xo;y=sin(i*pi*2)*lr+yo;..
0380 66 62 3d 69 66 28 62 65 6c 6f 77 28 61 62 73 28 6a 2b 32 2e 35 29 2c 2e 35 29 2c 2e 30 36 32 35 fb=if(below(abs(j+2.5),.5),.0625
03a0 2a 6c 62 2a 28 31 29 2a 28 31 2d 73 71 72 74 28 78 6f 2a 78 6f 2a 2e 32 35 2b 79 6f 2a 79 6f 29 *lb*(1)*(1-sqrt(xo*xo*.25+yo*yo)
03c0 2a 2e 35 29 2c 30 29 3b 0d 0a 72 65 64 3d 66 62 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 2a 2e 35 3b *.5),0);..red=fb;..green=red*.5;
03e0 62 6c 75 65 3d 67 72 65 65 6e 2a 2e 35 3b 00 88 00 00 00 6a 3d 69 66 28 61 62 6f 76 65 28 6a 2c blue=green*.5;.....j=if(above(j,
0400 34 29 2c 2d 34 2b 2e 30 30 32 2c 6a 2b 2e 30 30 31 29 3b 61 6e 67 3d 73 69 6e 28 6a 2a 70 69 29 4),-4+.002,j+.001);ang=sin(j*pi)
0420 3b 63 61 6e 67 3d 63 6f 73 28 6a 2a 70 69 29 3b 78 6f 3d 6a 2b 32 3b 79 6f 3d 63 61 6e 67 3b 6e ;cang=cos(j*pi);xo=j+2;yo=cang;n
0440 3d 68 2a 32 2b 32 3b 70 31 3d 28 70 31 2a 39 2b 70 31 74 29 2a 2e 31 3b 70 32 3d 28 70 32 2a 39 =h*2+2;p1=(p1*9+p1t)*.1;p2=(p2*9
0460 2b 70 32 74 29 2a 2e 31 3b 70 33 3d 28 70 33 2a 39 2b 70 33 74 29 2a 2e 31 3b 00 43 00 00 00 70 +p2t)*.1;p3=(p3*9+p3t)*.1;.C...p
0480 31 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 3b 70 32 74 3d 72 61 6e 64 28 31 30 1t=rand(100)*.005+.5;p2t=rand(10
04a0 30 29 2a 2e 30 30 35 2b 2e 35 3b 70 33 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 0)*.005+.5;p3t=rand(100)*.005+.5
04c0 3b 00 35 00 00 00 6e 3d 68 2a 32 2b 32 3b 70 69 3d 61 63 6f 73 28 2d 31 29 3b 66 73 3d 2e 30 30 ;.5...n=h*2+2;pi=acos(-1);fs=.00
04e0 35 3b 66 6f 76 3d 31 3b 74 64 3d 2d 2e 35 3b 74 74 3d 32 2f 33 3b 6a 3d 31 3b 00 02 00 00 00 01 5;fov=1;td=-.5;tt=2/3;j=1;......
0500 00 00 00 09 09 09 00 01 00 00 00 fe ff ff ff e6 00 00 00 80 00 00 04 24 80 00 00 00 80 00 00 00 .......................$........
0520 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 40 00 00 41 56 53 20 .........................@..AVS.
0540 32 2e 38 2b 20 45 66 66 65 63 74 20 4c 69 73 74 20 43 6f 6e 66 69 67 00 00 00 00 00 0c 00 00 00 2.8+.Effect.List.Config.........
0560 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 00 00 1d 00 00 00 01 00 00 00 00 08 00 00 00 78 3d 31 ............*................x=1
0580 3b 79 3d 30 00 00 00 00 00 00 00 00 00 00 00 00 00 24 00 00 00 60 00 00 00 01 10 00 00 00 79 3d ;y=0.............$...`........y=
05a0 2d 69 2a 62 74 3b 0d 0a 78 3d 2d 31 3b 00 10 00 00 00 62 74 3d 62 69 2a 2e 31 2b 62 74 2a 2e 39 -i*bt;..x=-1;.....bt=bi*.1+bt*.9
05c0 3b 00 1b 00 00 00 62 69 3d 67 65 74 73 70 65 63 28 2e 31 2c 2e 31 2c 30 29 2a 2e 35 2b 2e 31 3b ;.....bi=getspec(.1,.1,0)*.5+.1;
05e0 00 04 00 00 00 6e 3d 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 06 00 00 00 08 00 00 .....n=2........................
0600 00 01 00 00 00 00 00 00 00 fe ff ff ff 69 0f 00 00 80 00 00 05 24 80 00 00 00 80 00 00 00 00 00 .............i.......$..........
0620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e .......................@..AVS.2.
0640 38 2b 20 45 66 66 65 63 74 20 4c 69 73 74 20 43 6f 6e 66 69 67 00 00 00 00 00 0c 00 00 00 00 00 8+.Effect.List.Config...........
0660 00 00 00 00 00 00 00 00 00 00 28 00 00 00 04 00 00 00 02 00 01 80 03 00 00 00 08 00 00 00 14 00 ..........(.....................
0680 00 00 00 00 00 00 24 00 00 00 b5 03 00 00 01 96 01 00 00 73 78 3d 28 73 78 2a 32 38 36 32 36 2b ......$............sx=(sx*28626+
06a0 34 31 32 30 2b 73 79 29 25 32 30 30 30 3b 0d 0a 73 79 3d 28 73 79 2a 39 38 33 38 37 2b 35 33 31 4120+sy)%2000;..sy=(sy*98387+531
06c0 31 2a 73 7a 29 25 32 30 30 30 3b 0d 0a 73 7a 3d 28 73 7a 2a 34 33 31 39 38 2b 36 34 32 31 2d 73 1*sz)%2000;..sz=(sz*43198+6421-s
06e0 78 29 25 32 30 30 30 3b 0d 0a 78 31 3d 73 78 2f 31 30 30 30 2d 31 3b 7a 31 3d 73 7a 2f 31 30 30 x)%2000;..x1=sx/1000-1;z1=sz/100
0700 30 2d 31 3b 79 31 3d 73 79 2f 31 30 30 30 2d 31 3b 0d 0a 64 3d 31 2f 73 71 72 74 28 78 31 2a 78 0-1;y1=sy/1000-1;..d=1/sqrt(x1*x
0720 31 2b 79 31 2a 79 31 2b 7a 31 2a 7a 31 29 3b 73 70 3d 28 31 2d 28 70 6f 77 28 31 2d 74 2c 32 29 1+y1*y1+z1*z1);sp=(1-(pow(1-t,2)
0740 29 29 3b 0d 0a 78 31 3d 78 31 2a 64 2a 73 70 3b 79 31 3d 79 31 2a 64 2a 73 70 3b 7a 31 3d 7a 31 ));..x1=x1*d*sp;y1=y1*d*sp;z1=z1
0760 2a 64 2a 73 70 3b 0d 0a 78 3d 28 78 31 2b 74 78 29 2f 28 7a 31 2b 32 29 3b 79 3d 28 79 31 2b 74 *d*sp;..x=(x1+tx)/(z1+2);y=(y1+t
0780 79 2b 79 70 2a 79 70 29 2f 28 7a 31 2b 32 29 3b 0d 0a 6c 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 y+yp*yp)/(z1+2);..l=if(above(t,0
07a0 29 2c 28 31 2d 28 7a 31 2f 32 29 29 2d 74 2c 2d 31 30 29 3b 0d 0a 6c 6c 3d 69 66 28 62 65 6c 6f ),(1-(z1/2))-t,-10);..ll=if(belo
07c0 77 28 61 62 73 28 6a 2b 2e 35 29 2c 2e 35 29 2c 31 2c 30 29 3b 0d 0a 72 65 64 3d 6c 2a 72 72 2a w(abs(j+.5),.5),1,0);..red=l*rr*
07e0 6c 6c 2b 70 6f 77 28 31 2d 74 2c 36 29 2a 6c 6c 3b 67 72 65 65 6e 3d 6c 2a 67 72 2a 6c 6c 2b 70 ll+pow(1-t,6)*ll;green=l*gr*ll+p
0800 6f 77 28 31 2d 74 2c 36 29 2a 6c 6c 3b 62 6c 75 65 3d 6c 2a 62 72 2a 6c 6c 2b 70 6f 77 28 31 2d ow(1-t,6)*ll;blue=l*br*ll+pow(1-
0820 74 2c 36 29 2a 6c 6c 3b 00 9b 01 00 00 6a 3d 69 66 28 61 62 6f 76 65 28 6a 2c 31 29 2c 2d 31 2b t,6)*ll;.....j=if(above(j,1),-1+
0840 2e 30 30 32 2c 6a 2b 2e 30 30 31 29 3b 79 70 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 79 70 .002,j+.001);yp=if(above(t,0),yp
0860 2b 2e 30 31 2c 79 70 29 3b 74 3d 74 2b 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 2e 30 31 2c 30 +.01,yp);t=t+if(above(t,0),.01,0
0880 29 3b 62 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 );br=if(above(t,1),rand(100)/100
08a0 2c 62 72 29 3b 67 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f ,br);gr=if(above(t,1),rand(100)/
08c0 31 30 30 2c 67 72 29 3b 72 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 100,gr);rr=if(above(t,1),rand(10
08e0 30 29 2f 31 30 30 2c 72 72 29 3b 74 79 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 2d 72 61 6e 0)/100,rr);ty=if(above(t,1),-ran
0900 64 28 31 30 30 29 2f 32 30 30 2d 2e 35 2c 74 79 29 3b 74 78 3d 69 66 28 61 62 6f 76 65 28 74 2c d(100)/200-.5,ty);tx=if(above(t,
0920 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 35 30 2d 31 2c 74 78 29 3b 79 70 3d 69 66 28 61 62 6f 76 1),rand(100)/50-1,tx);yp=if(abov
0940 65 28 74 2c 31 29 2c 30 2c 79 70 29 3b 74 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 30 2c 74 e(t,1),0,yp);t=if(above(t,1),0,t
0960 29 3b 74 3d 69 66 28 62 65 6c 6f 77 28 61 62 73 28 6a 2b 2e 35 29 2c 2e 35 29 2c 69 66 28 61 62 );t=if(below(abs(j+.5),.5),if(ab
0980 6f 76 65 28 67 65 74 6f 73 63 28 62 61 2c 30 2c 30 29 2c 2e 33 29 2c 69 66 28 65 71 75 61 6c 28 ove(getosc(ba,0,0),.3),if(equal(
09a0 74 2c 30 29 2c 2e 30 31 2c 74 29 2c 74 29 2c 74 29 3b 73 78 3d 73 78 74 3b 73 79 3d 73 79 74 3b t,0),.01,t),t),t);sx=sxt;sy=syt;
09c0 73 7a 3d 73 7a 74 3b 00 00 00 00 00 63 00 00 00 6a 3d 2e 35 3b 6e 3d 31 30 30 3b 70 69 3d 61 63 sz=szt;.....c...j=.5;n=100;pi=ac
09e0 6f 73 28 2d 31 29 3b 74 3d 72 61 6e 64 28 31 30 30 29 2f 31 30 30 3b 62 61 3d 72 61 6e 64 28 31 os(-1);t=rand(100)/100;ba=rand(1
0a00 30 30 29 2f 31 30 30 3b 73 78 74 3d 72 61 6e 64 28 32 30 30 29 3b 73 79 74 3d 72 61 6e 64 28 32 00)/100;sxt=rand(200);syt=rand(2
0a20 30 30 29 3b 73 7a 74 3d 72 61 6e 64 28 32 30 30 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 00);szt=rand(200);..............
0a40 00 00 00 24 00 00 00 b5 03 00 00 01 96 01 00 00 73 78 3d 28 73 78 2a 32 38 36 32 36 2b 34 31 32 ...$............sx=(sx*28626+412
0a60 30 2b 73 79 29 25 32 30 30 30 3b 0d 0a 73 79 3d 28 73 79 2a 39 38 33 38 37 2b 35 33 31 31 2a 73 0+sy)%2000;..sy=(sy*98387+5311*s
0a80 7a 29 25 32 30 30 30 3b 0d 0a 73 7a 3d 28 73 7a 2a 34 33 31 39 38 2b 36 34 32 31 2d 73 78 29 25 z)%2000;..sz=(sz*43198+6421-sx)%
0aa0 32 30 30 30 3b 0d 0a 78 31 3d 73 78 2f 31 30 30 30 2d 31 3b 7a 31 3d 73 7a 2f 31 30 30 30 2d 31 2000;..x1=sx/1000-1;z1=sz/1000-1
0ac0 3b 79 31 3d 73 79 2f 31 30 30 30 2d 31 3b 0d 0a 64 3d 31 2f 73 71 72 74 28 78 31 2a 78 31 2b 79 ;y1=sy/1000-1;..d=1/sqrt(x1*x1+y
0ae0 31 2a 79 31 2b 7a 31 2a 7a 31 29 3b 73 70 3d 28 31 2d 28 70 6f 77 28 31 2d 74 2c 32 29 29 29 3b 1*y1+z1*z1);sp=(1-(pow(1-t,2)));
0b00 0d 0a 78 31 3d 78 31 2a 64 2a 73 70 3b 79 31 3d 79 31 2a 64 2a 73 70 3b 7a 31 3d 7a 31 2a 64 2a ..x1=x1*d*sp;y1=y1*d*sp;z1=z1*d*
0b20 73 70 3b 0d 0a 78 3d 28 78 31 2b 74 78 29 2f 28 7a 31 2b 32 29 3b 79 3d 28 79 31 2b 74 79 2b 79 sp;..x=(x1+tx)/(z1+2);y=(y1+ty+y
0b40 70 2a 79 70 29 2f 28 7a 31 2b 32 29 3b 0d 0a 6c 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 28 p*yp)/(z1+2);..l=if(above(t,0),(
0b60 31 2d 28 7a 31 2f 32 29 29 2d 74 2c 2d 31 30 29 3b 0d 0a 6c 6c 3d 69 66 28 62 65 6c 6f 77 28 61 1-(z1/2))-t,-10);..ll=if(below(a
0b80 62 73 28 6a 2b 2e 35 29 2c 2e 35 29 2c 31 2c 30 29 3b 0d 0a 72 65 64 3d 6c 2a 72 72 2a 6c 6c 2b bs(j+.5),.5),1,0);..red=l*rr*ll+
0ba0 70 6f 77 28 31 2d 74 2c 36 29 2a 6c 6c 3b 67 72 65 65 6e 3d 6c 2a 67 72 2a 6c 6c 2b 70 6f 77 28 pow(1-t,6)*ll;green=l*gr*ll+pow(
0bc0 31 2d 74 2c 36 29 2a 6c 6c 3b 62 6c 75 65 3d 6c 2a 62 72 2a 6c 6c 2b 70 6f 77 28 31 2d 74 2c 36 1-t,6)*ll;blue=l*br*ll+pow(1-t,6
0be0 29 2a 6c 6c 3b 00 9b 01 00 00 6a 3d 69 66 28 61 62 6f 76 65 28 6a 2c 31 29 2c 2d 31 2b 2e 30 30 )*ll;.....j=if(above(j,1),-1+.00
0c00 32 2c 6a 2b 2e 30 30 31 29 3b 79 70 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 79 70 2b 2e 30 2,j+.001);yp=if(above(t,0),yp+.0
0c20 31 2c 79 70 29 3b 74 3d 74 2b 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 2e 30 31 2c 30 29 3b 62 1,yp);t=t+if(above(t,0),.01,0);b
0c40 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 2c 62 72 r=if(above(t,1),rand(100)/100,br
0c60 29 3b 67 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 );gr=if(above(t,1),rand(100)/100
0c80 2c 67 72 29 3b 72 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f ,gr);rr=if(above(t,1),rand(100)/
0ca0 31 30 30 2c 72 72 29 3b 74 79 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 2d 72 61 6e 64 28 31 100,rr);ty=if(above(t,1),-rand(1
0cc0 30 30 29 2f 32 30 30 2d 2e 35 2c 74 79 29 3b 74 78 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 00)/200-.5,ty);tx=if(above(t,1),
0ce0 72 61 6e 64 28 31 30 30 29 2f 35 30 2d 31 2c 74 78 29 3b 79 70 3d 69 66 28 61 62 6f 76 65 28 74 rand(100)/50-1,tx);yp=if(above(t
0d00 2c 31 29 2c 30 2c 79 70 29 3b 74 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 30 2c 74 29 3b 74 ,1),0,yp);t=if(above(t,1),0,t);t
0d20 3d 69 66 28 62 65 6c 6f 77 28 61 62 73 28 6a 2b 2e 35 29 2c 2e 35 29 2c 69 66 28 61 62 6f 76 65 =if(below(abs(j+.5),.5),if(above
0d40 28 67 65 74 6f 73 63 28 62 61 2c 30 2c 30 29 2c 2e 33 29 2c 69 66 28 65 71 75 61 6c 28 74 2c 30 (getosc(ba,0,0),.3),if(equal(t,0
0d60 29 2c 2e 30 31 2c 74 29 2c 74 29 2c 74 29 3b 73 78 3d 73 78 74 3b 73 79 3d 73 79 74 3b 73 7a 3d ),.01,t),t),t);sx=sxt;sy=syt;sz=
0d80 73 7a 74 3b 00 00 00 00 00 63 00 00 00 6a 3d 2e 35 3b 6e 3d 31 30 30 3b 70 69 3d 61 63 6f 73 28 szt;.....c...j=.5;n=100;pi=acos(
0da0 2d 31 29 3b 74 3d 72 61 6e 64 28 31 30 30 29 2f 31 30 30 3b 62 61 3d 72 61 6e 64 28 31 30 30 29 -1);t=rand(100)/100;ba=rand(100)
0dc0 2f 31 30 30 3b 73 78 74 3d 72 61 6e 64 28 32 30 30 29 3b 73 79 74 3d 72 61 6e 64 28 32 30 30 29 /100;sxt=rand(200);syt=rand(200)
0de0 3b 73 7a 74 3d 72 61 6e 64 28 32 30 30 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 00 00 00 ;szt=rand(200);.................
0e00 24 00 00 00 b5 03 00 00 01 96 01 00 00 73 78 3d 28 73 78 2a 32 38 36 32 36 2b 34 31 32 30 2b 73 $............sx=(sx*28626+4120+s
0e20 79 29 25 32 30 30 30 3b 0d 0a 73 79 3d 28 73 79 2a 39 38 33 38 37 2b 35 33 31 31 2a 73 7a 29 25 y)%2000;..sy=(sy*98387+5311*sz)%
0e40 32 30 30 30 3b 0d 0a 73 7a 3d 28 73 7a 2a 34 33 31 39 38 2b 36 34 32 31 2d 73 78 29 25 32 30 30 2000;..sz=(sz*43198+6421-sx)%200
0e60 30 3b 0d 0a 78 31 3d 73 78 2f 31 30 30 30 2d 31 3b 7a 31 3d 73 7a 2f 31 30 30 30 2d 31 3b 79 31 0;..x1=sx/1000-1;z1=sz/1000-1;y1
0e80 3d 73 79 2f 31 30 30 30 2d 31 3b 0d 0a 64 3d 31 2f 73 71 72 74 28 78 31 2a 78 31 2b 79 31 2a 79 =sy/1000-1;..d=1/sqrt(x1*x1+y1*y
0ea0 31 2b 7a 31 2a 7a 31 29 3b 73 70 3d 28 31 2d 28 70 6f 77 28 31 2d 74 2c 32 29 29 29 3b 0d 0a 78 1+z1*z1);sp=(1-(pow(1-t,2)));..x
0ec0 31 3d 78 31 2a 64 2a 73 70 3b 79 31 3d 79 31 2a 64 2a 73 70 3b 7a 31 3d 7a 31 2a 64 2a 73 70 3b 1=x1*d*sp;y1=y1*d*sp;z1=z1*d*sp;
0ee0 0d 0a 78 3d 28 78 31 2b 74 78 29 2f 28 7a 31 2b 32 29 3b 79 3d 28 79 31 2b 74 79 2b 79 70 2a 79 ..x=(x1+tx)/(z1+2);y=(y1+ty+yp*y
0f00 70 29 2f 28 7a 31 2b 32 29 3b 0d 0a 6c 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 28 31 2d 28 p)/(z1+2);..l=if(above(t,0),(1-(
0f20 7a 31 2f 32 29 29 2d 74 2c 2d 31 30 29 3b 0d 0a 6c 6c 3d 69 66 28 62 65 6c 6f 77 28 61 62 73 28 z1/2))-t,-10);..ll=if(below(abs(
0f40 6a 2b 2e 35 29 2c 2e 35 29 2c 31 2c 30 29 3b 0d 0a 72 65 64 3d 6c 2a 72 72 2a 6c 6c 2b 70 6f 77 j+.5),.5),1,0);..red=l*rr*ll+pow
0f60 28 31 2d 74 2c 36 29 2a 6c 6c 3b 67 72 65 65 6e 3d 6c 2a 67 72 2a 6c 6c 2b 70 6f 77 28 31 2d 74 (1-t,6)*ll;green=l*gr*ll+pow(1-t
0f80 2c 36 29 2a 6c 6c 3b 62 6c 75 65 3d 6c 2a 62 72 2a 6c 6c 2b 70 6f 77 28 31 2d 74 2c 36 29 2a 6c ,6)*ll;blue=l*br*ll+pow(1-t,6)*l
0fa0 6c 3b 00 9b 01 00 00 6a 3d 69 66 28 61 62 6f 76 65 28 6a 2c 31 29 2c 2d 31 2b 2e 30 30 32 2c 6a l;.....j=if(above(j,1),-1+.002,j
0fc0 2b 2e 30 30 31 29 3b 79 70 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 79 70 2b 2e 30 31 2c 79 +.001);yp=if(above(t,0),yp+.01,y
0fe0 70 29 3b 74 3d 74 2b 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 2e 30 31 2c 30 29 3b 62 72 3d 69 p);t=t+if(above(t,0),.01,0);br=i
1000 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 2c 62 72 29 3b 67 f(above(t,1),rand(100)/100,br);g
1020 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 2c 67 72 r=if(above(t,1),rand(100)/100,gr
1040 29 3b 72 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 );rr=if(above(t,1),rand(100)/100
1060 2c 72 72 29 3b 74 79 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 2d 72 61 6e 64 28 31 30 30 29 ,rr);ty=if(above(t,1),-rand(100)
1080 2f 32 30 30 2d 2e 35 2c 74 79 29 3b 74 78 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e /200-.5,ty);tx=if(above(t,1),ran
10a0 64 28 31 30 30 29 2f 35 30 2d 31 2c 74 78 29 3b 79 70 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 d(100)/50-1,tx);yp=if(above(t,1)
10c0 2c 30 2c 79 70 29 3b 74 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 30 2c 74 29 3b 74 3d 69 66 ,0,yp);t=if(above(t,1),0,t);t=if
10e0 28 62 65 6c 6f 77 28 61 62 73 28 6a 2b 2e 35 29 2c 2e 35 29 2c 69 66 28 61 62 6f 76 65 28 67 65 (below(abs(j+.5),.5),if(above(ge
1100 74 6f 73 63 28 62 61 2c 30 2c 30 29 2c 2e 33 29 2c 69 66 28 65 71 75 61 6c 28 74 2c 30 29 2c 2e tosc(ba,0,0),.3),if(equal(t,0),.
1120 30 31 2c 74 29 2c 74 29 2c 74 29 3b 73 78 3d 73 78 74 3b 73 79 3d 73 79 74 3b 73 7a 3d 73 7a 74 01,t),t),t);sx=sxt;sy=syt;sz=szt
1140 3b 00 00 00 00 00 63 00 00 00 6a 3d 2e 35 3b 6e 3d 31 30 30 3b 70 69 3d 61 63 6f 73 28 2d 31 29 ;.....c...j=.5;n=100;pi=acos(-1)
1160 3b 74 3d 72 61 6e 64 28 31 30 30 29 2f 31 30 30 3b 62 61 3d 72 61 6e 64 28 31 30 30 29 2f 31 30 ;t=rand(100)/100;ba=rand(100)/10
1180 30 3b 73 78 74 3d 72 61 6e 64 28 32 30 30 29 3b 73 79 74 3d 72 61 6e 64 28 32 30 30 29 3b 73 7a 0;sxt=rand(200);syt=rand(200);sz
11a0 74 3d 72 61 6e 64 28 32 30 30 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 00 00 00 24 00 00 t=rand(200);.................$..
11c0 00 b5 03 00 00 01 96 01 00 00 73 78 3d 28 73 78 2a 32 38 36 32 36 2b 34 31 32 30 2b 73 79 29 25 ..........sx=(sx*28626+4120+sy)%
11e0 32 30 30 30 3b 0d 0a 73 79 3d 28 73 79 2a 39 38 33 38 37 2b 35 33 31 31 2a 73 7a 29 25 32 30 30 2000;..sy=(sy*98387+5311*sz)%200
1200 30 3b 0d 0a 73 7a 3d 28 73 7a 2a 34 33 31 39 38 2b 36 34 32 31 2d 73 78 29 25 32 30 30 30 3b 0d 0;..sz=(sz*43198+6421-sx)%2000;.
1220 0a 78 31 3d 73 78 2f 31 30 30 30 2d 31 3b 7a 31 3d 73 7a 2f 31 30 30 30 2d 31 3b 79 31 3d 73 79 .x1=sx/1000-1;z1=sz/1000-1;y1=sy
1240 2f 31 30 30 30 2d 31 3b 0d 0a 64 3d 31 2f 73 71 72 74 28 78 31 2a 78 31 2b 79 31 2a 79 31 2b 7a /1000-1;..d=1/sqrt(x1*x1+y1*y1+z
1260 31 2a 7a 31 29 3b 73 70 3d 28 31 2d 28 70 6f 77 28 31 2d 74 2c 32 29 29 29 3b 0d 0a 78 31 3d 78 1*z1);sp=(1-(pow(1-t,2)));..x1=x
1280 31 2a 64 2a 73 70 3b 79 31 3d 79 31 2a 64 2a 73 70 3b 7a 31 3d 7a 31 2a 64 2a 73 70 3b 0d 0a 78 1*d*sp;y1=y1*d*sp;z1=z1*d*sp;..x
12a0 3d 28 78 31 2b 74 78 29 2f 28 7a 31 2b 32 29 3b 79 3d 28 79 31 2b 74 79 2b 79 70 2a 79 70 29 2f =(x1+tx)/(z1+2);y=(y1+ty+yp*yp)/
12c0 28 7a 31 2b 32 29 3b 0d 0a 6c 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 28 31 2d 28 7a 31 2f (z1+2);..l=if(above(t,0),(1-(z1/
12e0 32 29 29 2d 74 2c 2d 31 30 29 3b 0d 0a 6c 6c 3d 69 66 28 62 65 6c 6f 77 28 61 62 73 28 6a 2b 2e 2))-t,-10);..ll=if(below(abs(j+.
1300 35 29 2c 2e 35 29 2c 31 2c 30 29 3b 0d 0a 72 65 64 3d 6c 2a 72 72 2a 6c 6c 2b 70 6f 77 28 31 2d 5),.5),1,0);..red=l*rr*ll+pow(1-
1320 74 2c 36 29 2a 6c 6c 3b 67 72 65 65 6e 3d 6c 2a 67 72 2a 6c 6c 2b 70 6f 77 28 31 2d 74 2c 36 29 t,6)*ll;green=l*gr*ll+pow(1-t,6)
1340 2a 6c 6c 3b 62 6c 75 65 3d 6c 2a 62 72 2a 6c 6c 2b 70 6f 77 28 31 2d 74 2c 36 29 2a 6c 6c 3b 00 *ll;blue=l*br*ll+pow(1-t,6)*ll;.
1360 9b 01 00 00 6a 3d 69 66 28 61 62 6f 76 65 28 6a 2c 31 29 2c 2d 31 2b 2e 30 30 32 2c 6a 2b 2e 30 ....j=if(above(j,1),-1+.002,j+.0
1380 30 31 29 3b 79 70 3d 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 79 70 2b 2e 30 31 2c 79 70 29 3b 01);yp=if(above(t,0),yp+.01,yp);
13a0 74 3d 74 2b 69 66 28 61 62 6f 76 65 28 74 2c 30 29 2c 2e 30 31 2c 30 29 3b 62 72 3d 69 66 28 61 t=t+if(above(t,0),.01,0);br=if(a
13c0 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 2c 62 72 29 3b 67 72 3d 69 bove(t,1),rand(100)/100,br);gr=i
13e0 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 2c 67 72 29 3b 72 f(above(t,1),rand(100)/100,gr);r
1400 72 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 30 30 29 2f 31 30 30 2c 72 72 r=if(above(t,1),rand(100)/100,rr
1420 29 3b 74 79 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 2d 72 61 6e 64 28 31 30 30 29 2f 32 30 );ty=if(above(t,1),-rand(100)/20
1440 30 2d 2e 35 2c 74 79 29 3b 74 78 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 72 61 6e 64 28 31 0-.5,ty);tx=if(above(t,1),rand(1
1460 30 30 29 2f 35 30 2d 31 2c 74 78 29 3b 79 70 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 30 2c 00)/50-1,tx);yp=if(above(t,1),0,
1480 79 70 29 3b 74 3d 69 66 28 61 62 6f 76 65 28 74 2c 31 29 2c 30 2c 74 29 3b 74 3d 69 66 28 62 65 yp);t=if(above(t,1),0,t);t=if(be
14a0 6c 6f 77 28 61 62 73 28 6a 2b 2e 35 29 2c 2e 35 29 2c 69 66 28 61 62 6f 76 65 28 67 65 74 6f 73 low(abs(j+.5),.5),if(above(getos
14c0 63 28 62 61 2c 30 2c 30 29 2c 2e 33 29 2c 69 66 28 65 71 75 61 6c 28 74 2c 30 29 2c 2e 30 31 2c c(ba,0,0),.3),if(equal(t,0),.01,
14e0 74 29 2c 74 29 2c 74 29 3b 73 78 3d 73 78 74 3b 73 79 3d 73 79 74 3b 73 7a 3d 73 7a 74 3b 00 00 t),t),t);sx=sxt;sy=syt;sz=szt;..
1500 00 00 00 63 00 00 00 6a 3d 2e 35 3b 6e 3d 31 30 30 3b 70 69 3d 61 63 6f 73 28 2d 31 29 3b 74 3d ...c...j=.5;n=100;pi=acos(-1);t=
1520 72 61 6e 64 28 31 30 30 29 2f 31 30 30 3b 62 61 3d 72 61 6e 64 28 31 30 30 29 2f 31 30 30 3b 73 rand(100)/100;ba=rand(100)/100;s
1540 78 74 3d 72 61 6e 64 28 32 30 30 29 3b 73 79 74 3d 72 61 6e 64 28 32 30 30 29 3b 73 7a 74 3d 72 xt=rand(200);syt=rand(200);szt=r
1560 61 6e 64 28 32 30 30 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 00 00 00 1a 00 00 00 14 00 and(200);.......................
1580 00 00 01 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 04 00 00 00 2b 00 00 00 d7 01 00 00 01 50 ......................+........P
15a0 01 00 00 64 78 3d 78 2a 63 6f 73 28 63 72 2a 70 69 29 2d 2e 35 2a 73 69 6e 28 63 72 2a 70 69 29 ...dx=x*cos(cr*pi)-.5*sin(cr*pi)
15c0 3b 0d 0a 64 7a 3d 2e 35 2a 63 6f 73 28 63 72 2a 70 69 29 2b 78 2a 73 69 6e 28 63 72 2a 70 69 29 ;..dz=.5*cos(cr*pi)+x*sin(cr*pi)
15e0 3b 0d 0a 64 79 3d 79 3b 0d 0a 6b 3d 61 62 73 28 2e 35 2f 64 79 29 3b 0d 0a 79 6f 3d 73 69 6e 28 ;..dy=y;..k=abs(.5/dy);..yo=sin(
1600 28 64 7a 2a 6b 2a 32 2b 6f 7a 2a 32 2b 64 78 2a 6b 2a 31 29 2a 70 69 29 3b 78 6f 3d 73 69 6e 28 (dz*k*2+oz*2+dx*k*1)*pi);xo=sin(
1620 28 64 7a 2a 6b 2a 35 2b 6f 7a 2a 34 2b 64 78 2a 6b 2a 32 29 2a 70 69 29 2f 6b 3b 0d 0a 6d 79 6f (dz*k*5+oz*4+dx*k*2)*pi)/k;..myo
1640 3d 73 69 6e 28 28 64 7a 2a 6b 2a 31 2b 6f 7a 2a 34 2b 64 78 2a 6b 2a 34 2d 6f 7a 2a 31 30 29 2a =sin((dz*k*1+oz*4+dx*k*4-oz*10)*
1660 70 69 29 3b 0d 0a 6d 79 6f 32 3d 73 69 6e 28 28 64 7a 2a 6b 2a 35 2b 6f 7a 2a 34 2b 64 78 2a 6b pi);..myo2=sin((dz*k*5+oz*4+dx*k
1680 2a 33 2d 6f 7a 2a 32 30 29 2a 70 69 29 3b 0d 0a 79 6f 3d 28 79 6f 2b 6d 79 6f 2b 6d 79 6f 32 29 *3-oz*20)*pi);..yo=(yo+myo+myo2)
16a0 2f 33 3b 0d 0a 78 3d 69 66 28 61 62 6f 76 65 28 79 2c 30 29 2c 78 2b 78 6f 2a 2e 31 2c 78 29 3b /3;..x=if(above(y,0),x+xo*.1,x);
16c0 79 3d 69 66 28 61 62 6f 76 65 28 79 2c 30 29 2c 79 2b 79 6f 2a 2e 31 2c 79 29 3b 0d 0a 61 6c 70 y=if(above(y,0),y+yo*.1,y);..alp
16e0 68 61 3d 6d 61 78 28 34 2d 6b 2a 2e 32 35 2c 30 29 3b 00 49 00 00 00 6f 7a 3d 69 66 28 61 62 6f ha=max(4-k*.25,0);.I...oz=if(abo
1700 76 65 28 6f 7a 2c 31 29 2c 2d 31 2b 2e 30 32 2c 6f 7a 2b 2e 30 31 29 3b 0d 0a 63 72 3d 69 66 28 ve(oz,1),-1+.02,oz+.01);..cr=if(
1720 61 62 6f 76 65 28 63 72 2c 31 29 2c 2d 31 2b 2e 30 30 32 2c 63 72 2b 2e 30 30 31 29 3b 0d 0a 00 above(cr,1),-1+.002,cr+.001);...
1740 00 00 00 00 0d 00 00 00 70 69 3d 61 63 6f 73 28 2d 31 29 3b 00 01 00 00 00 01 00 00 00 18 00 00 ........pi=acos(-1);............
1760 00 60 00 00 00 01 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 fe ff ff ff ca 06 00 00 81 01 00 .`..............................
1780 05 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 .$..............................
17a0 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 66 66 65 63 74 20 4c 69 73 74 20 43 6f 6e 66 69 ...@..AVS.2.8+.Effect.List.Confi
17c0 67 00 00 00 00 00 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00 00 04 00 00 00 01 00 g.....................(.........
17e0 06 80 24 00 00 00 11 02 00 00 01 f0 00 00 00 6c 72 3d 2e 32 35 3b 0d 0a 6c 62 3d 28 73 69 6e 28 ..$............lr=.25;..lb=(sin(
1800 69 2a 70 69 29 2a 70 31 2b 73 69 6e 28 28 69 2b 74 74 29 2a 70 69 29 2a 70 32 2b 73 69 6e 28 28 i*pi)*p1+sin((i+tt)*pi)*p2+sin((
1820 69 2d 74 74 29 2a 70 69 29 2a 70 33 29 2b 31 3b 0d 0a 78 3d 63 6f 73 28 69 2a 32 2a 70 69 29 2a i-tt)*pi)*p3)+1;..x=cos(i*2*pi)*
1840 6c 72 2d 78 6f 3b 79 3d 73 69 6e 28 69 2a 70 69 2a 32 29 2a 6c 72 2d 79 6f 3b 0d 0a 66 62 3d 69 lr-xo;y=sin(i*pi*2)*lr-yo;..fb=i
1860 66 28 62 65 6c 6f 77 28 61 62 73 28 6a 2b 32 2e 35 29 2c 2e 35 29 2c 69 66 28 61 62 6f 76 65 28 f(below(abs(j+2.5),.5),if(above(
1880 2d 79 6f 2c 2e 35 29 2c 2e 30 36 32 35 2a 6c 62 2a 28 31 29 2a 28 31 2d 73 71 72 74 28 78 6f 2a -yo,.5),.0625*lb*(1)*(1-sqrt(xo*
18a0 78 6f 2a 2e 32 35 2b 79 6f 2a 79 6f 29 2a 2e 35 29 2c 30 29 2c 30 29 3b 0d 0a 72 65 64 3d 66 62 xo*.25+yo*yo)*.5),0),0);..red=fb
18c0 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 2a 2e 35 3b 62 6c 75 65 3d 67 72 65 65 6e 2a 2e 35 3b 00 88 ;..green=red*.5;blue=green*.5;..
18e0 00 00 00 6a 3d 69 66 28 61 62 6f 76 65 28 6a 2c 34 29 2c 2d 34 2b 2e 30 30 32 2c 6a 2b 2e 30 30 ...j=if(above(j,4),-4+.002,j+.00
1900 31 29 3b 61 6e 67 3d 73 69 6e 28 6a 2a 70 69 29 3b 63 61 6e 67 3d 63 6f 73 28 6a 2a 70 69 29 3b 1);ang=sin(j*pi);cang=cos(j*pi);
1920 78 6f 3d 6a 2b 32 3b 79 6f 3d 63 61 6e 67 3b 6e 3d 68 2a 32 2b 32 3b 70 31 3d 28 70 31 2a 39 2b xo=j+2;yo=cang;n=h*2+2;p1=(p1*9+
1940 70 31 74 29 2a 2e 31 3b 70 32 3d 28 70 32 2a 39 2b 70 32 74 29 2a 2e 31 3b 70 33 3d 28 70 33 2a p1t)*.1;p2=(p2*9+p2t)*.1;p3=(p3*
1960 39 2b 70 33 74 29 2a 2e 31 3b 00 43 00 00 00 70 31 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 9+p3t)*.1;.C...p1t=rand(100)*.00
1980 35 2b 2e 35 3b 70 32 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 3b 70 33 74 3d 72 5+.5;p2t=rand(100)*.005+.5;p3t=r
19a0 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 3b 00 35 00 00 00 6e 3d 68 2a 32 2b 32 3b 70 69 and(100)*.005+.5;.5...n=h*2+2;pi
19c0 3d 61 63 6f 73 28 2d 31 29 3b 66 73 3d 2e 30 30 35 3b 66 6f 76 3d 31 3b 74 64 3d 2d 2e 35 3b 74 =acos(-1);fs=.005;fov=1;td=-.5;t
19e0 74 3d 32 2f 33 3b 6a 3d 31 3b 00 02 00 00 00 01 00 00 00 09 09 09 00 01 00 00 00 24 00 00 00 16 t=2/3;j=1;.................$....
1a00 02 00 00 01 f5 00 00 00 6c 72 3d 2e 31 3b 0d 0a 6c 62 3d 28 73 69 6e 28 69 2a 70 69 29 2a 70 31 ........lr=.1;..lb=(sin(i*pi)*p1
1a20 2b 73 69 6e 28 28 69 2b 74 74 29 2a 70 69 29 2a 70 32 2b 73 69 6e 28 28 69 2d 74 74 29 2a 70 69 +sin((i+tt)*pi)*p2+sin((i-tt)*pi
1a40 29 2a 70 33 29 2b 31 3b 0d 0a 78 3d 63 6f 73 28 69 2a 32 2a 70 69 29 2a 6c 72 2d 78 6f 2a 2e 35 )*p3)+1;..x=cos(i*2*pi)*lr-xo*.5
1a60 3b 79 3d 73 69 6e 28 69 2a 70 69 2a 32 29 2a 6c 72 2d 79 6f 2a 2e 35 3b 0d 0a 66 62 3d 69 66 28 ;y=sin(i*pi*2)*lr-yo*.5;..fb=if(
1a80 62 65 6c 6f 77 28 61 62 73 28 6a 2b 32 2e 35 29 2c 2e 35 29 2c 69 66 28 61 62 6f 76 65 28 2d 79 below(abs(j+2.5),.5),if(above(-y
1aa0 6f 2c 2e 35 29 2c 2e 30 36 32 35 2a 6c 62 2a 28 31 29 2a 28 31 2d 73 71 72 74 28 78 6f 2a 78 6f o,.5),.0625*lb*(1)*(1-sqrt(xo*xo
1ac0 2a 2e 32 35 2b 79 6f 2a 79 6f 29 2a 2e 35 29 2c 30 29 2c 30 29 3b 0d 0a 72 65 64 3d 66 62 3b 0d *.25+yo*yo)*.5),0),0);..red=fb;.
1ae0 0a 67 72 65 65 6e 3d 72 65 64 2a 2e 35 3b 62 6c 75 65 3d 67 72 65 65 6e 2a 2e 35 3b 00 88 00 00 .green=red*.5;blue=green*.5;....
1b00 00 6a 3d 69 66 28 61 62 6f 76 65 28 6a 2c 34 29 2c 2d 34 2b 2e 30 30 32 2c 6a 2b 2e 30 30 31 29 .j=if(above(j,4),-4+.002,j+.001)
1b20 3b 61 6e 67 3d 73 69 6e 28 6a 2a 70 69 29 3b 63 61 6e 67 3d 63 6f 73 28 6a 2a 70 69 29 3b 78 6f ;ang=sin(j*pi);cang=cos(j*pi);xo
1b40 3d 6a 2b 32 3b 79 6f 3d 63 61 6e 67 3b 6e 3d 68 2a 32 2b 32 3b 70 31 3d 28 70 31 2a 39 2b 70 31 =j+2;yo=cang;n=h*2+2;p1=(p1*9+p1
1b60 74 29 2a 2e 31 3b 70 32 3d 28 70 32 2a 39 2b 70 32 74 29 2a 2e 31 3b 70 33 3d 28 70 33 2a 39 2b t)*.1;p2=(p2*9+p2t)*.1;p3=(p3*9+
1b80 70 33 74 29 2a 2e 31 3b 00 43 00 00 00 70 31 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b p3t)*.1;.C...p1t=rand(100)*.005+
1ba0 2e 35 3b 70 32 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 3b 70 33 74 3d 72 61 6e .5;p2t=rand(100)*.005+.5;p3t=ran
1bc0 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 3b 00 35 00 00 00 6e 3d 68 2a 32 2b 32 3b 70 69 3d 61 d(100)*.005+.5;.5...n=h*2+2;pi=a
1be0 63 6f 73 28 2d 31 29 3b 66 73 3d 2e 30 30 35 3b 66 6f 76 3d 31 3b 74 64 3d 2d 2e 35 3b 74 74 3d cos(-1);fs=.005;fov=1;td=-.5;tt=
1c00 32 2f 33 3b 6a 3d 31 3b 00 02 00 00 00 01 00 00 00 09 09 09 00 01 00 00 00 24 00 00 00 16 02 00 2/3;j=1;.................$......
1c20 00 01 f5 00 00 00 6c 72 3d 2e 32 3b 0d 0a 6c 62 3d 28 73 69 6e 28 69 2a 70 69 29 2a 70 31 2b 73 ......lr=.2;..lb=(sin(i*pi)*p1+s
1c40 69 6e 28 28 69 2b 74 74 29 2a 70 69 29 2a 70 32 2b 73 69 6e 28 28 69 2d 74 74 29 2a 70 69 29 2a in((i+tt)*pi)*p2+sin((i-tt)*pi)*
1c60 70 33 29 2b 31 3b 0d 0a 78 3d 63 6f 73 28 69 2a 32 2a 70 69 29 2a 6c 72 2b 78 6f 2a 2e 35 3b 79 p3)+1;..x=cos(i*2*pi)*lr+xo*.5;y
1c80 3d 73 69 6e 28 69 2a 70 69 2a 32 29 2a 6c 72 2b 79 6f 2a 2e 35 3b 0d 0a 66 62 3d 69 66 28 62 65 =sin(i*pi*2)*lr+yo*.5;..fb=if(be
1ca0 6c 6f 77 28 61 62 73 28 6a 2b 32 2e 35 29 2c 2e 35 29 2c 69 66 28 61 62 6f 76 65 28 2d 79 6f 2c low(abs(j+2.5),.5),if(above(-yo,
1cc0 2e 35 29 2c 2e 30 36 32 35 2a 6c 62 2a 28 31 29 2a 28 31 2d 73 71 72 74 28 78 6f 2a 78 6f 2a 2e .5),.0625*lb*(1)*(1-sqrt(xo*xo*.
1ce0 32 35 2b 79 6f 2a 79 6f 29 2a 2e 35 29 2c 30 29 2c 30 29 3b 0d 0a 72 65 64 3d 66 62 3b 0d 0a 67 25+yo*yo)*.5),0),0);..red=fb;..g
1d00 72 65 65 6e 3d 72 65 64 2a 2e 35 3b 62 6c 75 65 3d 67 72 65 65 6e 2a 2e 35 3b 00 88 00 00 00 6a reen=red*.5;blue=green*.5;.....j
1d20 3d 69 66 28 61 62 6f 76 65 28 6a 2c 34 29 2c 2d 34 2b 2e 30 30 32 2c 6a 2b 2e 30 30 31 29 3b 61 =if(above(j,4),-4+.002,j+.001);a
1d40 6e 67 3d 73 69 6e 28 6a 2a 70 69 29 3b 63 61 6e 67 3d 63 6f 73 28 6a 2a 70 69 29 3b 78 6f 3d 6a ng=sin(j*pi);cang=cos(j*pi);xo=j
1d60 2b 32 3b 79 6f 3d 63 61 6e 67 3b 6e 3d 68 2a 32 2b 32 3b 70 31 3d 28 70 31 2a 39 2b 70 31 74 29 +2;yo=cang;n=h*2+2;p1=(p1*9+p1t)
1d80 2a 2e 31 3b 70 32 3d 28 70 32 2a 39 2b 70 32 74 29 2a 2e 31 3b 70 33 3d 28 70 33 2a 39 2b 70 33 *.1;p2=(p2*9+p2t)*.1;p3=(p3*9+p3
1da0 74 29 2a 2e 31 3b 00 43 00 00 00 70 31 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 t)*.1;.C...p1t=rand(100)*.005+.5
1dc0 3b 70 32 74 3d 72 61 6e 64 28 31 30 30 29 2a 2e 30 30 35 2b 2e 35 3b 70 33 74 3d 72 61 6e 64 28 ;p2t=rand(100)*.005+.5;p3t=rand(
1de0 31 30 30 29 2a 2e 30 30 35 2b 2e 35 3b 00 35 00 00 00 6e 3d 68 2a 32 2b 32 3b 70 69 3d 61 63 6f 100)*.005+.5;.5...n=h*2+2;pi=aco
1e00 73 28 2d 31 29 3b 66 73 3d 2e 30 30 35 3b 66 6f 76 3d 31 3b 74 64 3d 2d 2e 35 3b 74 74 3d 32 2f s(-1);fs=.005;fov=1;td=-.5;tt=2/
1e20 33 3b 6a 3d 31 3b 00 02 00 00 00 01 00 00 00 09 09 09 00 01 00 00 00 06 00 00 00 08 00 00 00 01 3;j=1;..........................
1e40 00 00 00 00 00 00 00 .......
generated by cgit (git 2.34.1) at 2025-08-24 09:06:13 -0400