🝍Ⓞ✣⟠◇ⵙᑐᑕᔓᔕⓄᔓᔕᑐᑕⵙ◇⟠✣Ⓞ🝍   Ⓞⵙↀ⩇⟠⩇ↀⵙⓄ   🝍Ⓞ✣⟠◇ⵙᑐᑕᔓᔕⓄᔓᔕᑐᑕⵙ◇⟠✣Ⓞ🝍

OOOO · updated 4 minutes ago
clc;tic;clear;
O = 84.406022589954030768899117092091000289089388918088900852079 ;
A = (((( 0 )))) ;
M = (((( 3 )))) ;
I = (((( 1 )))) ;
O_EDUTILPMA_O_AMPLITUDE_O = 1 / M ^ (((( 0 )))) ;
O_SYCNEUQERF_O_FREQUENCYS_O = 1 / O * M.^(( (((( 0 )))) *M^A : (((( 13 )))) *M^A )/M^A);
for O_SEULAW_YCNEUQERF_O_FREQUENCY_WALUES_O=1:length(O_SYCNEUQERF_O_FREQUENCYS_O) fprintf(['%d : %.' num2str(2^4) 'f\n'],O_SEULAW_YCNEUQERF_O_FREQUENCY_WALUES_O,O_SYCNEUQERF_O_FREQUENCYS_O(O_SEULAW_YCNEUQERF_O_FREQUENCY_WALUES_O));end

fprintf('%s','<>');
O_ETAR_ELPMAS_O_SAMPLE_RATE_O=ceil( 4 * 2 ^ (((( 0 )))) / O * M ^ (((( 13 )))) );
fprintf('\n%s\n',sprintf('%.d',O_ETAR_ELPMAS_O_SAMPLE_RATE_O));
fprintf('%s\n','*');
O_NOITARUD_O_DURATION_O = O / M ^ (((( 3 )))) ;
fprintf('%s\n',sprintf('%.16f',O_NOITARUD_O_DURATION_O));
fprintf('%s\n','=');
O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O=ceil(O_NOITARUD_O_DURATION_O*O_ETAR_ELPMAS_O_SAMPLE_RATE_O);
fprintf('%s\n',sprintf('%.d',O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O));

O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O=zeros(O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O,1);

for O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O=1:length(O_SYCNEUQERF_O_FREQUENCYS_O) O_EMIT_O_TIME_O=(0:O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O-1)/O_ETAR_ELPMAS_O_SAMPLE_RATE_O;
O_EPAHS_MROFEWAW_ENIS_O_SINE_WAWEFORM_SHAPE_O = sin(2*4*atan(1)*O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*O_EMIT_O_TIME_O') ;
O_EPAHS_MROFEWAW_LAITNENOPXE_O_EXPONENTIAL_WAWEFORM_SHAPE_O = (-1).^floor(.5+O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*2*O_EMIT_O_TIME_O').*(-1+2./(1+exp(1./(-1+mod(.5+O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*2*O_EMIT_O_TIME_O',1))+1./mod(.5+O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*2*O_EMIT_O_TIME_O',1)))) ;
O_EPAHS_MROFEWAW_DOIREP_ELGNIS_O_SINGLE_PERIOD_WAWEFORM_SHAPE_O = (((( O_EPAHS_MROFEWAW_ENIS_O_SINE_WAWEFORM_SHAPE_O )))) ;
O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O=O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O+O_EPAHS_MROFEWAW_DOIREP_ELGNIS_O_SINGLE_PERIOD_WAWEFORM_SHAPE_O;end

O_EPAHS_EDAF_ENISOC_O_COSINE_FADE_SHAPE_O = (0.5 - 0.5*cos(4*atan(1)/O_NOITARUD_O_DURATION_O*2* O_EMIT_O_TIME_O * M ^ (((( I )))) )) ;

O_EPAHS_EDAF_ENISOC_TES_ROTNAC_O_CANTOR_SET_COSINE_FADE_SHAPE_O = ...
(0.5 - 0.5*cos(4*atan(1)./O_NOITARUD_O_DURATION_O.*min(max(O_EMIT_O_TIME_O,((1)).*O_NOITARUD_O_DURATION_O/3^1),((2)).*O_NOITARUD_O_DURATION_O./3^1)*2 * M ^ (((( I )))) )) +...
...
(0.5 - 0.5*cos(4*atan(1)./O_NOITARUD_O_DURATION_O.*min(max(O_EMIT_O_TIME_O,((1)).*O_NOITARUD_O_DURATION_O/3^2),((2)).*O_NOITARUD_O_DURATION_O./3^2)*2 * M ^ (((( I+1 )))) )) +...
(0.5 - 0.5*cos(4*atan(1)./O_NOITARUD_O_DURATION_O.*min(max(O_EMIT_O_TIME_O,((7)).*O_NOITARUD_O_DURATION_O/3^2),((8)).*O_NOITARUD_O_DURATION_O./3^2)*2 * M ^ (((( I+1 )))) )) +...
...
(0.5 - 0.5*cos(4*atan(1)./O_NOITARUD_O_DURATION_O.*min(max(O_EMIT_O_TIME_O,((1)).*O_NOITARUD_O_DURATION_O/3^3),((2)).*O_NOITARUD_O_DURATION_O./3^3)*2 * M ^ (((( I+2 )))) )) +...
Output 
(Run the program to view its output)

Comments

Please sign up or log in to contribute to the discussion.