... except for those A0 values...
Native support of SVG ('d') path descriptions would have made my life a whole lot simpler...
Code: Select all
// Pitcher This II - jrm
Aspc=1
ConB=1
Num=12
Stps=512
A0="{ choice({-1,1} )
* map1D( { -340, -412, -487, -559, -620, -658, -693, -725, -754, -779, -799, -814, -819, -823, -826, -827, -829, -827, -823, -820, -820
, -822, -839, -874, -924, -971,-1016,-1056,-1094,-1129,-1161,-1189,-1214,-1236,-1255,-1271,-1284,-1294,-1301,-1304,-1305,-1303
,-1299,-1293,-1284,-1274,-1262,-1247,-1233,-1219,-1203,-1184,-1161,-1133,-1057,-1028,-1004, -985, -971, -960, -952, -946, -940
, -938, -936, -937, -938, -940, -944, -949, -955, -961, -969, -978, -988, -999,-1011,-1023,-1036,-1048,-1058,-1068,-1079,-1090
,-1102,-1117,-1134,-1155,-1163,-1169,-1173,-1177,-1178,-1179,-1176,-1169,-1158,-1145,-1105,-1086,-1066,-1047,-1028,-1009, -990
, -970, -950, -930, -909, -888, -865, -842, -818, -798, -774, -719, -661, -634, -611, -550, -492, -437, -411, -387, -346, -288
, -234, -189, -148, -102, -38, -10, 15, 40, 64, 88, 112, 171, 267, 377, 480, 527, 553, 566, 574, 581, 586
, 589, 590, 589, 587, 577, 560, 553, 548, 544, 541, 538, 537, 539, 545, 555, 563, 571, 581, 592, 604, 618
, 633, 650, 672, 694, 720, 754, 787, 810, 826, 840, 868, 892, 895, 898, 903, 909, 917, 928, 959, 985, 995
, 1005, 1014, 1024, 1047, 1070, 1098, 1125, 1145, 1166, 1187, 1207, 1225, 1234, 1241, 1246, 1251, 1254, 1255, 1257, 1256, 1251
, 1248, 1243, 1238, 1231, 1224, 1215, 1205, 1194, 1182, 1168, 1153, 1136, 1108, 1075, 1038, 1019, 1000, 980, 959, 939, 919
, 899, 879, 859, 840, 811, 790, 776, 768, 766, 766, 766, 767, 773, 781, 801, 822, 830, 836, 838, 838, 836
, 826, 814, 801, 786, 771, 755, 739, 723, 706, 691, 675, 661, 648, 636, 626, 618, 611, 608, 606, 607, 610
, 614, 621, 629, 639, 650, 662, 675, 689, 704, 719, 735, 752, 771, 791, 811, 832, 854, 898, 943, 988, 1009
, 1031, 1051, 1071, 1101, 1135, 1168, 1198, 1217, 1236, 1255, 1274, 1292, 1310, 1327, 1343, 1359, 1374, 1387, 1400, 1411, 1422
, 1431, 1438, 1446, 1453, 1459, 1463, 1467, 1469, 1471, 1471, 1470, 1468, 1464, 1460, 1455, 1448, 1440, 1428, 1414, 1397, 1379
, 1359, 1338, 1316, 1294, 1275, 1253, 1200, 1142, 1083, 1056, 1029, 1002, 975, 947, 919, 890, 860, 833, 816, 805, 792
, 743, 695, 648, 604, 565, 520, 483, 472, 466, 465, 465, 470, 474, 476, 476, 474, 470, 463, 453, 441, 424
, 402, 378, 351, 322, 294, 268, 243, 189, 111, 23, -62, -125, -202, -279, -340, -340 }/2000 -0, s, 0)
, map1D(-{ 1575, 1569, 1561, 1551, 1540, 1531, 1521, 1509, 1497, 1484, 1470, 1457, 1450, 1444, 1438, 1430, 1410, 1387, 1362, 1339, 1334
, 1330, 1316, 1291, 1253, 1214, 1172, 1130, 1085, 1040, 992, 943, 892, 840, 786, 730, 673, 614, 553, 490, 442, 394
, 347, 302, 257, 215, 174, 135, 102, 72, 40, 7, -29, -73, -186, -230, -268, -300, -330, -358, -387, -419, -456
, -482, -511, -540, -569, -600, -631, -662, -693, -723, -754, -784, -813, -841, -868, -894, -919, -938, -954, -966, -976, -983
, -989, -994, -998,-1003,-1006,-1010,-1014,-1019,-1025,-1032,-1045,-1062,-1083,-1105,-1160,-1185,-1208,-1229,-1248,-1266,-1281
,-1296,-1308,-1319,-1329,-1338,-1345,-1351,-1356,-1359,-1361,-1362,-1360,-1357,-1354,-1342,-1327,-1308,-1298,-1288,-1264,-1228
,-1193,-1167,-1144,-1121,-1092,-1081,-1072,-1065,-1060,-1056,-1053,-1051,-1050,-1049,-1051,-1051,-1051,-1049,-1045,-1040,-1035
,-1029,-1022,-1012, -999, -961, -896, -867, -839, -810, -781, -715, -665, -624, -581, -527, -494, -461, -428, -395, -362, -329
, -295, -261, -219, -180, -137, -87, -36, 1, 32, 63, 143, 216, 225, 232, 237, 241, 244, 245, 246, 246, 244
, 242, 238, 233, 218, 200, 173, 145, 121, 87, 47, 3, -44, -70, -94, -117, -141, -167, -194, -260, -329, -391
, -420, -447, -473, -498, -522, -545, -567, -587, -608, -627, -646, -665, -692, -721, -748, -761, -772, -783, -792, -799, -804
, -807, -807, -805, -800, -789, -778, -769, -761, -757, -754, -750, -747, -741, -735, -725, -716, -712, -708, -704, -701, -699
, -690, -681, -673, -666, -659, -654, -651, -648, -647, -647, -648, -652, -657, -663, -672, -683, -695, -708, -722, -736, -750
, -764, -778, -792, -805, -818, -831, -843, -854, -865, -874, -883, -890, -897, -903, -908, -912, -916, -919, -919, -915, -911
, -907, -902, -895, -883, -867, -848, -830, -816, -800, -783, -764, -744, -723, -701, -678, -654, -629, -604, -579, -553, -528
, -502, -476, -444, -413, -380, -347, -313, -278, -241, -202, -126, -90, -56, -22, 11, 46, 82, 129, 176, 224, 271
, 317, 361, 403, 442, 470, 502, 572, 643, 710, 740, 767, 791, 815, 836, 857, 877, 895, 912, 923, 935, 952
, 1017, 1079, 1134, 1183, 1220, 1259, 1290, 1301, 1307, 1313, 1321, 1351, 1373, 1392, 1407, 1421, 1432, 1442, 1452, 1462, 1473
, 1485, 1497, 1508, 1519, 1529, 1537, 1543, 1552, 1561, 1569, 1575, 1577, 1578, 1577, 1575, 1575 }/2000 + .065, s, 0)
}"
A1="sign(col(row(A0, 0), 0))/2"
B0="Pi*Id/Num*sin(pos(t-5)/6) - A1*t"
X0="row(A0, 0) + cos(B0)/4"
Y0="row(A0, 1) + sin(B0)/4"
Lwdt="1.2"
Pen="1"
Meta="reactive=3 detail=3 density=3 morphable=5" // Comment out >= v5 ... (reactive == 0) REALLY, but you lose morphing effects
Vers=500
Code: Select all
Aspc=1
ConB=1
Num="round(1+rnd(5))"
A0="{ map1d( { -178, -309, -438, -568, -696, -823, -950, -1075, -1198, -1321, -1441, -1561, -1678, -1793, -1907, -2018, -2127, -2207
, -2284, -2361, -2435, -2508, -2579, -2648, -2715, -2781, -2844, -2906, -2966, -3023, -3079, -3132, -3183, -3238, -3290, -3339
, -3385, -3427, -3467, -3504, -3537, -3567, -3595, -3619, -3639, -3657, -3672, -3683, -3691, -3694, -3695, -3693, -3689, -3679
, -3664, -3645, -3622, -3595, -3563, -3527, -3487, -3443, -3394, -3341, -3284, -3223, -3158, -3089, -3015, -2959, -2901, -2840
, -2777, -2711, -2643, -2574, -2502, -2429, -2354, -2277, -2199, -2120, -2040, -1958, -1876, -1764, -1650, -1535, -1419, -1302
, -1184, -1064, -943, -822, -699, -575, -450, -324, -198, -70, 57, 245, 417, 586, 762, 870, 976, 1081
, 1185, 1288, 1389, 1488, 1586, 1683, 1778, 1871, 1963, 2053, 2141, 2227, 2311, 2393, 2473, 2551, 2627, 2700
, 2772, 2841, 2907, 2971, 3033, 3092, 3149, 3203, 3254, 3303, 3348, 3393, 3435, 3473, 3508, 3540, 3568, 3592
, 3612, 3628, 3641, 3650, 3655, 3656, 3654, 3648, 3638, 3620, 3598, 3570, 3538, 3500, 3458, 3410, 3358, 3300
, 3238, 3172, 3100, 3024, 2944, 2859, 2769, 2699, 2628, 2554, 2478, 2401, 2322, 2241, 2158, 2074, 1988, 1901
, 1812, 1722, 1631, 1538, 1444, 1349, 1253, 1156, 1057, 958, 858, 757, 656, 553, 450, 346, 242, 137
, 32, -72, -178, -178 }/5000, s, 1)
, map1d( { 233, 339, 444, 548, 651, 754, 856, 956, 1056, 1154, 1252, 1348, 1442, 1536, 1628, 1718, 1807, 1894
, 1980, 2064, 2146, 2226, 2304, 2381, 2455, 2527, 2597, 2665, 2730, 2793, 2854, 2912, 2967, 3044, 3114, 3178
, 3234, 3284, 3328, 3364, 3394, 3406, 3416, 3425, 3432, 3437, 3441, 3443, 3443, 3441, 3438, 3432, 3425, 3416
, 3406, 3393, 3379, 3361, 3341, 3319, 3295, 3268, 3239, 3209, 3176, 3141, 3105, 3066, 3025, 2983, 2938, 2892
, 2844, 2742, 2633, 2517, 2394, 2265, 2129, 1987, 1839, 1686, 1529, 1369, 1205, 1038, 869, 697, 523, 348
, 172, -4, -182, -359, -536, -713, -889, -1032, -1172, -1311, -1446, -1579, -1709, -1836, -1959, -2079, -2196, -2309
, -2418, -2523, -2623, -2719, -2811, -2864, -2915, -2963, -3010, -3054, -3097, -3137, -3176, -3212, -3246, -3277, -3307, -3334
, -3359, -3382, -3403, -3425, -3444, -3459, -3472, -3478, -3480, -3479, -3475, -3464, -3449, -3430, -3406, -3378, -3346, -3310
, -3269, -3224, -3176, -3123, -3065, -3004, -2939, -2869, -2795, -2694, -2587, -2474, -2356, -2233, -2106, -1974, -1837, -1697
, -1553, -1405, -1255, -1101, -945, -786, -625, -520, -415, -308, -201, -92, 15, 124, 233, 233 }/5000, s, 1)
, map1d( { -26, -61, -96, -131, -166, -202, -237, -273, -309, -341, -374, -407, -439, -472, -506, -539, -572, -606
, -639, -673, -707, -741, -775, -808, -842, -886, -929, -973, -1017, -1061, -1104, -1147, -1188, -1215, -1220, -1231
, -1267, -1323, -1380, -1437, -1494, -1551, -1608, -1665, -1722, -1768, -1807, -1847, -1892, -1949, -1968, -1988, -2012, -2034
, -2055, -2074, -2093, -2110, -2125, -2140, -2152, -2164, -2174, -2183, -2190, -2196, -2204, -2205, -2201, -2191, -2176, -2155
, -2129, -2098, -2061, -2037, -2048, -2075, -2162, -2262, -2341, -2435, -2525, -2610, -2689, -2764, -2834, -2899, -2958, -3013
, -3062, -3105, -3143, -3176, -3203, -3225, -3241, -3247, -3252, -3254, -3254, -3251, -3247, -3240, -3230, -3219, -3206, -3190
, -3172, -3152, -3129, -3105, -3078, -3032, -2981, -2925, -2864, -2798, -2727, -2650, -2568, -2500, -2428, -2353, -2273, -2191
, -2105, -2016, -1924, -1798, -1655, -1509, -1378, -1320, -1319, -1321, -1338, -1372, -1404, -1433, -1459, -1481, -1500, -1515
, -1527, -1533, -1536, -1533, -1527, -1517, -1504, -1489, -1471, -1451, -1428, -1403, -1375, -1346, -1314, -1280, -1245, -1207
, -1168, -1128, -1086, -1034, -973, -913, -863, -816, -771, -728, -688, -650, -614, -581, -550, -521, -495, -472
, -451, -433, -417, -404, -394, -385, -376, -368, -361, -354, -348, -332, -257, -179, -165, -134, -91, -25
, 94, 126, 142, 213, 291, 309, 316, 318, 319, 323, 332, 343, 352, 359, 369, 380, 393, 408
, 424, 443, 463, 484, 508, 533, 560, 588, 618, 649, 682, 723, 765, 809, 853, 898, 943, 988
, 1033, 1078, 1121, 1164, 1205, 1245, 1283, 1318, 1352, 1386, 1416, 1441, 1461, 1477, 1489, 1495, 1498, 1495
, 1488, 1477, 1461, 1440, 1415, 1385, 1351, 1296, 1281, 1279, 1281, 1332, 1455, 1575, 1692, 1805, 1914, 2020
, 2122, 2219, 2313, 2403, 2488, 2569, 2646, 2718, 2785, 2848, 2907, 2962, 3011, 3055, 3094, 3127, 3155, 3178
, 3191, 3202, 3209, 3213, 3214, 3212, 3207, 3199, 3189, 3175, 3158, 3138, 3116, 3090, 3062, 3031, 2997, 2961
, 2922, 2880, 2835, 2788, 2738, 2686, 2631, 2573, 2513, 2451, 2386, 2318, 2248, 2176, 2055, 2014, 1998, 2016
, 2064, 2085, 2104, 2120, 2134, 2146, 2155, 2159, 2162, 2163, 2161, 2159, 2155, 2142, 2125, 2104, 2079, 2050
, 2018, 1982, 1944, 1901, 1850, 1797, 1749, 1685, 1620, 1555, 1489, 1423, 1359, 1295, 1232, 1188, 1179, 1175
, 1148, 1111, 1073, 1035, 996, 957, 918, 880, 842, 811, 779, 746, 714, 682, 650, 619, 588, 544
, 503, 461, 416, 380, 346, 313, 280, 248, 215, 183, 149, 106, 69, 35, 0, -19, -26, -26
}/5000, s, 1)
}"
A1="-{ map1d( { 2059, 2055, 2048, 2038, 2025, 2010, 1993, 1973, 1950, 1925, 1897, 1867, 1835, 1800, 1763, 1723, 1681, 1648
, 1614, 1579, 1543, 1505, 1467, 1427, 1386, 1345, 1302, 1258, 1213, 1168, 1121, 1074, 1025, 970, 913, 856
, 798, 740, 680, 620, 559, 498, 436, 373, 310, 246, 181, 116, 51, -4, -74, -143, -201, -277
, -352, -426, -499, -572, -644, -715, -785, -854, -922, -989, -1056, -1121, -1185, -1249, -1311, -1355, -1399, -1442
, -1484, -1525, -1566, -1605, -1644, -1682, -1718, -1753, -1787, -1820, -1851, -1881, -1910, -1946, -1979, -2010, -2039, -2066
, -2090, -2111, -2130, -2147, -2161, -2173, -2183, -2190, -2194, -2196, -2196, -2192, -2183, -2169, -2149, -2135, -2119, -2101
, -2081, -2060, -2037, -2013, -1986, -1958, -1929, -1898, -1865, -1831, -1796, -1759, -1720, -1680, -1639, -1597, -1553, -1508
, -1461, -1413, -1364, -1314, -1263, -1210, -1157, -1102, -1046, -989, -932, -870, -806, -741, -676, -609, -542, -474
, -406, -338, -268, -197, -125, -53, 18, 88, 157, 239, 319, 399, 478, 556, 633, 708, 783, 856
, 928, 998, 1067, 1134, 1200, 1264, 1327, 1372, 1416, 1459, 1500, 1540, 1579, 1616, 1652, 1686, 1719, 1751
, 1781, 1810, 1837, 1863, 1887, 1910, 1931, 1951, 1969, 1985, 2000, 2014, 2025, 2035, 2044, 2051, 2056, 2059
, 2061, 2061, 2059, 2059 }/5000, s, 1)
, map1d( { 1846, 1841, 1834, 1825, 1815, 1803, 1789, 1774, 1756, 1738, 1717, 1695, 1672, 1647, 1620, 1592, 1562, 1531
, 1499, 1465, 1429, 1392, 1354, 1315, 1274, 1232, 1189, 1144, 1098, 1051, 1003, 953, 903, 826, 749, 669
, 589, 507, 424, 340, 256, 213, 170, 127, 84, 41, -1, -45, -88, -131, -175, -218, -262, -305
, -349, -392, -435, -483, -531, -578, -625, -672, -717, -763, -808, -852, -896, -940, -982, -1024, -1066, -1107
, -1147, -1226, -1301, -1374, -1443, -1510, -1572, -1632, -1687, -1738, -1785, -1827, -1864, -1896, -1923, -1946, -1964, -1976
, -1984, -1987, -1985, -1978, -1966, -1948, -1926, -1904, -1878, -1849, -1817, -1782, -1743, -1702, -1658, -1610, -1560, -1507
, -1452, -1393, -1332, -1269, -1203, -1162, -1121, -1078, -1036, -992, -948, -903, -858, -812, -766, -719, -671, -624
, -575, -527, -477, -414, -352, -287, -219, -159, -74, 2, 55, 125, 195, 264, 332, 399, 466, 531
, 596, 659, 722, 784, 845, 905, 963, 1021, 1078, 1150, 1219, 1285, 1348, 1407, 1463, 1516, 1565, 1611
, 1653, 1691, 1725, 1755, 1782, 1804, 1822, 1831, 1839, 1844, 1848, 1850, 1850, 1849, 1846, 1846 }/5000, s, 1)
, map1d( { 1418, 1326, 1239, 1157, 1081, 1009, 942, 880, 822, 775, 731, 690, 654, 620, 591, 565, 543, 524
, 509, 498, 490, 486, 486, 489, 496, 511, 532, 560, 593, 633, 679, 730, 786, 825, 823, 814
, 781, 729, 681, 638, 600, 566, 536, 512, 492, 480, 472, 468, 467, 469, 472, 477, 484, 492
, 502, 513, 526, 540, 555, 571, 588, 607, 627, 648, 671, 694, 745, 796, 850, 908, 968, 1030
, 1094, 1160, 1226, 1273, 1270, 1258, 1217, 1168, 1127, 1072, 1015, 957, 897, 835, 772, 708, 642, 575
, 506, 437, 366, 295, 223, 149, 76, 31, -13, -58, -103, -147, -192, -237, -281, -325, -370, -413
, -457, -500, -543, -586, -628, -693, -756, -818, -879, -939, -998, -1055, -1112, -1155, -1198, -1240, -1281, -1321
, -1360, -1398, -1434, -1480, -1528, -1573, -1609, -1624, -1623, -1617, -1594, -1546, -1498, -1448, -1398, -1348, -1298, -1249
, -1201, -1149, -1090, -1031, -982, -944, -907, -871, -837, -805, -774, -745, -717, -692, -668, -647, -628, -611
, -596, -584, -574, -567, -565, -567, -574, -586, -601, -620, -641, -666, -693, -724, -758, -794, -833, -875
, -920, -968, -1018, -1071, -1126, -1206, -1322, -1467, -1634, -1754, -1746, -1718, -1581, -1438, -1413, -1416, -1418, -1419
, -1417, -1415, -1441, -1571, -1714, -1744, -1752, -1740, -1714, -1591, -1418, -1251, -1145, -1099, -1055, -1012, -971, -932
, -894, -858, -824, -792, -762, -733, -707, -682, -660, -640, -622, -604, -589, -577, -570, -565, -564, -567
, -573, -582, -594, -609, -628, -649, -674, -702, -732, -770, -810, -852, -896, -942, -989, -1037, -1087, -1139
, -1191, -1244, -1298, -1353, -1408, -1463, -1519, -1597, -1619, -1624, -1625, -1611, -1577, -1542, -1504, -1464, -1423, -1379
, -1334, -1288, -1239, -1189, -1137, -1084, -1029, -973, -916, -857, -795, -732, -668, -602, -536, -469, -401, -333
, -280, -228, -175, -123, -70, -17, 34, 86, 138, 190, 242, 293, 344, 394, 444, 494, 543, 591
, 639, 686, 733, 779, 824, 869, 912, 955, 997, 1038, 1078, 1117, 1155, 1192, 1249, 1267, 1273, 1237
, 1148, 1104, 1061, 1018, 977, 936, 897, 873, 849, 782, 717, 698, 680, 642, 607, 576, 548, 524
, 504, 487, 475, 469, 466, 469, 475, 492, 515, 544, 579, 620, 667, 720, 778, 819, 824, 823
, 785, 735, 688, 646, 609, 576, 548, 526, 509, 498, 491, 487, 486, 488, 493, 502, 514, 536
, 562, 596, 639, 676, 717, 760, 806, 856, 912, 972, 1038, 1126, 1209, 1293, 1384, 1435, 1418, 1418
}/5000, s, 1)
}"
B0="t*clamp((t-5*Id)/30)^2"
B1="A0*B0"
B2="A1*B0"
X0="row(B1,2)", Y0="row(B2,2)"
X1="row(B1,1)", Y1="row(B2,1)"
X2="row(B1,0)", Y2="row(B2,0)"
A2="choice({127/128, 1})"
Pen="A2"
Lwdt="select((A2 == 1), .6, 1)"
Meta="reactive=0 detail=3 density=3" // Particle, Comment out >= v5 ...
Vers=500
( you can lead a horse to water... blah blah blah )
enjoy or ignore...