录音/制作/创作 吉他 扩声技术 视频技术 作品展示 生活 信息 更多... | 音频应用专卖店
REAPER

REAPER

[请教/求助] 请听听两款声场扩展器：K-Stereo v.s JSE

( 8 )
 
[收藏]
qianyao
5431
#1 21-2-5 15:22 …

请听听两款声场扩展器：K-Stereo v.s JSE

前段时间<充满希望的混音人俱乐部>微信群组织了一次分轨练习活动，活动是Puremix的分轨片段<I'm Yours>.
恰巧某QQ群内有朋友在讨论K-Stereo的效果，这里委托一些哥们做了一些操作，分别是带JSE的、不带JSE的、带K-STEREO的三个音频文件，因为本论坛不少会员已经在群里了，对这个分轨和原曲也比较熟悉，所以以这首歌来做一个比较。

JSE是Jonas Spatial Enhancer based on the Open Ambience Project

也就是由Jonas编写的一款Reaper脚本，基于了Open Ambience Project，这个项目其实很早之前就已经出现了，但是因为各种各样的原因没有再继续推出VST x64版本，Jonas便根据这个项目的原理图编写了这个脚本，基于JavaFX（不是Java的GUI编成用到的JavaFX，而是音频效果器）。

为什么要与K-Stereo做比较呢？因为Open Ambience Project正是参考了K-Stereo的专利设计，并且融入了自己的算法。

恰巧K-Stereo在Native平台下仅有Algorithmix提供，这家公司大家都懂，K-Stereo的欧元售价是664欧，还不含税。折合美金约990美金（十年前的价格......）..
而如果你不想支付这么昂贵的价格，又想用K-Stereo怎么办呢？没办法，只能通过UAD-2加速卡来运行Universal基于Bob Katz设计的K-Stereo算法插件....
这么算来....好像UAD更划算诶..

废话这么多，其实就是想证明一点，我穷我有理，没有路就修一条路。


下面是三段音频，请大家对比：


原始音频：
下载mp3
使用JSE的音频：
下载mp3
使用K-Stereo效果器（UAD）的音频：
下载mp3

原始音频是我混的，在K-Stereo和JSE的衬托下会比较窄，不过本身混的也比较窄，出发点就是来做对比。
不管使用K-Stereo还是JSE，其实相位相关度都有所下降，说明对声场还是有一定影响的，结果就是，都可能会牺牲单声道兼容性。

请大家来听听JSE和K-Stereo哪个更自然？（我肯定不会说我把JSE跟K-Stereo的顺序颠倒了）

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有帐号？注册

x
观众反应
Tee
dsynoiz
回复此帖 报告
qianyao
5431
#2 21-2-5 15:24 …
以下是JSFX的代码，直接新建就好。我给原来的代码加入了两个功能一个是输入增益一个是输出增益，如果放到master的话出现电平变化容易爆，加入这个滑块之后处理起来就比较容易了。

  1. desc: Jonas Spatial Enhancer based on the Open Ambience Project
  2. slider1:0<-60,12,.1>Dry (incl Mid/Side)
  3. slider2:0<-20,12,.1>Wet (enhancer)
  4. slider3:0<0,1,1{On,Off}>Wide
  5. slider4:0<0,1,1{On,Off}>Feedback
  6. slider5:0<-60,24,.1>Mid gain (pre-enhancer)
  7. slider6:0<-60,24,.1>Side gain (pre-enhancer)

  9. slider7:1<0,1,1{On,Off}>Wet High-pass
  10. slider8:500<20,20000,1>HP Frequency
  11. slider9:1<0,1,1{On,Off}>Wet Low-pass
  12. slider10:5000<20,20000,1>LP Frequency

  14. slider11:30<0,50,1>Wet delay (ms)
  15. slider12:0<-60,24,.1>Input gain (dB,pre-ehancer)
  16. slider13:0<-60,24,.1>Output gain (dB)

  18. @init
  19. scale = log( 10.0 ) * 0.05;

  21. pos = 0;
  22. feedback_damp = exp( -16.95 * scale ) / exp( -2 * scale ) ;  //utrŠknat frŒn impulsen som Dallas skickade

  24. //memory management
  25. max_delay_ms = 50;
  26. max_buf_size = ceil( max_delay_ms * srate * 0.001 );
  27. l_buf = 1000;
  28. r_buf = l_buf + max_buf_size + 1;
  29. memset( l_buf, 0 , max_buf_size * 2 );


  32. //filters
  33. pi = 3.1415926535897932384626433832795;
  34. e = 2.718281828459045;
  35. ln_2 = 0.693147180559945;


  38. @slider
  39. dry = exp( slider1 * scale );
  40. slider1 == -60 ? dry = 0;
  41. wet = exp( slider2 * scale );

  43. slider3 == 0 ? wide = -1 : wide = 1;
  44. slider4 == 0 ? deep = 1 : deep = 0;
  45. M_gain = exp( slider5 * scale );
  46. S_gain = exp( slider6 * scale );

  48. //filters
  49. slider7 == 0 ? hp = 1 : hp = 0;
  50. slider9 == 0 ? lp = 1 : lp = 0;

  52. //variable delay
  53. delay_ms = slider11;
  54. buf_size = ceil( delay_ms * srate * 0.001 );

  56. //gain stage
  57. input_gain =  exp( slider12 * scale );
  58. output_gain = exp( slider13 * scale );

  60. //-----------------------------------------------------------
  61. //High-pass
  62. f0 = slider8;
  63. w0 = 2 * pi * f0 / srate;
  64. cos_w0 = cos(w0);
  65. sin_w0 = sin(w0);

  67. //ny alpha
  68. q = sqrt(2);
  69. alpha = sin_w0 / ( 2 * q );

  71. b0 =  (1 + cos_w0)/2;
  72. b1 = -(1 + cos_w0);
  73. b2 =  (1 + cos_w0)/2;
  74. a0 =   1 + alpha;
  75. a1 =  -2 * cos_w0;
  76. a2 =   1 - alpha;

  78. //Pre-calculate b0,b1 and b2 divided by a0
  79. //High-pass
  80. b0_a0 = b0/a0;
  81. b1_a0 = b1/a0;
  82. b2_a0 = b2/a0;
  83. a1_a0 = a1/a0;
  84. a2_a0 = a2/a0;

  86. //-----------------------------------------------------------
  87. //Low_pass
  88. f0 = slider10;
  89. w0 = 2 * pi * f0 / srate;
  90. cos_w0 = cos(w0);
  91. sin_w0 = sin(w0);

  93. //ny alpha
  94. q = sqrt(2);
  95. alpha = sin_w0 / ( 2 * q );

  97. lp_b0 = (1 - cos_w0)/2;
  98. lp_b1 = 1 - cos_w0;
  99. lp_b2 = (1 - cos_w0)/2;
  100. lp_a0 =   1 + alpha;
  101. lp_a1 =  -2 * cos_w0;
  102. lp_a2 =   1 - alpha;

  104. //Pre-calculate b0,b1 and b2 divided by a0
  105. //Low_pass
  106. lp_b0_a0 = lp_b0 / lp_a0;
  107. lp_b1_a0 = lp_b1 / lp_a0;
  108. lp_b2_a0 = lp_b2 / lp_a0;
  109. lp_a1_a0 = lp_a1 / lp_a0;
  110. lp_a2_a0 = lp_a2 / lp_a0;


  113. @sample
  114. spl0 =spl0*input_gain;
  115. spl1=spl1*input_gain;
  116. M = ( spl0 + spl1 ) * 0.5;
  117. S = ( spl0 + spl1 * -1 ) * 0.5;

  119. spl0 = S * S_gain  + M * M_gain;
  120. spl1 = -S * S_gain + M * M_gain;

  122. del_l = l_buf[ pos ];
  123. del_r = r_buf[ pos ] * wide;

  125. l_buf[ pos ] = ( spl0 + del_r * deep ) * feedback_damp ;
  126. r_buf[ pos ] = ( spl1 + del_l * deep ) * feedback_damp ;
  127. pos += 1;
  128. pos > buf_size ? pos = 0;

  130. //filters

  132. //High-pass

  134. hp ?
  135. (

  137. l = del_l;
  138. del_l = b0_a0*del_l + b1_a0*l_prev_bf_eq + b2_a0*l_prev2_bf_eq - a1_a0*l_prev_af_eq - a2_a0*l_prev2_af_eq ;
  139. l_prev2_bf_eq = l_prev_bf_eq;
  140. l_prev_bf_eq = l;
  141. l_prev2_af_eq = l_prev_af_eq;
  142. l_prev_af_eq = del_l;

  144. r = del_r;
  145. del_r = b0_a0*del_r + b1_a0*r_prev_bf_eq + b2_a0*r_prev2_bf_eq - a1_a0*r_prev_af_eq - a2_a0*r_prev2_af_eq ;
  146. r_prev2_bf_eq = r_prev_bf_eq;
  147. r_prev_bf_eq = r;
  148. r_prev2_af_eq = r_prev_af_eq;
  149. r_prev_af_eq = del_r;

  151. );

  153. //Low_pass

  155. lp ?
  156. (

  158. lp_l = del_l;
  159. del_l = lp_b0_a0*del_l + lp_b1_a0*lp_l_prev_bf_eq + lp_b2_a0*lp_l_prev2_bf_eq - lp_a1_a0*lp_l_prev_af_eq - lp_a2_a0*lp_l_prev2_af_eq;
  160. lp_l_prev2_bf_eq = lp_l_prev_bf_eq;
  161. lp_l_prev_bf_eq = lp_l;
  162. lp_l_prev2_af_eq = lp_l_prev_af_eq;
  163. lp_l_prev_af_eq = del_l;

  165. lp_r = del_r;
  166. del_r = lp_b0_a0*del_r + lp_b1_a0*lp_r_prev_bf_eq + lp_b2_a0*lp_r_prev2_bf_eq - lp_a1_a0*lp_r_prev_af_eq - lp_a2_a0*lp_r_prev2_af_eq ;
  167. lp_r_prev2_bf_eq = lp_r_prev_bf_eq;
  168. lp_r_prev_bf_eq = lp_r;
  169. lp_r_prev2_af_eq = lp_r_prev_af_eq;
  170. lp_r_prev_af_eq = del_r;

  172. );


  175. //output

  177. spl0 = (spl0 * dry + del_r * wet)*output_gain;
  178. spl1 =(spl1 * dry + del_l * wet)*output_gain;
复制代码


回复此帖 报告
dsynoiz
1581
#3 21-2-5 16:08 …
感谢分享！

代码的话新手可能无从入手，我把打包好的jsfx文件传上来。只需要放进安装路径下的 Effects文件夹里，然后在reaper效果器加载窗口里按F5刷新一下，搜索 jonas，就能加载了


本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有帐号？注册

x
观众反应
Tee
回复此帖 报告
zc88831
361
#4 21-2-5 17:20 …
我喜欢k-stereo  第二个有点空
观众反应
qianyao
回复此帖 报告
hjun
13857
#5 21-2-5 18:34 …
JSE更自然？
回复此帖 报告
qianyao
5431
#6 21-2-5 19:30 …
hjun 发表于 21-2-5 18:34
JSE更自然？

我个人感觉都差不多。。。
回复此帖 报告
Sharoth
2624
#7 21-2-6 00:01 …
感觉K-Strreo清晰度步入JSE
回复此帖 报告
a2292036
139
#8 21-2-12 20:17 …
感觉第二个低频较第三个虚了很多，没有第三个结实清晰
回复此帖 报告
张珝
2079
#9 21-3-10 02:16 …
留个记号，改天听听。
回复此帖 报告
返回列表
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

搜索