Відео

im literally sampling this and i found a empty bliss beyond this world real

Thanks for asking! It looks like the left channel's frequency is based on atan(x,y) and the right channel on z. It doesn't mean anything, I just tweaked it until it didn't sound too bad. JSL: dt = Open( "F:\LorenzRK4\xyz1_47M.jmp" ); framerate=60;// FPS totalPoints = nrows(dt); // prefer 1,470,000 totalSeconds = 100; // target length, all these numbers interact pointsPerSecond = totalPoints / totalSeconds;// prefer 14700 (44100/3) totalFrames = framerate*totalSeconds; // ==> 6000 pointsPerFrame = totalPoints / totalFrames; // ==> 245 totalSamples = global:SamplesPerSecond*totalSeconds; // ==> 4410000 samplesPerFrame = totalSamples / totalFrames; // ==> 735 samplesPerPoint = samplesPerFrame / pointsPerFrame; // ==> 3 Each table row makes 3 audio samples freq = .2; // lower for bass, higher for treble left0 = atan(dt[0, 1] , dt[0, 2]); right0 = dt[0, 3]; left0 = left0 - Min( left0 ); left0 = left0 / (Max( left0 ) / freq); left0=left0^1.0; // >1 shifts to bass, <1 to treble right0 = right0 - Min( right0 ); right0 = right0 / (Max( right0 ) / freq); right0=right0^1.2; stretch = samplesPerPoint; left1 = J( N Items( left0 ) * stretch, 1, 0 ); right1 = J( N Items( right0 ) * stretch, 1, 0 ); leftangle = 0; rightangle = 0; outrow = 0; For( inrow = 1, inrow <= N Rows( left0 ), inrow += 1, inL0 = left0[inrow]; inR0 = right0[inrow]; For( j = 1, j <= stretch, j += 1, outrow += 1; left1[outrow] = Sin( leftangle += inL0 ); right1[outrow] = Sin( rightangle += inR0 ); ); ); vol = .25; Open( saveWave( vol * left1, vol * right1, "$desktop/junk.wav" ) );

@@craigehales Thank you!

The resolution is limited by the double precision math that is following the contour. If the contour follower's tolerance is reduced further, the follower gets caught in a small loop at some tight turns.