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 af 00 00 | Nullsoft.AVS.Preset.0.2......... |
0020 | 00 ab 00 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3e 63 75 62 65 3c 0d 0a 2d 2d 2d 2d 2d | ...................>cube<..----- |
0040 | 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d | -------------------------------- |
0060 | 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d | -------------------------------- |
0080 | 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d | -------------------------------- |
00a0 | 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 37 2e 39 2e 20 32 6f 6f 32 2c 20 4c 6a 75 62 6c 6a 61 6e 61 2c 20 | --------..7.9..2oo2,.Ljubljana,. |
00c0 | 53 6c 6f 76 65 6e 69 6a 61 20 20 66 9a 6b a9 00 19 00 00 00 14 00 00 00 01 00 00 00 fd fd fd 00 | Slovenija..f.k.................. |
00e0 | 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00 00 04 00 00 00 07 a4 02 80 24 00 00 00 28 02 00 00 | ............(...........$...(... |
0100 | 01 21 01 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 | .!...c=bnot(c);..f=f+c*.1;..g=if |
0120 | 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b 0d 0a 78 31 3d 66 3b 0d 0a 79 31 3d 67 2b 6b 3b 0d | (c,g,-g);..k=0;..x1=f;..y1=g+k;. |
0140 | 0a 7a 31 3d 2e 38 2b 63 6f 73 28 78 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 32 | .z1=.8+cos(x1*p/2)/2*bea/10;..x2 |
0160 | 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a | =x1*zs+y1*zc;..y2=x1*zc-y1*zs;.. |
0180 | 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b | x3=x2*ys+z1*yc;..z2=x2*yc-z1*ys; |
01a0 | 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 | ..y3=y2*xs+z2*xc;..z3=y2*xc-z2*x |
01c0 | 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d | s;..x4=x3;..y4=y3;..z4=z3+3;..x= |
01e0 | 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d | x4/(1+z4/3)*ky;..y=y4/(1+z4/3);. |
0200 | 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 | .red=-z3*(1-c);..blue=red;..gree |
0220 | 6e 3d 72 65 64 00 89 00 00 00 6b 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d 2e | n=red.....ky=h/w;bea=max(0,bea-. |
0240 | 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d | 4);n=30;f=-.8;g=.8;rz=rz+rdz;rx= |
0260 | 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 | rx+rdx;ry=ry+rdy;xs=sin(rx);ys=s |
0280 | 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d | in(ry);zs=sin(rz);xc=cos(rx);yc= |
02a0 | 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 62 | cos(ry);zc=cos(rz).O...bea=min(b |
02c0 | 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 | ea+9,15);rdx=getosc(0,0,0)/5;rdy |
02e0 | 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 | =getosc(.5,0,0)/5;rdz=getosc(1,0 |
0300 | 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 | ,0)/5.....p=3.14159265;......... |
0320 | ff ff ff 00 01 00 00 00 24 00 00 00 28 02 00 00 01 21 01 00 00 63 3d 62 6e 6f 74 28 63 29 0d 0a | ........$...(....!...c=bnot(c).. |
0340 | 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b 0d | ;f=f+c*.1;..g=if(c,g,-g);..k=0;. |
0360 | 0a 79 31 3d 66 3b 0d 0a 78 31 3d 67 2b 6b 3b 0d 0a 7a 31 3d 2e 38 2b 63 6f 73 28 79 31 2a 70 2f | .y1=f;..x1=g+k;..z1=.8+cos(y1*p/ |
0380 | 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 | 2)/2*bea/10;..x2=x1*zs+y1*zc;..y |
03a0 | 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d | 2=x1*zc-y1*zs;..x3=x2*ys+z1*yc;. |
03c0 | 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 | .z2=x2*yc-z1*ys;..y3=y2*xs+z2*xc |
03e0 | 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 | ;..z3=y2*xc-z2*xs;..x4=x3;..y4=y |
0400 | 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d | 3;..z4=z3+3;..x=x4/(1+z4/3)*ky;. |
0420 | 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d | .y=y4/(1+z4/3);..red=-z3*(1-c);. |
0440 | 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 3d 68 2f 77 | .blue=red;..green=red.....ky=h/w |
0460 | 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b 67 3d | ;bea=max(0,bea-.4);n=30;f=-.8;g= |
0480 | 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 | .8;rz=rz+rdz;rx=rx+rdx;ry=ry+rdy |
04a0 | 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a | ;xs=sin(rx);ys=sin(ry);zs=sin(rz |
04c0 | 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 | );xc=cos(rx);yc=cos(ry);zc=cos(r |
04e0 | 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 65 74 | z).O...bea=min(bea+9,15);rdx=get |
0500 | 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f | osc(0,0,0)/5;rdy=getosc(.5,0,0)/ |
0520 | 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 | 5;rdz=getosc(1,0,0)/5.....p=3.14 |
0540 | 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 29 02 00 00 | 159265;.................$...)... |
0560 | 01 22 01 00 00 63 3d 62 6e 6f 74 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 | ."...c=bnot(c)..;f=f+c*.1;..g=if |
0580 | 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b 0d 0a 78 31 3d 66 3b 0d 0a 79 31 3d 67 2b 6b 3b 0d | (c,g,-g);..k=0;..x1=f;..y1=g+k;. |
05a0 | 0a 7a 31 3d 2d 2e 38 2d 63 6f 73 28 78 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 | .z1=-.8-cos(x1*p/2)/2*bea/10;..x |
05c0 | 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d | 2=x1*zs+y1*zc;..y2=x1*zc-y1*zs;. |
05e0 | 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 | .x3=x2*ys+z1*yc;..z2=x2*yc-z1*ys |
0600 | 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a | ;..y3=y2*xs+z2*xc;..z3=y2*xc-z2* |
0620 | 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 | xs;..x4=x3;..y4=y3;..z4=z3+3;..x |
0640 | 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b | =x4/(1+z4/3)*ky;..y=y4/(1+z4/3); |
0660 | 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 | ..red=-z3*(1-c);..blue=red;..gre |
0680 | 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d | en=red.....ky=h/w;bea=max(0,bea- |
06a0 | 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 | .4);n=30;f=-.8;g=.8;rz=rz+rdz;rx |
06c0 | 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d | =rx+rdx;ry=ry+rdy;xs=sin(rx);ys= |
06e0 | 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 | sin(ry);zs=sin(rz);xc=cos(rx);yc |
0700 | 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 | =cos(ry);zc=cos(rz).O...bea=min( |
0720 | 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 | bea+9,15);rdx=getosc(0,0,0)/5;rd |
0740 | 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c | y=getosc(.5,0,0)/5;rdz=getosc(1, |
0760 | 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 | 0,0)/5.....p=3.14159265;........ |
0780 | 00 ff ff ff 00 01 00 00 00 24 00 00 00 29 02 00 00 01 22 01 00 00 63 3d 62 6e 6f 74 28 63 29 0d | .........$...)...."...c=bnot(c). |
07a0 | 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b | .;f=f+c*.1;..g=if(c,g,-g);..k=0; |
07c0 | 0d 0a 79 31 3d 66 3b 0d 0a 78 31 3d 67 2b 6b 3b 0d 0a 7a 31 3d 2d 2e 38 2d 63 6f 73 28 79 31 2a | ..y1=f;..x1=g+k;..z1=-.8-cos(y1* |
07e0 | 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d | p/2)/2*bea/10;..x2=x1*zs+y1*zc;. |
0800 | 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 | .y2=x1*zc-y1*zs;..x3=x2*ys+z1*yc |
0820 | 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a | ;..z2=x2*yc-z1*ys;..y3=y2*xs+z2* |
0840 | 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 | xc;..z3=y2*xc-z2*xs;..x4=x3;..y4 |
0860 | 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 | =y3;..z4=z3+3;..x=x4/(1+z4/3)*ky |
0880 | 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 | ;..y=y4/(1+z4/3);..red=-z3*(1-c) |
08a0 | 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 3d 68 | ;..blue=red;..green=red.....ky=h |
08c0 | 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b | /w;bea=max(0,bea-.4);n=30;f=-.8; |
08e0 | 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 | g=.8;rz=rz+rdz;rx=rx+rdx;ry=ry+r |
0900 | 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 | dy;xs=sin(rx);ys=sin(ry);zs=sin( |
0920 | 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 | rz);xc=cos(rx);yc=cos(ry);zc=cos |
0940 | 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 | (rz).O...bea=min(bea+9,15);rdx=g |
0960 | 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 | etosc(0,0,0)/5;rdy=getosc(.5,0,0 |
0980 | 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e | )/5;rdz=getosc(1,0,0)/5.....p=3. |
09a0 | 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 29 02 | 14159265;.................$...). |
09c0 | 00 00 01 22 01 00 00 63 3d 62 6e 6f 74 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d | ..."...c=bnot(c)..;f=f+c*.1;..g= |
09e0 | 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b 0d 0a 78 31 3d 66 3b 0d 0a 7a 31 3d 67 2b 6b | if(c,g,-g);..k=0;..x1=f;..z1=g+k |
0a00 | 3b 0d 0a 79 31 3d 2d 2e 38 2d 63 6f 73 28 78 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d | ;..y1=-.8-cos(x1*p/2)/2*bea/10;. |
0a20 | 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 | .x2=x1*zs+y1*zc;..y2=x1*zc-y1*zs |
0a40 | 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a | ;..x3=x2*ys+z1*yc;..z2=x2*yc-z1* |
0a60 | 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a | ys;..y3=y2*xs+z2*xc;..z3=y2*xc-z |
0a80 | 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d | 2*xs;..x4=x3;..y4=y3;..z4=z3+3;. |
0aa0 | 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 | .x=x4/(1+z4/3)*ky;..y=y4/(1+z4/3 |
0ac0 | 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 | );..red=-z3*(1-c);..blue=red;..g |
0ae0 | 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 | reen=red.....ky=h/w;bea=max(0,be |
0b00 | 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b | a-.4);n=30;f=-.8;g=.8;rz=rz+rdz; |
0b20 | 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 | rx=rx+rdx;ry=ry+rdy;xs=sin(rx);y |
0b40 | 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b | s=sin(ry);zs=sin(rz);xc=cos(rx); |
0b60 | 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 | yc=cos(ry);zc=cos(rz).O...bea=mi |
0b80 | 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b | n(bea+9,15);rdx=getosc(0,0,0)/5; |
0ba0 | 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 | rdy=getosc(.5,0,0)/5;rdz=getosc( |
0bc0 | 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 | 1,0,0)/5.....p=3.14159265;...... |
0be0 | 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 29 02 00 00 01 22 01 00 00 63 3d 62 6e 6f 74 28 63 | ...........$...)...."...c=bnot(c |
0c00 | 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d | )..;f=f+c*.1;..g=if(c,g,-g);..k= |
0c20 | 30 3b 0d 0a 7a 31 3d 66 3b 0d 0a 78 31 3d 67 2b 6b 3b 0d 0a 79 31 3d 2d 2e 38 2d 63 6f 73 28 7a | 0;..z1=f;..x1=g+k;..y1=-.8-cos(z |
0c40 | 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 | 1*p/2)/2*bea/10;..x2=x1*zs+y1*zc |
0c60 | 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a | ;..y2=x1*zc-y1*zs;..x3=x2*ys+z1* |
0c80 | 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a | yc;..z2=x2*yc-z1*ys;..y3=y2*xs+z |
0ca0 | 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a | 2*xc;..z3=y2*xc-z2*xs;..x4=x3;.. |
0cc0 | 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a | y4=y3;..z4=z3+3;..x=x4/(1+z4/3)* |
0ce0 | 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d | ky;..y=y4/(1+z4/3);..red=-z3*(1- |
0d00 | 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 | c);..blue=red;..green=red.....ky |
0d20 | 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e | =h/w;bea=max(0,bea-.4);n=30;f=-. |
0d40 | 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 | 8;g=.8;rz=rz+rdz;rx=rx+rdx;ry=ry |
0d60 | 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 | +rdy;xs=sin(rx);ys=sin(ry);zs=si |
0d80 | 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 | n(rz);xc=cos(rx);yc=cos(ry);zc=c |
0da0 | 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 | os(rz).O...bea=min(bea+9,15);rdx |
0dc0 | 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 | =getosc(0,0,0)/5;rdy=getosc(.5,0 |
0de0 | 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d | ,0)/5;rdz=getosc(1,0,0)/5.....p= |
0e00 | 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 | 3.14159265;.................$... |
0e20 | 28 02 00 00 01 21 01 00 00 63 3d 62 6e 6f 74 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a | (....!...c=bnot(c)..;f=f+c*.1;.. |
0e40 | 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b 0d 0a 78 31 3d 66 3b 0d 0a 7a 31 3d 67 | g=if(c,g,-g);..k=0;..x1=f;..z1=g |
0e60 | 2b 6b 3b 0d 0a 79 31 3d 2e 38 2b 63 6f 73 28 78 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b | +k;..y1=.8+cos(x1*p/2)/2*bea/10; |
0e80 | 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a | ..x2=x1*zs+y1*zc;..y2=x1*zc-y1*z |
0ea0 | 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 | s;..x3=x2*ys+z1*yc;..z2=x2*yc-z1 |
0ec0 | 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d | *ys;..y3=y2*xs+z2*xc;..z3=y2*xc- |
0ee0 | 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b | z2*xs;..x4=x3;..y4=y3;..z4=z3+3; |
0f00 | 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f | ..x=x4/(1+z4/3)*ky;..y=y4/(1+z4/ |
0f20 | 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a | 3);..red=-z3*(1-c);..blue=red;.. |
0f40 | 67 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 | green=red.....ky=h/w;bea=max(0,b |
0f60 | 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a | ea-.4);n=30;f=-.8;g=.8;rz=rz+rdz |
0f80 | 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b | ;rx=rx+rdx;ry=ry+rdy;xs=sin(rx); |
0fa0 | 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 | ys=sin(ry);zs=sin(rz);xc=cos(rx) |
0fc0 | 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d | ;yc=cos(ry);zc=cos(rz).O...bea=m |
0fe0 | 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 | in(bea+9,15);rdx=getosc(0,0,0)/5 |
1000 | 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 | ;rdy=getosc(.5,0,0)/5;rdz=getosc |
1020 | 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 | (1,0,0)/5.....p=3.14159265;..... |
1040 | 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 28 02 00 00 01 21 01 00 00 63 3d 62 6e 6f 74 28 | ............$...(....!...c=bnot( |
1060 | 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b | c)..;f=f+c*.1;..g=if(c,g,-g);..k |
1080 | 3d 30 3b 0d 0a 7a 31 3d 66 3b 0d 0a 78 31 3d 67 2b 6b 3b 0d 0a 79 31 3d 2e 38 2b 63 6f 73 28 7a | =0;..z1=f;..x1=g+k;..y1=.8+cos(z |
10a0 | 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 | 1*p/2)/2*bea/10;..x2=x1*zs+y1*zc |
10c0 | 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a | ;..y2=x1*zc-y1*zs;..x3=x2*ys+z1* |
10e0 | 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a | yc;..z2=x2*yc-z1*ys;..y3=y2*xs+z |
1100 | 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a | 2*xc;..z3=y2*xc-z2*xs;..x4=x3;.. |
1120 | 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a | y4=y3;..z4=z3+3;..x=x4/(1+z4/3)* |
1140 | 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d | ky;..y=y4/(1+z4/3);..red=-z3*(1- |
1160 | 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 | c);..blue=red;..green=red.....ky |
1180 | 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e | =h/w;bea=max(0,bea-.4);n=30;f=-. |
11a0 | 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 | 8;g=.8;rz=rz+rdz;rx=rx+rdx;ry=ry |
11c0 | 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 | +rdy;xs=sin(rx);ys=sin(ry);zs=si |
11e0 | 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 | n(rz);xc=cos(rx);yc=cos(ry);zc=c |
1200 | 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 | os(rz).O...bea=min(bea+9,15);rdx |
1220 | 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 | =getosc(0,0,0)/5;rdy=getosc(.5,0 |
1240 | 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d | ,0)/5;rdz=getosc(1,0,0)/5.....p= |
1260 | 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 | 3.14159265;.................$... |
1280 | 29 02 00 00 01 22 01 00 00 63 3d 62 6e 6f 74 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a | )...."...c=bnot(c)..;f=f+c*.1;.. |
12a0 | 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b 0d 0a 79 31 3d 66 3b 0d 0a 7a 31 3d 67 | g=if(c,g,-g);..k=0;..y1=f;..z1=g |
12c0 | 2b 6b 3b 0d 0a 78 31 3d 2e 38 2b 63 6f 73 28 79 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b | +k;..x1=.8+cos(y1*p/2)/2*bea/10; |
12e0 | 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a | ..x2=x1*zs+y1*zc;..y2=x1*zc-y1*z |
1300 | 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 | s;..x3=x2*ys+z1*yc;..z2=x2*yc-z1 |
1320 | 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d | *ys;..y3=y2*xs+z2*xc;..z3=y2*xc- |
1340 | 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b | z2*xs;..x4=x3;..y4=y3;..z4=z3+3; |
1360 | 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f | ..x=x4/(1+z4/3)*ky;..y=y4/(1+z4/ |
1380 | 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a | 3);..red=-z3*(1-c);..blue=red;.. |
13a0 | 67 72 65 65 6e 3d 72 65 64 20 00 89 00 00 00 6b 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c | green=red......ky=h/w;bea=max(0, |
13c0 | 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 | bea-.4);n=30;f=-.8;g=.8;rz=rz+rd |
13e0 | 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 | z;rx=rx+rdx;ry=ry+rdy;xs=sin(rx) |
1400 | 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 | ;ys=sin(ry);zs=sin(rz);xc=cos(rx |
1420 | 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d | );yc=cos(ry);zc=cos(rz).O...bea= |
1440 | 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f | min(bea+9,15);rdx=getosc(0,0,0)/ |
1460 | 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 | 5;rdy=getosc(.5,0,0)/5;rdz=getos |
1480 | 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 | c(1,0,0)/5.....p=3.14159265;.... |
14a0 | 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 28 02 00 00 01 21 01 00 00 63 3d 62 6e 6f 74 | .............$...(....!...c=bnot |
14c0 | 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a | (c)..;f=f+c*.1;..g=if(c,g,-g);.. |
14e0 | 6b 3d 30 3b 0d 0a 7a 31 3d 66 3b 0d 0a 79 31 3d 67 2b 6b 3b 0d 0a 78 31 3d 2e 38 2b 63 6f 73 28 | k=0;..z1=f;..y1=g+k;..x1=.8+cos( |
1500 | 7a 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a | z1*p/2)/2*bea/10;..x2=x1*zs+y1*z |
1520 | 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 | c;..y2=x1*zc-y1*zs;..x3=x2*ys+z1 |
1540 | 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b | *yc;..z2=x2*yc-z1*ys;..y3=y2*xs+ |
1560 | 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d | z2*xc;..z3=y2*xc-z2*xs;..x4=x3;. |
1580 | 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 | .y4=y3;..z4=z3+3;..x=x4/(1+z4/3) |
15a0 | 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 | *ky;..y=y4/(1+z4/3);..red=-z3*(1 |
15c0 | 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b | -c);..blue=red;..green=red.....k |
15e0 | 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d | y=h/w;bea=max(0,bea-.4);n=30;f=- |
1600 | 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 | .8;g=.8;rz=rz+rdz;rx=rx+rdx;ry=r |
1620 | 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 | y+rdy;xs=sin(rx);ys=sin(ry);zs=s |
1640 | 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d | in(rz);xc=cos(rx);yc=cos(ry);zc= |
1660 | 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 | cos(rz).O...bea=min(bea+9,15);rd |
1680 | 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c | x=getosc(0,0,0)/5;rdy=getosc(.5, |
16a0 | 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 | 0,0)/5;rdz=getosc(1,0,0)/5.....p |
16c0 | 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 | =3.14159265;.................$.. |
16e0 | 00 29 02 00 00 01 22 01 00 00 63 3d 62 6e 6f 74 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d | .)...."...c=bnot(c)..;f=f+c*.1;. |
1700 | 0a 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 30 3b 0d 0a 79 31 3d 66 3b 0d 0a 7a 31 3d | .g=if(c,g,-g);..k=0;..y1=f;..z1= |
1720 | 67 2b 6b 3b 0d 0a 78 31 3d 2d 2e 38 2d 63 6f 73 28 79 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 | g+k;..x1=-.8-cos(y1*p/2)/2*bea/1 |
1740 | 30 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 | 0;..x2=x1*zs+y1*zc;..y2=x1*zc-y1 |
1760 | 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d | *zs;..x3=x2*ys+z1*yc;..z2=x2*yc- |
1780 | 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 | z1*ys;..y3=y2*xs+z2*xc;..z3=y2*x |
17a0 | 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b | c-z2*xs;..x4=x3;..y4=y3;..z4=z3+ |
17c0 | 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a | 3;..x=x4/(1+z4/3)*ky;..y=y4/(1+z |
17e0 | 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b | 4/3);..red=-z3*(1-c);..blue=red; |
1800 | 0d 0a 67 72 65 65 6e 3d 72 65 64 00 89 00 00 00 6b 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 | ..green=red.....ky=h/w;bea=max(0 |
1820 | 2c 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 | ,bea-.4);n=30;f=-.8;g=.8;rz=rz+r |
1840 | 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 | dz;rx=rx+rdx;ry=ry+rdy;xs=sin(rx |
1860 | 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 | );ys=sin(ry);zs=sin(rz);xc=cos(r |
1880 | 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 | x);yc=cos(ry);zc=cos(rz).O...bea |
18a0 | 3d 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 | =min(bea+9,15);rdx=getosc(0,0,0) |
18c0 | 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f | /5;rdy=getosc(.5,0,0)/5;rdz=geto |
18e0 | 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 | sc(1,0,0)/5.....p=3.14159265;... |
1900 | 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 29 02 00 00 01 22 01 00 00 63 3d 62 6e 6f | ..............$...)...."...c=bno |
1920 | 74 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 2e 31 3b 0d 0a 67 3d 69 66 28 63 2c 67 2c 2d 67 29 3b 0d | t(c)..;f=f+c*.1;..g=if(c,g,-g);. |
1940 | 0a 6b 3d 30 3b 0d 0a 7a 31 3d 66 3b 0d 0a 79 31 3d 67 2b 6b 3b 0d 0a 78 31 3d 2d 2e 38 2d 63 6f | .k=0;..z1=f;..y1=g+k;..x1=-.8-co |
1960 | 73 28 7a 31 2a 70 2f 32 29 2f 32 2a 62 65 61 2f 31 30 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 | s(z1*p/2)/2*bea/10;..x2=x1*zs+y1 |
1980 | 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b | *zc;..y2=x1*zc-y1*zs;..x3=x2*ys+ |
19a0 | 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 | z1*yc;..z2=x2*yc-z1*ys;..y3=y2*x |
19c0 | 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 | s+z2*xc;..z3=y2*xc-z2*xs;..x4=x3 |
19e0 | 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f | ;..y4=y3;..z4=z3+3;..x=x4/(1+z4/ |
1a00 | 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a | 3)*ky;..y=y4/(1+z4/3);..red=-z3* |
1a20 | 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 89 00 00 | (1-c);..blue=red;..green=red.... |
1a40 | 00 6b 79 3d 68 2f 77 3b 62 65 61 3d 6d 61 78 28 30 2c 62 65 61 2d 2e 34 29 3b 6e 3d 33 30 3b 66 | .ky=h/w;bea=max(0,bea-.4);n=30;f |
1a60 | 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 | =-.8;g=.8;rz=rz+rdz;rx=rx+rdx;ry |
1a80 | 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 | =ry+rdy;xs=sin(rx);ys=sin(ry);zs |
1aa0 | 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a | =sin(rz);xc=cos(rx);yc=cos(ry);z |
1ac0 | 63 3d 63 6f 73 28 72 7a 29 00 4f 00 00 00 62 65 61 3d 6d 69 6e 28 62 65 61 2b 39 2c 31 35 29 3b | c=cos(rz).O...bea=min(bea+9,15); |
1ae0 | 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e | rdx=getosc(0,0,0)/5;rdy=getosc(. |
1b00 | 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 | 5,0,0)/5;rdz=getosc(1,0,0)/5.... |
1b20 | 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 12 | .p=3.14159265;.................. |
1b40 | 00 00 00 0c 00 00 00 00 00 00 00 00 00 00 00 04 00 00 00 26 00 00 00 14 00 00 00 01 00 00 00 00 | ...................&............ |
1b60 | 00 ff 00 01 00 00 00 00 00 00 00 00 00 00 00 2b 00 00 00 91 00 00 00 01 3e 00 00 00 64 31 3d 64 | ...............+........>...d1=d |
1b80 | 3b 0d 0a 64 3d 64 2a 64 2a 31 35 3b 0d 0a 61 6c 70 68 61 3d 28 63 6f 73 28 64 31 2a 70 2a 32 2b | ;..d=d*d*15;..alpha=(cos(d1*p*2+ |
1ba0 | 74 29 29 2f 32 2a 28 31 2e 38 2d 73 69 6e 28 64 31 29 29 2a 64 31 3b 0d 0a 00 17 00 00 00 74 3d | t))/2*(1.8-sin(d1))*d1;.......t= |
1bc0 | 74 2d 61 62 73 28 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 29 00 00 00 00 00 0b 00 00 00 70 3d 61 | t-abs(getosc(0,0,0)).........p=a |
1be0 | 63 6f 73 28 2d 31 29 00 00 00 00 00 00 00 00 00 14 00 00 00 14 00 00 00 00 00 00 00 00 00 00 00 | cos(-1)......................... |
1c00 | 01 00 00 00 01 00 00 00 28 00 00 00 04 00 00 00 04 00 46 80 24 00 00 00 c6 00 00 00 01 81 00 00 | ........(.........F.$........... |
1c20 | 00 63 3d 62 6e 6f 74 28 63 29 0d 0a 3b 66 3d 66 2b 63 2a 31 2f 37 2e 35 3b 0d 0a 67 3d 69 66 28 | .c=bnot(c)..;f=f+c*1/7.5;..g=if( |
1c40 | 63 2c 67 2c 2d 67 29 3b 0d 0a 6b 3d 69 66 28 63 2c 6b 2c 67 65 74 6f 73 63 28 69 2c 30 2c 30 29 | c,g,-g);..k=if(c,k,getosc(i,0,0) |
1c60 | 2f 33 29 3b 0d 0a 78 3d 66 2d 31 2f 37 2e 35 3b 0d 0a 79 3d 6b 3b 0d 0a 72 65 64 3d 28 31 2d 73 | /3);..x=f-1/7.5;..y=k;..red=(1-s |
1c80 | 69 6e 28 69 2a 70 29 29 2a 63 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 | in(i*p))*c;..blue=red;..green=re |
1ca0 | 64 00 14 00 00 00 74 3d 74 2d 30 2e 30 35 3b 66 3d 2d 31 3b 67 3d 2e 35 3b 00 00 00 00 00 10 00 | d.....t=t-0.05;f=-1;g=.5;....... |
1cc0 | 00 00 6e 3d 33 32 3b 70 3d 61 63 6f 73 28 2d 31 29 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 | ..n=32;p=acos(-1)............... |
1ce0 | 00 00 28 00 00 00 04 00 00 00 05 00 fa 80 24 00 00 00 29 01 00 00 01 34 00 00 00 78 31 3d 69 2a | ..(...........$...)....4...x1=i* |
1d00 | 34 2d 32 3b 0d 0a 79 31 3d 73 67 3b 0d 0a 78 3d 78 31 2a 63 78 2b 79 31 2a 73 78 3b 0d 0a 79 3d | 4-2;..y1=sg;..x=x1*cx+y1*sx;..y= |
1d20 | 79 31 2a 63 78 2d 78 31 2a 73 78 3b 0d 0a 00 63 00 00 00 74 72 75 3d 6d 61 78 28 30 2c 74 72 75 | y1*cx-x1*sx;...c...tru=max(0,tru |
1d40 | 2d 2e 31 29 3b 73 65 6e 3d 69 66 28 74 72 75 2c 31 2c 30 29 3b 3b 74 3d 74 2b 70 2f 32 30 2a 73 | -.1);sen=if(tru,1,0);;t=t+p/20*s |
1d60 | 65 6e 3b 63 78 3d 63 6f 73 28 74 29 3b 73 78 3d 73 69 6e 28 74 29 3b 74 31 3d 74 31 2b 70 2f 33 | en;cx=cos(t);sx=sin(t);t1=t1+p/3 |
1d80 | 36 2a 73 65 6e 2a 72 61 6f 6e 3b 73 67 3d 73 69 6e 28 74 31 29 00 5d 00 00 00 67 65 74 3d 67 65 | 6*sen*raon;sg=sin(t1).]...get=ge |
1da0 | 74 6f 73 63 28 30 2c 30 2c 30 29 2f 33 3b 72 61 6f 6e 3d 69 66 28 65 71 75 61 6c 28 74 72 75 2c | tosc(0,0,0)/3;raon=if(equal(tru, |
1dc0 | 30 29 2c 72 61 6e 64 28 32 29 2a 73 69 67 6e 28 76 29 2c 72 61 6f 6e 29 3b 74 72 75 3d 69 66 28 | 0),rand(2)*sign(v),raon);tru=if( |
1de0 | 65 71 75 61 6c 28 74 72 75 2c 30 29 2c 31 2e 31 2c 74 72 75 29 3b 00 14 00 00 00 6e 3d 32 3b 70 | equal(tru,0),1.1,tru);.....n=2;p |
1e00 | 3d 61 63 6f 73 28 2d 31 29 3b 73 69 3d 31 00 02 00 00 00 01 00 00 00 ff c8 91 00 01 00 00 00 24 | =acos(-1);si=1.................$ |
1e20 | 00 00 00 2a 01 00 00 01 34 00 00 00 78 31 3d 69 2a 34 2d 32 3b 0d 0a 79 31 3d 73 67 3b 0d 0a 78 | ...*....4...x1=i*4-2;..y1=sg;..x |
1e40 | 3d 78 31 2a 63 78 2b 79 31 2a 73 78 3b 0d 0a 79 3d 79 31 2a 63 78 2d 78 31 2a 73 78 3b 0d 0a 00 | =x1*cx+y1*sx;..y=y1*cx-x1*sx;... |
1e60 | 68 00 00 00 74 72 75 3d 6d 61 78 28 30 2c 74 72 75 2d 2e 31 29 3b 73 65 6e 3d 69 66 28 74 72 75 | h...tru=max(0,tru-.1);sen=if(tru |
1e80 | 2c 31 2c 30 29 3b 3b 74 3d 74 2b 70 2f 32 30 2a 73 65 6e 2a 72 61 6f 6e 3b 63 78 3d 63 6f 73 28 | ,1,0);;t=t+p/20*sen*raon;cx=cos( |
1ea0 | 74 29 3b 73 78 3d 73 69 6e 28 74 29 3b 74 31 3d 74 31 2b 70 2f 33 36 2a 73 65 6e 2a 72 61 6f 6e | t);sx=sin(t);t1=t1+p/36*sen*raon |
1ec0 | 3b 73 67 3d 73 69 6e 28 74 31 29 00 55 00 00 00 67 65 74 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 | ;sg=sin(t1).U...get=getosc(0,0,0 |
1ee0 | 29 2f 33 3b 72 61 6f 6e 3d 69 66 28 65 71 75 61 6c 28 74 72 75 2c 30 29 2c 72 61 6e 64 28 32 29 | )/3;raon=if(equal(tru,0),rand(2) |
1f00 | 2c 72 61 6f 6e 29 3b 74 72 75 3d 69 66 28 65 71 75 61 6c 28 74 72 75 2c 30 29 2c 31 2e 31 2c 74 | ,raon);tru=if(equal(tru,0),1.1,t |
1f20 | 72 75 29 3b 00 18 00 00 00 6e 3d 32 3b 70 3d 61 63 6f 73 28 2d 31 29 3b 73 69 3d 31 3b 74 3d 30 | ru);.....n=2;p=acos(-1);si=1;t=0 |
1f40 | 00 02 00 00 00 01 00 00 00 ca db ff 00 01 00 00 00 28 00 00 00 04 00 00 00 03 7f 05 80 24 00 00 | .................(...........$.. |
1f60 | 00 d6 01 00 00 01 f3 00 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 7a 31 3d 69 2a 31 2e 36 2d 2e | ..........c=bnot(c);..z1=i*1.6-. |
1f80 | 38 3b 0d 0a 79 31 3d 2d 2e 38 3b 0d 0a 78 31 3d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 | 8;..y1=-.8;..x1=.8;..x2=x1*zs+y1 |
1fa0 | 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b | *zc;..y2=x1*zc-y1*zs;..x3=x2*ys+ |
1fc0 | 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 | z1*yc;..z2=x2*yc-z1*ys;..y3=y2*x |
1fe0 | 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 | s+z2*xc;..z3=y2*xc-z2*xs;..x4=x3 |
2000 | 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f | ;..y4=y3;..z4=z3+3;..x=x4/(1+z4/ |
2020 | 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a | 3)*ky;..y=y4/(1+z4/3);..red=-z3* |
2040 | 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 | (1-c);..blue=red;..green=red.w.. |
2060 | 00 6b 79 3d 68 2f 77 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 | .ky=h/w;n=16;f=-.8;g=.8;rz=rz+rd |
2080 | 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 | z;rx=rx+rdx;ry=ry+rdy;xs=sin(rx) |
20a0 | 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 | ;ys=sin(ry);zs=sin(rz);xc=cos(rx |
20c0 | 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d | );yc=cos(ry);zc=cos(rz).=...rdx= |
20e0 | 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c | getosc(0,0,0)/5;rdy=getosc(.5,0, |
2100 | 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 | 0)/5;rdz=getosc(1,0,0)/5.....p=3 |
2120 | 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d5 | .14159265;.................$.... |
2140 | 01 00 00 01 f2 00 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 7a 31 3d 69 2a 31 2e 36 2d 2e 38 3b | ........c=bnot(c);..z1=i*1.6-.8; |
2160 | 0d 0a 79 31 3d 2e 38 3b 0d 0a 78 31 3d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 | ..y1=.8;..x1=.8;..x2=x1*zs+y1*zc |
2180 | 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a | ;..y2=x1*zc-y1*zs;..x3=x2*ys+z1* |
21a0 | 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a | yc;..z2=x2*yc-z1*ys;..y3=y2*xs+z |
21c0 | 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a | 2*xc;..z3=y2*xc-z2*xs;..x4=x3;.. |
21e0 | 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a | y4=y3;..z4=z3+3;..x=x4/(1+z4/3)* |
2200 | 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d | ky;..y=y4/(1+z4/3);..red=-z3*(1- |
2220 | 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 | c);..blue=red;..green=red.w...ky |
2240 | 3d 68 2f 77 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 | =h/w;n=16;f=-.8;g=.8;rz=rz+rdz;r |
2260 | 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 | x=rx+rdx;ry=ry+rdy;xs=sin(rx);ys |
2280 | 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 | =sin(ry);zs=sin(rz);xc=cos(rx);y |
22a0 | 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 | c=cos(ry);zc=cos(rz).=...rdx=get |
22c0 | 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f | osc(0,0,0)/5;rdy=getosc(.5,0,0)/ |
22e0 | 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 | 5;rdz=getosc(1,0,0)/5.....p=3.14 |
2300 | 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d6 01 00 00 | 159265;.................$....... |
2320 | 01 f3 00 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 7a 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 79 | .....c=bnot(c);..z1=i*1.6-.8;..y |
2340 | 31 3d 2e 38 3b 0d 0a 78 31 3d 2d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d | 1=.8;..x1=-.8;..x2=x1*zs+y1*zc;. |
2360 | 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 | .y2=x1*zc-y1*zs;..x3=x2*ys+z1*yc |
2380 | 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a | ;..z2=x2*yc-z1*ys;..y3=y2*xs+z2* |
23a0 | 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 | xc;..z3=y2*xc-z2*xs;..x4=x3;..y4 |
23c0 | 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 | =y3;..z4=z3+3;..x=x4/(1+z4/3)*ky |
23e0 | 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 | ;..y=y4/(1+z4/3);..red=-z3*(1-c) |
2400 | 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 | ;..blue=red;..green=red.w...ky=h |
2420 | 2f 77 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d | /w;n=16;f=-.8;g=.8;rz=rz+rdz;rx= |
2440 | 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 | rx+rdx;ry=ry+rdy;xs=sin(rx);ys=s |
2460 | 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d | in(ry);zs=sin(rz);xc=cos(rx);yc= |
2480 | 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 | cos(ry);zc=cos(rz).=...rdx=getos |
24a0 | 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b | c(0,0,0)/5;rdy=getosc(.5,0,0)/5; |
24c0 | 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 | rdz=getosc(1,0,0)/5.....p=3.1415 |
24e0 | 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d7 01 00 00 01 f4 | 9265;.................$......... |
2500 | 00 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 7a 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 79 31 3d | ...c=bnot(c);..z1=i*1.6-.8;..y1= |
2520 | 2d 2e 38 3b 0d 0a 78 31 3d 2d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a | -.8;..x1=-.8;..x2=x1*zs+y1*zc;.. |
2540 | 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b | y2=x1*zc-y1*zs;..x3=x2*ys+z1*yc; |
2560 | 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 | ..z2=x2*yc-z1*ys;..y3=y2*xs+z2*x |
2580 | 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d | c;..z3=y2*xc-z2*xs;..x4=x3;..y4= |
25a0 | 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b | y3;..z4=z3+3;..x=x4/(1+z4/3)*ky; |
25c0 | 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b | ..y=y4/(1+z4/3);..red=-z3*(1-c); |
25e0 | 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f | ..blue=red;..green=red.w...ky=h/ |
2600 | 77 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 | w;n=16;f=-.8;g=.8;rz=rz+rdz;rx=r |
2620 | 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 | x+rdx;ry=ry+rdy;xs=sin(rx);ys=si |
2640 | 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 | n(ry);zs=sin(rz);xc=cos(rx);yc=c |
2660 | 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 | os(ry);zc=cos(rz).=...rdx=getosc |
2680 | 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 | (0,0,0)/5;rdy=getosc(.5,0,0)/5;r |
26a0 | 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 | dz=getosc(1,0,0)/5.....p=3.14159 |
26c0 | 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d7 01 00 00 01 f4 00 | 265;.................$.......... |
26e0 | 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 79 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2d | ..c=bnot(c);..y1=i*1.6-.8;..z1=- |
2700 | 2e 38 3b 0d 0a 78 31 3d 2d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 | .8;..x1=-.8;..x2=x1*zs+y1*zc;..y |
2720 | 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d | 2=x1*zc-y1*zs;..x3=x2*ys+z1*yc;. |
2740 | 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 | .z2=x2*yc-z1*ys;..y3=y2*xs+z2*xc |
2760 | 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 | ;..z3=y2*xc-z2*xs;..x4=x3;..y4=y |
2780 | 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d | 3;..z4=z3+3;..x=x4/(1+z4/3)*ky;. |
27a0 | 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d | .y=y4/(1+z4/3);..red=-z3*(1-c);. |
27c0 | 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 | .blue=red;..green=red.w...ky=h/w |
27e0 | 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 | ;n=16;f=-.8;g=.8;rz=rz+rdz;rx=rx |
2800 | 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e | +rdx;ry=ry+rdy;xs=sin(rx);ys=sin |
2820 | 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f | (ry);zs=sin(rz);xc=cos(rx);yc=co |
2840 | 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 | s(ry);zc=cos(rz).=...rdx=getosc( |
2860 | 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 | 0,0,0)/5;rdy=getosc(.5,0,0)/5;rd |
2880 | 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 | z=getosc(1,0,0)/5.....p=3.141592 |
28a0 | 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d6 01 00 00 01 f3 00 00 | 65;.................$........... |
28c0 | 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 79 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2e 38 | .c=bnot(c);..y1=i*1.6-.8;..z1=.8 |
28e0 | 3b 0d 0a 78 31 3d 2d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d | ;..x1=-.8;..x2=x1*zs+y1*zc;..y2= |
2900 | 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a | x1*zc-y1*zs;..x3=x2*ys+z1*yc;..z |
2920 | 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d | 2=x2*yc-z1*ys;..y3=y2*xs+z2*xc;. |
2940 | 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b | .z3=y2*xc-z2*xs;..x4=x3;..y4=y3; |
2960 | 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 | ..z4=z3+3;..x=x4/(1+z4/3)*ky;..y |
2980 | 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 | =y4/(1+z4/3);..red=-z3*(1-c);..b |
29a0 | 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 3b 6e | lue=red;..green=red.w...ky=h/w;n |
29c0 | 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 | =16;f=-.8;g=.8;rz=rz+rdz;rx=rx+r |
29e0 | 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 | dx;ry=ry+rdy;xs=sin(rx);ys=sin(r |
2a00 | 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 | y);zs=sin(rz);xc=cos(rx);yc=cos( |
2a20 | 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 30 2c | ry);zc=cos(rz).=...rdx=getosc(0, |
2a40 | 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d | 0,0)/5;rdy=getosc(.5,0,0)/5;rdz= |
2a60 | 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 | getosc(1,0,0)/5.....p=3.14159265 |
2a80 | 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d6 01 00 00 01 f3 00 00 00 63 | ;.................$............c |
2aa0 | 3d 62 6e 6f 74 28 63 29 3b 0d 0a 79 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2d 2e 38 3b | =bnot(c);..y1=i*1.6-.8;..z1=-.8; |
2ac0 | 0d 0a 78 31 3d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 | ..x1=.8;..x2=x1*zs+y1*zc;..y2=x1 |
2ae0 | 2a 7a 63 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d | *zc-y1*zs;..x3=x2*ys+z1*yc;..z2= |
2b00 | 78 32 2a 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a | x2*yc-z1*ys;..y3=y2*xs+z2*xc;..z |
2b20 | 33 3d 79 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a | 3=y2*xc-z2*xs;..x4=x3;..y4=y3;.. |
2b40 | 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 | z4=z3+3;..x=x4/(1+z4/3)*ky;..y=y |
2b60 | 34 2f 28 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 | 4/(1+z4/3);..red=-z3*(1-c);..blu |
2b80 | 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 3b 6e 3d 31 | e=red;..green=red.w...ky=h/w;n=1 |
2ba0 | 36 3b 66 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 | 6;f=-.8;g=.8;rz=rz+rdz;rx=rx+rdx |
2bc0 | 3b 72 79 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 | ;ry=ry+rdy;xs=sin(rx);ys=sin(ry) |
2be0 | 3b 7a 73 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 | ;zs=sin(rz);xc=cos(rx);yc=cos(ry |
2c00 | 29 3b 7a 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c | );zc=cos(rz).=...rdx=getosc(0,0, |
2c20 | 30 29 2f 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 | 0)/5;rdy=getosc(.5,0,0)/5;rdz=ge |
2c40 | 74 6f 73 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 | tosc(1,0,0)/5.....p=3.14159265;. |
2c60 | 02 00 00 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d5 01 00 00 01 f2 00 00 00 63 3d 62 | ................$............c=b |
2c80 | 6e 6f 74 28 63 29 3b 0d 0a 78 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2e 38 3b 0d 0a 79 | not(c);..x1=i*1.6-.8;..z1=.8;..y |
2ca0 | 31 3d 2e 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 | 1=.8;..x2=x1*zs+y1*zc;..y2=x1*zc |
2cc0 | 2d 79 31 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a | -y1*zs;..x3=x2*ys+z1*yc;..z2=x2* |
2ce0 | 79 63 2d 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 | yc-z1*ys;..y3=y2*xs+z2*xc;..z3=y |
2d00 | 32 2a 78 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d | 2*xc-z2*xs;..x4=x3;..y4=y3;..z4= |
2d20 | 7a 33 2b 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 | z3+3;..x=x4/(1+z4/3)*ky;..y=y4/( |
2d40 | 31 2b 7a 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 | 1+z4/3);..red=-z3*(1-c);..blue=r |
2d60 | 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 3b 6e 3d 31 36 3b 66 | ed;..green=red.w...ky=h/w;n=16;f |
2d80 | 3d 2d 2e 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 | =-.8;g=.8;rz=rz+rdz;rx=rx+rdx;ry |
2da0 | 3d 72 79 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 | =ry+rdy;xs=sin(rx);ys=sin(ry);zs |
2dc0 | 3d 73 69 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a | =sin(rz);xc=cos(rx);yc=cos(ry);z |
2de0 | 63 3d 63 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f | c=cos(rz).=...rdx=getosc(0,0,0)/ |
2e00 | 35 3b 72 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 | 5;rdy=getosc(.5,0,0)/5;rdz=getos |
2e20 | 63 28 31 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 | c(1,0,0)/5.....p=3.14159265;.... |
2e40 | 00 01 00 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d5 01 00 00 01 f2 00 00 00 63 3d 62 6e 6f 74 | .............$............c=bnot |
2e60 | 28 63 29 3b 0d 0a 79 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2e 38 3b 0d 0a 78 31 3d 2e | (c);..y1=i*1.6-.8;..z1=.8;..x1=. |
2e80 | 38 3b 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 | 8;..x2=x1*zs+y1*zc;..y2=x1*zc-y1 |
2ea0 | 2a 7a 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d | *zs;..x3=x2*ys+z1*yc;..z2=x2*yc- |
2ec0 | 7a 31 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 | z1*ys;..y3=y2*xs+z2*xc;..z3=y2*x |
2ee0 | 63 2d 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b | c-z2*xs;..x4=x3;..y4=y3;..z4=z3+ |
2f00 | 33 3b 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a | 3;..x=x4/(1+z4/3)*ky;..y=y4/(1+z |
2f20 | 34 2f 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b | 4/3);..red=-z3*(1-c);..blue=red; |
2f40 | 0d 0a 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 3b 6e 3d 31 36 3b 66 3d 2d 2e | ..green=red.w...ky=h/w;n=16;f=-. |
2f60 | 38 3b 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 | 8;g=.8;rz=rz+rdz;rx=rx+rdx;ry=ry |
2f80 | 2b 72 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 | +rdy;xs=sin(rx);ys=sin(ry);zs=si |
2fa0 | 6e 28 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 | n(rz);xc=cos(rx);yc=cos(ry);zc=c |
2fc0 | 6f 73 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 | os(rz).=...rdx=getosc(0,0,0)/5;r |
2fe0 | 64 79 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 | dy=getosc(.5,0,0)/5;rdz=getosc(1 |
3000 | 2c 30 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 | ,0,0)/5.....p=3.14159265;....... |
3020 | 00 00 ff ff ff 00 01 00 00 00 24 00 00 00 d6 01 00 00 01 f3 00 00 00 63 3d 62 6e 6f 74 28 63 29 | ..........$............c=bnot(c) |
3040 | 3b 0d 0a 78 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2d 2e 38 3b 0d 0a 79 31 3d 2e 38 3b | ;..x1=i*1.6-.8;..z1=-.8;..y1=.8; |
3060 | 0d 0a 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a | ..x2=x1*zs+y1*zc;..y2=x1*zc-y1*z |
3080 | 73 3b 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 | s;..x3=x2*ys+z1*yc;..z2=x2*yc-z1 |
30a0 | 2a 79 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d | *ys;..y3=y2*xs+z2*xc;..z3=y2*xc- |
30c0 | 7a 32 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b | z2*xs;..x4=x3;..y4=y3;..z4=z3+3; |
30e0 | 0d 0a 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f | ..x=x4/(1+z4/3)*ky;..y=y4/(1+z4/ |
3100 | 33 29 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a | 3);..red=-z3*(1-c);..blue=red;.. |
3120 | 67 72 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b | green=red.w...ky=h/w;n=16;f=-.8; |
3140 | 67 3d 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 | g=.8;rz=rz+rdz;rx=rx+rdx;ry=ry+r |
3160 | 64 79 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 | dy;xs=sin(rx);ys=sin(ry);zs=sin( |
3180 | 72 7a 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 | rz);xc=cos(rx);yc=cos(ry);zc=cos |
31a0 | 28 72 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 | (rz).=...rdx=getosc(0,0,0)/5;rdy |
31c0 | 3d 67 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 | =getosc(.5,0,0)/5;rdz=getosc(1,0 |
31e0 | 2c 30 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 | ,0)/5.....p=3.14159265;......... |
3200 | ff ff ff 00 01 00 00 00 24 00 00 00 d6 01 00 00 01 f3 00 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d | ........$............c=bnot(c);. |
3220 | 0a 78 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2e 38 3b 0d 0a 79 31 3d 2d 2e 38 3b 0d 0a | .x1=i*1.6-.8;..z1=.8;..y1=-.8;.. |
3240 | 78 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b | x2=x1*zs+y1*zc;..y2=x1*zc-y1*zs; |
3260 | 0d 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 | ..x3=x2*ys+z1*yc;..z2=x2*yc-z1*y |
3280 | 73 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 | s;..y3=y2*xs+z2*xc;..z3=y2*xc-z2 |
32a0 | 2a 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a | *xs;..x4=x3;..y4=y3;..z4=z3+3;.. |
32c0 | 78 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 | x=x4/(1+z4/3)*ky;..y=y4/(1+z4/3) |
32e0 | 3b 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 | ;..red=-z3*(1-c);..blue=red;..gr |
3300 | 65 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d | een=red.w...ky=h/w;n=16;f=-.8;g= |
3320 | 2e 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 | .8;rz=rz+rdz;rx=rx+rdx;ry=ry+rdy |
3340 | 3b 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a | ;xs=sin(rx);ys=sin(ry);zs=sin(rz |
3360 | 29 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 | );xc=cos(rx);yc=cos(ry);zc=cos(r |
3380 | 7a 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 | z).=...rdx=getosc(0,0,0)/5;rdy=g |
33a0 | 65 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 | etosc(.5,0,0)/5;rdz=getosc(1,0,0 |
33c0 | 29 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff | )/5.....p=3.14159265;........... |
33e0 | ff 00 01 00 00 00 24 00 00 00 d7 01 00 00 01 f4 00 00 00 63 3d 62 6e 6f 74 28 63 29 3b 0d 0a 78 | ......$............c=bnot(c);..x |
3400 | 31 3d 69 2a 31 2e 36 2d 2e 38 3b 0d 0a 7a 31 3d 2d 2e 38 3b 0d 0a 79 31 3d 2d 2e 38 3b 0d 0a 78 | 1=i*1.6-.8;..z1=-.8;..y1=-.8;..x |
3420 | 32 3d 78 31 2a 7a 73 2b 79 31 2a 7a 63 3b 0d 0a 79 32 3d 78 31 2a 7a 63 2d 79 31 2a 7a 73 3b 0d | 2=x1*zs+y1*zc;..y2=x1*zc-y1*zs;. |
3440 | 0a 78 33 3d 78 32 2a 79 73 2b 7a 31 2a 79 63 3b 0d 0a 7a 32 3d 78 32 2a 79 63 2d 7a 31 2a 79 73 | .x3=x2*ys+z1*yc;..z2=x2*yc-z1*ys |
3460 | 3b 0d 0a 79 33 3d 79 32 2a 78 73 2b 7a 32 2a 78 63 3b 0d 0a 7a 33 3d 79 32 2a 78 63 2d 7a 32 2a | ;..y3=y2*xs+z2*xc;..z3=y2*xc-z2* |
3480 | 78 73 3b 0d 0a 78 34 3d 78 33 3b 0d 0a 79 34 3d 79 33 3b 0d 0a 7a 34 3d 7a 33 2b 33 3b 0d 0a 78 | xs;..x4=x3;..y4=y3;..z4=z3+3;..x |
34a0 | 3d 78 34 2f 28 31 2b 7a 34 2f 33 29 2a 6b 79 3b 0d 0a 79 3d 79 34 2f 28 31 2b 7a 34 2f 33 29 3b | =x4/(1+z4/3)*ky;..y=y4/(1+z4/3); |
34c0 | 0d 0a 72 65 64 3d 2d 7a 33 2a 28 31 2d 63 29 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 | ..red=-z3*(1-c);..blue=red;..gre |
34e0 | 65 6e 3d 72 65 64 00 77 00 00 00 6b 79 3d 68 2f 77 3b 6e 3d 31 36 3b 66 3d 2d 2e 38 3b 67 3d 2e | en=red.w...ky=h/w;n=16;f=-.8;g=. |
3500 | 38 3b 72 7a 3d 72 7a 2b 72 64 7a 3b 72 78 3d 72 78 2b 72 64 78 3b 72 79 3d 72 79 2b 72 64 79 3b | 8;rz=rz+rdz;rx=rx+rdx;ry=ry+rdy; |
3520 | 78 73 3d 73 69 6e 28 72 78 29 3b 79 73 3d 73 69 6e 28 72 79 29 3b 7a 73 3d 73 69 6e 28 72 7a 29 | xs=sin(rx);ys=sin(ry);zs=sin(rz) |
3540 | 3b 78 63 3d 63 6f 73 28 72 78 29 3b 79 63 3d 63 6f 73 28 72 79 29 3b 7a 63 3d 63 6f 73 28 72 7a | ;xc=cos(rx);yc=cos(ry);zc=cos(rz |
3560 | 29 00 3d 00 00 00 72 64 78 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2f 35 3b 72 64 79 3d 67 65 | ).=...rdx=getosc(0,0,0)/5;rdy=ge |
3580 | 74 6f 73 63 28 2e 35 2c 30 2c 30 29 2f 35 3b 72 64 7a 3d 67 65 74 6f 73 63 28 31 2c 30 2c 30 29 | tosc(.5,0,0)/5;rdz=getosc(1,0,0) |
35a0 | 2f 35 00 0e 00 00 00 70 3d 33 2e 31 34 31 35 39 32 36 35 3b 00 02 00 00 00 01 00 00 00 ff ff ff | /5.....p=3.14159265;............ |
35c0 | 00 01 00 00 00 | ..... |