aboutsummaryrefslogtreecommitdiff
path: root/Src/resources/data/avs/Community Picks/UnConeD - Mister Santa.avs
blob: 6a10a99fac90ed570ec3a3276c9c4fe4e6f3cf51 (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 01 15 00 00 00 75 01 00 Nullsoft.AVS.Preset.0.2......u..
0020 00 71 01 00 00 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f .q...___________________________
0040 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 0d 0a 0d 0a 20 ___________________________.....
0060 20 57 68 61 63 6b 6f 20 52 65 76 69 73 69 74 65 64 0d 0a 20 20 4d 69 73 74 65 72 20 53 61 6e 74 .Whacko.Revisited....Mister.Sant
0080 61 0d 0a 20 20 52 65 6d 69 78 20 62 79 3a 20 53 74 65 76 65 6e 20 57 69 74 74 65 6e 73 20 2f 20 a....Remix.by:.Steven.Wittens./.
00a0 55 6e 43 6f 6e 65 44 0d 0a 0d 0a 20 20 4f 72 69 67 69 6e 61 6c 3a 20 4d 69 73 74 65 72 20 48 61 UnConeD......Original:.Mister.Ha
00c0 70 70 79 0d 0a 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f ppy..___________________________
00e0 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 0d 0a af af af ___________________________.....
0100 af af af af af af af af af af af af af af af af af af af af af af af af af af af af af af af af ................................
0120 af af af af af af af af af af af af af af af af af af af 0d 0a 20 20 77 77 77 2e 61 63 6b 6f 2e .......................www.acko.
0140 6e 65 74 20 2d 20 73 74 65 76 65 6e 20 40 20 61 63 6b 6f 20 64 6f 74 20 6e 65 74 0d 0a 5f 5f 5f net.-.steven.@.acko.dot.net..___
0160 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f ________________________________
0180 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 0d 0a 00 19 00 00 00 14 00 00 00 01 00 ___________________.............
01a0 00 00 4f 17 00 00 00 00 00 00 00 00 00 00 00 00 00 00 fe ff ff ff d1 00 00 00 82 02 00 01 24 80 ..O...........................$.
01c0 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 00 00 00 ................................
01e0 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 67 00 00 @..AVS.2.8+.Effect.List.Config..
0200 00 00 00 50 00 00 00 01 00 00 00 11 00 00 00 65 3d 31 3b 6c 77 3d 2d 31 3b 6c 68 3d 2d 31 3b 00 ...P...........e=1;lw=-1;lh=-1;.
0220 33 00 00 00 65 6e 61 62 6c 65 64 3d 62 6e 6f 74 28 65 71 75 61 6c 28 6c 77 2c 77 29 2a 65 71 75 3...enabled=bnot(equal(lw,w)*equ
0240 61 6c 28 6c 68 2c 68 29 29 3b 0d 0a 6c 77 3d 77 3b 6c 68 3d 68 3b 00 19 00 00 00 14 00 00 00 01 al(lh,h));..lw=w;lh=h;..........
0260 00 00 00 ff fc f9 00 00 00 00 00 00 00 00 00 00 00 00 00 12 00 00 00 10 00 00 00 00 00 00 00 00 ................................
0280 00 00 00 00 00 00 00 80 00 00 00 2b 00 00 00 9f 03 00 00 01 06 01 00 00 64 79 3d 79 2a 61 66 3b ...........+............dy=y*af;
02a0 0d 0a 64 78 31 3d 78 2a 63 7a 2d 64 79 2a 73 7a 3b 64 79 31 3d 78 2a 73 7a 2b 64 79 2a 63 7a 3b ..dx1=x*cz-dy*sz;dy1=x*sz+dy*cz;
02c0 0d 0a 64 79 32 3d 64 79 31 2a 63 78 2d 73 78 3b 64 7a 32 3d 64 79 31 2a 73 78 2b 63 78 3b 0d 0a ..dy2=dy1*cx-sx;dz2=dy1*sx+cx;..
02e0 64 78 33 3d 64 78 31 2a 63 79 2d 64 7a 32 2a 73 79 3b 64 7a 33 3d 64 78 31 2a 73 79 2b 64 7a 32 dx3=dx1*cy-dz2*sy;dz3=dx1*sy+dz2
0300 2a 63 79 3b 0d 0a 6b 3d 6f 79 2f 64 79 32 3b 6b 3d 69 66 28 62 65 6c 6f 77 28 6b 2c 30 29 2c 31 *cy;..k=oy/dy2;k=if(below(k,0),1
0320 30 30 30 2c 6b 29 3b 0d 0a 69 78 3d 2d 6f 78 2b 64 78 33 2a 6b 3b 69 79 3d 2d 6f 79 2b 64 79 32 000,k);..ix=-ox+dx3*k;iy=-oy+dy2
0340 2a 6b 3b 69 7a 3d 2d 6f 7a 2b 64 7a 33 2a 6b 3b 0d 0a 78 3d 69 78 2a 31 2e 34 3b 79 3d 69 7a 2a *k;iz=-oz+dz3*k;..x=ix*1.4;y=iz*
0360 31 2e 34 3b 0d 0a 64 3d 73 71 72 74 28 73 71 72 28 78 29 2b 73 71 72 28 69 79 29 2b 73 71 72 28 1.4;..d=sqrt(sqr(x)+sqr(iy)+sqr(
0380 79 29 29 3b 0d 0a 61 6c 70 68 61 3d 65 78 70 28 2d 64 2a 2e 34 2b 2e 31 37 29 3b 0d 0a 00 06 02 y));..alpha=exp(-d*.4+.17);.....
03a0 00 00 74 3d 74 2b 30 2e 30 31 3b 0d 0a 6f 78 3d 63 6f 73 28 74 29 2a 63 6f 73 28 74 2a 2e 33 37 ..t=t+0.01;..ox=cos(t)*cos(t*.37
03c0 39 2b 31 29 2a 63 6f 73 28 73 69 6e 28 74 2a 2e 31 34 31 29 29 3b 0d 0a 6f 79 3d 2e 34 35 2d 73 9+1)*cos(sin(t*.141));..oy=.45-s
03e0 69 6e 28 74 2a 2e 39 31 29 2a 63 6f 73 28 2d 74 2a 2e 37 31 29 2a 2e 33 35 3b 0d 0a 6f 7a 3d 2d in(t*.91)*cos(-t*.71)*.35;..oz=-
0400 2e 32 2d 61 62 73 28 73 69 6e 28 74 29 2a 63 6f 73 28 2d 74 2a 2e 34 31 29 2a 73 69 6e 28 63 6f .2-abs(sin(t)*cos(-t*.41)*sin(co
0420 73 28 74 2a 2e 36 33 31 29 29 29 3b 0d 0a 6f 74 3d 2e 31 2b 2e 36 2f 73 71 72 74 28 73 71 72 28 s(t*.631)));..ot=.1+.6/sqrt(sqr(
0440 6f 78 29 2b 73 71 72 28 6f 79 29 2b 73 71 72 28 6f 7a 29 29 3b 0d 0a 6f 78 3d 6f 78 2a 6f 74 3b ox)+sqr(oy)+sqr(oz));..ox=ox*ot;
0460 6f 79 3d 6f 79 2a 6f 74 3b 6f 7a 3d 6f 7a 2a 6f 74 3b 0d 0a 72 7a 3d 30 3b 0d 0a 72 79 3d 61 74 oy=oy*ot;oz=oz*ot;..rz=0;..ry=at
0480 61 6e 32 28 2d 6f 78 2c 6f 7a 29 3b 0d 0a 72 78 3d 2d 61 74 61 6e 32 28 6f 79 2d 2e 32 2c 73 71 an2(-ox,oz);..rx=-atan2(oy-.2,sq
04a0 72 74 28 73 71 72 28 6f 78 29 2b 73 71 72 28 6f 7a 29 29 29 3b 0d 0a 63 78 3d 63 6f 73 28 72 78 rt(sqr(ox)+sqr(oz)));..cx=cos(rx
04c0 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 28 72 );sx=sin(rx);cy=cos(ry);sy=sin(r
04e0 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 0d 0a 61 66 3d 68 2f y);cz=cos(rz);sz=sin(rz);..af=h/
0500 77 3b 0d 0a 62 66 3d 62 66 2a 2e 36 3b 0d 0a 72 65 67 30 30 3d 6f 78 3b 72 65 67 30 31 3d 6f 79 w;..bf=bf*.6;..reg00=ox;reg01=oy
0520 3b 72 65 67 30 32 3d 6f 7a 3b 72 65 67 30 33 3d 72 78 3b 72 65 67 30 34 3d 72 79 3b 72 65 67 30 ;reg02=oz;reg03=rx;reg04=ry;reg0
0540 35 3d 72 7a 3b 72 65 67 30 36 3d 63 78 3b 72 65 67 30 37 3d 2d 73 78 3b 72 65 67 30 38 3d 63 79 5=rz;reg06=cx;reg07=-sx;reg08=cy
0560 3b 72 65 67 30 39 3d 2d 73 79 3b 72 65 67 31 30 3d 63 7a 3b 72 65 67 31 31 3d 2d 73 7a 3b 0d 0a ;reg09=-sy;reg10=cz;reg11=-sz;..
0580 72 65 67 32 30 3d 73 71 72 74 28 73 71 72 28 6f 78 29 2b 73 71 72 28 6f 79 2d 2e 32 29 2b 73 71 reg20=sqrt(sqr(ox)+sqr(oy-.2)+sq
05a0 72 28 6f 7a 29 29 3b 00 55 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e r(oz));.U...ot=min(0,getspec(0,.
05c0 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 1,0)*2-1)*((getosc(.3,0,0)*200)%
05e0 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 0d 0a 62 66 3d 33 3b 2);t=t+5*(ot+if(ot,1,0));..bf=3;
0600 00 0d 00 00 00 74 3d 72 61 6e 64 28 31 30 30 29 3b 00 01 00 00 00 01 00 00 00 10 00 00 00 10 00 .....t=rand(100);...............
0620 00 00 01 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 28 00 00 00 04 00 00 00 01 00 01 80 50 85 ..................(...........P.
0640 dc 03 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 49 49 00 00 00 00 00 00 00 00 00 00 00 00 ..Acko.net:.Texer.II............
0660 00 00 4c 04 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 ..L.............................
0680 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 ................................
06a0 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 ................................
06c0 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 ................................
06e0 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 ................................
0700 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 ................................
0720 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 ................................
0740 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 ................................
0760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 2d 00 ..............................-.
0780 00 00 6e 3d 35 30 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 6d 66 3d 31 30 30 3b 6d 74 ..n=500;tpi=acos(-1)*2;mf=100;mt
07a0 3d 30 3b a4 20 53 6e 6f 77 2f 44 75 73 74 3b d3 00 00 00 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 =0;..Snow/Dust;....bt=bt+1;t=t+0
07c0 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 .02;..ox=reg00;oy=reg01;oz=reg02
07e0 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 ;rx=reg03;ry=reg04;rz=reg05;cx=r
0800 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b eg06;sx=reg07;cy=reg08;sy=reg09;
0820 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 cz=reg10;sz=reg11;..x=0;y=0;af=w
0840 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 76 31 3d 31 32 35 3b 76 32 3d 31 33 35 3b 76 33 /h;mp=mp+1.5/mf;v1=125;v2=135;v3
0860 3d 34 32 31 31 3b 78 3d 31 3b 79 3d 30 3b 0d 0a 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 73 73 3d =4211;x=1;y=0;....dd=reg20;..ss=
0880 77 2f 33 32 30 3b 67 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c w/320;g...ot=min(0,getspec(0,.1,
08a0 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 0)*2-1)*((getosc(.3,0,0)*200)%2)
08c0 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 ;t=t+5*(ot+if(ot,1,0));mf=(bt-mt
08e0 29 2a 2e 33 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b bd 01 00 00 76 31 3d 28 76 31 2a 34 32 31 31 )*.3+mf*.7;mt=bt;....v1=(v1*4211
0900 2b 37 31 35 31 29 25 31 30 30 30 30 3b 0d 0a 76 32 3d 28 76 32 2a 31 31 35 37 33 2b 39 39 31 33 +7151)%10000;..v2=(v2*11573+9913
0920 29 25 31 30 30 30 30 3b 0d 0a 76 33 3d 28 76 33 2a 39 36 34 31 31 2b 31 36 32 31 39 29 25 31 30 )%10000;..v3=(v3*96411+16219)%10
0940 30 30 30 3b 0d 0a 79 76 3d 2d 31 30 30 30 30 2b 28 28 76 32 2b 35 2a 62 74 2a 28 76 33 25 31 30 000;..yv=-10000+((v2+5*bt*(v3%10
0960 29 29 25 31 32 30 30 30 29 3b 0d 0a 79 76 3d 6d 69 6e 28 30 2c 79 76 29 3b 0d 0a 70 78 3d 76 31 ))%12000);..yv=min(0,yv);..px=v1
0980 2a 2e 30 30 30 31 35 2d 2e 35 2b 6f 78 3b 0d 0a 70 79 3d 79 76 2a 2e 30 30 30 31 2b 6f 79 3b 0d *.00015-.5+ox;..py=yv*.0001+oy;.
09a0 0a 70 7a 3d 76 33 2a 2e 30 30 30 31 35 2d 2e 35 2b 6f 7a 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 .pz=v3*.00015-.5+oz;..x1=px*cy-p
09c0 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a z*sy;z1=px*sy+pz*cy;..y2=py*cx-z
09e0 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 1*sx;z2=py*sx+z1*cx;..x3=x1*cz-y
0a00 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 73 6b 69 70 3d 28 62 65 6c 6f 2*sz;y3=x1*sz+y2*cz;..skip=(belo
0a20 77 28 7a 32 2c 64 64 2a 2e 38 29 29 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 w(z2,dd*.8));..dt=if(above(z2,.0
0a40 35 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 5),1/z2,0);..x=if(dt,x3*dt,x);y=
0a60 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 72 65 64 3d 64 74 2d 2e 35 3b 67 72 if(dt,y3*dt*af,y);..red=dt-.5;gr
0a80 65 65 6e 3d 72 65 64 3b 62 6c 75 65 3d 72 65 64 2a 31 2e 35 3b 0d 0a 73 69 7a 65 78 3d 64 74 2a een=red;blue=red*1.5;..sizex=dt*
0aa0 2e 31 2a 73 73 3b 73 69 7a 65 79 3d 73 69 7a 65 78 3b 28 00 00 00 04 00 00 00 00 00 01 80 24 00 .1*ss;sizey=sizex;(...........$.
0ac0 00 00 81 03 00 00 01 b5 01 00 00 75 3d 69 2a 24 70 69 2a 35 32 3b 0d 0a 72 64 3d 6d 69 6e 28 31 ...........u=i*$pi*52;..rd=min(1
0ae0 2c 61 62 6f 76 65 28 69 2c 2e 36 29 2a 2e 35 2b 6d 61 78 28 30 2c 73 69 6e 28 69 2a 24 70 69 2a ,above(i,.6)*.5+max(0,sin(i*$pi*
0b00 31 2e 33 33 29 2a 33 29 29 2a 2e 30 33 3b 0d 0a 71 78 3d 63 6f 73 28 75 29 2a 72 64 2a 2e 37 3b 1.33)*3))*.03;..qx=cos(u)*rd*.7;
0b20 70 79 3d 73 69 6e 28 75 29 2a 72 64 2a 2e 37 3b 71 7a 3d 69 2a 2e 32 2a 2e 37 3b 0d 0a 70 78 3d py=sin(u)*rd*.7;qz=i*.2*.7;..px=
0b40 2d 71 78 2a 2e 37 2b 71 7a 2a 2e 37 3b 70 7a 3d 71 78 2a 2e 37 2b 71 7a 2a 2e 37 2d 2e 30 35 35 -qx*.7+qz*.7;pz=qx*.7+qz*.7-.055
0b60 3b 0d 0a 70 78 3d 70 78 2b 6f 78 2d 2e 33 3b 70 79 3d 70 79 2b 6f 79 3b 70 7a 3d 70 7a 2b 6f 7a ;..px=px+ox-.3;py=py+oy;pz=pz+oz
0b80 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 ;..x1=px*cy-pz*sy;z1=px*sy+pz*cy
0ba0 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 ;..y2=py*cx-z1*sx;z2=py*sx+z1*cx
0bc0 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a ;..x3=x1*cz-y2*sz;y3=x1*sz+y2*cz
0be0 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d ;..dt=if(above(z2,.01),1/z2,0);.
0c00 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a .x=if(dt,x3*dt,x);y=if(dt,y3*dt*
0c20 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 64 74 2a 30 af,y);..linesize=dt*ls;..dt=dt*0
0c40 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 28 64 74 2d 2e 32 29 2a 2e 32 3b 67 72 65 65 6e 3d 72 65 .6*ccd;..red=(dt-.2)*.2;green=re
0c60 64 2a 32 2b 61 62 6f 76 65 28 71 7a 2c 2e 30 32 35 29 2a 2e 31 3b 62 6c 75 65 3d 72 65 64 3b 00 d*2+above(qz,.025)*.1;blue=red;.
0c80 0a 01 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b ....mv=getspec(0,.5,0)*.1+mv*.9;
0ca0 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b sv=min(1,mv*6);bt=bt+1;t=t+0.02;
0cc0 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d ..ox=reg00;oy=reg01;oz=reg02;rx=
0ce0 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 reg03;ry=reg04;rz=reg05;cx=reg06
0d00 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 ;sx=reg07;cy=reg08;sy=reg09;cz=r
0d20 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d eg10;sz=reg11;..x=0;y=0;af=w/h;m
0d40 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 p=mp+1.5/mf;..dd=reg20;..ccd=(re
0d60 67 32 30 29 2a 31 2e 36 3b 0d 0a 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 6f 79 3d 6f 79 3b 0d 0a g20)*1.6;..mf=mf*.92+.8;oy=oy;..
0d80 6c 73 3d 31 2e 39 2a 77 2f 33 32 30 3b 00 72 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 ls=1.9*w/320;.r...ot=min(0,getsp
0da0 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 ec(0,.1,0)*2-1)*((getosc(.3,0,0)
0dc0 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d *200)%2);t=t+5*(ot+if(ot,1,0));m
0de0 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 72 61 6e 64 f=(bt-mt)*.5+mf*.7;mt=bt;md=rand
0e00 28 32 29 00 2f 00 00 00 6e 3d 32 30 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 (2)./...n=200;tpi=acos(-1)*2;t=0
0e20 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 42 6f 74 74 6c 65 3b 00 02 00 00 00 01 00 00 00 00 ;mf=100;mt=0;..Bottle;..........
0e40 00 00 00 01 00 00 00 24 00 00 00 81 03 00 00 01 b5 01 00 00 75 3d 69 2a 24 70 69 2a 35 32 3b 0d .......$............u=i*$pi*52;.
0e60 0a 72 64 3d 6d 69 6e 28 31 2c 61 62 6f 76 65 28 69 2c 2e 36 29 2a 2e 35 2b 6d 61 78 28 30 2c 73 .rd=min(1,above(i,.6)*.5+max(0,s
0e80 69 6e 28 69 2a 24 70 69 2a 31 2e 33 33 29 2a 33 29 29 2a 2e 30 33 3b 0d 0a 71 78 3d 63 6f 73 28 in(i*$pi*1.33)*3))*.03;..qx=cos(
0ea0 75 29 2a 72 64 2a 2e 37 3b 70 79 3d 73 69 6e 28 75 29 2a 72 64 2a 2e 37 3b 71 7a 3d 69 2a 2e 32 u)*rd*.7;py=sin(u)*rd*.7;qz=i*.2
0ec0 2a 2e 37 3b 0d 0a 70 78 3d 71 78 2a 2e 39 35 2d 71 7a 2a 2e 32 3b 70 7a 3d 71 78 2a 2e 32 2b 71 *.7;..px=qx*.95-qz*.2;pz=qx*.2+q
0ee0 7a 2a 2e 39 35 3b 0d 0a 70 78 3d 70 78 2b 6f 78 2d 2e 33 35 3b 70 79 3d 70 79 2b 6f 79 3b 70 7a z*.95;..px=px+ox-.35;py=py+oy;pz
0f00 3d 70 7a 2b 6f 7a 2d 2e 31 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 =pz+oz-.1;..x1=px*cy-pz*sy;z1=px
0f20 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 *sy+pz*cy;..y2=py*cx-z1*sx;z2=py
0f40 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 *sx+z1*cx;..x3=x1*cz-y2*sz;y3=x1
0f60 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c *sz+y2*cz;..dt=if(above(z2,.01),
0f80 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 1/z2,0);..x=if(dt,x3*dt,x);y=if(
0fa0 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b dt,y3*dt*af,y);..linesize=dt*ls;
0fc0 0d 0a 64 74 3d 64 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 28 64 74 2d 2e 32 29 2a 2e 32 ..dt=dt*0.6*ccd;..red=(dt-.2)*.2
0fe0 3b 67 72 65 65 6e 3d 72 65 64 2a 32 2b 61 62 6f 76 65 28 71 7a 2c 2e 30 32 35 29 2a 2e 31 3b 62 ;green=red*2+above(qz,.025)*.1;b
1000 6c 75 65 3d 72 65 64 3b 00 0a 01 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a lue=red;.....mv=getspec(0,.5,0)*
1020 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b .1+mv*.9;sv=min(1,mv*6);bt=bt+1;
1040 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d t=t+0.02;..ox=reg00;oy=reg01;oz=
1060 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 reg02;rx=reg03;ry=reg04;rz=reg05
1080 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 ;cx=reg06;sx=reg07;cy=reg08;sy=r
10a0 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 eg09;cz=reg10;sz=reg11;..x=0;y=0
10c0 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b ;af=w/h;mp=mp+1.5/mf;..dd=reg20;
10e0 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 ..ccd=(reg20)*1.6;..mf=mf*.92+.8
1100 3b 6f 79 3d 6f 79 3b 0d 0a 6c 73 3d 31 2e 39 2a 77 2f 33 32 30 3b 00 72 00 00 00 6f 74 3d 6d 69 ;oy=oy;..ls=1.9*w/320;.r...ot=mi
1120 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 n(0,getspec(0,.1,0)*2-1)*((getos
1140 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f c(.3,0,0)*200)%2);t=t+5*(ot+if(o
1160 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 t,1,0));mf=(bt-mt)*.5+mf*.7;mt=b
1180 74 3b 6d 64 3d 72 61 6e 64 28 32 29 00 2f 00 00 00 6e 3d 32 30 30 3b 74 70 69 3d 61 63 6f 73 28 t;md=rand(2)./...n=200;tpi=acos(
11a0 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 42 6f 74 74 6c 65 3b 00 -1)*2;t=0;mf=100;mt=0;..Bottle;.
11c0 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 91 04 00 00 01 c6 02 00 00 75 3d 69 ................$............u=i
11e0 2a 24 70 69 2a 31 30 30 3b 72 64 3d 2e 34 2a 28 28 2e 35 2b 73 69 6e 28 69 2a 33 29 29 2a 28 31 *$pi*100;rd=.4*((.5+sin(i*3))*(1
1200 2d 73 71 72 28 69 29 29 2b 2e 32 29 3b 0d 0a 70 78 3d 63 6f 73 28 75 29 2a 72 64 3b 71 7a 3d 73 -sqr(i))+.2);..px=cos(u)*rd;qz=s
1220 69 6e 28 75 29 2a 72 64 3b 71 79 3d 2d 73 71 72 28 69 29 2a 2e 35 3b 0d 0a 74 74 3d 2d 73 69 6e in(u)*rd;qy=-sqr(i)*.5;..tt=-sin
1240 28 71 79 2a 33 29 2a 2e 35 3b 63 74 74 3d 63 6f 73 28 74 74 29 3b 73 74 74 3d 73 69 6e 28 74 74 (qy*3)*.5;ctt=cos(tt);stt=sin(tt
1260 29 3b 0d 0a 70 79 3d 71 7a 2a 73 74 74 2b 71 79 2a 63 74 74 3b 71 7a 3d 71 7a 2a 63 74 74 2d 71 );..py=qz*stt+qy*ctt;qz=qz*ctt-q
1280 79 2a 73 74 74 3b 0d 0a 71 78 3d 70 78 2a 28 31 2d 63 6f 73 28 2d 70 7a 2a 34 2b 31 2d 70 79 2a y*stt;..qx=px*(1-cos(-pz*4+1-py*
12a0 35 2b 32 29 2a 2e 35 29 3b 0d 0a 74 74 3d 69 3b 63 74 74 3d 63 6f 73 28 74 74 29 3b 73 74 74 3d 5+2)*.5);..tt=i;ctt=cos(tt);stt=
12c0 73 69 6e 28 74 74 29 3b 0d 0a 70 78 3d 71 78 2a 63 74 74 2d 71 7a 2a 73 74 74 3b 70 7a 3d 71 78 sin(tt);..px=qx*ctt-qz*stt;pz=qx
12e0 2a 73 74 74 2b 71 7a 2a 63 74 74 3b 0d 0a 70 78 3d 70 78 2a 2e 33 2b 73 69 6e 28 70 79 2a 34 2d *stt+qz*ctt;..px=px*.3+sin(py*4-
1300 2e 35 29 2a 2e 30 35 2b 6f 78 2b 2e 34 3b 70 79 3d 70 79 2a 2e 33 2b 6f 79 3b 70 7a 3d 70 7a 2a .5)*.05+ox+.4;py=py*.3+oy;pz=pz*
1320 2e 33 2b 6f 7a 2d 2e 31 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a .3+oz-.1;..x1=px*cy-pz*sy;z1=px*
1340 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a sy+pz*cy;..y2=py*cx-z1*sx;z2=py*
1360 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a sx+z1*cx;..x3=x1*cz-y2*sz;y3=x1*
1380 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 sz+y2*cz;..dt=if(above(z2,.01),1
13a0 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 /z2,0);..x=if(dt,x3*dt,x);y=if(d
13c0 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d t,y3*dt*af,y);..linesize=dt*ls;.
13e0 0a 64 74 3d 73 69 6e 28 69 2a 32 2d 2e 35 29 2a 33 2b 32 3b 0d 0a 72 65 64 3d 28 64 74 2d 2e 32 .dt=sin(i*2-.5)*3+2;..red=(dt-.2
1400 29 2a 2e 32 3b 67 72 65 65 6e 3d 72 65 64 2a 2e 35 3b 62 6c 75 65 3d 30 3b 63 66 3d 62 6e 6f 74 )*.2;green=red*.5;blue=0;cf=bnot
1420 28 62 61 6e 64 28 61 62 6f 76 65 28 69 2c 2e 39 35 29 2c 62 65 6c 6f 77 28 69 2c 2e 39 38 29 29 (band(above(i,.95),below(i,.98))
1440 29 3b 3b 0d 0a 67 72 65 65 6e 3d 67 72 65 65 6e 2a 63 66 3b 72 65 64 3d 72 65 64 2a 28 2e 35 2b );;..green=green*cf;red=red*(.5+
1460 63 66 2a 2e 35 29 3b 0d 0a 72 65 64 3d 6d 61 78 28 2e 31 35 2c 72 65 64 29 3b 67 72 65 65 6e 3d cf*.5);..red=max(.15,red);green=
1480 6d 61 78 28 2e 31 35 2c 67 72 65 65 6e 29 3b 62 6c 75 65 3d 6d 61 78 28 2e 31 35 2c 62 6c 75 65 max(.15,green);blue=max(.15,blue
14a0 29 3b 00 08 01 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a );.....mv=getspec(0,.5,0)*.1+mv*
14c0 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e .9;sv=min(1,mv*6);bt=bt+1;t=t+0.
14e0 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 02;..ox=reg00;oy=reg01;oz=reg02;
1500 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 rx=reg03;ry=reg04;rz=reg05;cx=re
1520 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 g06;sx=reg07;cy=reg08;sy=reg09;c
1540 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f z=reg10;sz=reg11;..x=0;y=0;af=w/
1560 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d h;mp=mp+1.5/mf;..dd=reg20;..ccd=
1580 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 6f 79 3d 6f 79 (reg20)*1.6;..mf=mf*.92+.8;oy=oy
15a0 3b 0d 0a 6c 73 3d 33 2a 77 2f 33 32 30 3b 00 72 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 ;..ls=3*w/320;.r...ot=min(0,gets
15c0 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 pec(0,.1,0)*2-1)*((getosc(.3,0,0
15e0 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b )*200)%2);t=t+5*(ot+if(ot,1,0));
1600 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 72 61 6e mf=(bt-mt)*.5+mf*.7;mt=bt;md=ran
1620 64 28 32 29 00 30 00 00 00 6e 3d 34 30 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d d(2).0...n=400;tpi=acos(-1)*2;t=
1640 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 47 69 66 74 62 61 67 3b 00 02 00 00 00 01 00 00 0;mf=100;mt=0;..Giftbag;........
1660 00 00 00 00 00 01 00 00 00 24 00 00 00 73 03 00 00 01 a6 01 00 00 75 3d 28 69 2d 2e 35 29 2a 24 .........$...s........u=(i-.5)*$
1680 70 69 2a 32 3b 0d 0a 71 7a 3d 2d 69 66 28 62 65 6c 6f 77 28 69 2c 2e 35 29 2c 2e 30 35 2c 63 6f pi*2;..qz=-if(below(i,.5),.05,co
16a0 73 28 75 29 2a 2e 30 35 29 2a 2e 34 3b 0d 0a 71 78 3d 2d 69 66 28 62 65 6c 6f 77 28 69 2c 2e 35 s(u)*.05)*.4;..qx=-if(below(i,.5
16c0 29 2c 28 69 2d 2e 35 29 2a 2e 35 2c 73 69 6e 28 75 29 2a 2e 30 35 29 2a 2e 34 3b 0d 0a 70 78 3d ),(i-.5)*.5,sin(u)*.05)*.4;..px=
16e0 71 78 2a 2e 37 2d 71 7a 2a 2e 37 3b 70 7a 3d 2d 71 78 2a 2e 37 2d 71 7a 2a 2e 37 3b 0d 0a 70 79 qx*.7-qz*.7;pz=-qx*.7-qz*.7;..py
1700 3d 30 3b 0d 0a 70 78 3d 70 78 2b 6f 78 2b 2e 34 3b 70 79 3d 70 79 2b 6f 79 3b 70 7a 3d 70 7a 2b =0;..px=px+ox+.4;py=py+oy;pz=pz+
1720 6f 7a 2b 2e 31 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b oz+.1;..x1=px*cy-pz*sy;z1=px*sy+
1740 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b pz*cy;..y2=py*cx-z1*sx;z2=py*sx+
1760 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b z1*cx;..x3=x1*cz-y2*sz;y3=x1*sz+
1780 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 y2*cz;..dt=if(above(z2,.01),1/z2
17a0 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 ,0);..x=if(dt,x3*dt,x);y=if(dt,y
17c0 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3*dt*af,y);..linesize=dt*ls;..dt
17e0 3d 73 69 6e 28 69 2a 32 2d 2e 35 29 2a 33 2b 32 3b 0d 0a 69 70 3d 62 6e 6f 74 28 69 70 29 3b 0d =sin(i*2-.5)*3+2;..ip=bnot(ip);.
1800 0a 72 65 64 3d 31 3b 67 72 65 65 6e 3d 69 70 3b 62 6c 75 65 3d 69 70 2b 2e 34 3b 00 0d 01 00 00 .red=1;green=ip;blue=ip+.4;.....
1820 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d mv=getspec(0,.5,0)*.1+mv*.9;sv=m
1840 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 in(1,mv*6);bt=bt+1;t=t+0.02;..ox
1860 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 =reg00;oy=reg01;oz=reg02;rx=reg0
1880 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 3;ry=reg04;rz=reg05;cx=reg06;sx=
18a0 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 reg07;cy=reg08;sy=reg09;cz=reg10
18c0 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 ;sz=reg11;..x=0;y=0;af=w/h;mp=mp
18e0 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 +1.5/mf;..dd=reg20;..ccd=(reg20)
1900 2a 31 2e 36 3b 0d 0a 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 6f 79 3d 6f 79 3b 0d 0a 6c 73 3d 32 *1.6;..mf=mf*.92+.8;oy=oy;..ls=2
1920 2a 77 2f 33 32 30 3b 69 70 3d 30 3b 00 72 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 *w/320;ip=0;.r...ot=min(0,getspe
1940 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a c(0,.1,0)*2-1)*((getosc(.3,0,0)*
1960 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 200)%2);t=t+5*(ot+if(ot,1,0));mf
1980 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 72 61 6e 64 28 =(bt-mt)*.5+mf*.7;mt=bt;md=rand(
19a0 32 29 00 2d 00 00 00 6e 3d 31 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 2).-...n=10;tpi=acos(-1)*2;t=0;m
19c0 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 54 72 65 61 74 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 f=100;mt=0;..Treat;.............
19e0 01 00 00 00 24 00 00 00 75 03 00 00 01 a8 01 00 00 75 3d 28 69 2d 2e 35 29 2a 24 70 69 2a 32 3b ....$...u........u=(i-.5)*$pi*2;
1a00 0d 0a 71 7a 3d 69 66 28 62 65 6c 6f 77 28 69 2c 2e 35 29 2c 2e 30 35 2c 63 6f 73 28 75 29 2a 2e ..qz=if(below(i,.5),.05,cos(u)*.
1a20 30 35 29 2a 2e 34 3b 0d 0a 71 78 3d 2d 69 66 28 62 65 6c 6f 77 28 69 2c 2e 35 29 2c 28 69 2d 2e 05)*.4;..qx=-if(below(i,.5),(i-.
1a40 35 29 2a 2e 35 2c 73 69 6e 28 75 29 2a 2e 30 35 29 2a 2e 34 3b 0d 0a 70 78 3d 71 78 2a 2e 38 36 5)*.5,sin(u)*.05)*.4;..px=qx*.86
1a60 2d 71 7a 2a 2e 35 3b 70 7a 3d 2d 71 78 2a 2e 35 2d 71 7a 2a 2e 38 36 3b 0d 0a 70 79 3d 30 3b 0d -qz*.5;pz=-qx*.5-qz*.86;..py=0;.
1a80 0a 70 78 3d 70 78 2b 6f 78 2b 2e 31 3b 70 79 3d 70 79 2b 6f 79 3b 70 7a 3d 70 7a 2b 6f 7a 2b 2e .px=px+ox+.1;py=py+oy;pz=pz+oz+.
1aa0 32 35 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 25;..x1=px*cy-pz*sy;z1=px*sy+pz*
1ac0 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a cy;..y2=py*cx-z1*sx;z2=py*sx+z1*
1ae0 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a cx;..x3=x1*cz-y2*sz;y3=x1*sz+y2*
1b00 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 cz;..dt=if(above(z2,.01),1/z2,0)
1b20 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 ;..x=if(dt,x3*dt,x);y=if(dt,y3*d
1b40 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 73 69 t*af,y);..linesize=dt*ls;..dt=si
1b60 6e 28 69 2a 32 2d 2e 35 29 2a 33 2b 32 3b 0d 0a 69 70 3d 62 6e 6f 74 28 69 70 29 3b 0d 0a 72 65 n(i*2-.5)*3+2;..ip=bnot(ip);..re
1b80 64 3d 31 3b 67 72 65 65 6e 3d 69 70 3b 62 6c 75 65 3d 69 70 2b 2e 34 3b 00 0d 01 00 00 6d 76 3d d=1;green=ip;blue=ip+.4;.....mv=
1ba0 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 getspec(0,.5,0)*.1+mv*.9;sv=min(
1bc0 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 1,mv*6);bt=bt+1;t=t+0.02;..ox=re
1be0 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 g00;oy=reg01;oz=reg02;rx=reg03;r
1c00 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 y=reg04;rz=reg05;cx=reg06;sx=reg
1c20 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 07;cy=reg08;sy=reg09;cz=reg10;sz
1c40 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e =reg11;..x=0;y=0;af=w/h;mp=mp+1.
1c60 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 5/mf;..dd=reg20;..ccd=(reg20)*1.
1c80 36 3b 0d 0a 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 6f 79 3d 6f 79 3b 0d 0a 6c 73 3d 32 2a 77 2f 6;..mf=mf*.92+.8;oy=oy;..ls=2*w/
1ca0 33 32 30 3b 69 70 3d 30 3b 00 72 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 320;ip=0;.r...ot=min(0,getspec(0
1cc0 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 ,.1,0)*2-1)*((getosc(.3,0,0)*200
1ce0 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 )%2);t=t+5*(ot+if(ot,1,0));mf=(b
1d00 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 72 61 6e 64 28 32 29 00 t-mt)*.5+mf*.7;mt=bt;md=rand(2).
1d20 2d 00 00 00 6e 3d 31 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 -...n=10;tpi=acos(-1)*2;t=0;mf=1
1d40 30 30 3b 6d 74 3d 30 3b a4 20 54 72 65 61 74 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00;mt=0;..Treat;................
1d60 00 24 00 00 00 73 03 00 00 01 a6 01 00 00 75 3d 28 69 2d 2e 35 29 2a 24 70 69 2a 32 3b 0d 0a 71 .$...s........u=(i-.5)*$pi*2;..q
1d80 7a 3d 69 66 28 62 65 6c 6f 77 28 69 2c 2e 35 29 2c 2e 30 35 2c 63 6f 73 28 75 29 2a 2e 30 35 29 z=if(below(i,.5),.05,cos(u)*.05)
1da0 2a 2e 34 3b 0d 0a 71 78 3d 69 66 28 62 65 6c 6f 77 28 69 2c 2e 35 29 2c 28 69 2d 2e 35 29 2a 2e *.4;..qx=if(below(i,.5),(i-.5)*.
1dc0 35 2c 73 69 6e 28 75 29 2a 2e 30 35 29 2a 2e 34 3b 0d 0a 70 78 3d 71 78 2a 2e 35 2b 71 7a 2a 2e 5,sin(u)*.05)*.4;..px=qx*.5+qz*.
1de0 38 36 3b 70 7a 3d 71 78 2a 2e 38 36 2d 71 7a 2a 2e 35 3b 0d 0a 70 79 3d 30 3b 0d 0a 70 78 3d 70 86;pz=qx*.86-qz*.5;..py=0;..px=p
1e00 78 2b 6f 78 2b 2e 32 3b 70 79 3d 70 79 2b 6f 79 3b 70 7a 3d 70 7a 2b 6f 7a 2b 2e 30 35 3b 0d 0a x+ox+.2;py=py+oy;pz=pz+oz+.05;..
1e20 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a x1=px*cy-pz*sy;z1=px*sy+pz*cy;..
1e40 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a y2=py*cx-z1*sx;z2=py*sx+z1*cx;..
1e60 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a x3=x1*cz-y2*sz;y3=x1*sz+y2*cz;..
1e80 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d dt=if(above(z2,.01),1/z2,0);..x=
1ea0 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c if(dt,x3*dt,x);y=if(dt,y3*dt*af,
1ec0 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 73 69 6e 28 69 2a 32 y);..linesize=dt*ls;..dt=sin(i*2
1ee0 2d 2e 35 29 2a 33 2b 32 3b 0d 0a 69 70 3d 62 6e 6f 74 28 69 70 29 3b 0d 0a 72 65 64 3d 31 3b 67 -.5)*3+2;..ip=bnot(ip);..red=1;g
1f00 72 65 65 6e 3d 69 70 3b 62 6c 75 65 3d 69 70 2b 2e 34 3b 00 0d 01 00 00 6d 76 3d 67 65 74 73 70 reen=ip;blue=ip+.4;.....mv=getsp
1f20 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a ec(0,.5,0)*.1+mv*.9;sv=min(1,mv*
1f40 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 6);bt=bt+1;t=t+0.02;..ox=reg00;o
1f60 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 y=reg01;oz=reg02;rx=reg03;ry=reg
1f80 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 04;rz=reg05;cx=reg06;sx=reg07;cy
1fa0 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 =reg08;sy=reg09;cz=reg10;sz=reg1
1fc0 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 1;..x=0;y=0;af=w/h;mp=mp+1.5/mf;
1fe0 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 6d ..dd=reg20;..ccd=(reg20)*1.6;..m
2000 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 6f 79 3d 6f 79 3b 0d 0a 6c 73 3d 32 2a 77 2f 33 32 30 3b 69 f=mf*.92+.8;oy=oy;..ls=2*w/320;i
2020 70 3d 30 3b 00 72 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 p=0;.r...ot=min(0,getspec(0,.1,0
2040 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b )*2-1)*((getosc(.3,0,0)*200)%2);
2060 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 t=t+5*(ot+if(ot,1,0));mf=(bt-mt)
2080 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 72 61 6e 64 28 32 29 00 2d 00 00 00 6e *.5+mf*.7;mt=bt;md=rand(2).-...n
20a0 3d 31 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 =10;tpi=acos(-1)*2;t=0;mf=100;mt
20c0 3d 30 3b a4 20 54 72 65 61 74 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 28 00 00 00 =0;..Treat;.................(...
20e0 04 00 00 00 01 00 01 80 fe ff ff ff 14 54 00 00 81 01 00 04 24 80 00 00 00 80 00 00 00 00 00 00 .............T......$...........
2100 00 01 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
2120 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............
2140 00 00 00 00 00 00 00 00 00 24 00 00 00 f8 02 00 00 01 00 00 00 00 f6 01 00 00 6d 76 3d 67 65 74 .........$................mv=get
2160 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d spec(0,.5,0)*.1+mv*.9;sv=min(1,m
2180 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b v*6);bt=bt+1;t=t+.02;..ox=reg00;
21a0 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 oy=reg01;oz=reg02;rx=reg03;ry=re
21c0 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 g04;rz=reg05;cx=reg06;sx=reg07;c
21e0 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 y=reg08;sy=reg09;cz=reg10;sz=reg
2200 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 11;..x=0;y=0;af=w/h;mp=mp+1.5/mf
2220 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a ;..dd=reg20;..ccd=(reg20)*1.6;..
2240 74 64 78 3d 74 64 78 2b 73 69 67 6e 28 74 64 74 2d 74 64 78 29 2a 2e 30 33 3b 74 64 78 3d 6d 69 tdx=tdx+sign(tdt-tdx)*.03;tdx=mi
2260 6e 28 31 2c 6d 61 78 28 30 2c 74 64 78 29 29 3b 0d 0a 74 64 3d 2e 35 2d 63 6f 73 28 74 64 78 2a n(1,max(0,tdx));..td=.5-cos(tdx*
2280 24 70 69 2a 32 29 2a 2e 35 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 35 2b 2e 30 $pi*2)*.5;..an=(sin(mp*2)*.15+.0
22a0 32 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 63 61 3d 63 6f 73 28 61 6e 29 3b 73 61 3d 73 69 6e 2)*sv*td+an*.6;ca=cos(an);sa=sin
22c0 28 61 6e 29 3b 0d 0a 66 6e 3d 28 63 6f 73 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a (an);..fn=(cos(mp*2))*sv*(1-td)*
22e0 2e 31 32 35 2b 66 6e 2a 2e 36 3b 63 66 3d 63 6f 73 28 66 6e 29 3b 73 66 3d 73 69 6e 28 66 6e 29 .125+fn*.6;cf=cos(fn);sf=sin(fn)
2300 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 72 65 67 36 30 3d 61 6e 3b 72 65 67 36 31 3d 63 ;mf=mf*.92+.8;..reg60=an;reg61=c
2320 61 3b 72 65 67 36 32 3d 73 61 3b 72 65 67 36 33 3d 66 6e 3b 72 65 67 36 34 3d 63 66 3b 72 65 67 a;reg62=sa;reg63=fn;reg64=cf;reg
2340 36 35 3d 73 66 3b 72 65 67 36 36 3d 6d 66 3b 00 a5 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 65=sf;reg66=mf;.....ot=min(0,get
2360 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c spec(0,.1,0)*2-1)*((getosc(.3,0,
2380 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 0)*200)%2);t=t+5*(ot+if(ot,1,0))
23a0 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 74 64 74 3d 69 ;mf=(bt-mt)*.5+mf*.7;mt=bt;tdt=i
23c0 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 73 69 6e 28 67 65 74 6f 73 f(getosc(.4,0,0)*255%2,sin(getos
23e0 63 28 2e 36 2c 30 2c 30 29 2a 32 35 29 2a 2e 35 2b 2e 35 2c 74 64 74 29 00 3c 00 00 00 6e 3d 30 c(.6,0,0)*25)*.5+.5,tdt).<...n=0
2400 3b 2f 2f 20 54 6f 72 73 6f 20 77 6f 62 62 6c 65 0d 0a 6e 3d 33 32 31 3b 74 70 69 3d 61 63 6f 73 ;//.Torso.wobble..n=321;tpi=acos
2420 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 00 02 00 00 00 01 00 00 (-1)*2;t=0;mf=100;mt=0;.........
2440 00 ff ff ff 00 00 00 00 00 28 00 00 00 04 00 00 00 02 00 03 80 24 00 00 00 55 03 00 00 01 88 01 .........(...........$...U......
2460 00 00 64 74 3d 69 2a 74 70 69 2a 32 35 3b 0d 0a 70 7a 3d 63 6f 73 28 64 74 29 2a 2e 30 39 2b 2e ..dt=i*tpi*25;..pz=cos(dt)*.09+.
2480 30 36 2b 6f 7a 3b 0d 0a 70 78 3d 69 66 28 6d 64 2c 28 63 6f 73 28 64 74 29 2a 2e 35 2b 2e 33 29 06+oz;..px=if(md,(cos(dt)*.5+.3)
24a0 2a 63 6f 73 28 6d 70 2a 74 70 69 2a 2e 35 29 2a 2e 30 36 2a 73 76 2c 30 29 3b 0d 0a 64 74 3d 73 *cos(mp*tpi*.5)*.06*sv,0);..dt=s
24c0 69 6e 28 64 74 29 3b 0d 0a 70 78 3d 63 6f 73 28 69 2a 74 70 69 29 2a 2e 30 35 2a 64 74 2b 2e 30 in(dt);..px=cos(i*tpi)*.05*dt+.0
24e0 37 2b 70 78 2b 6f 78 3b 0d 0a 70 79 3d 73 69 6e 28 69 2a 74 70 69 29 2a 2e 30 33 2a 64 74 2d 2e 7+px+ox;..py=sin(i*tpi)*.03*dt-.
2500 30 32 2b 6f 79 3b 0d 0a 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 02+oy;....x1=px*cy-pz*sy;z1=px*s
2520 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 y+pz*cy;..y2=py*cx-z1*sx;z2=py*s
2540 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 x+z1*cx;..x3=x1*cz-y2*sz;y3=x1*s
2560 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f z+y2*cz;..dt=if(above(z2,.01),1/
2580 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 z2,0);..x=if(dt,x3*dt,x);y=if(dt
25a0 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a ,y3*dt*af,y);..linesize=dt*ls;..
25c0 64 74 3d 64 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 64 74 2d 2e 32 3b 67 72 65 65 6e 3d dt=dt*0.6*ccd;..red=dt-.2;green=
25e0 30 3b 62 6c 75 65 3d 30 3b 00 08 01 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 0;blue=0;.....mv=getspec(0,.5,0)
2600 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 *.1+mv*.9;sv=min(1,mv*6);bt=bt+1
2620 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a ;t=t+0.02;..ox=reg00;oy=reg01;oz
2640 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 =reg02;rx=reg03;ry=reg04;rz=reg0
2660 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 5;cx=reg06;sx=reg07;cy=reg08;sy=
2680 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d reg09;cz=reg10;sz=reg11;..x=0;y=
26a0 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 0;af=w/h;mp=mp+1.5/mf;..dd=reg20
26c0 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 6d 66 3d 6d 66 2a 2e 39 32 2b 2e ;..ccd=(reg20)*1.6;..mf=mf*.92+.
26e0 38 3b 6f 79 3d 6f 79 3b 0d 0a 6c 73 3d 32 2a 77 2f 33 32 30 3b 00 72 00 00 00 6f 74 3d 6d 69 6e 8;oy=oy;..ls=2*w/320;.r...ot=min
2700 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 (0,getspec(0,.1,0)*2-1)*((getosc
2720 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 (.3,0,0)*200)%2);t=t+5*(ot+if(ot
2740 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 ,1,0));mf=(bt-mt)*.5+mf*.7;mt=bt
2760 3b 6d 64 3d 72 61 6e 64 28 32 29 00 32 00 00 00 6e 3d 39 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 ;md=rand(2).2...n=90;tpi=acos(-1
2780 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 52 69 67 68 74 20 46 6f 6f 74 )*2;t=0;mf=100;mt=0;..Right.Foot
27a0 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 6b 03 00 00 01 a5 01 00 00 64 ;.................$...k........d
27c0 74 3d 69 2a 74 70 69 2a 32 35 3b 0d 0a 70 7a 3d 63 6f 73 28 64 74 29 2a 2e 30 39 2b 2e 30 36 2b t=i*tpi*25;..pz=cos(dt)*.09+.06+
27e0 6f 7a 3b 0d 0a 70 78 3d 69 66 28 6d 64 2c 28 63 6f 73 28 64 74 29 2a 2e 35 2b 2e 33 29 2a 63 6f oz;..px=if(md,(cos(dt)*.5+.3)*co
2800 73 28 6d 70 2a 74 70 69 2a 2e 35 29 2a 2e 30 36 2a 69 66 28 65 71 75 61 6c 28 6d 64 2c 31 29 2c s(mp*tpi*.5)*.06*if(equal(md,1),
2820 31 2c 2d 31 29 2a 28 73 76 2a 2e 37 2b 2e 33 29 2c 30 29 3b 0d 0a 64 74 3d 73 69 6e 28 64 74 29 1,-1)*(sv*.7+.3),0);..dt=sin(dt)
2840 3b 0d 0a 70 78 3d 63 6f 73 28 69 2a 74 70 69 29 2a 2e 30 35 2a 64 74 2d 2e 30 37 2b 70 78 2b 6f ;..px=cos(i*tpi)*.05*dt-.07+px+o
2860 78 3b 0d 0a 70 79 3d 73 69 6e 28 69 2a 74 70 69 29 2a 2e 30 33 2a 64 74 2d 2e 30 32 2b 6f 79 3b x;..py=sin(i*tpi)*.03*dt-.02+oy;
2880 0d 0a 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 ....x1=px*cy-pz*sy;z1=px*sy+pz*c
28a0 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 y;..y2=py*cx-z1*sx;z2=py*sx+z1*c
28c0 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 x;..x3=x1*cz-y2*sz;y3=x1*sz+y2*c
28e0 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b z;..dt=if(above(z2,.01),1/z2,0);
2900 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 ..x=if(dt,x3*dt,x);y=if(dt,y3*dt
2920 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 64 74 2a *af,y);..linesize=dt*ls;..dt=dt*
2940 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 64 74 2d 2e 32 3b 67 72 65 65 6e 3d 30 3b 62 6c 75 65 0.6*ccd;..red=dt-.2;green=0;blue
2960 3d 30 3b 00 02 01 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 =0;.....mv=getspec(0,.5,0)*.1+mv
2980 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 *.9;sv=min(1,mv*6);bt=bt+1;t=t+0
29a0 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 .02;..ox=reg00;oy=reg01;oz=reg02
29c0 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 ;rx=reg03;ry=reg04;rz=reg05;cx=r
29e0 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b eg06;sx=reg07;cy=reg08;sy=reg09;
2a00 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 cz=reg10;sz=reg11;..x=0;y=0;af=w
2a20 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 /h;mp=mp+1.5/mf;..dd=reg20;..ccd
2a40 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 =(reg20)*1.6;..mf=mf*.92+.8;..ls
2a60 3d 32 2a 77 2f 33 32 30 3b 00 72 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 =2*w/320;.r...ot=min(0,getspec(0
2a80 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 ,.1,0)*2-1)*((getosc(.3,0,0)*200
2aa0 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 )%2);t=t+5*(ot+if(ot,1,0));mf=(b
2ac0 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 72 61 6e 64 28 33 29 00 t-mt)*.5+mf*.7;mt=bt;md=rand(3).
2ae0 31 00 00 00 6e 3d 39 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 1...n=90;tpi=acos(-1)*2;t=0;mf=1
2b00 30 30 3b 6d 74 3d 30 3b a4 20 4c 65 66 74 20 46 6f 6f 74 3b 00 02 00 00 00 01 00 00 00 00 00 00 00;mt=0;..Left.Foot;............
2b20 00 01 00 00 00 28 00 00 00 04 00 00 00 04 00 01 80 24 00 00 00 6d 04 00 00 01 c4 01 00 00 62 64 .....(...........$...m........bd
2b40 3d 69 2a 74 70 69 3b 64 74 3d 62 64 2a 32 35 2e 36 3b 0d 0a 61 64 3d 63 6f 73 28 64 74 29 2a 2e =i*tpi;dt=bd*25.6;..ad=cos(dt)*.
2b60 35 2d 2e 35 3b 0d 0a 70 79 3d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 33 3b 5-.5;..py=ad*pow(abs(ad),.8)*.3;
2b80 0d 0a 70 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 30 37 2b 73 69 6e 28 70 79 2a ..pz=sin(dt)*cos(bd)*.07+sin(py*
2ba0 33 30 29 2a 2e 30 30 35 3b 0d 0a 70 78 3d 73 69 6e 28 64 74 29 2a 73 69 6e 28 62 64 29 2a 2e 30 30)*.005;..px=sin(dt)*sin(bd)*.0
2bc0 39 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 61 2d 70 79 2a 73 61 3b 0d 0a 70 70 79 3d 70 7a 2a 73 61 2b 9;..ppz=pz*ca-py*sa;..ppy=pz*sa+
2be0 70 79 2a 63 61 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 3b 0d 0a 70 70 78 3d 70 78 2a 63 66 2d 70 70 py*ca;..pz=ppz+oz;..ppx=px*cf-pp
2c00 79 2a 73 66 2b 6f 78 3b 0d 0a 70 70 79 3d 70 78 2a 73 66 2b 70 70 79 2a 63 66 2b 6f 79 3b 0d 0a y*sf+ox;..ppy=px*sf+ppy*cf+oy;..
2c20 0d 0a 78 31 3d 70 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 70 78 2a 73 79 2b 70 7a 2a 63 ..x1=ppx*cy-pz*sy;z1=ppx*sy+pz*c
2c40 79 3b 0d 0a 79 32 3d 70 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 70 79 2a 73 78 2b 7a 31 y;..y2=ppy*cx-z1*sx;z2=ppy*sx+z1
2c60 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 *cx;..x3=x1*cz-y2*sz;y3=x1*sz+y2
2c80 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 *cz;..dt=if(above(z2,.01),1/z2,0
2ca0 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a );..x=if(dt,x3*dt,x);y=if(dt,y3*
2cc0 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 64 dt*af,y);..linesize=dt*ls;..dt=d
2ce0 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 31 3b 67 72 65 65 6e 3d 31 3b 62 6c 75 65 3d 31 t*0.6*ccd;..red=1;green=1;blue=1
2d00 3b 00 b6 01 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e ;.....mv=getspec(0,.5,0)*.1+mv*.
2d20 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 2e 30 32 9;sv=min(1,mv*6);bt=bt+1;t=t+.02
2d40 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 ;..ox=reg00;oy=reg01;oz=reg02;rx
2d60 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 =reg03;ry=reg04;rz=reg05;cx=reg0
2d80 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 6;sx=reg07;cy=reg08;sy=reg09;cz=
2da0 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b reg10;sz=reg11;..x=0;y=0;af=w/h;
2dc0 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 mp=mp+1.5/mf;..dd=reg20;..ccd=(r
2de0 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 32 35 2b 2e eg20)*1.6;..an=(sin(mp*2)*.125+.
2e00 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 63 61 3d 63 6f 73 28 61 6e 29 3b 73 61 3d 73 69 01)*sv*td+an*.6;ca=cos(an);sa=si
2e20 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a 2e n(an);fn=(sin(mp*2))*sv*(1-td)*.
2e40 31 32 35 2b 66 6e 2a 2e 36 3b 63 66 3d 63 6f 73 28 66 6e 29 3b 73 66 3d 73 69 6e 28 66 6e 29 3b 125+fn*.6;cf=cos(fn);sf=sin(fn);
2e60 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 34 2a 77 2f 33 32 30 3b 0d 0a 61 6e 3d 72 mf=mf*.92+.8;..ls=4*w/320;..an=r
2e80 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 36 32 3b 66 6e 3d 72 65 67 36 33 3b eg60;ca=reg61;sa=reg62;fn=reg63;
2ea0 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 3d 72 65 67 36 36 3b 00 9b 00 00 00 cf=reg64;sf=reg65;mf=reg66;.....
2ec0 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 ot=min(0,getspec(0,.1,0)*2-1)*((
2ee0 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 getosc(.3,0,0)*200)%2);t=t+5*(ot
2f00 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 +if(ot,1,0));mf=(bt-mt)*.5+mf*.7
2f20 3b 6d 74 3d 62 74 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 ;mt=bt;td=if(getosc(.4,0,0)*255%
2f40 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 37 00 00 00 6e 2,getosc(.6,0,0)*255%2,td).7...n
2f60 3d 33 32 31 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d =321;tpi=acos(-1)*2;t=0;mf=100;m
2f80 74 3d 30 3b a4 20 54 6f 72 73 6f 20 4f 63 63 6c 75 64 65 72 3b 00 02 00 00 00 01 00 00 00 00 00 t=0;..Torso.Occluder;...........
2fa0 00 00 01 00 00 00 28 00 00 00 04 00 00 00 02 00 06 80 24 00 00 00 68 04 00 00 01 c8 01 00 00 62 ......(...........$...h........b
2fc0 64 3d 69 2a 74 70 69 3b 64 74 3d 62 64 2a 32 35 2e 36 3b 0d 0a 61 64 3d 63 6f 73 28 64 74 29 2a d=i*tpi;dt=bd*25.6;..ad=cos(dt)*
2fe0 2e 35 2d 2e 35 3b 0d 0a 70 79 3d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 33 .5-.5;..py=ad*pow(abs(ad),.8)*.3
3000 3b 0d 0a 70 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 30 37 2b 73 69 6e 28 70 79 ;..pz=sin(dt)*cos(bd)*.07+sin(py
3020 2a 33 30 29 2a 2e 30 30 35 3b 0d 0a 70 78 3d 73 69 6e 28 64 74 29 2a 73 69 6e 28 62 64 29 2a 2e *30)*.005;..px=sin(dt)*sin(bd)*.
3040 30 39 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 61 2d 70 79 2a 73 61 3b 0d 0a 70 70 79 3d 70 7a 2a 73 61 09;..ppz=pz*ca-py*sa;..ppy=pz*sa
3060 2b 70 79 2a 63 61 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 3b 0d 0a 70 70 78 3d 70 78 2a 63 66 2d 70 +py*ca;..pz=ppz+oz;..ppx=px*cf-p
3080 70 79 2a 73 66 2b 6f 78 3b 0d 0a 70 70 79 3d 70 78 2a 73 66 2b 70 70 79 2a 63 66 2b 6f 79 3b 0d py*sf+ox;..ppy=px*sf+ppy*cf+oy;.
30a0 0a 0d 0a 78 31 3d 70 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 70 78 2a 73 79 2b 70 7a 2a ...x1=ppx*cy-pz*sy;z1=ppx*sy+pz*
30c0 63 79 3b 0d 0a 79 32 3d 70 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 70 79 2a 73 78 2b 7a cy;..y2=ppy*cx-z1*sx;z2=ppy*sx+z
30e0 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 1*cx;..x3=x1*cz-y2*sz;y3=x1*sz+y
3100 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 2*cz;..dt=if(above(z2,.01),1/z2,
3120 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 0);..x=if(dt,x3*dt,x);y=if(dt,y3
3140 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d *dt*af,y);..linesize=dt*ls;..dt=
3160 64 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 64 74 2d 2e 32 3b 67 72 65 65 6e 3d 30 3b 62 dt*0.6*ccd;..red=dt-.2;green=0;b
3180 6c 75 65 3d 30 3b 00 b6 01 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 lue=0;.....mv=getspec(0,.5,0)*.1
31a0 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d +mv*.9;sv=min(1,mv*6);bt=bt+1;t=
31c0 74 2b 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 t+.02;..ox=reg00;oy=reg01;oz=reg
31e0 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 02;rx=reg03;ry=reg04;rz=reg05;cx
3200 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 =reg06;sx=reg07;cy=reg08;sy=reg0
3220 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 9;cz=reg10;sz=reg11;..x=0;y=0;af
3240 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 =w/h;mp=mp+1.5/mf;..dd=reg20;..c
3260 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e cd=(reg20)*1.6;..an=(sin(mp*2)*.
3280 31 32 35 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 63 61 3d 63 6f 73 28 61 6e 29 3b 125+.01)*sv*td+an*.6;ca=cos(an);
32a0 73 61 3d 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d sa=sin(an);fn=(sin(mp*2))*sv*(1-
32c0 74 64 29 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b 63 66 3d 63 6f 73 28 66 6e 29 3b 73 66 3d 73 69 6e td)*.125+fn*.6;cf=cos(fn);sf=sin
32e0 28 66 6e 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 34 2a 77 2f 33 32 30 3b 0d (fn);mf=mf*.92+.8;..ls=4*w/320;.
3300 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 36 32 3b 66 6e 3d 72 .an=reg60;ca=reg61;sa=reg62;fn=r
3320 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 3d 72 65 67 36 36 3b eg63;cf=reg64;sf=reg65;mf=reg66;
3340 00 9b 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d .....ot=min(0,getspec(0,.1,0)*2-
3360 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 1)*((getosc(.3,0,0)*200)%2);t=t+
3380 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 5*(ot+if(ot,1,0));mf=(bt-mt)*.5+
33a0 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 mf*.7;mt=bt;td=if(getosc(.4,0,0)
33c0 2a 32 35 35 25 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 *255%2,getosc(.6,0,0)*255%2,td).
33e0 2e 00 00 00 6e 3d 33 32 31 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d ....n=321;tpi=acos(-1)*2;t=0;mf=
3400 31 30 30 3b 6d 74 3d 30 3b a4 20 54 6f 72 73 6f 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 100;mt=0;..Torso;...............
3420 00 00 28 00 00 00 04 00 00 00 00 00 01 80 24 00 00 00 3b 05 00 00 01 c9 01 00 00 62 64 3d 69 2a ..(...........$...;........bd=i*
3440 74 70 69 3b 61 64 3d 2d 2e 35 35 3b 70 79 3d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 tpi;ad=-.55;py=ad*pow(abs(ad),.8
3460 29 2a 2e 33 3b 0d 0a 70 7a 3d 63 6f 73 28 62 64 29 2a 2e 30 38 2b 73 69 6e 28 70 79 2a 33 30 29 )*.3;..pz=cos(bd)*.08+sin(py*30)
3480 2a 2e 30 30 35 3b 0d 0a 70 78 3d 73 69 6e 28 62 64 29 2a 2e 31 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 *.005;..px=sin(bd)*.1;..ppz=pz*c
34a0 61 2d 70 79 2a 73 61 3b 0d 0a 70 70 79 3d 70 7a 2a 73 61 2b 70 79 2a 63 61 3b 0d 0a 70 7a 3d 70 a-py*sa;..ppy=pz*sa+py*ca;..pz=p
34c0 70 7a 2b 6f 7a 3b 0d 0a 70 70 78 3d 70 78 2a 63 66 2d 70 70 79 2a 73 66 2b 6f 78 3b 0d 0a 70 70 pz+oz;..ppx=px*cf-ppy*sf+ox;..pp
34e0 79 3d 70 78 2a 73 66 2b 70 70 79 2a 63 66 2b 6f 79 3b 0d 0a 73 6b 69 70 3d 61 62 6f 76 65 28 73 y=px*sf+ppy*cf+oy;..skip=above(s
3500 71 72 28 70 70 78 29 2b 73 71 72 28 70 7a 29 2a 2e 38 2c 73 6b 64 64 29 2b 63 31 3b 0d 0a 78 31 qr(ppx)+sqr(pz)*.8,skdd)+c1;..x1
3520 3d 70 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a =ppx*cy-pz*sy;z1=ppx*sy+pz*cy;..
3540 79 32 3d 70 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 70 79 2a 73 78 2b 7a 31 2a 63 78 3b y2=ppy*cx-z1*sx;z2=ppy*sx+z1*cx;
3560 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b ..x3=x1*cz-y2*sz;y3=x1*sz+y2*cz;
3580 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a ..dt=if(above(z2,.01),1/z2,0);..
35a0 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 x=if(dt,x3*dt,x);y=if(dt,y3*dt*a
35c0 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 64 74 2a 30 2e f,y);..linesize=dt*ls;..dt=dt*0.
35e0 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 30 2e 31 3b 67 72 65 65 6e 3d 30 2e 31 3b 62 6c 75 65 3d 30 6*ccd;..red=0.1;green=0.1;blue=0
3600 2e 31 3b 00 84 02 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 .1;.....mv=getspec(0,.5,0)*.1+mv
3620 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 2e *.9;sv=min(1,mv*6);bt=bt+1;t=t+.
3640 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 02;..ox=reg00;oy=reg01;oz=reg02;
3660 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 rx=reg03;ry=reg04;rz=reg05;cx=re
3680 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 g06;sx=reg07;cy=reg08;sy=reg09;c
36a0 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f z=reg10;sz=reg11;..x=0;y=0;af=w/
36c0 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d h;mp=mp+1.5/mf;..dd=reg20;..ccd=
36e0 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 32 35 (reg20)*1.6;..an=(sin(mp*2)*.125
3700 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 63 61 3d 63 6f 73 28 61 6e 29 3b 73 61 3d +.01)*sv*td+an*.6;ca=cos(an);sa=
3720 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 sin(an);fn=(sin(mp*2))*sv*(1-td)
3740 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b 63 66 3d 63 6f 73 28 66 6e 29 3b 73 66 3d 73 69 6e 28 66 6e *.125+fn*.6;cf=cos(fn);sf=sin(fn
3760 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 34 2a 77 2f 33 32 30 3b 0d 0a 0d 0a );mf=mf*.92+.8;..ls=4*w/320;....
3780 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 36 32 3b 66 6e 3d 72 65 an=reg60;ca=reg61;sa=reg62;fn=re
37a0 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 3d 72 65 67 36 36 3b 0d g63;cf=reg64;sf=reg65;mf=reg66;.
37c0 0a 2f 2a 20 63 6c 69 70 20 2a 2f 0d 0a 61 64 3d 2d 2e 35 35 3b 70 79 3d 61 64 2a 70 6f 77 28 61 ./*.clip.*/..ad=-.55;py=ad*pow(a
37e0 62 73 28 61 64 29 2c 2e 38 29 2a 2e 33 3b 0d 0a 70 7a 3d 73 69 6e 28 70 79 2a 33 30 29 2a 2e 30 bs(ad),.8)*.3;..pz=sin(py*30)*.0
3800 30 35 3b 70 78 3d 30 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 61 2d 70 79 2a 73 61 3b 70 70 79 3d 70 7a 05;px=0;..ppz=pz*ca-py*sa;ppy=pz
3820 2a 73 61 2b 70 79 2a 63 61 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 3b 70 70 78 3d 70 78 2a 63 66 2d *sa+py*ca;..pz=ppz+oz;ppx=px*cf-
3840 70 70 79 2a 73 66 2b 6f 78 3b 0d 0a 70 70 79 3d 70 78 2a 73 66 2b 70 70 79 2a 63 66 2b 6f 79 3b ppy*sf+ox;..ppy=px*sf+ppy*cf+oy;
3860 0d 0a 0d 0a 73 6b 64 64 3d 28 73 71 72 28 70 70 78 29 2b 73 71 72 28 70 7a 29 2a 2e 38 2b 73 71 ....skdd=(sqr(ppx)+sqr(pz)*.8+sq
3880 72 28 2e 31 29 29 3b 0d 0a 0d 0a 00 9b 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 r(.1));.........ot=min(0,getspec
38a0 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 (0,.1,0)*2-1)*((getosc(.3,0,0)*2
38c0 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 00)%2);t=t+5*(ot+if(ot,1,0));mf=
38e0 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 74 64 3d 69 66 28 67 65 74 (bt-mt)*.5+mf*.7;mt=bt;td=if(get
3900 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 2c 30 29 osc(.4,0,0)*255%2,getosc(.6,0,0)
3920 2a 32 35 35 25 32 2c 74 64 29 00 32 00 00 00 6e 3d 34 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 *255%2,td).2...n=40;tpi=acos(-1)
3940 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 54 6f 72 73 6f 20 42 61 6e 64 3b *2;t=0;mf=100;mt=0;..Torso.Band;
3960 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 61 05 00 00 01 ef 01 00 00 75 3d .................$...a........u=
3980 28 69 2b 2e 31 32 35 29 2a 24 70 69 2a 32 3b 0d 0a 62 64 3d 30 3b 61 64 3d 2d 2e 35 35 3b 70 79 (i+.125)*$pi*2;..bd=0;ad=-.55;py
39a0 3d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 33 2b 73 69 6e 28 75 29 2a 2e 30 =ad*pow(abs(ad),.8)*.3+sin(u)*.0
39c0 32 35 3b 0d 0a 70 7a 3d 63 6f 73 28 62 64 29 2a 2e 30 38 2b 73 69 6e 28 70 79 2a 33 30 29 2a 2e 25;..pz=cos(bd)*.08+sin(py*30)*.
39e0 30 30 35 3b 0d 0a 70 78 3d 73 69 6e 28 62 64 29 2a 2e 31 2b 63 6f 73 28 75 29 2a 2e 30 33 3b 0d 005;..px=sin(bd)*.1+cos(u)*.03;.
3a00 0a 70 70 7a 3d 70 7a 2a 63 61 2d 70 79 2a 73 61 3b 0d 0a 70 70 79 3d 70 7a 2a 73 61 2b 70 79 2a .ppz=pz*ca-py*sa;..ppy=pz*sa+py*
3a20 63 61 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 3b 0d 0a 70 70 78 3d 70 78 2a 63 66 2d 70 70 79 2a 73 ca;..pz=ppz+oz;..ppx=px*cf-ppy*s
3a40 66 2b 6f 78 3b 0d 0a 70 70 79 3d 70 78 2a 73 66 2b 70 70 79 2a 63 66 2b 6f 79 3b 0d 0a 73 6b 69 f+ox;..ppy=px*sf+ppy*cf+oy;..ski
3a60 70 3d 61 62 6f 76 65 28 73 71 72 28 70 70 78 29 2b 73 71 72 28 70 7a 29 2a 2e 38 2c 73 6b 64 64 p=above(sqr(ppx)+sqr(pz)*.8,skdd
3a80 29 2b 63 31 3b 0d 0a 78 31 3d 70 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 70 78 2a 73 79 )+c1;..x1=ppx*cy-pz*sy;z1=ppx*sy
3aa0 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 70 79 2a +pz*cy;..y2=ppy*cx-z1*sx;z2=ppy*
3ac0 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a sx+z1*cx;..x3=x1*cz-y2*sz;y3=x1*
3ae0 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 sz+y2*cz;..dt=if(above(z2,.01),1
3b00 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 /z2,0);..x=if(dt,x3*dt,x);y=if(d
3b20 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d t,y3*dt*af,y);..linesize=dt*ls;.
3b40 0a 64 74 3d 64 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 31 2e 30 3b 67 72 65 65 6e 3d 30 .dt=dt*0.6*ccd;..red=1.0;green=0
3b60 2e 37 3b 62 6c 75 65 3d 30 2e 30 3b 00 86 02 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 .7;blue=0.0;.....mv=getspec(0,.5
3b80 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 ,0)*.1+mv*.9;sv=min(1,mv*6);bt=b
3ba0 74 2b 31 3b 74 3d 74 2b 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b t+1;t=t+.02;..ox=reg00;oy=reg01;
3bc0 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 oz=reg02;rx=reg03;ry=reg04;rz=re
3be0 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 g05;cx=reg06;sx=reg07;cy=reg08;s
3c00 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b y=reg09;cz=reg10;sz=reg11;..x=0;
3c20 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 y=0;af=w/h;mp=mp+1.5/mf;..dd=reg
3c40 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 20;..ccd=(reg20)*1.6;..an=(sin(m
3c60 70 2a 32 29 2a 2e 31 32 35 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 63 61 3d 63 6f p*2)*.125+.01)*sv*td+an*.6;ca=co
3c80 73 28 61 6e 29 3b 73 61 3d 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a s(an);sa=sin(an);fn=(sin(mp*2))*
3ca0 73 76 2a 28 31 2d 74 64 29 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b 63 66 3d 63 6f 73 28 66 6e 29 3b sv*(1-td)*.125+fn*.6;cf=cos(fn);
3cc0 73 66 3d 73 69 6e 28 66 6e 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 31 2e 35 sf=sin(fn);mf=mf*.92+.8;..ls=1.5
3ce0 2a 77 2f 33 32 30 3b 0d 0a 0d 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d *w/320;....an=reg60;ca=reg61;sa=
3d00 72 65 67 36 32 3b 66 6e 3d 72 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 reg62;fn=reg63;cf=reg64;sf=reg65
3d20 3b 6d 66 3d 72 65 67 36 36 3b 0d 0a 2f 2a 20 63 6c 69 70 20 2a 2f 0d 0a 61 64 3d 2d 2e 35 35 3b ;mf=reg66;../*.clip.*/..ad=-.55;
3d40 70 79 3d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 33 3b 0d 0a 70 7a 3d 73 69 py=ad*pow(abs(ad),.8)*.3;..pz=si
3d60 6e 28 70 79 2a 33 30 29 2a 2e 30 30 35 3b 70 78 3d 30 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 61 2d 70 n(py*30)*.005;px=0;..ppz=pz*ca-p
3d80 79 2a 73 61 3b 70 70 79 3d 70 7a 2a 73 61 2b 70 79 2a 63 61 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a y*sa;ppy=pz*sa+py*ca;..pz=ppz+oz
3da0 3b 70 70 78 3d 70 78 2a 63 66 2d 70 70 79 2a 73 66 2b 6f 78 3b 0d 0a 70 70 79 3d 70 78 2a 73 66 ;ppx=px*cf-ppy*sf+ox;..ppy=px*sf
3dc0 2b 70 70 79 2a 63 66 2b 6f 79 3b 0d 0a 0d 0a 73 6b 64 64 3d 28 73 71 72 28 70 70 78 29 2b 73 71 +ppy*cf+oy;....skdd=(sqr(ppx)+sq
3de0 72 28 70 7a 29 2a 2e 38 2b 73 71 72 28 2e 31 29 29 3b 0d 0a 0d 0a 00 9b 00 00 00 6f 74 3d 6d 69 r(pz)*.8+sqr(.1));.........ot=mi
3e00 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 n(0,getspec(0,.1,0)*2-1)*((getos
3e20 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f c(.3,0,0)*200)%2);t=t+5*(ot+if(o
3e40 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 t,1,0));mf=(bt-mt)*.5+mf*.7;mt=b
3e60 74 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 t;td=if(getosc(.4,0,0)*255%2,get
3e80 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 30 00 00 00 6e 3d 35 3b 74 70 osc(.6,0,0)*255%2,td).0...n=5;tp
3ea0 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 42 i=acos(-1)*2;t=0;mf=100;mt=0;..B
3ec0 65 6c 74 20 63 6c 69 70 3b 00 02 00 00 00 01 00 00 00 51 51 51 00 01 00 00 00 28 00 00 00 04 00 elt.clip;.........QQQ.....(.....
3ee0 00 00 02 00 06 80 24 00 00 00 91 05 00 00 01 1a 02 00 00 64 74 3d 69 2a 74 70 69 2a 31 33 2e 36 ......$............dt=i*tpi*13.6
3f00 38 3b 0d 0a 61 64 3d 63 6f 73 28 64 74 29 2a 2e 35 2d 2e 35 3b 62 64 3d 69 2a 74 70 69 3b 0d 0a 8;..ad=cos(dt)*.5-.5;bd=i*tpi;..
3f20 70 79 3d 2d 2e 32 2d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 32 3b 0d 0a 70 py=-.2-ad*pow(abs(ad),.8)*.2;..p
3f40 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 30 35 3b 0d 0a 70 78 3d 73 69 6e 28 64 z=sin(dt)*cos(bd)*.05;..px=sin(d
3f60 74 29 2a 73 69 6e 28 62 64 29 2a 2e 30 35 3b 0d 0a 63 31 3d 61 62 6f 76 65 28 70 79 2c 2d 2e 31 t)*sin(bd)*.05;..c1=above(py,-.1
3f80 31 29 3b 63 32 3d 31 3b 0d 0a 70 70 78 3d 70 78 2a 63 63 2d 70 79 2a 73 63 3b 0d 0a 70 70 79 3d 1);c2=1;..ppx=px*cc-py*sc;..ppy=
3fa0 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 79 3d 70 70 79 3b 0d 0a 70 78 3d 70 70 78 2b 6f 78 px*sc+py*cc;..py=ppy;..px=ppx+ox
3fc0 2b 73 66 2a 2e 33 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 64 2d 70 79 2a 73 64 3b 0d 0a 70 70 79 3d 70 +sf*.3;..ppz=pz*cd-py*sd;..ppy=p
3fe0 7a 2a 73 64 2b 70 79 2a 63 64 3b 0d 0a 70 79 3d 70 70 79 2b 6f 79 2d 2e 32 35 3b 0d 0a 70 7a 3d z*sd+py*cd;..py=ppy+oy-.25;..pz=
4000 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 ppz+oz+sa*.3;..x1=px*cy-pz*sy;z1
4020 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 =px*sy+pz*cy;..y2=py*cx-z1*sx;z2
4040 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 =py*sx+z1*cx;..x3=x1*cz-y2*sz;y3
4060 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 =x1*sz+y2*cz;..dt=if(above(z2,.0
4080 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 1),1/z2,0);..x=if(dt,x3*dt,x);y=
40a0 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a if(dt,y3*dt*af,y);..linesize=dt*
40c0 6c 73 3b 0d 0a 64 74 3d 64 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 64 74 2d 2e 31 3b 67 ls;..dt=dt*0.6*ccd;..red=dt-.1;g
40e0 72 65 65 6e 3d 69 66 28 63 31 2c 72 65 64 2a 2e 38 33 2c 30 29 3b 62 6c 75 65 3d 69 66 28 63 31 reen=if(c1,red*.83,0);blue=if(c1
4100 2c 72 65 64 2a 2e 37 33 2c 30 29 3b 00 3e 02 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 ,red*.73,0);.>...mv=getspec(0,.5
4120 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 ,0)*.1+mv*.9;sv=min(1,mv*6);bt=b
4140 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 t+1;t=t+0.02;..ox=reg00;oy=reg01
4160 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 ;oz=reg02;rx=reg03;ry=reg04;rz=r
4180 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b eg05;cx=reg06;sx=reg07;cy=reg08;
41a0 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 sy=reg09;cz=reg10;sz=reg11;..x=0
41c0 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 ;y=0;af=w/h;mp=mp+1.5/mf;..dd=re
41e0 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 g20;..ccd=(reg20)*1.6;..an=(sin(
4200 6d 70 2a 32 29 2a 2e 31 32 35 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 73 61 3d 73 mp*2)*.125+.01)*sv*td+an*.6;sa=s
4220 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a in(an);fn=(sin(mp*2))*sv*(1-td)*
4240 2e 31 32 35 2b 66 6e 2a 2e 36 3b 73 66 3d 73 69 6e 28 66 6e 29 3b 73 76 3d 73 76 2a 2e 39 39 2b .125+fn*.6;sf=sin(fn);sv=sv*.99+
4260 2e 30 31 3b 63 6e 3d 63 6e 2a 2e 37 2b 2e 33 2a 73 69 6e 28 6d 70 2a 33 29 2a 2e 35 2a 62 65 6c .01;cn=cn*.7+.3*sin(mp*3)*.5*bel
4280 6f 77 28 6d 64 2c 32 29 2a 61 62 6f 76 65 28 6d 64 2c 2d 31 29 2a 73 76 3b 63 63 3d 63 6f 73 28 ow(md,2)*above(md,-1)*sv;cc=cos(
42a0 63 6e 29 3b 73 63 3d 73 69 6e 28 63 6e 29 3b 64 6e 3d 28 73 69 6e 28 6d 70 2a 34 29 2a 2e 37 35 cn);sc=sin(cn);dn=(sin(mp*4)*.75
42c0 2b 2e 33 29 2a 61 62 6f 76 65 28 6d 64 2c 30 29 2a 73 76 2a 2e 33 2b 64 6e 2a 2e 37 3b 63 64 3d +.3)*above(md,0)*sv*.3+dn*.7;cd=
42e0 63 6f 73 28 64 6e 29 3b 73 64 3d 73 69 6e 28 64 6e 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b cos(dn);sd=sin(dn);mf=mf*.92+.8;
4300 0d 0a 6c 73 3d 34 2a 77 2f 33 32 30 3b 0d 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 ..ls=4*w/320;..an=reg60;ca=reg61
4320 3b 73 61 3d 72 65 67 36 32 3b 66 6e 3d 72 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 ;sa=reg62;fn=reg63;cf=reg64;sf=r
4340 65 67 36 35 3b 6d 66 3d 72 65 67 36 36 3b 00 eb 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 eg65;mf=reg66;.....ot=min(0,gets
4360 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 pec(0,.1,0)*2-1)*((getosc(.3,0,0
4380 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b )*200)%2);t=t+5*(ot+if(ot,1,0));
43a0 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 0d 0a 6d 64 3d 69 mf=(bt-mt)*.5+mf*.7;mt=bt;..md=i
43c0 66 28 61 62 73 28 67 65 74 6f 73 63 28 2e 33 32 2c 30 2c 30 29 2a 31 30 30 29 25 32 2c 61 62 73 f(abs(getosc(.32,0,0)*100)%2,abs
43e0 28 67 65 74 6f 73 63 28 2e 35 36 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 36 32 2c 30 2c 30 29 (getosc(.56,0,0)+getosc(.62,0,0)
4400 29 25 34 2d 31 2c 6d 64 29 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 )%4-1,md);td=if(getosc(.4,0,0)*2
4420 35 35 25 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 2d 00 55%2,getosc(.6,0,0)*255%2,td).-.
4440 00 00 6e 3d 32 32 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 ..n=220;tpi=acos(-1)*2;t=0;mf=10
4460 30 3b 6d 74 3d 30 3b a4 20 48 65 61 64 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 28 0;mt=0;..Head;.................(
4480 00 00 00 04 00 00 00 00 00 01 80 24 00 00 00 6f 06 00 00 01 12 02 00 00 64 74 3d 69 2a 74 70 69 ...........$...o........dt=i*tpi
44a0 2a 31 33 2e 36 38 3b 0d 0a 61 64 3d 63 6f 73 28 64 74 29 2a 2e 35 2d 2e 35 3b 62 64 3d 69 2a 74 *13.68;..ad=cos(dt)*.5-.5;bd=i*t
44c0 70 69 3b 0d 0a 70 79 3d 2d 2e 32 2d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e pi;..py=-.2-ad*pow(abs(ad),.8)*.
44e0 32 3b 0d 0a 70 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 30 35 32 3b 0d 0a 70 78 2;..pz=sin(dt)*cos(bd)*.052;..px
4500 3d 73 69 6e 28 64 74 29 2a 73 69 6e 28 62 64 29 2a 2e 30 35 32 3b 0d 0a 63 31 3d 61 62 6f 76 65 =sin(dt)*sin(bd)*.052;..c1=above
4520 28 70 79 2c 2d 2e 31 31 29 3b 63 32 3d 31 3b 0d 0a 70 70 78 3d 70 78 2a 63 63 2d 70 79 2a 73 63 (py,-.11);c2=1;..ppx=px*cc-py*sc
4540 3b 0d 0a 70 70 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 79 3d 70 70 79 3b 0d 0a 70 78 ;..ppy=px*sc+py*cc;..py=ppy;..px
4560 3d 70 70 78 2b 6f 78 2b 73 66 2a 2e 33 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 64 2d 70 79 2a 73 64 3b =ppx+ox+sf*.3;..ppz=pz*cd-py*sd;
4580 0d 0a 70 70 79 3d 70 7a 2a 73 64 2b 70 79 2a 63 64 3b 0d 0a 70 79 3d 70 70 79 2b 6f 79 2d 2e 32 ..ppy=pz*sd+py*cd;..py=ppy+oy-.2
45a0 35 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 3b 0d 0a 73 6b 69 70 3d 61 62 6f 76 65 5;..pz=ppz+oz+sa*.3;..skip=above
45c0 28 73 71 72 28 70 78 29 2b 73 71 72 28 70 7a 29 2c 73 6b 64 64 29 2b 63 31 3b 0d 0a 78 31 3d 70 (sqr(px)+sqr(pz),skdd)+c1;..x1=p
45e0 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 x*cy-pz*sy;z1=px*sy+pz*cy;..y2=p
4600 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 y*cx-z1*sx;z2=py*sx+z1*cx;..x3=x
4620 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 1*cz-y2*sz;y3=x1*sz+y2*cz;..dt=i
4640 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 f(above(z2,.01),1/z2,0);..x=if(d
4660 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d t,x3*dt,x);y=if(dt,y3*dt*af,y);.
4680 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 72 65 64 3d 2e 39 35 3b 67 72 65 65 6e 3d .linesize=dt*ls;..red=.95;green=
46a0 30 3b 62 6c 75 65 3d 30 3b 00 20 03 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 0;blue=0;.....mv=getspec(0,.5,0)
46c0 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 *.1+mv*.9;sv=min(1,mv*6);bt=bt+1
46e0 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a ;t=t+0.02;..ox=reg00;oy=reg01;oz
4700 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 =reg02;rx=reg03;ry=reg04;rz=reg0
4720 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 5;cx=reg06;sx=reg07;cy=reg08;sy=
4740 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d reg09;cz=reg10;sz=reg11;..x=0;y=
4760 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 0;af=w/h;mp=mp+1.5/mf;..dd=reg20
4780 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a ;..ccd=(reg20)*1.6;..an=(sin(mp*
47a0 32 29 2a 2e 31 32 35 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 73 61 3d 73 69 6e 28 2)*.125+.01)*sv*td+an*.6;sa=sin(
47c0 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a 2e 31 32 an);fn=(sin(mp*2))*sv*(1-td)*.12
47e0 35 2b 66 6e 2a 2e 36 3b 73 66 3d 73 69 6e 28 66 6e 29 3b 73 76 3d 73 76 2a 2e 39 39 2b 2e 30 31 5+fn*.6;sf=sin(fn);sv=sv*.99+.01
4800 3b 63 6e 3d 63 6e 2a 2e 37 2b 2e 33 2a 73 69 6e 28 6d 70 2a 33 29 2a 2e 35 2a 62 65 6c 6f 77 28 ;cn=cn*.7+.3*sin(mp*3)*.5*below(
4820 6d 64 2c 32 29 2a 61 62 6f 76 65 28 6d 64 2c 2d 31 29 2a 73 76 3b 63 63 3d 63 6f 73 28 63 6e 29 md,2)*above(md,-1)*sv;cc=cos(cn)
4840 3b 73 63 3d 73 69 6e 28 63 6e 29 3b 64 6e 3d 28 73 69 6e 28 6d 70 2a 34 29 2a 2e 37 35 2b 2e 33 ;sc=sin(cn);dn=(sin(mp*4)*.75+.3
4860 29 2a 61 62 6f 76 65 28 6d 64 2c 30 29 2a 73 76 2a 2e 33 2b 64 6e 2a 2e 37 3b 63 64 3d 63 6f 73 )*above(md,0)*sv*.3+dn*.7;cd=cos
4880 28 64 6e 29 3b 73 64 3d 73 69 6e 28 64 6e 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c (dn);sd=sin(dn);mf=mf*.92+.8;..l
48a0 73 3d 34 2e 35 2a 77 2f 33 32 30 3b 0d 0a 0d 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 s=4.5*w/320;....an=reg60;ca=reg6
48c0 31 3b 73 61 3d 72 65 67 36 32 3b 66 6e 3d 72 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 1;sa=reg62;fn=reg63;cf=reg64;sf=
48e0 72 65 67 36 35 3b 6d 66 3d 72 65 67 36 36 3b 0d 0a 2f 2a 63 6c 69 70 2a 2f 0d 0a 61 64 3d 2d 2e reg65;mf=reg66;../*clip*/..ad=-.
4900 36 37 3b 70 79 3d 2d 2e 32 2d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 32 3b 67;py=-.2-ad*pow(abs(ad),.8)*.2;
4920 0d 0a 70 7a 3d 30 3b 70 78 3d 30 3b 70 70 78 3d 70 78 2a 63 63 2d 70 79 2a 73 63 3b 70 70 79 3d ..pz=0;px=0;ppx=px*cc-py*sc;ppy=
4940 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 79 3d 70 70 79 3b 70 78 3d 70 70 78 2b 6f 78 2b 73 px*sc+py*cc;..py=ppy;px=ppx+ox+s
4960 66 2a 2e 33 3b 70 70 7a 3d 70 7a 2a 63 64 2d 70 79 2a 73 64 3b 0d 0a 70 70 79 3d 70 7a 2a 73 64 f*.3;ppz=pz*cd-py*sd;..ppy=pz*sd
4980 2b 70 79 2a 63 64 3b 70 79 3d 70 70 79 2b 6f 79 2d 2e 32 35 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a +py*cd;py=ppy+oy-.25;..pz=ppz+oz
49a0 2b 73 61 2a 2e 33 3b 0d 0a 73 6b 64 64 3d 28 73 71 72 28 70 78 29 2b 73 71 72 28 70 7a 29 2b 73 +sa*.3;..skdd=(sqr(px)+sqr(pz)+s
49c0 71 72 28 2e 30 35 29 29 3b 0d 0a 0d 0a 00 eb 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 qr(.05));.........ot=min(0,getsp
49e0 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 ec(0,.1,0)*2-1)*((getosc(.3,0,0)
4a00 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d *200)%2);t=t+5*(ot+if(ot,1,0));m
4a20 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 0d 0a 6d 64 3d 69 66 f=(bt-mt)*.5+mf*.7;mt=bt;..md=if
4a40 28 61 62 73 28 67 65 74 6f 73 63 28 2e 33 32 2c 30 2c 30 29 2a 31 30 30 29 25 32 2c 61 62 73 28 (abs(getosc(.32,0,0)*100)%2,abs(
4a60 67 65 74 6f 73 63 28 2e 35 36 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 36 32 2c 30 2c 30 29 29 getosc(.56,0,0)+getosc(.62,0,0))
4a80 25 34 2d 31 2c 6d 64 29 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 %4-1,md);td=if(getosc(.4,0,0)*25
4aa0 35 25 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 31 00 00 5%2,getosc(.6,0,0)*255%2,td).1..
4ac0 00 6e 3d 32 32 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 .n=220;tpi=acos(-1)*2;t=0;mf=100
4ae0 3b 6d 74 3d 30 3b a4 20 48 65 61 64 20 43 61 70 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 ;mt=0;..Head.Cap;...............
4b00 00 00 28 00 00 00 04 00 00 00 01 00 01 80 50 85 dc 03 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 ..(...........P...Acko.net:.Texe
4b20 72 20 49 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 cb 07 00 00 00 00 00 00 00 00 00 00 00 00 r.II............................
4b40 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 ................................
4b60 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 ................................
4b80 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 ................................
4ba0 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 ................................
4bc0 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 ................................
4be0 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 ................................
4c00 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 ................................
4c20 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 01 00 ................................
4c40 00 00 00 00 00 00 01 00 00 00 00 00 00 00 2b 00 00 00 6e 3d 30 3b 74 70 69 3d 61 63 6f 73 28 2d ..............+...n=0;tpi=acos(-
4c60 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 42 65 61 72 64 3b 33 03 00 1)*2;t=0;mf=100;mt=0;..Beard;3..
4c80 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d .mv=getspec(0,.5,0)*.1+mv*.9;sv=
4ca0 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f min(1,mv*6);bt=bt+1;t=t+0.02;..o
4cc0 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 x=reg00;oy=reg01;oz=reg02;rx=reg
4ce0 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 03;ry=reg04;rz=reg05;cx=reg06;sx
4d00 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 =reg07;cy=reg08;sy=reg09;cz=reg1
4d20 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 0;sz=reg11;..x=0;y=0;af=w/h;mp=m
4d40 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 p+1.5/mf;..dd=reg20;..ccd=(reg20
4d60 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 32 35 2b 2e 30 31 29 2a )*1.6;..an=(sin(mp*2)*.125+.01)*
4d80 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 73 61 3d 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d sv*td+an*.6;sa=sin(an);fn=(sin(m
4da0 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b 73 66 3d 73 69 p*2))*sv*(1-td)*.125+fn*.6;sf=si
4dc0 6e 28 66 6e 29 3b 73 76 3d 73 76 2a 2e 39 39 2b 2e 30 31 3b 63 6e 3d 63 6e 2a 2e 37 2b 2e 33 2a n(fn);sv=sv*.99+.01;cn=cn*.7+.3*
4de0 73 69 6e 28 6d 70 2a 33 29 2a 2e 35 2a 62 65 6c 6f 77 28 6d 64 2c 32 29 2a 61 62 6f 76 65 28 6d sin(mp*3)*.5*below(md,2)*above(m
4e00 64 2c 2d 31 29 2a 73 76 3b 63 63 3d 63 6f 73 28 63 6e 29 3b 73 63 3d 73 69 6e 28 63 6e 29 3b 64 d,-1)*sv;cc=cos(cn);sc=sin(cn);d
4e20 6e 3d 28 73 69 6e 28 6d 70 2a 34 29 2a 2e 37 35 2b 2e 33 29 2a 61 62 6f 76 65 28 6d 64 2c 30 29 n=(sin(mp*4)*.75+.3)*above(md,0)
4e40 2a 73 76 2a 2e 33 2b 64 6e 2a 2e 37 3b 63 64 3d 63 6f 73 28 64 6e 29 3b 73 64 3d 73 69 6e 28 64 *sv*.3+dn*.7;cd=cos(dn);sd=sin(d
4e60 6e 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 34 2a 77 2f 33 32 30 3b 0d 0a 0d n);mf=mf*.92+.8;..ls=4*w/320;...
4e80 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 36 32 3b 66 6e 3d 72 .an=reg60;ca=reg61;sa=reg62;fn=r
4ea0 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 3d 72 65 67 36 36 3b eg63;cf=reg64;sf=reg65;mf=reg66;
4ec0 0d 0a 0d 0a 2f 2a 63 6c 69 70 2a 2f 0d 0a 61 64 3d 2d 2e 37 3b 70 79 3d 2d 2e 32 2d 61 64 2a 70 ..../*clip*/..ad=-.7;py=-.2-ad*p
4ee0 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 32 3b 0d 0a 70 7a 3d 30 3b 70 78 3d 30 3b 70 70 ow(abs(ad),.8)*.2;..pz=0;px=0;pp
4f00 78 3d 70 78 2a 63 63 2d 70 79 2a 73 63 3b 70 70 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a x=px*cc-py*sc;ppy=px*sc+py*cc;..
4f20 70 79 3d 70 70 79 3b 70 78 3d 70 70 78 2b 6f 78 2b 73 66 2a 2e 33 3b 70 70 7a 3d 70 7a 2a 63 64 py=ppy;px=ppx+ox+sf*.3;ppz=pz*cd
4f40 2d 70 79 2a 73 64 3b 0d 0a 70 70 79 3d 70 7a 2a 73 64 2b 70 79 2a 63 64 3b 70 79 3d 70 70 79 2b -py*sd;..ppy=pz*sd+py*cd;py=ppy+
4f60 6f 79 2d 2e 32 35 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 3b 0d 0a 73 6b 64 64 3d oy-.25;..pz=ppz+oz+sa*.3;..skdd=
4f80 28 73 71 72 28 70 78 29 2b 73 71 72 28 70 7a 29 2b 73 71 72 28 2e 30 36 29 29 3b 0d 0a 6e 3d 38 (sqr(px)+sqr(pz)+sqr(.06));..n=8
4fa0 30 2a 62 65 6c 6f 77 28 6f 79 2c 2e 35 38 29 3b 0d 0a 0d 0a ea 00 00 00 6f 74 3d 6d 69 6e 28 30 0*below(oy,.58);........ot=min(0
4fc0 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e ,getspec(0,.1,0)*2-1)*((getosc(.
4fe0 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 3,0,0)*200)%2);t=t+5*(ot+if(ot,1
5000 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 0d ,0));mf=(bt-mt)*.5+mf*.7;mt=bt;.
5020 0a 6d 64 3d 69 66 28 61 62 73 28 67 65 74 6f 73 63 28 2e 33 32 2c 30 2c 30 29 2a 31 30 30 29 25 .md=if(abs(getosc(.32,0,0)*100)%
5040 32 2c 61 62 73 28 67 65 74 6f 73 63 28 2e 35 36 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 36 32 2,abs(getosc(.56,0,0)+getosc(.62
5060 2c 30 2c 30 29 29 25 34 2d 31 2c 6d 64 29 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 ,0,0))%4-1,md);td=if(getosc(.4,0
5080 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 ,0)*255%2,getosc(.6,0,0)*255%2,t
50a0 64 29 5b 02 00 00 62 64 3d 69 2a 74 70 69 2a 38 3b 61 64 3d 63 6f 73 28 64 74 29 2a 2e 35 2d 2e d)[...bd=i*tpi*8;ad=cos(dt)*.5-.
50c0 35 3b 0d 0a 73 6b 69 70 3d 65 71 75 61 6c 28 73 69 67 6e 28 63 6f 73 28 62 64 29 29 2c 2d 31 29 5;..skip=equal(sign(cos(bd)),-1)
50e0 3b 0d 0a 61 64 3d 2d 2e 36 2d 73 71 72 74 28 63 6f 73 28 62 64 29 29 2a 2e 33 3b 62 74 74 3d 73 ;..ad=-.6-sqrt(cos(bd))*.3;btt=s
5100 69 6e 28 61 63 6f 73 28 61 64 2a 32 2b 31 29 29 3b 0d 0a 70 79 3d 2d 2e 31 37 2d 61 64 2a 70 6f in(acos(ad*2+1));..py=-.17-ad*po
5120 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 32 3b 72 64 3d 2e 30 36 3b 0d 0a 70 7a 3d 62 74 74 w(abs(ad),.8)*.2;rd=.06;..pz=btt
5140 2a 63 6f 73 28 62 64 29 2a 72 64 2d 2e 30 32 3b 0d 0a 70 78 3d 62 74 74 2a 73 69 6e 28 62 64 29 *cos(bd)*rd-.02;..px=btt*sin(bd)
5160 2a 72 64 3b 0d 0a 70 70 78 3d 70 78 2a 63 63 2d 70 79 2a 73 63 3b 0d 0a 70 70 79 3d 70 78 2a 73 *rd;..ppx=px*cc-py*sc;..ppy=px*s
5180 63 2b 70 79 2a 63 63 3b 0d 0a 70 79 3d 70 70 79 3b 0d 0a 70 78 3d 70 70 78 2b 6f 78 2b 73 66 2a c+py*cc;..py=ppy;..px=ppx+ox+sf*
51a0 2e 33 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 64 2d 70 79 2a 73 64 3b 0d 0a 70 70 79 3d 70 7a 2a 73 64 .3;..ppz=pz*cd-py*sd;..ppy=pz*sd
51c0 2b 70 79 2a 63 64 3b 0d 0a 70 79 3d 70 70 79 2b 6f 79 2d 2e 32 35 3b 0d 0a 70 7a 3d 70 70 7a 2b +py*cd;..py=ppy+oy-.25;..pz=ppz+
51e0 6f 7a 2b 73 61 2a 2e 33 3b 0d 0a 73 6b 69 70 3d 73 6b 69 70 2b 61 62 6f 76 65 28 73 71 72 28 70 oz+sa*.3;..skip=skip+above(sqr(p
5200 78 29 2b 73 71 72 28 70 7a 29 2c 73 6b 64 64 29 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 x)+sqr(pz),skdd);..x1=px*cy-pz*s
5220 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 y;z1=px*sy+pz*cy;..y2=py*cx-z1*s
5240 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 x;z2=py*sx+z1*cx;..x3=x1*cz-y2*s
5260 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a z;y3=x1*sz+y2*cz;..dt=if(above(z
5280 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 2,.01),1/z2,0);..x=if(dt,x3*dt,x
52a0 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 );y=if(dt,y3*dt*af,y);..linesize
52c0 3d 64 74 2a 6c 73 3b 0d 0a 72 65 64 3d 2e 35 3b 67 72 65 65 6e 3d 72 65 64 3b 62 6c 75 65 3d 72 =dt*ls;..red=.5;green=red;blue=r
52e0 65 64 3b 0d 0a 73 69 7a 65 78 3d 64 74 2a 6c 73 2a 2e 30 34 3b 73 69 7a 65 79 3d 73 69 7a 65 78 ed;..sizex=dt*ls*.04;sizey=sizex
5300 3b 50 85 dc 03 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 49 49 00 00 00 00 00 00 00 00 00 ;P...Acko.net:.Texer.II.........
5320 00 00 00 00 00 47 07 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 .....G..........................
5340 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 ................................
5360 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 ................................
5380 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 ................................
53a0 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 ................................
53c0 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 ................................
53e0 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 ................................
5400 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 ................................
5420 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 01 00 00 00 00 00 00 ................................
5440 00 31 00 00 00 6e 3d 31 38 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 .1...n=180;tpi=acos(-1)*2;t=0;mf
5460 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 48 65 61 64 20 42 61 6e 64 3b 1e 03 00 00 6d 76 3d 67 65 74 =100;mt=0;..Head.Band;....mv=get
5480 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d spec(0,.5,0)*.1+mv*.9;sv=min(1,m
54a0 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 v*6);bt=bt+1;t=t+0.02;..ox=reg00
54c0 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 ;oy=reg01;oz=reg02;rx=reg03;ry=r
54e0 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b eg04;rz=reg05;cx=reg06;sx=reg07;
5500 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 cy=reg08;sy=reg09;cz=reg10;sz=re
5520 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d g11;..x=0;y=0;af=w/h;mp=mp+1.5/m
5540 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d f;..dd=reg20;..ccd=(reg20)*1.6;.
5560 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 32 35 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 .an=(sin(mp*2)*.125+.01)*sv*td+a
5580 6e 2a 2e 36 3b 73 61 3d 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 n*.6;sa=sin(an);fn=(sin(mp*2))*s
55a0 76 2a 28 31 2d 74 64 29 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b 73 66 3d 73 69 6e 28 66 6e 29 3b 73 v*(1-td)*.125+fn*.6;sf=sin(fn);s
55c0 76 3d 73 76 2a 2e 39 39 2b 2e 30 31 3b 63 6e 3d 63 6e 2a 2e 37 2b 2e 33 2a 73 69 6e 28 6d 70 2a v=sv*.99+.01;cn=cn*.7+.3*sin(mp*
55e0 33 29 2a 2e 35 2a 62 65 6c 6f 77 28 6d 64 2c 32 29 2a 61 62 6f 76 65 28 6d 64 2c 2d 31 29 2a 73 3)*.5*below(md,2)*above(md,-1)*s
5600 76 3b 63 63 3d 63 6f 73 28 63 6e 29 3b 73 63 3d 73 69 6e 28 63 6e 29 3b 64 6e 3d 28 73 69 6e 28 v;cc=cos(cn);sc=sin(cn);dn=(sin(
5620 6d 70 2a 34 29 2a 2e 37 35 2b 2e 33 29 2a 61 62 6f 76 65 28 6d 64 2c 30 29 2a 73 76 2a 2e 33 2b mp*4)*.75+.3)*above(md,0)*sv*.3+
5640 64 6e 2a 2e 37 3b 63 64 3d 63 6f 73 28 64 6e 29 3b 73 64 3d 73 69 6e 28 64 6e 29 3b 6d 66 3d 6d dn*.7;cd=cos(dn);sd=sin(dn);mf=m
5660 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 34 2a 77 2f 33 32 30 3b 0d 0a 0d 0a 61 6e 3d 72 65 67 f*.92+.8;..ls=4*w/320;....an=reg
5680 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 36 32 3b 66 6e 3d 72 65 67 36 33 3b 63 66 60;ca=reg61;sa=reg62;fn=reg63;cf
56a0 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 3d 72 65 67 36 36 3b 0d 0a 0d 0a 2f 2a 63 =reg64;sf=reg65;mf=reg66;..../*c
56c0 6c 69 70 2a 2f 0d 0a 61 64 3d 2d 2e 37 3b 70 79 3d 2d 2e 32 2d 61 64 2a 70 6f 77 28 61 62 73 28 lip*/..ad=-.7;py=-.2-ad*pow(abs(
56e0 61 64 29 2c 2e 38 29 2a 2e 32 3b 0d 0a 70 7a 3d 30 3b 70 78 3d 30 3b 70 70 78 3d 70 78 2a 63 63 ad),.8)*.2;..pz=0;px=0;ppx=px*cc
5700 2d 70 79 2a 73 63 3b 70 70 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 79 3d 70 70 79 3b -py*sc;ppy=px*sc+py*cc;..py=ppy;
5720 70 78 3d 70 70 78 2b 6f 78 2b 73 66 2a 2e 33 3b 70 70 7a 3d 70 7a 2a 63 64 2d 70 79 2a 73 64 3b px=ppx+ox+sf*.3;ppz=pz*cd-py*sd;
5740 0d 0a 70 70 79 3d 70 7a 2a 73 64 2b 70 79 2a 63 64 3b 70 79 3d 70 70 79 2b 6f 79 2d 2e 32 35 3b ..ppy=pz*sd+py*cd;py=ppy+oy-.25;
5760 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 3b 0d 0a 73 6b 64 64 3d 28 73 71 72 28 70 78 ..pz=ppz+oz+sa*.3;..skdd=(sqr(px
5780 29 2b 73 71 72 28 70 7a 29 2b 73 71 72 28 2e 30 36 29 29 3b 0d 0a 0d 0a ea 00 00 00 6f 74 3d 6d )+sqr(pz)+sqr(.06));........ot=m
57a0 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f in(0,getspec(0,.1,0)*2-1)*((geto
57c0 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 sc(.3,0,0)*200)%2);t=t+5*(ot+if(
57e0 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d ot,1,0));mf=(bt-mt)*.5+mf*.7;mt=
5800 62 74 3b 0d 0a 6d 64 3d 69 66 28 61 62 73 28 67 65 74 6f 73 63 28 2e 33 32 2c 30 2c 30 29 2a 31 bt;..md=if(abs(getosc(.32,0,0)*1
5820 30 30 29 25 32 2c 61 62 73 28 67 65 74 6f 73 63 28 2e 35 36 2c 30 2c 30 29 2b 67 65 74 6f 73 63 00)%2,abs(getosc(.56,0,0)+getosc
5840 28 2e 36 32 2c 30 2c 30 29 29 25 34 2d 31 2c 6d 64 29 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 (.62,0,0))%4-1,md);td=if(getosc(
5860 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 .4,0,0)*255%2,getosc(.6,0,0)*255
5880 25 32 2c 74 64 29 e6 01 00 00 62 64 3d 69 2a 74 70 69 2a 38 3b 0d 0a 61 64 3d 2d 2e 37 3b 0d 0a %2,td)....bd=i*tpi*8;..ad=-.7;..
58a0 70 79 3d 2d 2e 32 2d 61 64 2a 70 6f 77 28 61 62 73 28 61 64 29 2c 2e 38 29 2a 2e 32 3b 72 64 3d py=-.2-ad*pow(abs(ad),.8)*.2;rd=
58c0 2e 30 36 2b 69 2a 2e 30 31 3b 0d 0a 70 7a 3d 63 6f 73 28 62 64 29 2a 72 64 3b 0d 0a 70 78 3d 73 .06+i*.01;..pz=cos(bd)*rd;..px=s
58e0 69 6e 28 62 64 29 2a 72 64 3b 0d 0a 70 70 78 3d 70 78 2a 63 63 2d 70 79 2a 73 63 3b 0d 0a 70 70 in(bd)*rd;..ppx=px*cc-py*sc;..pp
5900 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 79 3d 70 70 79 3b 0d 0a 70 78 3d 70 70 78 2b y=px*sc+py*cc;..py=ppy;..px=ppx+
5920 6f 78 2b 73 66 2a 2e 33 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 64 2d 70 79 2a 73 64 3b 0d 0a 70 70 79 ox+sf*.3;..ppz=pz*cd-py*sd;..ppy
5940 3d 70 7a 2a 73 64 2b 70 79 2a 63 64 3b 0d 0a 70 79 3d 70 70 79 2b 6f 79 2d 2e 32 35 3b 0d 0a 70 =pz*sd+py*cd;..py=ppy+oy-.25;..p
5960 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 3b 0d 0a 73 6b 69 70 3d 61 62 6f 76 65 28 73 71 72 28 z=ppz+oz+sa*.3;..skip=above(sqr(
5980 70 78 29 2b 73 71 72 28 70 7a 29 2c 73 6b 64 64 29 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a px)+sqr(pz),skdd);..x1=px*cy-pz*
59a0 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a sy;z1=px*sy+pz*cy;..y2=py*cx-z1*
59c0 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a sx;z2=py*sx+z1*cx;..x3=x1*cz-y2*
59e0 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 sz;y3=x1*sz+y2*cz;..dt=if(above(
5a00 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c z2,.01),1/z2,0);..x=if(dt,x3*dt,
5a20 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 72 65 64 3d 31 3b 67 x);y=if(dt,y3*dt*af,y);..red=1;g
5a40 72 65 65 6e 3d 72 65 64 3b 62 6c 75 65 3d 72 65 64 3b 0d 0a 73 69 7a 65 78 3d 64 74 2a 6c 73 2a reen=red;blue=red;..sizex=dt*ls*
5a60 2e 30 35 3b 73 69 7a 65 79 3d 73 69 7a 65 78 3b 28 00 00 00 04 00 00 00 04 00 03 80 24 00 00 00 .05;sizey=sizex;(...........$...
5a80 d5 05 00 00 01 d9 01 00 00 64 74 3d 69 2a 74 70 69 2a 31 39 3b 0d 0a 61 64 3d 63 6f 73 28 64 74 .........dt=i*tpi*19;..ad=cos(dt
5aa0 29 2a 2e 34 2d 2e 34 3b 62 64 3d 69 2a 74 70 69 3b 0d 0a 70 79 3d 2d 2e 31 39 2d 61 64 2a 2e 32 )*.4-.4;bd=i*tpi;..py=-.19-ad*.2
5ac0 35 3b 0d 0a 70 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 30 32 3b 0d 0a 70 78 3d 5;..pz=sin(dt)*cos(bd)*.02;..px=
5ae0 73 69 6e 28 64 74 29 2a 73 69 6e 28 62 64 29 2a 2e 30 32 3b 0d 0a 70 70 78 3d 70 78 2a 63 63 2d sin(dt)*sin(bd)*.02;..ppx=px*cc-
5b00 70 79 2a 73 63 3b 0d 0a 70 70 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 78 3d 70 70 78 py*sc;..ppy=px*sc+py*cc;..px=ppx
5b20 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 64 2d 70 78 2a 73 64 3b 0d 0a 70 70 78 3d 70 7a 2a 73 64 2b 70 ;..ppz=pz*cd-px*sd;..ppx=pz*sd+p
5b40 78 2a 63 64 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 2d 2e 30 33 3b 0d 0a 70 79 3d x*cd;..pz=ppz+oz+sa*.3-.03;..py=
5b60 70 70 79 2b 6f 79 2d 2e 32 33 3b 0d 0a 70 78 3d 70 70 78 2b 6f 78 2d 2e 30 33 2b 73 66 2a 2e 32 ppy+oy-.23;..px=ppx+ox-.03+sf*.2
5b80 35 3b 0d 0a 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 5;....x1=px*cy-pz*sy;z1=px*sy+pz
5ba0 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 *cy;..y2=py*cx-z1*sx;z2=py*sx+z1
5bc0 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 *cx;..x3=x1*cz-y2*sz;y3=x1*sz+y2
5be0 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 *cz;..dt=if(above(z2,.01),1/z2,0
5c00 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a );..x=if(dt,x3*dt,x);y=if(dt,y3*
5c20 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 64 dt*af,y);..linesize=dt*ls;..dt=d
5c40 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 31 3b 67 72 65 65 6e 3d 31 3b 62 6c 75 65 3d 31 t*0.6*ccd;..red=1;green=1;blue=1
5c60 3b 00 82 02 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e ;.....mv=getspec(0,.5,0)*.1+mv*.
5c80 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 9;sv=min(1,mv*6);bt=bt+1;t=t+0.0
5ca0 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 2;..ox=reg00;oy=reg01;oz=reg02;r
5cc0 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 x=reg03;ry=reg04;rz=reg05;cx=reg
5ce0 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 06;sx=reg07;cy=reg08;sy=reg09;cz
5d00 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 =reg10;sz=reg11;..x=0;y=0;af=w/h
5d20 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 ;mp=mp+1.5/mf;..dd=reg20;..ccd=(
5d40 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 32 35 2b reg20)*1.6;..an=(sin(mp*2)*.125+
5d60 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 73 61 3d 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 .01)*sv*td+an*.6;sa=sin(an);fn=(
5d80 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b sin(mp*2))*sv*(1-td)*.125+fn*.6;
5da0 73 66 3d 73 69 6e 28 66 6e 29 3b 63 6e 3d 28 28 28 73 69 6e 28 6d 70 2a 34 29 2a 2e 36 2b 73 69 sf=sin(fn);cn=(((sin(mp*4)*.6+si
5dc0 6e 28 6d 70 2a 2e 39 29 2a 2e 35 29 2a 62 65 6c 6f 77 28 6d 64 2c 32 29 29 2a 73 76 2d 31 2e 35 n(mp*.9)*.5)*below(md,2))*sv-1.5
5de0 2d 61 62 6f 76 65 28 6d 64 2c 32 29 2a 2e 37 2d 28 31 2d 73 76 29 2a 2e 37 29 2a 2e 33 2b 63 6e -above(md,2)*.7-(1-sv)*.7)*.3+cn
5e00 2a 2e 37 3b 63 63 3d 63 6f 73 28 63 6e 29 3b 73 63 3d 73 69 6e 28 63 6e 29 3b 64 6e 3d 28 28 73 *.7;cc=cos(cn);sc=sin(cn);dn=((s
5e20 69 6e 28 6d 70 2a 33 29 2a 2e 37 2a 73 76 2b 2e 37 29 2a 61 62 6f 76 65 28 6d 64 2c 30 29 29 2a in(mp*3)*.7*sv+.7)*above(md,0))*
5e40 2e 33 2b 64 6e 2a 2e 37 3b 63 64 3d 63 6f 73 28 64 6e 29 3b 73 64 3d 73 69 6e 28 64 6e 29 3b 6d .3+dn*.7;cd=cos(dn);sd=sin(dn);m
5e60 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 32 2a 77 2f 33 32 30 3b 0d 0a 6e 3d 69 66 28 f=mf*.92+.8;..ls=2*w/320;..n=if(
5e80 62 65 6c 6f 77 28 2d 73 79 2c 2d 30 2e 31 29 2a 62 65 6c 6f 77 28 6f 79 2c 2e 34 35 29 2c 39 30 below(-sy,-0.1)*below(oy,.45),90
5ea0 2c 30 29 3b 0d 0a 0d 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 ,0);....an=reg60;ca=reg61;sa=reg
5ec0 36 32 3b 66 6e 3d 72 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 62;fn=reg63;cf=reg64;sf=reg65;mf
5ee0 3d 72 65 67 36 36 3b 00 29 01 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e =reg66;.)...ot=min(0,getspec(0,.
5f00 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 1,0)*2-1)*((getosc(.3,0,0)*200)%
5f20 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 2);t=t+5*(ot+if(ot,1,0));mf=(bt-
5f40 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 69 66 28 28 28 67 65 74 6f 73 mt)*.5+mf*.7;mt=bt;md=if(((getos
5f60 63 28 2e 31 31 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 38 2c 30 2c 30 29 2b 67 65 74 6f 73 c(.11,0,0)+getosc(.98,0,0)+getos
5f80 63 28 2e 32 33 2c 30 2c 30 29 29 2a 31 30 30 29 25 32 2c 28 28 67 65 74 6f 73 63 28 2e 32 35 38 c(.23,0,0))*100)%2,((getosc(.258
5fa0 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 37 34 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 38 38 ,0,0)+getosc(.74,0,0)+getosc(.88
5fc0 2c 30 2c 30 29 29 2a 31 30 30 29 25 34 2c 6d 64 29 3b 6d 67 3d 6d 67 2a 2e 38 2b 6d 64 2a 2e 32 ,0,0))*100)%4,md);mg=mg*.8+md*.2
5fe0 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 6f ;td=if(getosc(.4,0,0)*255%2,geto
6000 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 30 00 00 00 6e 3d 39 30 3b 74 70 sc(.6,0,0)*255%2,td).0...n=90;tp
6020 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 4c i=acos(-1)*2;t=0;mf=100;mt=0;..L
6040 65 66 74 20 41 72 6d 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 d7 05 00 eft.Arm;.................$......
6060 00 01 d9 01 00 00 64 74 3d 69 2a 74 70 69 2a 31 39 3b 0d 0a 61 64 3d 63 6f 73 28 64 74 29 2a 2e ......dt=i*tpi*19;..ad=cos(dt)*.
6080 34 2d 2e 34 3b 62 64 3d 69 2a 74 70 69 3b 0d 0a 70 79 3d 2d 2e 31 39 2d 61 64 2a 2e 32 35 3b 0d 4-.4;bd=i*tpi;..py=-.19-ad*.25;.
60a0 0a 70 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 30 32 3b 0d 0a 70 78 3d 73 69 6e .pz=sin(dt)*cos(bd)*.02;..px=sin
60c0 28 64 74 29 2a 73 69 6e 28 62 64 29 2a 2e 30 32 3b 0d 0a 70 70 78 3d 70 78 2a 63 63 2d 70 79 2a (dt)*sin(bd)*.02;..ppx=px*cc-py*
60e0 73 63 3b 0d 0a 70 70 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 78 3d 70 70 78 3b 0d 0a sc;..ppy=px*sc+py*cc;..px=ppx;..
6100 70 70 7a 3d 70 7a 2a 63 64 2d 70 78 2a 73 64 3b 0d 0a 70 70 78 3d 70 7a 2a 73 64 2b 70 78 2a 63 ppz=pz*cd-px*sd;..ppx=pz*sd+px*c
6120 64 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 2d 2e 30 33 3b 0d 0a 70 79 3d 70 70 79 d;..pz=ppz+oz+sa*.3-.03;..py=ppy
6140 2b 6f 79 2d 2e 32 33 3b 0d 0a 70 78 3d 70 70 78 2b 6f 78 2b 2e 30 33 2b 73 66 2a 2e 32 35 3b 0d +oy-.23;..px=ppx+ox+.03+sf*.25;.
6160 0a 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 ...x1=px*cy-pz*sy;z1=px*sy+pz*cy
6180 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 ;..y2=py*cx-z1*sx;z2=py*sx+z1*cx
61a0 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a ;..x3=x1*cz-y2*sz;y3=x1*sz+y2*cz
61c0 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b 0d ;..dt=if(above(z2,.01),1/z2,0);.
61e0 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a .x=if(dt,x3*dt,x);y=if(dt,y3*dt*
6200 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 64 74 2a 30 af,y);..linesize=dt*ls;..dt=dt*0
6220 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 31 3b 67 72 65 65 6e 3d 31 3b 62 6c 75 65 3d 31 3b 00 85 .6*ccd;..red=1;green=1;blue=1;..
6240 02 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 ...mv=getspec(0,.5,0)*.1+mv*.9;s
6260 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d v=min(1,mv*6);bt=bt+1;t=t+0.02;.
6280 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 .ox=reg00;oy=reg01;oz=reg02;rx=r
62a0 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b eg03;ry=reg04;rz=reg05;cx=reg06;
62c0 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 sx=reg07;cy=reg08;sy=reg09;cz=re
62e0 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 g10;sz=reg11;..x=0;y=0;af=w/h;mp
6300 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 =mp+1.5/mf;..dd=reg20;..ccd=(reg
6320 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 32 35 2b 2e 30 31 20)*1.6;..an=(sin(mp*2)*.125+.01
6340 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 73 61 3d 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e )*sv*td+an*.6;sa=sin(an);fn=(sin
6360 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b 73 66 3d (mp*2))*sv*(1-td)*.125+fn*.6;sf=
6380 73 69 6e 28 66 6e 29 3b 63 6e 3d 28 28 28 73 69 6e 28 6d 70 2a 33 2b 6d 67 29 2a 2e 36 2b 73 69 sin(fn);cn=(((sin(mp*3+mg)*.6+si
63a0 6e 28 6d 70 2a 2e 39 29 2a 2e 35 29 2a 62 65 6c 6f 77 28 6d 64 2c 32 29 29 2a 73 76 2b 31 2e 35 n(mp*.9)*.5)*below(md,2))*sv+1.5
63c0 2d 61 62 6f 76 65 28 6d 64 2c 32 29 2a 2e 37 2b 28 31 2d 73 76 29 2a 2e 37 29 2a 2e 33 2b 63 6e -above(md,2)*.7+(1-sv)*.7)*.3+cn
63e0 2a 2e 37 3b 63 63 3d 63 6f 73 28 63 6e 29 3b 73 63 3d 73 69 6e 28 63 6e 29 3b 64 6e 3d 28 28 2d *.7;cc=cos(cn);sc=sin(cn);dn=((-
6400 73 69 6e 28 6d 70 2a 34 29 2a 2e 37 2a 73 76 2d 2e 37 29 2a 61 62 6f 76 65 28 6d 64 2c 30 29 29 sin(mp*4)*.7*sv-.7)*above(md,0))
6420 2a 2e 33 2b 64 6e 2a 2e 37 3b 63 64 3d 63 6f 73 28 64 6e 29 3b 73 64 3d 73 69 6e 28 64 6e 29 3b *.3+dn*.7;cd=cos(dn);sd=sin(dn);
6440 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 32 2a 77 2f 33 32 30 3b 0d 0a 6e 3d 69 66 mf=mf*.92+.8;..ls=2*w/320;..n=if
6460 28 62 65 6c 6f 77 28 73 79 2c 2d 30 2e 31 29 2a 62 65 6c 6f 77 28 6f 79 2c 2e 34 35 29 2c 39 30 (below(sy,-0.1)*below(oy,.45),90
6480 2c 30 29 3b 0d 0a 0d 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 ,0);....an=reg60;ca=reg61;sa=reg
64a0 36 32 3b 66 6e 3d 72 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 62;fn=reg63;cf=reg64;sf=reg65;mf
64c0 3d 72 65 67 36 36 3b 00 27 01 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e =reg66;.'...ot=min(0,getspec(0,.
64e0 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 1,0)*2-1)*((getosc(.3,0,0)*200)%
6500 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 2);t=t+5*(ot+if(ot,1,0));mf=(bt-
6520 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 69 66 28 28 28 67 65 74 6f 73 mt)*.5+mf*.7;mt=bt;md=if(((getos
6540 63 28 2e 33 35 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 36 39 2c 30 2c 30 29 2b 67 65 74 6f 73 c(.35,0,0)+getosc(.69,0,0)+getos
6560 63 28 2e 31 2c 30 2c 30 29 29 2a 31 30 30 29 25 32 2c 28 28 67 65 74 6f 73 63 28 2e 30 39 2c 30 c(.1,0,0))*100)%2,((getosc(.09,0
6580 2c 30 29 2b 67 65 74 6f 73 63 28 2e 35 31 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 36 36 2c 30 ,0)+getosc(.51,0,0)+getosc(.66,0
65a0 2c 30 29 29 2a 31 30 30 29 25 34 2c 6d 64 29 3b 6d 67 3d 6d 67 2a 2e 38 2b 6d 64 2a 2e 32 3b 74 ,0))*100)%4,md);mg=mg*.8+md*.2;t
65c0 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 6f 73 63 d=if(getosc(.4,0,0)*255%2,getosc
65e0 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 31 00 00 00 6e 3d 39 30 3b 74 70 69 3d (.6,0,0)*255%2,td).1...n=90;tpi=
6600 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 52 69 67 acos(-1)*2;t=0;mf=100;mt=0;..Rig
6620 68 74 20 41 72 6d 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 28 00 00 00 04 00 00 00 ht.Arm;.................(.......
6640 02 00 03 80 24 00 00 00 ae 05 00 00 01 dd 01 00 00 64 74 3d 69 2a 74 70 69 2a 31 39 3b 0d 0a 61 ....$............dt=i*tpi*19;..a
6660 64 3d 63 6f 73 28 64 74 29 2a 2e 34 2d 2e 34 3b 62 64 3d 69 2a 74 70 69 3b 0d 0a 70 79 3d 2d 2e d=cos(dt)*.4-.4;bd=i*tpi;..py=-.
6680 31 39 2d 61 64 2a 2e 32 35 3b 0d 0a 70 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 19-ad*.25;..pz=sin(dt)*cos(bd)*.
66a0 30 32 3b 0d 0a 70 78 3d 73 69 6e 28 64 74 29 2a 73 69 6e 28 62 64 29 2a 2e 30 32 3b 0d 0a 70 70 02;..px=sin(dt)*sin(bd)*.02;..pp
66c0 78 3d 70 78 2a 63 63 2d 70 79 2a 73 63 3b 0d 0a 70 70 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b x=px*cc-py*sc;..ppy=px*sc+py*cc;
66e0 0d 0a 70 78 3d 70 70 78 3b 0d 0a 70 70 7a 3d 70 7a 2a 63 64 2d 70 78 2a 73 64 3b 0d 0a 70 70 78 ..px=ppx;..ppz=pz*cd-px*sd;..ppx
6700 3d 70 7a 2a 73 64 2b 70 78 2a 63 64 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 2d 2e =pz*sd+px*cd;..pz=ppz+oz+sa*.3-.
6720 30 33 3b 0d 0a 70 79 3d 70 70 79 2b 6f 79 2d 2e 32 33 3b 0d 0a 70 78 3d 70 70 78 2b 6f 78 2d 2e 03;..py=ppy+oy-.23;..px=ppx+ox-.
6740 30 33 2b 73 66 2a 2e 32 35 3b 0d 0a 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 03+sf*.25;....x1=px*cy-pz*sy;z1=
6760 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d px*sy+pz*cy;..y2=py*cx-z1*sx;z2=
6780 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d py*sx+z1*cx;..x3=x1*cz-y2*sz;y3=
67a0 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 x1*sz+y2*cz;..dt=if(above(z2,.01
67c0 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 ),1/z2,0);..x=if(dt,x3*dt,x);y=i
67e0 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c f(dt,y3*dt*af,y);..linesize=dt*l
6800 73 3b 0d 0a 64 74 3d 64 74 2a 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 64 74 2d 2e 32 3b 67 72 s;..dt=dt*0.6*ccd;..red=dt-.2;gr
6820 65 65 6e 3d 30 3b 62 6c 75 65 3d 30 3b 00 57 02 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e een=0;blue=0;.W...mv=getspec(0,.
6840 35 2c 30 29 2a 2e 31 2b 6d 76 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 5,0)*.1+mv*.9;sv=min(1,mv*6);bt=
6860 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 bt+1;t=t+0.02;..ox=reg00;oy=reg0
6880 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 1;oz=reg02;rx=reg03;ry=reg04;rz=
68a0 72 65 67 30 35 3b 63 78 3d 72 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 reg05;cx=reg06;sx=reg07;cy=reg08
68c0 3b 73 79 3d 72 65 67 30 39 3b 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d ;sy=reg09;cz=reg10;sz=reg11;..x=
68e0 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 0;y=0;af=w/h;mp=mp+1.5/mf;..dd=r
6900 65 67 32 30 3b 0d 0a 63 63 64 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e eg20;..ccd=(reg20)*1.6;..an=(sin
6920 28 6d 70 2a 32 29 2a 2e 31 32 35 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 73 61 3d (mp*2)*.125+.01)*sv*td+an*.6;sa=
6940 73 69 6e 28 61 6e 29 3b 66 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 sin(an);fn=(sin(mp*2))*sv*(1-td)
6960 2a 2e 31 32 35 2b 66 6e 2a 2e 36 3b 73 66 3d 73 69 6e 28 66 6e 29 3b 63 6e 3d 28 28 28 73 69 6e *.125+fn*.6;sf=sin(fn);cn=(((sin
6980 28 6d 70 2a 34 29 2a 2e 36 2b 73 69 6e 28 6d 70 2a 2e 39 29 2a 2e 35 29 2a 62 65 6c 6f 77 28 6d (mp*4)*.6+sin(mp*.9)*.5)*below(m
69a0 64 2c 32 29 29 2a 73 76 2d 31 2e 35 2d 61 62 6f 76 65 28 6d 64 2c 32 29 2a 2e 37 2d 28 31 2d 73 d,2))*sv-1.5-above(md,2)*.7-(1-s
69c0 76 29 2a 2e 37 29 2a 2e 33 2b 63 6e 2a 2e 37 3b 63 63 3d 63 6f 73 28 63 6e 29 3b 73 63 3d 73 69 v)*.7)*.3+cn*.7;cc=cos(cn);sc=si
69e0 6e 28 63 6e 29 3b 64 6e 3d 28 28 73 69 6e 28 6d 70 2a 33 29 2a 2e 37 2a 73 76 2b 2e 37 29 2a 61 n(cn);dn=((sin(mp*3)*.7*sv+.7)*a
6a00 62 6f 76 65 28 6d 64 2c 30 29 29 2a 2e 33 2b 64 6e 2a 2e 37 3b 63 64 3d 63 6f 73 28 64 6e 29 3b bove(md,0))*.3+dn*.7;cd=cos(dn);
6a20 73 64 3d 73 69 6e 28 64 6e 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 32 2a 77 sd=sin(dn);mf=mf*.92+.8;..ls=2*w
6a40 2f 33 32 30 3b 0d 0a 0d 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 /320;....an=reg60;ca=reg61;sa=re
6a60 67 36 32 3b 66 6e 3d 72 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d g62;fn=reg63;cf=reg64;sf=reg65;m
6a80 66 3d 72 65 67 36 36 3b 00 29 01 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c f=reg66;.)...ot=min(0,getspec(0,
6aa0 2e 31 2c 30 29 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 .1,0)*2-1)*((getosc(.3,0,0)*200)
6ac0 25 32 29 3b 74 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 %2);t=t+5*(ot+if(ot,1,0));mf=(bt
6ae0 2d 6d 74 29 2a 2e 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 69 66 28 28 28 67 65 74 6f -mt)*.5+mf*.7;mt=bt;md=if(((geto
6b00 73 63 28 2e 31 31 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 39 38 2c 30 2c 30 29 2b 67 65 74 6f sc(.11,0,0)+getosc(.98,0,0)+geto
6b20 73 63 28 2e 32 33 2c 30 2c 30 29 29 2a 31 30 30 29 25 32 2c 28 28 67 65 74 6f 73 63 28 2e 32 35 sc(.23,0,0))*100)%2,((getosc(.25
6b40 38 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 37 34 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 38 8,0,0)+getosc(.74,0,0)+getosc(.8
6b60 38 2c 30 2c 30 29 29 2a 31 30 30 29 25 34 2c 6d 64 29 3b 6d 67 3d 6d 67 2a 2e 38 2b 6d 64 2a 2e 8,0,0))*100)%4,md);mg=mg*.8+md*.
6b80 32 3b 74 64 3d 69 66 28 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 2;td=if(getosc(.4,0,0)*255%2,get
6ba0 6f 73 63 28 2e 36 2c 30 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 30 00 00 00 6e 3d 39 30 3b 74 osc(.6,0,0)*255%2,td).0...n=90;t
6bc0 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 pi=acos(-1)*2;t=0;mf=100;mt=0;..
6be0 4c 65 66 74 20 41 72 6d 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 b1 05 Left.Arm;.................$.....
6c00 00 00 01 dd 01 00 00 64 74 3d 69 2a 74 70 69 2a 31 39 3b 0d 0a 61 64 3d 63 6f 73 28 64 74 29 2a .......dt=i*tpi*19;..ad=cos(dt)*
6c20 2e 34 2d 2e 34 3b 62 64 3d 69 2a 74 70 69 3b 0d 0a 70 79 3d 2d 2e 31 39 2d 61 64 2a 2e 32 35 3b .4-.4;bd=i*tpi;..py=-.19-ad*.25;
6c40 0d 0a 70 7a 3d 73 69 6e 28 64 74 29 2a 63 6f 73 28 62 64 29 2a 2e 30 32 3b 0d 0a 70 78 3d 73 69 ..pz=sin(dt)*cos(bd)*.02;..px=si
6c60 6e 28 64 74 29 2a 73 69 6e 28 62 64 29 2a 2e 30 32 3b 0d 0a 70 70 78 3d 70 78 2a 63 63 2d 70 79 n(dt)*sin(bd)*.02;..ppx=px*cc-py
6c80 2a 73 63 3b 0d 0a 70 70 79 3d 70 78 2a 73 63 2b 70 79 2a 63 63 3b 0d 0a 70 78 3d 70 70 78 3b 0d *sc;..ppy=px*sc+py*cc;..px=ppx;.
6ca0 0a 70 70 7a 3d 70 7a 2a 63 64 2d 70 78 2a 73 64 3b 0d 0a 70 70 78 3d 70 7a 2a 73 64 2b 70 78 2a .ppz=pz*cd-px*sd;..ppx=pz*sd+px*
6cc0 63 64 3b 0d 0a 70 7a 3d 70 70 7a 2b 6f 7a 2b 73 61 2a 2e 33 2d 2e 30 33 3b 0d 0a 70 79 3d 70 70 cd;..pz=ppz+oz+sa*.3-.03;..py=pp
6ce0 79 2b 6f 79 2d 2e 32 33 3b 0d 0a 70 78 3d 70 70 78 2b 6f 78 2b 2e 30 33 2b 73 66 2a 2e 32 35 3b y+oy-.23;..px=ppx+ox+.03+sf*.25;
6d00 0d 0a 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 ....x1=px*cy-pz*sy;z1=px*sy+pz*c
6d20 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 y;..y2=py*cx-z1*sx;z2=py*sx+z1*c
6d40 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 x;..x3=x1*cz-y2*sz;y3=x1*sz+y2*c
6d60 7a 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c 2e 30 31 29 2c 31 2f 7a 32 2c 30 29 3b z;..dt=if(above(z2,.01),1/z2,0);
6d80 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 ..x=if(dt,x3*dt,x);y=if(dt,y3*dt
6da0 2a 61 66 2c 79 29 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 64 74 2a 6c 73 3b 0d 0a 64 74 3d 64 74 2a *af,y);..linesize=dt*ls;..dt=dt*
6dc0 30 2e 36 2a 63 63 64 3b 0d 0a 72 65 64 3d 64 74 2d 2e 32 3b 67 72 65 65 6e 3d 30 3b 62 6c 75 65 0.6*ccd;..red=dt-.2;green=0;blue
6de0 3d 30 3b 00 5b 02 00 00 6d 76 3d 67 65 74 73 70 65 63 28 30 2c 2e 35 2c 30 29 2a 2e 31 2b 6d 76 =0;.[...mv=getspec(0,.5,0)*.1+mv
6e00 2a 2e 39 3b 73 76 3d 6d 69 6e 28 31 2c 6d 76 2a 36 29 3b 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 *.9;sv=min(1,mv*6);bt=bt+1;t=t+0
6e20 2e 30 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 .02;..ox=reg00;oy=reg01;oz=reg02
6e40 3b 72 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 ;rx=reg03;ry=reg04;rz=reg05;cx=r
6e60 65 67 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b eg06;sx=reg07;cy=reg08;sy=reg09;
6e80 63 7a 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 cz=reg10;sz=reg11;..x=0;y=0;af=w
6ea0 2f 68 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 63 63 64 /h;mp=mp+1.5/mf;..dd=reg20;..ccd
6ec0 3d 28 72 65 67 32 30 29 2a 31 2e 36 3b 0d 0a 61 6e 3d 28 73 69 6e 28 6d 70 2a 32 29 2a 2e 31 32 =(reg20)*1.6;..an=(sin(mp*2)*.12
6ee0 35 2b 2e 30 31 29 2a 73 76 2a 74 64 2b 61 6e 2a 2e 36 3b 73 61 3d 73 69 6e 28 61 6e 29 3b 66 6e 5+.01)*sv*td+an*.6;sa=sin(an);fn
6f00 3d 28 73 69 6e 28 6d 70 2a 32 29 29 2a 73 76 2a 28 31 2d 74 64 29 2a 2e 31 32 35 2b 66 6e 2a 2e =(sin(mp*2))*sv*(1-td)*.125+fn*.
6f20 36 3b 73 66 3d 73 69 6e 28 66 6e 29 3b 63 6e 3d 28 28 28 73 69 6e 28 6d 70 2a 33 2b 6d 67 29 2a 6;sf=sin(fn);cn=(((sin(mp*3+mg)*
6f40 2e 36 2b 73 69 6e 28 6d 70 2a 2e 39 29 2a 2e 35 29 2a 62 65 6c 6f 77 28 6d 64 2c 32 29 29 2a 73 .6+sin(mp*.9)*.5)*below(md,2))*s
6f60 76 2b 31 2e 35 2d 61 62 6f 76 65 28 6d 64 2c 32 29 2a 2e 37 2b 28 31 2d 73 76 29 2a 2e 37 29 2a v+1.5-above(md,2)*.7+(1-sv)*.7)*
6f80 2e 33 2b 63 6e 2a 2e 37 3b 63 63 3d 63 6f 73 28 63 6e 29 3b 73 63 3d 73 69 6e 28 63 6e 29 3b 64 .3+cn*.7;cc=cos(cn);sc=sin(cn);d
6fa0 6e 3d 28 28 2d 73 69 6e 28 6d 70 2a 34 29 2a 2e 37 2a 73 76 2d 2e 37 29 2a 61 62 6f 76 65 28 6d n=((-sin(mp*4)*.7*sv-.7)*above(m
6fc0 64 2c 30 29 29 2a 2e 33 2b 64 6e 2a 2e 37 3b 63 64 3d 63 6f 73 28 64 6e 29 3b 73 64 3d 73 69 6e d,0))*.3+dn*.7;cd=cos(dn);sd=sin
6fe0 28 64 6e 29 3b 6d 66 3d 6d 66 2a 2e 39 32 2b 2e 38 3b 0d 0a 6c 73 3d 32 2a 77 2f 33 32 30 3b 0d (dn);mf=mf*.92+.8;..ls=2*w/320;.
7000 0a 0d 0a 61 6e 3d 72 65 67 36 30 3b 63 61 3d 72 65 67 36 31 3b 73 61 3d 72 65 67 36 32 3b 66 6e ...an=reg60;ca=reg61;sa=reg62;fn
7020 3d 72 65 67 36 33 3b 63 66 3d 72 65 67 36 34 3b 73 66 3d 72 65 67 36 35 3b 6d 66 3d 72 65 67 36 =reg63;cf=reg64;sf=reg65;mf=reg6
7040 36 3b 00 27 01 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 2a 6;.'...ot=min(0,getspec(0,.1,0)*
7060 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 3d 2-1)*((getosc(.3,0,0)*200)%2);t=
7080 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a 2e t+5*(ot+if(ot,1,0));mf=(bt-mt)*.
70a0 35 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b 6d 64 3d 69 66 28 28 28 67 65 74 6f 73 63 28 2e 33 35 5+mf*.7;mt=bt;md=if(((getosc(.35
70c0 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 36 39 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 31 2c ,0,0)+getosc(.69,0,0)+getosc(.1,
70e0 30 2c 30 29 29 2a 31 30 30 29 25 32 2c 28 28 67 65 74 6f 73 63 28 2e 30 39 2c 30 2c 30 29 2b 67 0,0))*100)%2,((getosc(.09,0,0)+g
7100 65 74 6f 73 63 28 2e 35 31 2c 30 2c 30 29 2b 67 65 74 6f 73 63 28 2e 36 36 2c 30 2c 30 29 29 2a etosc(.51,0,0)+getosc(.66,0,0))*
7120 31 30 30 29 25 34 2c 6d 64 29 3b 6d 67 3d 6d 67 2a 2e 38 2b 6d 64 2a 2e 32 3b 74 64 3d 69 66 28 100)%4,md);mg=mg*.8+md*.2;td=if(
7140 67 65 74 6f 73 63 28 2e 34 2c 30 2c 30 29 2a 32 35 35 25 32 2c 67 65 74 6f 73 63 28 2e 36 2c 30 getosc(.4,0,0)*255%2,getosc(.6,0
7160 2c 30 29 2a 32 35 35 25 32 2c 74 64 29 00 31 00 00 00 6e 3d 39 30 3b 74 70 69 3d 61 63 6f 73 28 ,0)*255%2,td).1...n=90;tpi=acos(
7180 2d 31 29 2a 32 3b 74 3d 30 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 3b a4 20 52 69 67 68 74 20 41 72 -1)*2;t=0;mf=100;mt=0;..Right.Ar
71a0 6d 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 fe ff ff ff 71 00 00 00 80 00 01 01 24 m;.....................q.......$
71c0 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 00 00 ................................
71e0 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 67 00 .@..AVS.2.8+.Effect.List.Config.
7200 00 00 00 00 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 12 00 00 00 10 00 00 00 00 00 00 00 ................................
7220 01 00 00 00 00 00 00 00 80 00 00 00 88 71 af 03 43 6f 6c 6f 72 20 4d 61 70 00 00 00 00 00 00 00 .............q..Color.Map.......
7240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 b0 02 00 00 04 00 00 00 00 00 00 00 00 00 00 00 ................................
7260 00 00 00 08 01 00 00 00 02 00 00 00 c8 e6 fa 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7280 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 ................................
72a0 00 00 00 00 02 00 00 00 20 b7 f8 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
72c0 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 ................................
72e0 02 00 00 00 88 e9 fa 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7300 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 ................................
7320 c8 55 01 02 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 .U..............................
7340 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 90 86 01 02 ................................
7360 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 ................................
7380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 a0 67 f4 01 00 00 00 00 .........................g......
73a0 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 ................................
73c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 60 41 e5 01 00 00 00 00 00 00 00 00 ....................`A..........
73e0 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 ................................
7400 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 68 36 0c 02 00 00 00 00 00 00 00 00 00 00 00 00 ................h6..............
7420 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 ................................
7440 00 00 00 00 0d 00 00 00 00 00 00 00 00 00 00 00 11 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00 ................................
7460 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 ................................
7480 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 ................................
74a0 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 ................................
74c0 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 ................................
74e0 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 ................................
7500 01 00 00 00 12 00 00 00 10 00 00 00 01 00 00 00 01 00 00 00 02 00 00 00 80 00 00 00 50 85 dc 03 ............................P...
7520 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 49 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 Acko.net:.Texer.II..............
7540 50 04 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 P...............................
7560 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 ................................
7580 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 ................................
75a0 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 ................................
75c0 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 ................................
75e0 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 ................................
7600 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 ................................
7620 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 ................................
7640 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 2d 00 00 00 ............................-...
7660 6e 3d 35 30 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 6d 66 3d 31 30 30 3b 6d 74 3d 30 n=500;tpi=acos(-1)*2;mf=100;mt=0
7680 3b a4 20 53 6e 6f 77 2f 44 75 73 74 3b d3 00 00 00 62 74 3d 62 74 2b 31 3b 74 3d 74 2b 30 2e 30 ;..Snow/Dust;....bt=bt+1;t=t+0.0
76a0 32 3b 0d 0a 6f 78 3d 72 65 67 30 30 3b 6f 79 3d 72 65 67 30 31 3b 6f 7a 3d 72 65 67 30 32 3b 72 2;..ox=reg00;oy=reg01;oz=reg02;r
76c0 78 3d 72 65 67 30 33 3b 72 79 3d 72 65 67 30 34 3b 72 7a 3d 72 65 67 30 35 3b 63 78 3d 72 65 67 x=reg03;ry=reg04;rz=reg05;cx=reg
76e0 30 36 3b 73 78 3d 72 65 67 30 37 3b 63 79 3d 72 65 67 30 38 3b 73 79 3d 72 65 67 30 39 3b 63 7a 06;sx=reg07;cy=reg08;sy=reg09;cz
7700 3d 72 65 67 31 30 3b 73 7a 3d 72 65 67 31 31 3b 0d 0a 78 3d 30 3b 79 3d 30 3b 61 66 3d 77 2f 68 =reg10;sz=reg11;..x=0;y=0;af=w/h
7720 3b 6d 70 3d 6d 70 2b 31 2e 35 2f 6d 66 3b 76 31 3d 31 32 35 3b 76 32 3d 31 33 35 3b 76 33 3d 34 ;mp=mp+1.5/mf;v1=125;v2=135;v3=4
7740 32 31 31 3b 78 3d 31 3b 79 3d 30 3b 0d 0a 0d 0a 64 64 3d 72 65 67 32 30 3b 0d 0a 73 73 3d 77 2f 211;x=1;y=0;....dd=reg20;..ss=w/
7760 33 32 30 3b 67 00 00 00 6f 74 3d 6d 69 6e 28 30 2c 67 65 74 73 70 65 63 28 30 2c 2e 31 2c 30 29 320;g...ot=min(0,getspec(0,.1,0)
7780 2a 32 2d 31 29 2a 28 28 67 65 74 6f 73 63 28 2e 33 2c 30 2c 30 29 2a 32 30 30 29 25 32 29 3b 74 *2-1)*((getosc(.3,0,0)*200)%2);t
77a0 3d 74 2b 35 2a 28 6f 74 2b 69 66 28 6f 74 2c 31 2c 30 29 29 3b 6d 66 3d 28 62 74 2d 6d 74 29 2a =t+5*(ot+if(ot,1,0));mf=(bt-mt)*
77c0 2e 33 2b 6d 66 2a 2e 37 3b 6d 74 3d 62 74 3b c1 01 00 00 76 31 3d 28 76 31 2a 34 32 31 31 2b 37 .3+mf*.7;mt=bt;....v1=(v1*4211+7
77e0 31 35 31 29 25 31 30 30 30 30 3b 0d 0a 76 32 3d 28 76 32 2a 31 31 35 37 33 2b 39 39 31 33 29 25 151)%10000;..v2=(v2*11573+9913)%
7800 31 30 30 30 30 3b 0d 0a 76 33 3d 28 76 33 2a 39 36 34 31 31 2b 31 36 32 31 39 29 25 31 30 30 30 10000;..v3=(v3*96411+16219)%1000
7820 30 3b 0d 0a 79 76 3d 2d 31 30 30 30 30 2b 28 28 76 32 2b 35 2a 62 74 2a 28 76 33 25 31 30 29 29 0;..yv=-10000+((v2+5*bt*(v3%10))
7840 25 31 32 30 30 30 29 3b 0d 0a 79 76 3d 6d 69 6e 28 30 2c 79 76 29 3b 0d 0a 70 78 3d 76 31 2a 2e %12000);..yv=min(0,yv);..px=v1*.
7860 30 30 30 31 35 2d 2e 35 2b 6f 78 3b 0d 0a 70 79 3d 79 76 2a 2e 30 30 30 31 2b 6f 79 3b 0d 0a 70 00015-.5+ox;..py=yv*.0001+oy;..p
7880 7a 3d 76 33 2a 2e 30 30 30 31 35 2d 2e 35 2b 6f 7a 3b 0d 0a 78 31 3d 70 78 2a 63 79 2d 70 7a 2a z=v3*.00015-.5+oz;..x1=px*cy-pz*
78a0 73 79 3b 7a 31 3d 70 78 2a 73 79 2b 70 7a 2a 63 79 3b 0d 0a 79 32 3d 70 79 2a 63 78 2d 7a 31 2a sy;z1=px*sy+pz*cy;..y2=py*cx-z1*
78c0 73 78 3b 7a 32 3d 70 79 2a 73 78 2b 7a 31 2a 63 78 3b 0d 0a 78 33 3d 78 31 2a 63 7a 2d 79 32 2a sx;z2=py*sx+z1*cx;..x3=x1*cz-y2*
78e0 73 7a 3b 79 33 3d 78 31 2a 73 7a 2b 79 32 2a 63 7a 3b 0d 0a 73 6b 69 70 3d 62 6e 6f 74 28 62 65 sz;y3=x1*sz+y2*cz;..skip=bnot(be
7900 6c 6f 77 28 7a 32 2c 64 64 2a 2e 38 29 29 3b 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 32 2c low(z2,dd*.8));..dt=if(above(z2,
7920 2e 30 35 29 2c 31 2f 7a 32 2c 30 29 3b 0d 0a 78 3d 69 66 28 64 74 2c 78 33 2a 64 74 2c 78 29 3b .05),1/z2,0);..x=if(dt,x3*dt,x);
7940 79 3d 69 66 28 64 74 2c 79 33 2a 64 74 2a 61 66 2c 79 29 3b 0d 0a 72 65 64 3d 64 74 2d 2e 35 3b y=if(dt,y3*dt*af,y);..red=dt-.5;
7960 67 72 65 65 6e 3d 72 65 64 3b 62 6c 75 65 3d 72 65 64 2a 31 2e 35 3b 0d 0a 73 69 7a 65 78 3d 64 green=red;blue=red*1.5;..sizex=d
7980 74 2a 2e 31 2a 73 73 3b 73 69 7a 65 79 3d 73 69 7a 65 78 3b t*.1*ss;sizey=sizex;