ofs | hex dump | ascii |
---|
0000 | 4e 75 6c 6c 73 6f 66 74 20 41 56 53 20 50 72 65 73 65 74 20 30 2e 32 1a 00 15 00 00 00 04 01 00 | Nullsoft.AVS.Preset.0.2......... |
0020 | 00 00 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 | .....___________________________ |
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 48 61 73 68 20 74 68 65 20 50 6c | .Whacko.Revisited....Hash.the.Pl |
0080 | 61 6e 65 74 0d 0a 20 20 52 65 6d 69 78 20 62 79 3a 20 44 75 6f 0d 0a 0d 0a 20 20 4f 72 69 67 69 | anet....Remix.by:.Duo......Origi |
00a0 | 6e 61 6c 3a 20 47 72 6f 6f 76 79 20 53 61 74 75 72 6e 0d 0a 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f | nal:.Groovy.Saturn..____________ |
00c0 | 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 | ________________________________ |
00e0 | 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 0d 0a af af af af af af af af af af af af af af af af af 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 0d 0a 00 fe ff ff ff 63 05 00 00 83 03 00 01 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 | .........c.......$.............. |
0140 | 00 00 00 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 | ...................@..AVS.2.8+.E |
0160 | 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 00 00 00 | ffect.List.Config............... |
0180 | 00 00 00 00 00 00 24 00 00 00 bd 00 00 00 01 6a 00 00 00 78 3d 30 3b 0d 0a 79 3d 69 2d 2e 35 3b | ......$........j...x=0;..y=i-.5; |
01a0 | 0d 0a 72 65 64 3d 76 2a 38 2d 73 69 6e 28 69 2a 32 30 2d 74 29 2a 38 2d 73 78 3b 0d 0a 67 72 65 | ..red=v*8-sin(i*20-t)*8-sx;..gre |
01c0 | 65 6e 3d 63 6f 73 28 69 2a 32 30 30 2b 63 78 29 2d 76 2a 38 2b 63 78 3b 0d 0a 62 6c 75 65 3d 67 | en=cos(i*200+cx)-v*8+cx;..blue=g |
01e0 | 65 74 6f 73 63 28 76 2c 30 2c 30 29 2a 32 30 2b 63 6f 73 28 74 2a 2e 35 29 3b 0d 0a 00 27 00 00 | etosc(v,0,0)*20+cos(t*.5);...'.. |
0200 | 00 74 3d 74 2b 2e 30 35 3b 73 78 3d 67 6d 65 67 61 62 75 66 28 31 29 3b 63 78 3d 67 6d 65 67 61 | .t=t+.05;sx=gmegabuf(1);cx=gmega |
0220 | 62 75 66 28 32 29 3b 00 05 00 00 00 74 3d 30 3b 00 06 00 00 00 6e 3d 31 30 30 00 02 00 00 00 01 | buf(2);.....t=0;.....n=100...... |
0240 | 00 00 00 a0 a0 a0 00 01 00 00 00 0f 00 00 00 44 00 00 00 ff 7f 00 00 01 27 00 00 00 73 66 3d 67 | ...............D........'...sf=g |
0260 | 6d 65 67 61 62 75 66 28 37 29 3b 0d 0a 64 3d 69 66 28 61 62 6f 76 65 28 64 2c 2e 33 29 2c 30 2c | megabuf(7);..d=if(above(d,.3),0, |
0280 | 64 29 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 88 71 ef 07 43 6f 6c 6f 72 | d)......................q..Color |
02a0 | 20 4d 61 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 40 03 00 00 04 | .Map.......................@.... |
02c0 | 00 00 00 03 00 00 00 01 00 00 00 c2 00 00 0d 01 00 00 00 03 00 00 00 70 9f 99 13 00 00 00 00 00 | .......................p........ |
02e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0300 | 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 03 00 00 00 f0 f8 4c 05 00 00 00 00 00 00 00 00 00 | .....................L.......... |
0320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0340 | 00 00 00 00 00 00 00 01 00 00 00 04 00 00 00 68 bf 08 01 00 00 00 00 00 00 00 00 00 00 00 00 00 | ...............h................ |
0360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0380 | 00 00 00 01 00 00 00 03 00 00 00 90 8f 63 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .............c.................. |
03a0 | 00 00 00 00 00 00 00 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 | ................................ |
03c0 | 00 00 00 03 00 00 00 48 82 52 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .......H.R...................... |
03e0 | 00 00 00 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 00 00 04 | ................................ |
0400 | 00 00 00 e0 f7 08 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 00 | ................................ |
0420 | 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 04 00 00 00 a8 | ................................ |
0440 | 9f 99 13 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 04 00 00 00 28 4e 62 05 00 | ...........................(Nb.. |
0480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
04a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d3 00 00 00 00 | ................................ |
04c0 | 80 ff 00 5c 1a 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 94 | ...\............................ |
04e0 | 00 00 00 ff 80 00 00 7a 6b 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00 00 00 00 00 00 | .......zk....................... |
0500 | 00 00 00 7b 00 00 00 80 00 ff 00 82 13 00 00 ce 00 00 00 00 ff ff 00 32 59 00 00 ff 00 00 00 ff | ...{...................2Y....... |
0520 | ff ff 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5f 00 00 00 ff 80 00 00 8e 06 00 00 ff | ..................._............ |
0540 | 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 00 00 00 45 da b5 00 17 | .......................\...E.... |
0560 | 3e 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 68 00 00 00 00 | >..........................h.... |
0580 | 80 ff 00 81 65 00 00 d7 00 00 00 00 ff ff 00 52 2b 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 00 | ....e..........R+............... |
05a0 | 00 00 00 00 00 00 00 00 00 00 00 5a 00 00 00 ff ff 80 00 c4 4e 00 00 b9 00 00 00 e4 85 45 00 2a | ...........Z........N........E.* |
05c0 | 1b 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 4f 00 00 00 00 | ...........................O.... |
05e0 | b3 00 00 75 11 00 00 cd 00 00 00 ff ff 00 00 10 5d 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 2b | ...u............]..............+ |
0600 | 00 00 00 59 00 00 00 01 1e 00 00 00 7a 3d 2e 38 2b 73 66 2a 31 2e 32 35 3b 0d 0a 78 3d 78 2a 7a | ...Y........z=.8+sf*1.25;..x=x*z |
0620 | 3b 0d 0a 79 3d 79 2a 7a 3b 00 0a 00 00 00 73 66 3d 72 65 67 30 36 3b 00 00 00 00 00 00 00 00 00 | ;..y=y*z;.....sf=reg06;......... |
0640 | 01 00 00 00 01 00 00 00 08 00 00 00 08 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0660 | 2c 00 00 00 04 00 00 00 00 00 00 00 2c 00 00 00 04 00 00 00 00 00 00 00 12 00 00 00 10 00 00 00 | ,...........,................... |
0680 | 00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 00 12 00 00 00 10 00 00 00 01 00 00 00 00 00 00 00 | ................................ |
06a0 | 0a 00 00 00 80 00 00 00 19 00 00 00 14 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 | ................................ |
06c0 | 00 00 00 00 19 00 00 00 14 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 | ................................ |
06e0 | 19 00 00 00 14 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 fe ff ff ff | ................................ |
0700 | bd 04 00 00 81 01 00 05 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ........$....................... |
0720 | 00 00 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 66 66 65 63 74 20 4c 69 73 | ..........@..AVS.2.8+.Effect.Lis |
0740 | 74 20 43 6f 6e 66 69 67 00 00 00 00 00 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 00 00 | t.Config.....................$.. |
0760 | 00 58 03 00 00 01 6d 02 00 00 70 78 3d 73 64 31 2f 32 36 32 31 34 34 2d 30 2e 31 32 35 3b 0d 0a | .X....m...px=sd1/262144-0.125;.. |
0780 | 70 79 3d 63 6f 73 28 61 6e 67 29 2a 72 61 64 3b 0d 0a 70 7a 3d 73 69 6e 28 61 6e 67 29 2a 72 61 | py=cos(ang)*rad;..pz=sin(ang)*ra |
07a0 | 64 3b 0d 0a 73 73 64 31 3d 28 73 64 31 2a 30 2e 38 33 20 2b 20 73 64 32 2a 32 2e 32 39 20 2b 20 | d;..ssd1=(sd1*0.83.+.sd2*2.29.+. |
07c0 | 33 34 39 31 29 20 25 20 36 35 35 33 36 3b 0d 0a 73 64 32 3d 28 73 64 32 2a 30 2e 38 39 20 2b 20 | 3491).%.65536;..sd2=(sd2*0.89.+. |
07e0 | 73 64 33 2a 31 2e 34 39 20 2b 20 34 31 37 37 29 20 25 20 36 35 35 33 36 3b 0d 0a 73 64 33 3d 28 | sd3*1.49.+.4177).%.65536;..sd3=( |
0800 | 73 64 33 2a 31 2e 37 39 20 2b 20 73 64 31 2a 30 2e 37 33 29 20 25 20 36 35 35 33 36 3b 0d 0a 73 | sd3*1.79.+.sd1*0.73).%.65536;..s |
0820 | 64 31 3d 73 73 64 31 3b 72 61 64 3d 73 64 32 2f 36 35 35 33 36 2b 31 2e 32 3b 61 6e 67 3d 69 2a | d1=ssd1;rad=sd2/65536+1.2;ang=i* |
0840 | 36 2e 32 38 2b 28 73 64 33 25 31 30 2f 31 30 29 2a 74 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 | 6.28+(sd3%10/10)*t;..x1=px*cz+py |
0860 | 2a 73 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 78 2b 70 7a | *sz;y1=py*cz-px*sz;..y2=y1*cx+pz |
0880 | 2a 73 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 | *sx;z2=pz*cx-y1*sx;..x3=x1*cy+z2 |
08a0 | 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 32 2e 35 3b 0d 0a 78 3d 69 66 28 61 62 | *sy;z3=z2*cy-x1*sy+2.5;..x=if(ab |
08c0 | 6f 76 65 28 7a 33 2c 30 2e 31 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d 69 66 28 61 62 6f 76 65 28 | ove(z3,0.1),x3/z3,x);y=if(above( |
08e0 | 7a 33 2c 30 2e 31 29 2c 79 32 2f 7a 33 2c 79 29 3b 0d 0a 72 70 3d 69 66 28 65 71 75 61 6c 28 63 | z3,0.1),y2/z3,y);..rp=if(equal(c |
0900 | 76 2c 30 29 2c 28 72 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d 0a 6d 70 3d 69 66 28 65 71 75 61 6c | v,0),(rp+1)%nc,rp);..mp=if(equal |
0920 | 28 63 76 2c 30 29 2c 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 76 3d 69 66 28 65 71 75 61 6c 28 72 | (cv,0),mp,mp+nm);..cv=if(equal(r |
0940 | 70 2c 30 29 2c 31 2d 63 76 2c 30 29 3b 0d 0a 64 63 3d 62 61 6e 64 28 62 65 6c 6f 77 28 78 2a 78 | p,0),1-cv,0);..dc=band(below(x*x |
0960 | 2b 79 2a 79 2c 30 2e 32 29 2c 61 62 6f 76 65 28 7a 33 2c 32 2e 33 35 29 29 3b 0d 0a 79 3d 79 2a | +y*y,0.2),above(z3,2.35));..y=y* |
0980 | 61 66 3b 63 66 3d 61 62 73 28 76 29 2a 33 2b 2e 35 3b 0d 0a 72 65 64 3d 69 66 28 64 63 2c 30 2c | af;cf=abs(v)*3+.5;..red=if(dc,0, |
09a0 | 31 2d 76 29 3b 67 72 65 65 6e 3d 69 66 28 64 63 2c 30 2c 31 29 3b 62 6c 75 65 3d 69 66 28 64 63 | 1-v);green=if(dc,0,1);blue=if(dc |
09c0 | 2c 30 2c 31 29 3b 0d 0a 78 3d 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 00 7d 00 00 00 72 70 3d 30 3b | ,0,1);..x=x*sf;y=y*sf;.}...rp=0; |
09e0 | 6d 70 3d 31 3b 63 76 3d 30 3b 73 64 31 3d 34 35 32 33 39 3b 73 64 32 3d 36 35 34 31 3b 73 64 33 | mp=1;cv=0;sd1=45239;sd2=6541;sd3 |
0a00 | 3d 38 39 39 32 3b 74 3d 74 2b 30 2e 30 35 3b 0d 0a 63 78 3d 72 65 67 30 30 3b 73 78 3d 72 65 67 | =8992;t=t+0.05;..cx=reg00;sx=reg |
0a20 | 30 31 3b 63 79 3d 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 65 67 30 34 3b 73 7a | 01;cy=reg02;sy=reg03;cz=reg04;sz |
0a40 | 3d 72 65 67 30 35 3b 73 66 3d 72 65 67 30 36 3b 61 66 3d 77 2f 68 3b 00 08 00 00 00 2f 2f 20 72 | =reg05;sf=reg06;af=w/h;.....//.r |
0a60 | 69 6e 67 00 45 00 00 00 6e 3d 33 30 30 3b 72 79 3d 31 2e 35 37 3b 72 78 3d 30 3b 72 7a 3d 31 2e | ing.E...n=300;ry=1.57;rx=0;rz=1. |
0a80 | 35 37 3b 72 78 6f 3d 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a 6f 3d 2d 30 2e 30 32 | 57;rxo=0.019;ryo=-0.03;rzo=-0.02 |
0aa0 | 33 3b 74 3d 30 3b 73 66 3d 31 2e 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 00 00 00 6c bb 97 | 3;t=0;sf=1.2.................l.. |
0ac0 | 07 48 6f 6c 64 65 6e 30 33 3a 20 43 6f 6e 76 6f 6c 75 74 69 6f 6e 20 46 69 6c 74 65 72 00 00 00 | .Holden03:.Convolution.Filter... |
0ae0 | 00 dc 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0b00 | 00 00 00 00 00 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 00 | ................................ |
0b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 04 00 00 00 00 00 00 00 01 00 00 | ................................ |
0b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0b80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
0ba0 | 00 00 00 00 00 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 | ................................ |
0bc0 | 00 28 00 00 00 04 00 00 00 01 00 01 80 24 00 00 00 b4 01 00 00 01 0f 00 00 00 2f 2f 20 67 6c 6f | .(...........$............//.glo |
0be0 | 62 61 6c 20 73 68 69 74 00 bc 00 00 00 72 78 3d 72 78 2b 72 78 6f 2d 28 72 78 2a 2e 30 35 29 3b | bal.shit.....rx=rx+rxo-(rx*.05); |
0c00 | 72 79 3d 72 79 2b 72 79 6f 3b 72 7a 3d 72 7a 2b 72 7a 6f 3b 63 78 3d 63 6f 73 28 72 78 29 3b 73 | ry=ry+ryo;rz=rz+rzo;cx=cos(rx);s |
0c20 | 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 79 29 3b | x=sin(rx);cy=cos(ry);sy=sin(ry); |
0c40 | 63 7a 3d 63 6f 73 28 72 7a 29 3b 73 7a 3d 73 69 6e 28 72 7a 29 3b 73 66 3d 73 66 2b 62 66 2d 28 | cz=cos(rz);sz=sin(rz);sf=sf+bf-( |
0c60 | 73 66 2a 2e 32 29 3b 0d 0a 72 65 67 30 30 3d 63 78 3b 72 65 67 30 31 3d 73 78 3b 72 65 67 30 32 | sf*.2);..reg00=cx;reg01=sx;reg02 |
0c80 | 3d 63 79 3b 72 65 67 30 33 3d 73 79 3b 72 65 67 30 34 3d 63 7a 3b 72 65 67 30 35 3d 73 7a 3b 72 | =cy;reg03=sy;reg04=cz;reg05=sz;r |
0ca0 | 65 67 30 36 3d 73 66 3b 00 64 00 00 00 72 78 6f 3d 72 61 6e 64 28 35 30 29 2f 32 30 30 3b 0d 0a | eg06=sf;.d...rxo=rand(50)/200;.. |
0cc0 | 72 79 6f 3d 72 61 6e 64 28 31 30 29 2f 31 30 30 2a 2e 37 2d 2e 30 32 35 3b 0d 0a 72 7a 6f 3d 72 | ryo=rand(10)/100*.7-.025;..rzo=r |
0ce0 | 61 6e 64 28 31 30 29 2f 31 30 30 2a 2e 39 2d 2e 30 32 35 3b 0d 0a 62 66 3d 28 72 61 6e 64 28 35 | and(10)/100*.9-.025;..bf=(rand(5 |
0d00 | 30 29 2f 31 30 30 29 2a 2e 33 35 2b 2e 30 35 3b 00 64 00 00 00 72 79 3d 31 2e 35 37 3b 72 78 3d | 0)/100)*.35+.05;.d...ry=1.57;rx= |
0d20 | 30 3b 72 7a 3d 31 2e 35 37 3b 72 78 6f 3d 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a | 0;rz=1.57;rxo=0.019;ryo=-0.03;rz |
0d40 | 6f 3d 2d 30 2e 30 32 33 3b 74 3d 30 3b 73 66 3d 31 2e 32 3b 63 78 3d 30 3b 73 78 3d 30 3b 63 79 | o=-0.023;t=0;sf=1.2;cx=0;sx=0;cy |
0d60 | 3d 30 3b 73 79 3d 30 3b 63 7a 3d 30 3b 73 7a 3d 30 3b 62 66 3d 2e 31 3b 00 02 00 00 00 01 00 00 | =0;sy=0;cz=0;sz=0;bf=.1;........ |
0d80 | 00 ff ff ff 00 01 00 00 00 24 00 00 00 f5 02 00 00 01 a1 01 00 00 73 64 31 3d 28 73 64 31 2a 34 | .........$............sd1=(sd1*4 |
0da0 | 31 31 2b 39 31 31 29 25 32 30 30 30 3b 0d 0a 73 64 32 3d 28 73 64 32 2a 31 31 37 39 2b 33 37 39 | 11+911)%2000;..sd2=(sd2*1179+379 |
0dc0 | 31 29 25 32 30 30 30 3b 0d 0a 73 64 33 3d 28 73 64 33 2a 33 32 37 33 2b 36 35 34 31 29 25 32 30 | 1)%2000;..sd3=(sd3*3273+6541)%20 |
0de0 | 30 30 3b 0d 0a 70 79 3d 28 73 64 33 2d 31 30 30 30 29 2a 2e 30 31 3b 70 7a 3d 28 73 64 31 2d 31 | 00;..py=(sd3-1000)*.01;pz=(sd1-1 |
0e00 | 30 30 30 29 2a 2e 30 31 3b 70 78 3d 28 73 64 32 2d 31 30 30 30 29 2a 2e 30 31 3b 0d 0a 78 31 3d | 000)*.01;px=(sd2-1000)*.01;..x1= |
0e20 | 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d | px*cz+py*sz;y1=py*cz-px*sz;..y2= |
0e40 | 79 31 2a 63 78 2b 70 7a 2a 73 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d | y1*cx+pz*sx;z2=pz*cx-y1*sx;..x3= |
0e60 | 78 31 2a 63 79 2b 7a 32 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 31 2e 35 3b 0d | x1*cy+z2*sy;z3=z2*cy-x1*sy+1.5;. |
0e80 | 0a 0d 0a 64 74 3d 69 66 28 61 62 6f 76 65 28 7a 33 2c 2e 30 30 31 29 2c 31 2f 7a 33 2c 30 29 3b | ...dt=if(above(z3,.001),1/z3,0); |
0ea0 | 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 32 2a 64 74 | ..x=if(dt,x3*dt,x);y=if(dt,y2*dt |
0ec0 | 2a 61 66 2c 79 29 3b 0d 0a 78 3d 78 2a 28 31 2b 73 66 2a 2e 33 29 3b 0d 0a 79 3d 79 2a 28 31 2b | *af,y);..x=x*(1+sf*.3);..y=y*(1+ |
0ee0 | 73 66 2a 2e 33 29 3b 0d 0a 63 6f 6c 3d 64 74 2a 28 32 2e 35 2b 73 66 2d 67 65 74 6f 73 63 28 73 | sf*.3);..col=dt*(2.5+sf-getosc(s |
0f00 | 69 6e 28 69 2a 32 30 29 2a 32 30 2c 30 2c 30 29 2a 33 30 29 3b 0d 0a 72 65 64 3d 63 6f 6c 3b 0d | in(i*20)*20,0,0)*30);..red=col;. |
0f20 | 0a 67 72 65 65 6e 3d 63 6f 6c 3b 0d 0a 62 6c 75 65 3d 63 6f 6c 3b 00 8d 00 00 00 63 78 3d 72 65 | .green=col;..blue=col;.....cx=re |
0f40 | 67 30 30 3b 73 78 3d 72 65 67 30 31 3b 63 79 3d 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 | g00;sx=reg01;cy=reg02;sy=reg03;c |
0f60 | 7a 3d 72 65 67 30 34 3b 73 7a 3d 72 65 67 30 35 3b 73 66 3d 72 65 67 30 36 3b 0d 0a 3b 78 3d 30 | z=reg04;sz=reg05;sf=reg06;..;x=0 |
0f80 | 3b 79 3d 30 3b 61 66 3d 77 2f 68 3b 74 3d 74 2b 74 69 2a 2e 30 31 3b 74 69 3d 74 69 2a 2e 38 3b | ;y=0;af=w/h;t=t+ti*.01;ti=ti*.8; |
0fa0 | 62 66 3d 62 66 2a 2e 39 2b 62 66 74 2a 2e 31 3b 73 64 31 3d 34 31 34 3b 73 64 32 3d 37 31 31 3b | bf=bf*.9+bft*.1;sd1=414;sd2=711; |
0fc0 | 73 64 33 3d 34 31 34 00 8f 00 00 00 74 69 3d 35 3b 62 66 74 3d 67 65 74 6f 73 63 28 30 2e 37 2c | sd3=414.....ti=5;bft=getosc(0.7, |
0fe0 | 30 2c 30 29 3b 73 62 6f 3d 69 66 28 73 62 6f 2b 67 65 74 6f 73 63 28 2e 37 39 2c 30 2c 30 29 2a | 0,0);sbo=if(sbo+getosc(.79,0,0)* |
1000 | 31 30 30 25 31 30 2c 73 62 6f 2c 36 2e 32 38 29 3b 73 62 73 3d 69 66 28 65 71 75 61 6c 28 73 62 | 100%10,sbo,6.28);sbs=if(equal(sb |
1020 | 6f 2c 36 2e 32 38 29 2c 28 67 65 74 6f 73 63 28 2e 31 2c 30 2c 30 29 2a 32 35 36 25 32 29 2a 32 | o,6.28),(getosc(.1,0,0)*256%2)*2 |
1040 | 2d 31 2c 73 62 73 29 3b 6c 69 3d 31 3b 0d 0a 2f 2f 20 62 67 20 73 74 61 72 73 00 17 00 00 00 6e | -1,sbs);li=1;..//.bg.stars.....n |
1060 | 3d 34 30 30 3b 74 70 69 3d 61 63 6f 73 28 2d 31 29 2a 32 3b 20 00 02 00 00 00 01 00 00 00 ff ff | =400;tpi=acos(-1)*2;............ |
1080 | ff 00 00 00 00 00 24 00 00 00 67 02 00 00 01 70 01 00 00 70 67 3d 31 2d 73 66 2a 2e 32 3b 0d 0a | ......$...g....p...pg=1-sf*.2;.. |
10a0 | 70 7a 3d 70 67 2a 63 6f 73 28 69 2a 24 70 69 2a 32 2b 66 72 29 3b 0d 0a 70 78 3d 30 3b 0d 0a 70 | pz=pg*cos(i*$pi*2+fr);..px=0;..p |
10c0 | 79 3d 70 67 2a 73 69 6e 28 69 2a 24 70 69 2a 32 2b 66 72 29 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b | y=pg*sin(i*$pi*2+fr);..x1=px*cz+ |
10e0 | 70 79 2a 73 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 78 2b | py*sz;y1=py*cz-px*sz;..y2=y1*cx+ |
1100 | 70 7a 2a 73 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b | pz*sx;z2=pz*cx-y1*sx;..x3=x1*cy+ |
1120 | 7a 32 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 31 2e 35 3b 0d 0a 78 3d 78 33 2f | z2*sy;z3=z2*cy-x1*sy+1.5;..x=x3/ |
1140 | 7a 33 3b 0d 0a 79 3d 79 32 2f 7a 33 3b 0d 0a 63 3d 67 6d 65 67 61 62 75 66 28 31 29 3b 0d 0a 61 | z3;..y=y2/z3;..c=gmegabuf(1);..a |
1160 | 64 63 3d 69 66 28 62 65 6c 6f 77 28 63 2c 7a 33 2d 31 2e 39 29 2c 30 2c 31 29 2a 73 69 6e 28 69 | dc=if(below(c,z3-1.9),0,1)*sin(i |
1180 | 2a 32 30 29 2a 2e 32 3b 0d 0a 64 63 3d 69 66 28 61 62 6f 76 65 28 61 62 73 28 7a 33 2a 2e 31 29 | *20)*.2;..dc=if(above(abs(z3*.1) |
11a0 | 2c 2e 32 29 2c 30 2c 31 29 2a 66 72 2a 73 69 6e 28 69 2a 32 30 2d 66 72 2d 73 66 2a 38 29 2a 32 | ,.2),0,1)*fr*sin(i*20-fr-sf*8)*2 |
11c0 | 3b 0d 0a 72 65 64 3d 64 63 3b 0d 0a 67 72 65 65 6e 3d 64 63 3b 0d 0a 62 6c 75 65 3d 64 63 3b 0d | ;..red=dc;..green=dc;..blue=dc;. |
11e0 | 0a 78 3d 78 2a 28 2e 35 2b 73 66 2a 2e 37 29 3b 79 3d 79 2a 28 2e 35 2b 73 66 2a 2e 37 29 2a 61 | .x=x*(.5+sf*.7);y=y*(.5+sf*.7)*a |
1200 | 66 3b 00 6c 00 00 00 72 70 3d 30 3b 6d 70 3d 2d 31 3b 63 76 3d 30 3b 66 72 3d 66 72 2b 62 74 2d | f;.l...rp=0;mp=-1;cv=0;fr=fr+bt- |
1220 | 28 66 72 2a 2e 33 29 3b 0d 0a 63 78 3d 72 65 67 30 30 3b 73 78 3d 72 65 67 30 31 3b 63 79 3d 72 | (fr*.3);..cx=reg00;sx=reg01;cy=r |
1240 | 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 65 67 30 34 3b 73 7a 3d 72 65 67 30 35 3b | eg02;sy=reg03;cz=reg04;sz=reg05; |
1260 | 73 66 3d 72 65 67 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b 00 1a 00 00 00 62 74 3d 72 61 6e 64 28 31 | sf=reg06;..af=w/h;.....bt=rand(1 |
1280 | 30 29 2f 31 30 30 3b 0d 0a 2f 2f 20 72 69 6e 67 00 50 00 00 00 6e 3d 38 30 3b 6e 63 3d 32 35 3b | 0)/100;..//.ring.P...n=80;nc=25; |
12a0 | 6e 6d 3d 2e 32 3b 72 79 3d 31 2e 35 37 3b 72 78 3d 30 3b 72 7a 3d 31 2e 35 37 3b 3b 72 78 6f 3d | nm=.2;ry=1.57;rx=0;rz=1.57;;rxo= |
12c0 | 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a 6f 3d 2d 30 2e 30 32 33 3b 73 66 3d 31 2e | 0.019;ryo=-0.03;rzo=-0.023;sf=1. |
12e0 | 32 3b 0d 0a 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 88 71 ef 07 43 6f 6c 6f 72 20 4d | 2;....................q..Color.M |
1300 | 61 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 40 03 00 00 00 00 00 | ap.......................@...... |
1320 | 00 09 00 00 00 01 00 00 00 5c 00 00 0d 01 00 00 00 03 00 00 00 98 af d2 0a 00 00 00 00 00 00 00 | .........\...................... |
1340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
1360 | 00 00 00 00 00 00 00 00 00 01 00 00 00 03 00 00 00 d8 4a 94 0a 00 00 00 00 00 00 00 00 00 00 00 | ..................J............. |
1380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
13a0 | 00 00 00 00 00 01 00 00 00 04 00 00 00 30 4a 94 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .............0J................. |
13c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
13e0 | 00 01 00 00 00 03 00 00 00 68 4a 94 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........hJ..................... |
1400 | 00 00 00 00 00 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 00 | ................................ |
1420 | 00 03 00 00 00 a0 4a 94 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ......J......................... |
1440 | 00 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 00 00 04 00 00 | ................................ |
1460 | 00 20 7d 62 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ..}b............................ |
1480 | 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 04 00 00 00 e0 07 d3 | ................................ |
14a0 | 21 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | !............................... |
14c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 04 00 00 00 10 dd 67 05 00 00 00 | ...........................g.... |
14e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
1500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 db 00 00 00 00 80 ff | ................................ |
1520 | 00 5c 1a 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 94 00 00 | .\.............................. |
1540 | 00 ff 80 00 00 7a 6b 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 | .....zk......................... |
1560 | 00 7b 00 00 00 80 00 ff 00 82 13 00 00 ce 00 00 00 00 ff ff 00 32 59 00 00 ff 00 00 00 ff ff ff | .{...................2Y......... |
1580 | 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5f 00 00 00 ff 80 00 00 8e 06 00 00 ff 00 00 | ................._.............. |
15a0 | 00 ff ff ff 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 57 00 00 00 00 ff 00 00 17 3e 00 | .....................W........>. |
15c0 | 00 99 00 00 00 80 ff ff 00 c8 0c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 7b 00 00 00 00 80 ff | .........................{...... |
15e0 | 00 81 65 00 00 d7 00 00 00 00 ff ff 00 52 2b 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 | ..e..........R+................. |
1600 | 00 00 00 00 00 00 00 00 00 5a 00 00 00 ff ff 80 00 c4 4e 00 00 b9 00 00 00 e4 85 45 00 2a 1b 00 | .........Z........N........E.*.. |
1620 | 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 53 00 00 00 34 4a 7e | .........................S...4J~ |
1640 | 00 75 11 00 00 6c 00 00 00 c2 a6 21 00 49 0c 00 00 f5 00 00 00 ff ff ff 00 01 00 00 00 6c bb 97 | .u...l.....!.I...............l.. |
1660 | 07 48 6f 6c 64 65 6e 30 33 3a 20 43 6f 6e 76 6f 6c 75 74 69 6f 6e 20 46 69 6c 74 65 72 00 00 00 | .Holden03:.Convolution.Filter... |
1680 | 00 dc 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 | ................................ |
16a0 | 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 01 00 00 | ................................ |
16c0 | 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 00 00 00 | ................................ |
16e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 02 00 00 00 02 00 00 00 02 00 00 00 01 00 00 | ................................ |
1700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
1720 | 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 | ................................ |
1740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 04 00 00 | ................................ |
1760 | 00 24 00 00 00 c8 02 00 00 01 f2 01 00 00 72 65 64 3d 63 72 3b 67 72 65 65 6e 3d 63 72 3b 62 6c | .$............red=cr;green=cr;bl |
1780 | 75 65 3d 63 72 3b 0d 0a 63 72 3d 31 2d 63 76 3b 63 67 3d 31 31 2d 63 76 3b 63 62 3d 31 2d 63 76 | ue=cr;..cr=1-cv;cg=11-cv;cb=1-cv |
17a0 | 3b 0d 0a 72 61 64 3d 63 6f 73 28 6d 70 2a 31 2e 35 37 29 3b 0d 0a 70 79 3d 63 6f 73 28 72 70 2f | ;..rad=cos(mp*1.57);..py=cos(rp/ |
17c0 | 6e 63 2a 36 2e 32 38 29 2a 72 61 64 3b 70 7a 3d 73 69 6e 28 72 70 2f 6e 63 2a 36 2e 32 38 29 2a | nc*6.28)*rad;pz=sin(rp/nc*6.28)* |
17e0 | 72 61 64 3b 70 78 3d 73 69 6e 28 6d 70 2a 31 2e 35 37 29 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 | rad;px=sin(mp*1.57);..x1=px*cz+p |
1800 | 79 2a 73 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 78 2b 70 | y*sz;y1=py*cz-px*sz;..y2=y1*cx+p |
1820 | 7a 2a 73 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a | z*sx;z2=pz*cx-y1*sx;..x3=x1*cy+z |
1840 | 32 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 32 2e 35 3b 0d 0a 78 3d 69 66 28 61 | 2*sy;z3=z2*cy-x1*sy+2.5;..x=if(a |
1860 | 62 6f 76 65 28 7a 33 2c 30 2e 31 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d 69 66 28 61 62 6f 76 65 | bove(z3,0.1),x3/z3,x);y=if(above |
1880 | 28 7a 33 2c 30 2e 31 29 2c 79 32 2f 7a 33 2a 61 66 2c 79 29 3b 0d 0a 72 70 3d 69 66 28 65 71 75 | (z3,0.1),y2/z3*af,y);..rp=if(equ |
18a0 | 61 6c 28 63 76 2c 30 29 2c 28 72 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d 0a 6d 70 3d 69 66 28 65 | al(cv,0),(rp+1)%nc,rp);..mp=if(e |
18c0 | 71 75 61 6c 28 63 76 2c 30 29 2c 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 76 3d 69 66 28 65 71 75 | qual(cv,0),mp,mp+nm);..cv=if(equ |
18e0 | 61 6c 28 72 70 2c 30 29 2c 31 2d 63 76 2c 30 29 3b 0d 0a 64 63 3d 61 62 6f 76 65 28 7a 33 2c 32 | al(rp,0),1-cv,0);..dc=above(z3,2 |
1900 | 2e 32 29 3b 0d 0a 72 65 64 3d 69 66 28 64 63 2c 30 2c 72 65 64 29 3b 67 72 65 65 6e 3d 69 66 28 | .2);..red=if(dc,0,red);green=if( |
1920 | 64 63 2c 30 2c 67 72 65 65 6e 29 3b 62 6c 75 65 3d 69 66 28 64 63 2c 30 2c 62 6c 75 65 29 3b 0d | dc,0,green);blue=if(dc,0,blue);. |
1940 | 0a 78 3d 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 73 66 2a 32 3b 00 | .x=x*sf;y=y*sf;..linesize=sf*2;. |
1960 | 5b 00 00 00 72 70 3d 30 3b 6d 70 3d 2d 31 3b 63 76 3d 30 3b 0d 0a 63 78 3d 72 65 67 30 30 3b 73 | [...rp=0;mp=-1;cv=0;..cx=reg00;s |
1980 | 78 3d 72 65 67 30 31 3b 63 79 3d 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 65 67 | x=reg01;cy=reg02;sy=reg03;cz=reg |
19a0 | 30 34 3b 73 7a 3d 72 65 67 30 35 3b 73 66 3d 72 65 67 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b 00 0c | 04;sz=reg05;sf=reg06;..af=w/h;.. |
19c0 | 00 00 00 2f 2f 20 70 6c 61 6e 65 74 20 31 00 4e 00 00 00 6e 3d 32 36 31 3b 6e 63 3d 32 35 3b 6e | ...//.planet.1.N...n=261;nc=25;n |
19e0 | 6d 3d 2e 32 3b 72 79 3d 31 2e 35 37 3b 72 78 3d 30 3b 72 7a 3d 31 2e 35 37 3b 3b 72 78 6f 3d 30 | m=.2;ry=1.57;rx=0;rz=1.57;;rxo=0 |
1a00 | 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a 6f 3d 2d 30 2e 30 32 33 3b 73 66 3d 31 2e 32 | .019;ryo=-0.03;rzo=-0.023;sf=1.2 |
1a20 | 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d9 02 00 00 01 f5 01 00 00 72 65 | .................$............re |
1a40 | 64 3d 63 72 3b 67 72 65 65 6e 3d 63 67 3b 62 6c 75 65 3d 63 62 3b 0d 0a 63 72 3d 31 2d 63 76 3b | d=cr;green=cg;blue=cb;..cr=1-cv; |
1a60 | 63 67 3d 31 2d 63 76 3b 63 62 3d 31 2d 63 76 3b 0d 0a 72 61 64 3d 31 3b 0d 0a 70 78 3d 63 6f 73 | cg=1-cv;cb=1-cv;..rad=1;..px=cos |
1a80 | 28 72 70 2f 6e 63 2a 36 2e 32 38 29 2a 72 61 64 3b 70 79 3d 73 69 6e 28 72 70 2f 6e 63 2a 36 2e | (rp/nc*6.28)*rad;py=sin(rp/nc*6. |
1aa0 | 32 38 29 2a 72 61 64 3b 70 7a 3d 30 3b 0d 0a 79 30 3d 70 79 2a 63 6f 73 28 6d 70 2a 33 2e 31 34 | 28)*rad;pz=0;..y0=py*cos(mp*3.14 |
1ac0 | 29 3b 7a 30 3d 70 79 2a 73 69 6e 28 6d 70 2a 33 2e 31 34 29 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b | );z0=py*sin(mp*3.14);..x1=px*cz+ |
1ae0 | 79 30 2a 73 7a 3b 79 31 3d 79 30 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 78 2b | y0*sz;y1=y0*cz-px*sz;..y2=y1*cx+ |
1b00 | 7a 30 2a 73 78 3b 7a 32 3d 7a 30 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b | z0*sx;z2=z0*cx-y1*sx;..x3=x1*cy+ |
1b20 | 7a 32 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 32 2e 35 3b 0d 0a 78 3d 69 66 28 | z2*sy;z3=z2*cy-x1*sy+2.5;..x=if( |
1b40 | 61 62 6f 76 65 28 7a 33 2c 30 2e 31 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d 69 66 28 61 62 6f 76 | above(z3,0.1),x3/z3,x);y=if(abov |
1b60 | 65 28 7a 33 2c 30 2e 31 29 2c 79 32 2f 7a 33 2a 61 66 2c 79 29 3b 0d 0a 72 70 3d 69 66 28 65 71 | e(z3,0.1),y2/z3*af,y);..rp=if(eq |
1b80 | 75 61 6c 28 63 76 2c 30 29 2c 28 72 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d 0a 6d 70 3d 69 66 28 | ual(cv,0),(rp+1)%nc,rp);..mp=if( |
1ba0 | 65 71 75 61 6c 28 63 76 2c 30 29 2c 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 76 3d 69 66 28 65 71 | equal(cv,0),mp,mp+nm);..cv=if(eq |
1bc0 | 75 61 6c 28 72 70 2c 30 29 2c 31 2d 63 76 2c 30 29 3b 0d 0a 64 63 3d 61 62 6f 76 65 28 7a 33 2c | ual(rp,0),1-cv,0);..dc=above(z3, |
1be0 | 32 2e 32 29 3b 0d 0a 72 65 64 3d 69 66 28 64 63 2c 30 2c 72 65 64 29 3b 67 72 65 65 6e 3d 69 66 | 2.2);..red=if(dc,0,red);green=if |
1c00 | 28 64 63 2c 30 2c 67 72 65 65 6e 29 3b 62 6c 75 65 3d 69 66 28 64 63 2c 30 2c 62 6c 75 65 29 3b | (dc,0,green);blue=if(dc,0,blue); |
1c20 | 0d 0a 78 3d 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 0d 0a 00 6a 00 00 00 72 70 3d 30 3b 6d 70 3d 2d | ..x=x*sf;y=y*sf;...j...rp=0;mp=- |
1c40 | 31 3b 63 76 3d 30 3b 63 72 3d 31 3b 63 67 3d 31 3b 63 62 3d 31 3b 0d 0a 63 78 3d 72 65 67 30 30 | 1;cv=0;cr=1;cg=1;cb=1;..cx=reg00 |
1c60 | 3b 73 78 3d 72 65 67 30 31 3b 63 79 3d 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 | ;sx=reg01;cy=reg02;sy=reg03;cz=r |
1c80 | 65 67 30 34 3b 73 7a 3d 72 65 67 30 35 3b 73 66 3d 72 65 67 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b | eg04;sz=reg05;sf=reg06;..af=w/h; |
1ca0 | 00 0c 00 00 00 2f 2f 20 70 6c 61 6e 65 74 20 32 00 4d 00 00 00 6e 3d 32 36 31 3b 6e 63 3d 35 30 | .....//.planet.2.M...n=261;nc=50 |
1cc0 | 3b 6e 6d 3d 2e 32 3b 72 79 3d 31 2e 35 37 3b 72 78 3d 30 3b 72 7a 3d 31 2e 35 37 3b 72 78 6f 3d | ;nm=.2;ry=1.57;rx=0;rz=1.57;rxo= |
1ce0 | 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a 6f 3d 2d 30 2e 30 32 33 3b 73 66 3d 31 2e | 0.019;ryo=-0.03;rzo=-0.023;sf=1. |
1d00 | 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 ab 00 00 00 01 62 00 00 00 78 | 2.................$........b...x |
1d20 | 3d 63 6f 73 28 69 2a 36 2e 32 38 29 2a 30 2e 34 34 3b 0d 0a 79 3d 73 69 6e 28 69 2a 36 2e 32 38 | =cos(i*6.28)*0.44;..y=sin(i*6.28 |
1d40 | 29 2a 30 2e 34 34 2a 61 66 3b 0d 0a 78 3d 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 0d 0a 63 3d 28 78 | )*0.44*af;..x=x*sf;y=y*sf;..c=(x |
1d60 | 2a 78 2b 79 2a 79 29 3b 0d 0a 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 31 29 2c 63 29 3b | *x+y*y);..assign(gmegabuf(1),c); |
1d80 | 00 11 00 00 00 73 66 3d 72 65 67 30 36 3b 61 66 3d 77 2f 68 3b 00 0b 00 00 00 2f 2f 20 6f 75 74 | .....sf=reg06;af=w/h;.....//.out |
1da0 | 6c 69 6e 65 00 0c 00 00 00 6e 3d 34 30 3b 73 66 3d 31 2e 32 00 02 00 00 00 01 00 00 00 80 80 80 | line.....n=40;sf=1.2............ |
1dc0 | 00 01 00 00 00 24 00 00 00 30 03 00 00 01 1e 02 00 00 72 65 64 3d 63 72 3b 67 72 65 65 6e 3d 63 | .....$...0........red=cr;green=c |
1de0 | 72 3b 62 6c 75 65 3d 63 72 3b 0d 0a 63 72 3d 31 2d 63 76 3b 63 67 3d 31 31 2d 63 76 3b 63 62 3d | r;blue=cr;..cr=1-cv;cg=11-cv;cb= |
1e00 | 31 2d 63 76 3b 0d 0a 72 61 64 3d 63 6f 73 28 6d 70 2a 31 2e 35 37 29 3b 20 63 73 3d 2e 34 2b 67 | 1-cv;..rad=cos(mp*1.57);.cs=.4+g |
1e20 | 65 74 6f 73 63 28 63 62 2c 30 2c 30 29 2a 2e 30 37 35 3b 0d 0a 70 78 3d 63 73 2a 28 63 6f 73 28 | etosc(cb,0,0)*.075;..px=cs*(cos( |
1e40 | 72 70 2f 6e 63 2a 36 2e 32 38 29 2a 72 61 64 29 2d 66 63 2a 32 3b 0d 0a 70 79 3d 63 73 2a 28 73 | rp/nc*6.28)*rad)-fc*2;..py=cs*(s |
1e60 | 69 6e 28 72 70 2f 6e 63 2a 36 2e 32 38 29 2a 72 61 64 29 2b 32 2e 35 3b 0d 0a 70 7a 3d 63 73 2a | in(rp/nc*6.28)*rad)+2.5;..pz=cs* |
1e80 | 28 73 69 6e 28 6d 70 2a 31 2e 35 37 29 29 2b 66 73 2a 32 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 | (sin(mp*1.57))+fs*2;..x1=px*cz+p |
1ea0 | 79 2a 73 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 78 2b 70 | y*sz;y1=py*cz-px*sz;..y2=y1*cx+p |
1ec0 | 7a 2a 73 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a | z*sx;z2=pz*cx-y1*sx;..x3=x1*cy+z |
1ee0 | 32 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 34 3b 0d 0a 78 3d 69 66 28 61 62 6f | 2*sy;z3=z2*cy-x1*sy+4;..x=if(abo |
1f00 | 76 65 28 7a 33 2c 30 2e 31 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d 69 66 28 61 62 6f 76 65 28 7a | ve(z3,0.1),x3/z3,x);y=if(above(z |
1f20 | 33 2c 30 2e 31 29 2c 79 32 2f 7a 33 2a 61 66 2c 79 29 3b 0d 0a 72 70 3d 69 66 28 65 71 75 61 6c | 3,0.1),y2/z3*af,y);..rp=if(equal |
1f40 | 28 63 76 2c 30 29 2c 28 72 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d 0a 6d 70 3d 69 66 28 65 71 75 | (cv,0),(rp+1)%nc,rp);..mp=if(equ |
1f60 | 61 6c 28 63 76 2c 30 29 2c 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 76 3d 69 66 28 65 71 75 61 6c | al(cv,0),mp,mp+nm);..cv=if(equal |
1f80 | 28 72 70 2c 30 29 2c 31 2d 63 76 2c 30 29 3b 0d 0a 63 3d 67 6d 65 67 61 62 75 66 28 31 29 3b 0d | (rp,0),1-cv,0);..c=gmegabuf(1);. |
1fa0 | 0a 64 63 3d 2d 69 66 28 61 62 6f 76 65 28 63 2c 7a 33 2d 35 29 2c 30 2c 31 29 2b 7a 33 2a 2e 31 | .dc=-if(above(c,z3-5),0,1)+z3*.1 |
1fc0 | 3b 0d 0a 72 65 64 3d 64 63 3b 0d 0a 67 72 65 65 6e 3d 64 63 3b 0d 0a 62 6c 75 65 3d 64 63 3b 0d | ;..red=dc;..green=dc;..blue=dc;. |
1fe0 | 0a 78 3d 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 00 82 00 00 00 72 70 3d 30 3b 6d 70 3d 2d 31 3b 63 | .x=x*sf;y=y*sf;.....rp=0;mp=-1;c |
2000 | 76 3d 30 3b 66 72 3d 66 72 2b 62 74 2d 28 66 72 2a 2e 31 29 3b 66 63 3d 63 6f 73 28 66 72 29 3b | v=0;fr=fr+bt-(fr*.1);fc=cos(fr); |
2020 | 66 73 3d 73 69 6e 28 66 72 29 3b 0d 0a 63 78 3d 72 65 67 30 30 3b 73 78 3d 72 65 67 30 31 3b 63 | fs=sin(fr);..cx=reg00;sx=reg01;c |
2040 | 79 3d 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 65 67 30 34 3b 73 7a 3d 72 65 67 | y=reg02;sy=reg03;cz=reg04;sz=reg |
2060 | 30 35 3b 73 66 3d 72 65 67 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b 00 21 00 00 00 2f 2f 20 73 61 74 | 05;sf=reg06;..af=w/h;.!...//.sat |
2080 | 65 6c 6c 69 74 65 20 31 0d 0a 62 74 3d 72 61 6e 64 28 35 30 29 2f 31 30 30 3b 00 4e 00 00 00 6e | ellite.1..bt=rand(50)/100;.N...n |
20a0 | 3d 32 36 31 3b 6e 63 3d 32 35 3b 6e 6d 3d 2e 32 3b 72 79 3d 31 2e 35 37 3b 72 78 3d 30 3b 72 7a | =261;nc=25;nm=.2;ry=1.57;rx=0;rz |
20c0 | 3d 31 2e 35 37 3b 3b 72 78 6f 3d 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a 6f 3d 2d | =1.57;;rxo=0.019;ryo=-0.03;rzo=- |
20e0 | 30 2e 30 32 33 3b 73 66 3d 31 2e 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 | 0.023;sf=1.2.................$.. |
2100 | 00 2f 03 00 00 01 1d 02 00 00 72 65 64 3d 63 72 3b 67 72 65 65 6e 3d 63 72 3b 62 6c 75 65 3d 63 | ./........red=cr;green=cr;blue=c |
2120 | 72 3b 0d 0a 63 72 3d 31 2d 63 76 3b 63 67 3d 31 31 2d 63 76 3b 63 62 3d 31 2d 63 76 3b 0d 0a 72 | r;..cr=1-cv;cg=11-cv;cb=1-cv;..r |
2140 | 61 64 3d 63 6f 73 28 6d 70 2a 31 2e 35 37 29 3b 20 63 73 3d 2e 32 2b 67 65 74 6f 73 63 28 63 62 | ad=cos(mp*1.57);.cs=.2+getosc(cb |
2160 | 2c 30 2c 30 29 2a 2e 30 35 3b 0d 0a 70 78 3d 63 73 2a 28 63 6f 73 28 72 70 2f 6e 63 2a 36 2e 32 | ,0,0)*.05;..px=cs*(cos(rp/nc*6.2 |
2180 | 38 29 2a 72 61 64 29 2d 66 73 2a 32 3b 0d 0a 70 79 3d 63 73 2a 28 73 69 6e 28 72 70 2f 6e 63 2a | 8)*rad)-fs*2;..py=cs*(sin(rp/nc* |
21a0 | 36 2e 32 38 29 2a 72 61 64 29 2b 32 2e 35 3b 0d 0a 70 7a 3d 63 73 2a 28 73 69 6e 28 6d 70 2a 31 | 6.28)*rad)+2.5;..pz=cs*(sin(mp*1 |
21c0 | 2e 35 37 29 29 2b 66 63 2a 32 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 79 31 3d 70 | .57))+fc*2;..x1=px*cz+py*sz;y1=p |
21e0 | 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 78 2b 70 7a 2a 73 78 3b 7a 32 3d 70 | y*cz-px*sz;..y2=y1*cx+pz*sx;z2=p |
2200 | 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 3b 7a 33 3d 7a | z*cx-y1*sx;..x3=x1*cy+z2*sy;z3=z |
2220 | 32 2a 63 79 2d 78 31 2a 73 79 2b 34 3b 0d 0a 78 3d 69 66 28 61 62 6f 76 65 28 7a 33 2c 30 2e 31 | 2*cy-x1*sy+4;..x=if(above(z3,0.1 |
2240 | 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d 69 66 28 61 62 6f 76 65 28 7a 33 2c 30 2e 31 29 2c 79 32 | ),x3/z3,x);y=if(above(z3,0.1),y2 |
2260 | 2f 7a 33 2a 61 66 2c 79 29 3b 0d 0a 72 70 3d 69 66 28 65 71 75 61 6c 28 63 76 2c 30 29 2c 28 72 | /z3*af,y);..rp=if(equal(cv,0),(r |
2280 | 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d 0a 6d 70 3d 69 66 28 65 71 75 61 6c 28 63 76 2c 30 29 2c | p+1)%nc,rp);..mp=if(equal(cv,0), |
22a0 | 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 76 3d 69 66 28 65 71 75 61 6c 28 72 70 2c 30 29 2c 31 2d | mp,mp+nm);..cv=if(equal(rp,0),1- |
22c0 | 63 76 2c 30 29 3b 0d 0a 63 3d 67 6d 65 67 61 62 75 66 28 31 29 3b 0d 0a 64 63 3d 2d 69 66 28 61 | cv,0);..c=gmegabuf(1);..dc=-if(a |
22e0 | 62 6f 76 65 28 63 2c 7a 33 2d 35 29 2c 30 2c 31 29 2b 7a 33 2a 2e 31 3b 0d 0a 72 65 64 3d 64 63 | bove(c,z3-5),0,1)+z3*.1;..red=dc |
2300 | 3b 0d 0a 67 72 65 65 6e 3d 64 63 3b 0d 0a 62 6c 75 65 3d 64 63 3b 0d 0a 78 3d 78 2a 73 66 3b 79 | ;..green=dc;..blue=dc;..x=x*sf;y |
2320 | 3d 79 2a 73 66 3b 00 82 00 00 00 72 70 3d 30 3b 6d 70 3d 2d 31 3b 63 76 3d 30 3b 66 72 3d 66 72 | =y*sf;.....rp=0;mp=-1;cv=0;fr=fr |
2340 | 2b 62 74 2d 28 66 72 2a 2e 31 29 3b 66 63 3d 63 6f 73 28 66 72 29 3b 66 73 3d 73 69 6e 28 66 72 | +bt-(fr*.1);fc=cos(fr);fs=sin(fr |
2360 | 29 3b 0d 0a 63 78 3d 72 65 67 30 30 3b 73 78 3d 72 65 67 30 31 3b 63 79 3d 72 65 67 30 32 3b 73 | );..cx=reg00;sx=reg01;cy=reg02;s |
2380 | 79 3d 72 65 67 30 33 3b 63 7a 3d 72 65 67 30 34 3b 73 7a 3d 72 65 67 30 35 3b 73 66 3d 72 65 67 | y=reg03;cz=reg04;sz=reg05;sf=reg |
23a0 | 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b 00 21 00 00 00 2f 2f 20 73 61 74 65 6c 6c 69 74 65 20 32 0d | 06;..af=w/h;.!...//.satellite.2. |
23c0 | 0a 62 74 3d 72 61 6e 64 28 35 30 29 2f 31 30 30 3b 00 4e 00 00 00 6e 3d 32 36 31 3b 6e 63 3d 32 | .bt=rand(50)/100;.N...n=261;nc=2 |
23e0 | 35 3b 6e 6d 3d 2e 32 3b 72 79 3d 31 2e 35 37 3b 72 78 3d 30 3b 72 7a 3d 31 2e 35 37 3b 3b 72 78 | 5;nm=.2;ry=1.57;rx=0;rz=1.57;;rx |
2400 | 6f 3d 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a 6f 3d 2d 30 2e 30 32 33 3b 73 66 3d | o=0.019;ryo=-0.03;rzo=-0.023;sf= |
2420 | 31 2e 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 2c 03 00 00 01 19 02 00 | 1.2.................$...,....... |
2440 | 00 72 65 64 3d 63 72 3b 67 72 65 65 6e 3d 63 72 3b 62 6c 75 65 3d 63 72 3b 0d 0a 63 72 3d 31 2d | .red=cr;green=cr;blue=cr;..cr=1- |
2460 | 63 76 3b 63 67 3d 31 31 2d 63 76 3b 63 62 3d 31 2d 63 76 3b 0d 0a 72 61 64 3d 63 6f 73 28 6d 70 | cv;cg=11-cv;cb=1-cv;..rad=cos(mp |
2480 | 2a 31 2e 35 37 29 3b 20 63 73 3d 2e 31 35 2b 67 65 74 6f 73 63 28 63 62 2c 30 2c 30 29 2a 2e 31 | *1.57);.cs=.15+getosc(cb,0,0)*.1 |
24a0 | 3b 0d 0a 70 7a 3d 63 73 2a 28 63 6f 73 28 72 70 2f 6e 63 2a 36 2e 32 38 29 2a 72 61 64 29 2d 66 | ;..pz=cs*(cos(rp/nc*6.28)*rad)-f |
24c0 | 73 3b 0d 0a 70 78 3d 63 73 2a 28 73 69 6e 28 72 70 2f 6e 63 2a 36 2e 32 38 29 2a 72 61 64 29 2d | s;..px=cs*(sin(rp/nc*6.28)*rad)- |
24e0 | 32 2e 35 3b 0d 0a 70 79 3d 63 73 2a 28 73 69 6e 28 6d 70 2a 31 2e 35 37 29 29 2b 66 63 3b 0d 0a | 2.5;..py=cs*(sin(mp*1.57))+fc;.. |
2500 | 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a | x1=px*cz+py*sz;y1=py*cz-px*sz;.. |
2520 | 79 32 3d 79 31 2a 63 78 2b 70 7a 2a 73 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a | y2=y1*cx+pz*sx;z2=pz*cx-y1*sx;.. |
2540 | 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 34 3b | x3=x1*cy+z2*sy;z3=z2*cy-x1*sy+4; |
2560 | 0d 0a 78 3d 69 66 28 61 62 6f 76 65 28 7a 33 2c 30 2e 31 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d | ..x=if(above(z3,0.1),x3/z3,x);y= |
2580 | 69 66 28 61 62 6f 76 65 28 7a 33 2c 30 2e 31 29 2c 79 32 2f 7a 33 2a 61 66 2c 79 29 3b 0d 0a 72 | if(above(z3,0.1),y2/z3*af,y);..r |
25a0 | 70 3d 69 66 28 65 71 75 61 6c 28 63 76 2c 30 29 2c 28 72 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d | p=if(equal(cv,0),(rp+1)%nc,rp);. |
25c0 | 0a 6d 70 3d 69 66 28 65 71 75 61 6c 28 63 76 2c 30 29 2c 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 | .mp=if(equal(cv,0),mp,mp+nm);..c |
25e0 | 76 3d 69 66 28 65 71 75 61 6c 28 72 70 2c 30 29 2c 31 2d 63 76 2c 30 29 3b 0d 0a 63 3d 67 6d 65 | v=if(equal(rp,0),1-cv,0);..c=gme |
2600 | 67 61 62 75 66 28 31 29 3b 0d 0a 64 63 3d 2d 69 66 28 61 62 6f 76 65 28 63 2c 7a 33 2d 35 29 2c | gabuf(1);..dc=-if(above(c,z3-5), |
2620 | 30 2c 31 29 2b 7a 33 2a 2e 31 3b 0d 0a 72 65 64 3d 64 63 3b 0d 0a 67 72 65 65 6e 3d 64 63 3b 0d | 0,1)+z3*.1;..red=dc;..green=dc;. |
2640 | 0a 62 6c 75 65 3d 64 63 3b 0d 0a 78 3d 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 00 83 00 00 00 72 70 | .blue=dc;..x=x*sf;y=y*sf;.....rp |
2660 | 3d 30 3b 6d 70 3d 2d 31 3b 63 76 3d 30 3b 66 72 3d 66 72 2b 62 74 2d 28 66 72 2a 2e 31 35 29 3b | =0;mp=-1;cv=0;fr=fr+bt-(fr*.15); |
2680 | 66 63 3d 63 6f 73 28 66 72 29 3b 66 73 3d 73 69 6e 28 66 72 29 3b 0d 0a 63 78 3d 72 65 67 30 30 | fc=cos(fr);fs=sin(fr);..cx=reg00 |
26a0 | 3b 73 78 3d 72 65 67 30 31 3b 63 79 3d 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 | ;sx=reg01;cy=reg02;sy=reg03;cz=r |
26c0 | 65 67 30 34 3b 73 7a 3d 72 65 67 30 35 3b 73 66 3d 72 65 67 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b | eg04;sz=reg05;sf=reg06;..af=w/h; |
26e0 | 00 21 00 00 00 2f 2f 20 73 61 74 65 6c 6c 69 74 65 20 33 0d 0a 62 74 3d 72 61 6e 64 28 35 30 29 | .!...//.satellite.3..bt=rand(50) |
2700 | 2f 31 30 30 3b 00 4e 00 00 00 6e 3d 32 36 31 3b 6e 63 3d 32 35 3b 6e 6d 3d 2e 32 3b 72 79 3d 31 | /100;.N...n=261;nc=25;nm=.2;ry=1 |
2720 | 2e 35 37 3b 72 78 3d 30 3b 72 7a 3d 31 2e 35 37 3b 3b 72 78 6f 3d 30 2e 30 31 39 3b 72 79 6f 3d | .57;rx=0;rz=1.57;;rxo=0.019;ryo= |
2740 | 2d 30 2e 30 33 3b 72 7a 6f 3d 2d 30 2e 30 32 33 3b 73 66 3d 31 2e 32 00 02 00 00 00 01 00 00 00 | -0.03;rzo=-0.023;sf=1.2......... |
2760 | ff ff ff 00 01 00 00 00 24 00 00 00 31 03 00 00 01 1e 02 00 00 72 65 64 3d 63 72 3b 67 72 65 65 | ........$...1........red=cr;gree |
2780 | 6e 3d 63 72 3b 62 6c 75 65 3d 63 72 3b 0d 0a 63 72 3d 31 2d 63 76 3b 63 67 3d 31 31 2d 63 76 3b | n=cr;blue=cr;..cr=1-cv;cg=11-cv; |
27a0 | 63 62 3d 31 2d 63 76 3b 0d 0a 72 61 64 3d 63 6f 73 28 6d 70 2a 31 2e 35 37 29 3b 20 63 73 3d 2e | cb=1-cv;..rad=cos(mp*1.57);.cs=. |
27c0 | 30 38 35 2b 67 65 74 6f 73 63 28 63 62 2c 30 2c 30 29 2a 2e 33 3b 0d 0a 70 79 3d 63 73 2a 28 63 | 085+getosc(cb,0,0)*.3;..py=cs*(c |
27e0 | 6f 73 28 72 70 2f 6e 63 2a 36 2e 32 38 29 2a 72 61 64 29 2b 66 73 2a 32 3b 0d 0a 70 7a 3d 63 73 | os(rp/nc*6.28)*rad)+fs*2;..pz=cs |
2800 | 2a 28 73 69 6e 28 72 70 2f 6e 63 2a 36 2e 32 38 29 2a 72 61 64 29 2d 32 2e 35 3b 0d 0a 70 78 3d | *(sin(rp/nc*6.28)*rad)-2.5;..px= |
2820 | 63 73 2a 28 73 69 6e 28 6d 70 2a 31 2e 35 37 29 29 2d 66 63 2a 32 3b 0d 0a 78 31 3d 70 78 2a 63 | cs*(sin(mp*1.57))-fc*2;..x1=px*c |
2840 | 7a 2b 70 79 2a 73 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 | z+py*sz;y1=py*cz-px*sz;..y2=y1*c |
2860 | 78 2b 70 7a 2a 73 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 | x+pz*sx;z2=pz*cx-y1*sx;..x3=x1*c |
2880 | 79 2b 7a 32 2a 73 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 34 3b 0d 0a 78 3d 69 66 28 | y+z2*sy;z3=z2*cy-x1*sy+4;..x=if( |
28a0 | 61 62 6f 76 65 28 7a 33 2c 30 2e 31 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d 69 66 28 61 62 6f 76 | above(z3,0.1),x3/z3,x);y=if(abov |
28c0 | 65 28 7a 33 2c 30 2e 31 29 2c 79 32 2f 7a 33 2a 61 66 2c 79 29 3b 0d 0a 72 70 3d 69 66 28 65 71 | e(z3,0.1),y2/z3*af,y);..rp=if(eq |
28e0 | 75 61 6c 28 63 76 2c 30 29 2c 28 72 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d 0a 6d 70 3d 69 66 28 | ual(cv,0),(rp+1)%nc,rp);..mp=if( |
2900 | 65 71 75 61 6c 28 63 76 2c 30 29 2c 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 76 3d 69 66 28 65 71 | equal(cv,0),mp,mp+nm);..cv=if(eq |
2920 | 75 61 6c 28 72 70 2c 30 29 2c 31 2d 63 76 2c 30 29 3b 0d 0a 63 3d 67 6d 65 67 61 62 75 66 28 31 | ual(rp,0),1-cv,0);..c=gmegabuf(1 |
2940 | 29 3b 0d 0a 64 63 3d 2d 69 66 28 61 62 6f 76 65 28 63 2c 7a 33 2d 35 29 2c 30 2c 31 29 2b 7a 33 | );..dc=-if(above(c,z3-5),0,1)+z3 |
2960 | 2a 2e 31 3b 0d 0a 72 65 64 3d 64 63 3b 0d 0a 67 72 65 65 6e 3d 64 63 3b 0d 0a 62 6c 75 65 3d 64 | *.1;..red=dc;..green=dc;..blue=d |
2980 | 63 3b 0d 0a 78 3d 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 00 83 00 00 00 72 70 3d 30 3b 6d 70 3d 2d | c;..x=x*sf;y=y*sf;.....rp=0;mp=- |
29a0 | 31 3b 63 76 3d 30 3b 66 72 3d 66 72 2b 62 74 2d 28 66 72 2a 2e 31 35 29 3b 66 63 3d 63 6f 73 28 | 1;cv=0;fr=fr+bt-(fr*.15);fc=cos( |
29c0 | 66 72 29 3b 66 73 3d 73 69 6e 28 66 72 29 3b 0d 0a 63 78 3d 72 65 67 30 30 3b 73 78 3d 72 65 67 | fr);fs=sin(fr);..cx=reg00;sx=reg |
29e0 | 30 31 3b 63 79 3d 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 65 67 30 34 3b 73 7a | 01;cy=reg02;sy=reg03;cz=reg04;sz |
2a00 | 3d 72 65 67 30 35 3b 73 66 3d 72 65 67 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b 00 21 00 00 00 2f 2f | =reg05;sf=reg06;..af=w/h;.!...// |
2a20 | 20 73 61 74 65 6c 6c 69 74 65 20 34 0d 0a 62 74 3d 72 61 6e 64 28 35 30 29 2f 31 30 30 3b 00 4e | .satellite.4..bt=rand(50)/100;.N |
2a40 | 00 00 00 6e 3d 32 36 31 3b 6e 63 3d 32 35 3b 6e 6d 3d 2e 32 3b 72 79 3d 31 2e 35 37 3b 72 78 3d | ...n=261;nc=25;nm=.2;ry=1.57;rx= |
2a60 | 30 3b 72 7a 3d 31 2e 35 37 3b 3b 72 78 6f 3d 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 | 0;rz=1.57;;rxo=0.019;ryo=-0.03;r |
2a80 | 7a 6f 3d 2d 30 2e 30 32 33 3b 73 66 3d 31 2e 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 | zo=-0.023;sf=1.2................ |
2aa0 | 00 24 00 00 00 32 03 00 00 01 1f 02 00 00 72 65 64 3d 63 72 3b 67 72 65 65 6e 3d 63 72 3b 62 6c | .$...2........red=cr;green=cr;bl |
2ac0 | 75 65 3d 63 72 3b 0d 0a 63 72 3d 31 2d 63 76 3b 63 67 3d 31 31 2d 63 76 3b 63 62 3d 31 2d 63 76 | ue=cr;..cr=1-cv;cg=11-cv;cb=1-cv |
2ae0 | 3b 0d 0a 72 61 64 3d 63 6f 73 28 6d 70 2a 31 2e 35 37 29 3b 20 63 73 3d 2e 31 2b 67 65 74 6f 73 | ;..rad=cos(mp*1.57);.cs=.1+getos |
2b00 | 63 28 63 62 2c 30 2c 30 29 2a 2e 33 35 3b 0d 0a 70 79 3d 63 73 2a 28 63 6f 73 28 72 70 2f 6e 63 | c(cb,0,0)*.35;..py=cs*(cos(rp/nc |
2b20 | 2a 36 2e 32 38 29 2a 72 61 64 29 2b 66 63 3b 0d 0a 70 78 3d 63 73 2a 28 73 69 6e 28 72 70 2f 6e | *6.28)*rad)+fc;..px=cs*(sin(rp/n |
2b40 | 63 2a 36 2e 32 38 29 2a 72 61 64 29 2b 6d 61 78 28 32 2c 66 72 29 3b 0d 0a 70 7a 3d 63 73 2a 28 | c*6.28)*rad)+max(2,fr);..pz=cs*( |
2b60 | 73 69 6e 28 6d 70 2a 31 2e 35 37 29 29 2d 66 73 3b 0d 0a 78 31 3d 70 78 2a 63 7a 2b 70 79 2a 73 | sin(mp*1.57))-fs;..x1=px*cz+py*s |
2b80 | 7a 3b 79 31 3d 70 79 2a 63 7a 2d 70 78 2a 73 7a 3b 0d 0a 79 32 3d 79 31 2a 63 78 2b 70 7a 2a 73 | z;y1=py*cz-px*sz;..y2=y1*cx+pz*s |
2ba0 | 78 3b 7a 32 3d 70 7a 2a 63 78 2d 79 31 2a 73 78 3b 0d 0a 78 33 3d 78 31 2a 63 79 2b 7a 32 2a 73 | x;z2=pz*cx-y1*sx;..x3=x1*cy+z2*s |
2bc0 | 79 3b 7a 33 3d 7a 32 2a 63 79 2d 78 31 2a 73 79 2b 34 3b 0d 0a 78 3d 69 66 28 61 62 6f 76 65 28 | y;z3=z2*cy-x1*sy+4;..x=if(above( |
2be0 | 7a 33 2c 30 2e 31 29 2c 78 33 2f 7a 33 2c 78 29 3b 79 3d 69 66 28 61 62 6f 76 65 28 7a 33 2c 30 | z3,0.1),x3/z3,x);y=if(above(z3,0 |
2c00 | 2e 31 29 2c 79 32 2f 7a 33 2a 61 66 2c 79 29 3b 0d 0a 72 70 3d 69 66 28 65 71 75 61 6c 28 63 76 | .1),y2/z3*af,y);..rp=if(equal(cv |
2c20 | 2c 30 29 2c 28 72 70 2b 31 29 25 6e 63 2c 72 70 29 3b 0d 0a 6d 70 3d 69 66 28 65 71 75 61 6c 28 | ,0),(rp+1)%nc,rp);..mp=if(equal( |
2c40 | 63 76 2c 30 29 2c 6d 70 2c 6d 70 2b 6e 6d 29 3b 0d 0a 63 76 3d 69 66 28 65 71 75 61 6c 28 72 70 | cv,0),mp,mp+nm);..cv=if(equal(rp |
2c60 | 2c 30 29 2c 31 2d 63 76 2c 30 29 3b 0d 0a 63 3d 67 6d 65 67 61 62 75 66 28 31 29 3b 0d 0a 64 63 | ,0),1-cv,0);..c=gmegabuf(1);..dc |
2c80 | 3d 2d 69 66 28 61 62 6f 76 65 28 63 2c 7a 33 2d 34 29 2c 30 2c 31 29 2b 7a 33 2a 2e 31 3b 0d 0a | =-if(above(c,z3-4),0,1)+z3*.1;.. |
2ca0 | 72 65 64 3d 64 63 3b 0d 0a 67 72 65 65 6e 3d 64 63 3b 0d 0a 62 6c 75 65 3d 64 63 3b 0d 0a 78 3d | red=dc;..green=dc;..blue=dc;..x= |
2cc0 | 78 2a 73 66 3b 79 3d 79 2a 73 66 3b 00 83 00 00 00 72 70 3d 30 3b 6d 70 3d 2d 31 3b 63 76 3d 30 | x*sf;y=y*sf;.....rp=0;mp=-1;cv=0 |
2ce0 | 3b 66 72 3d 66 72 2b 62 74 2d 28 66 72 2a 2e 31 35 29 3b 66 63 3d 63 6f 73 28 66 72 29 3b 66 73 | ;fr=fr+bt-(fr*.15);fc=cos(fr);fs |
2d00 | 3d 73 69 6e 28 66 72 29 3b 0d 0a 63 78 3d 72 65 67 30 30 3b 73 78 3d 72 65 67 30 31 3b 63 79 3d | =sin(fr);..cx=reg00;sx=reg01;cy= |
2d20 | 72 65 67 30 32 3b 73 79 3d 72 65 67 30 33 3b 63 7a 3d 72 65 67 30 34 3b 73 7a 3d 72 65 67 30 35 | reg02;sy=reg03;cz=reg04;sz=reg05 |
2d40 | 3b 73 66 3d 72 65 67 30 36 3b 0d 0a 61 66 3d 77 2f 68 3b 00 21 00 00 00 2f 2f 20 73 61 74 65 6c | ;sf=reg06;..af=w/h;.!...//.satel |
2d60 | 6c 69 74 65 20 35 0d 0a 62 74 3d 72 61 6e 64 28 35 30 29 2f 31 30 30 3b 00 4e 00 00 00 6e 3d 32 | lite.5..bt=rand(50)/100;.N...n=2 |
2d80 | 36 31 3b 6e 63 3d 32 35 3b 6e 6d 3d 2e 32 3b 72 79 3d 31 2e 35 37 3b 72 78 3d 30 3b 72 7a 3d 31 | 61;nc=25;nm=.2;ry=1.57;rx=0;rz=1 |
2da0 | 2e 35 37 3b 3b 72 78 6f 3d 30 2e 30 31 39 3b 72 79 6f 3d 2d 30 2e 30 33 3b 72 7a 6f 3d 2d 30 2e | .57;;rxo=0.019;ryo=-0.03;rzo=-0. |
2dc0 | 30 32 33 3b 73 66 3d 31 2e 32 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 04 00 00 00 14 | 023;sf=1.2...................... |
2de0 | 00 00 00 20 00 00 00 13 00 00 00 01 00 00 00 01 00 00 00 00 00 00 00 | ....................... |