|
|
声音可以秒杀现有任意kx的混响了(aps,efx之类),但是高频比较粗,本想自己提高精度的,一看资源,mb外存操作已经几乎吃满了(50/64),看来这是emu10k2的极限了,不知emu专业卡的10k2.5有没有提升外存操作能力,把下面的代码存为.da文件即可加载( ^% k3 Y5 a+ w/ z$ I4 C4 W, e
$ d9 ] U0 D! W$ u. S% j
; ?* A/ q) Q+ h+ F2 B ]
5 s2 O7 l, b0 h+ \. H" O! [2 ^6 Yname "superspace mh v1.0";- S4 E- [. [& |% b1 F, X
copyright "2009. stylus, http://stylus.siteboard.de"! K. f$ @; ~" a3 D" v6 k
created ""# ]+ o) |3 B& d. @
engine "kX";
6 }- |, G8 c: f: G" ccomment "high end true stereo reverb, medium hall";
: n" Z, M" M5 |guid "32295c17-f0ea-4f2c-b1e2-942e4b4e0f7d";
* P8 y6 l/ u) U- ]- d6 j1 u* @- L, g V. C- `# z Z; ~
; late reverb algorithm from freeverb by "Jezar at Dreampoint"$ h: ~' S' j; f/ b, V
; early reflections from impulse response "lexicon 480l" 9 v8 o8 ~, Y$ i. T4 I5 j
; true stereo+ D" q* m3 _7 a
; ^5 N" K$ ?- v2 W' A# Z' t6 |; registers2 d6 J0 _: v8 l" R# V- j) v
input in1, in2( `$ y$ D3 _ R K# p$ I X
output out1, out2
: ^' ]* F2 @; V( z- {' x; K1 c6 f1 astatic a0a, a1a, a2a, a3a, a4a, a5a, a6a, a7a, b1a, d1a, d2a, d3a, d4a, ea
2 ^7 z0 W4 ]. C }static a0b, a1b, a2b, a3b, a4b, a5b, a6b, a7b, b1b, d1b, d2b, d3b, d4b, eb4 b# t& `' R5 u! J6 l+ k
static ap_q=0.5, f, ga, gb, h, ina, inb
$ k% }7 L9 e2 r* U$ e. Mcontrol input_level=0.7
2 l/ R- S+ t9 _; R8 q( I6 icontrol early_level=0.256 D8 q' n/ X& z4 d
control late_decay=0.85" k. g9 c* I7 P0 N8 { R$ F
control late_damp=0.95
7 p: N5 v% H1 \# o7 y' Z- n5 ccontrol late_level=0.757 N2 c0 _5 c* D! I* G6 b: O
control lp_cut=1
- I! Y9 s$ K( Z/ }' D, _$ N qcontrol lp_q=0.3
+ o5 {. ?' d/ k0 i0 m( Pcontrol dry_wet=0.75
: V7 | u' O1 Q+ h/ W
% q, u6 y0 i: n$ U+ g6 `8 [; Extramsize 27454& |* {: m0 z* C0 P' ~; J. C
. l9 j H8 A. y$ p3 {8 B; late reflections iir2 T+ ?1 f, c( x/ r5 c( L1 t7 t0 i
; left 8 h: g7 }3 T. g! l" T' n+ S; ?4 H7 ~
xdelay write wrt0a at 0
: A+ O, A1 M' t& p- ~2 Mxdelay read rd0a at 1556
3 D/ y: Y$ |: Dxdelay write wrt1a at 1557 . T- O$ C. _/ ]) a
xdelay read rd1a at 3173
l, k" y* y2 G5 Cxdelay write wrt2a at 3174 0 V+ C- }3 y8 W9 T2 Q
xdelay read rd2a at 4664
. f3 H8 L G% N- N* o* s* b) _xdelay write wrt3a at 4665
- g" o5 c4 w) U3 exdelay read rd3a at 60866 m. a2 d, y, R+ W3 r X
xdelay write wrt4a at 6087
2 A( p$ \3 s: h" s% x: pxdelay read rd4a at 7363
8 Y3 r" k4 T; E, m& U" N- X, m( Kxdelay write wrt5a at 7364 / G! U( E3 q; I5 K, c _; x" A f
xdelay read rd5a at 8719, v( Y" T* e! |6 l4 L: L
xdelay write wrt6a at 8720
9 q9 p; a. S0 C# y" Q- Kxdelay read rd6a at 9907
x# E. T! `! F2 ]5 Y$ ?xdelay write wrt7a at 9908
6 i# w0 C- e- y7 P" @3 F. Qxdelay read rd7a at 11023( y; W+ T2 ^+ Y9 T% ~
: S" m4 y# |, x" n1 G; right 4 I- | k1 u4 Z) H2 [6 Q5 a" g
xdelay write wrt0b at 11024
; B1 J7 C) q! D2 d3 s( l' E* Fxdelay read rd0b at 12603
1 w: f) I8 K" ^' A" ?; T+ r- X2 @xdelay write wrt1b at 12604
* f1 k- N: \5 _" N8 mxdelay read rd1b at 14243
5 e7 W/ r- ~. ^2 V% E. n* Pxdelay write wrt2b at 14244
. P$ e2 @! l, e% Kxdelay read rd2b at 15757
+ y$ @0 F! s n8 Lxdelay write wrt3b at 15758 ( ~! z5 ~' e1 I9 }9 `
xdelay read rd3b at 172025 X. I3 L4 d3 g5 C
xdelay write wrt4b at 17203
, M X: J$ C/ P7 h2 Jxdelay read rd4b at 18502
4 [& s. r" v0 `xdelay write wrt5b at 18503 6 }# p' D' W7 G) k
xdelay read rd5b at 19881' H! G+ i6 |3 u2 u. S
xdelay write wrt6b at 19882 " \0 ^) m4 w6 z: _7 ]
xdelay read rd6b at 210923 J5 e% }8 d) q- T( H
xdelay write wrt7b at 21093 . P: B3 h% Q% u( s1 \: j
xdelay read rd7b at 22231
: b6 w, O! W r. }5 E' }/ ~# L8 y& [9 A+ k2 b! _7 v
; lexicon 480l/ medium hall/ first 8 peaks2 M8 b8 B* L8 z. n$ F w* H
; early reflections iir/fir 4 c. \( P2 L( P. o% j+ ^. Z
; left
8 ~9 B: d) R: f; B* j$ E* mxdelay write wrt12a at 22232
; t1 J+ e# O9 Y2 S5 k1 f7 M0 fxdelay read rd12a at 23566
) j- ^% E! I3 j) `% Uxdelay read rd13a at 23850
% V; Q; i8 ^6 ~5 rxdelay read rd14a at 24033
* C1 W" H8 M. o! Pxdelay read rd15a at 241347 m3 V* l9 R* f. Z
xdelay read rd16a at 24317
3 X, S) G2 ]3 s1 ?xdelay read rd17a at 24376
+ B8 B# e" }: bxdelay read rd18a at 24418
; N1 z% I; |7 r* ^( Hxdelay read rd19a at 24500
3 K* i( N, A: n; x, Y+ _
# M! U7 Q+ K( `( `: @; right( D! h" c( t/ o" S- A8 h
xdelay write wrt12b at 24501
/ {* e; S8 v- I) F6 b$ Y* Hxdelay read rd12b at 26715
/ W" ~) |* _, {# y9 s7 s& ~xdelay read rd13b at 26961
8 `) j/ {8 T# }, e2 axdelay read rd14b at 26984
- G3 R* t! K4 D: K( a+ Qxdelay read rd15b at 27101
3 b( X, `2 Y5 E8 k! I/ ^; Exdelay read rd16b at 27207) Y7 j+ ^0 ~! s% O3 @9 c6 z+ N
xdelay read rd17b at 27268
) J$ W w/ y( x; I3 S4 ^xdelay read rd18b at 27347
& M& n" `8 O) a4 Gxdelay read rd19b at 27454* k+ K- f9 ^" o) O0 u7 F4 u' J
f' O) ?. M) W6 t. @
& ]+ W& O# U4 `; @: E& V
itramsize 3218
* V. \: ?+ ]" G2 A; allpasses iir
: ?1 w$ ~" P) y" k: b; left 2 w2 n. G2 F2 M7 z* J; @
idelay write wrt8a at 0
" O2 I( @+ N& G* y. ?idelay read rd8a at 224% ?4 U. M4 ^" {- ~6 I7 f( D
idelay write wrt9a at 225
' g& T9 @( g& midelay read rd9a at 780
3 _$ h' C7 k, R* Fidelay write wrt10a at 781 ' s; x' G* a8 g" J3 h# N
idelay read rd10a at 1221& A6 @4 L% u" @% n$ I
idelay write wrt11a at 1222
: W4 p8 U5 v! ], Zidelay read rd11a at 1562
) O& d2 M3 u( a$ t% v5 L0 e. y" b5 d& c8 ^* p! V" Y4 A4 H
; right
/ ?' v% H% x% Y9 widelay write wrt8b at 1563
4 t0 u* n0 h8 Y. a8 E% Pidelay read rd8b at 1811
! o: u5 d0 r' I: W; Zidelay write wrt9b at 1812 " T% Q6 j* _! b3 `
idelay read rd9b at 2390
; Q) ~7 M$ _6 j9 n1 l: F' y; Aidelay write wrt10b at 2391 ! K: @% d7 I2 K! c+ }. z' |1 j1 X7 }
idelay read rd10b at 28546 J+ \+ [/ O) j. v9 k7 _
idelay write wrt11b at 2855 5 o2 j! O0 ~$ ?, [; J/ @5 X, N7 N
idelay read rd11b at 3218- O8 f' ]0 C9 {8 p. n
) x. A2 M7 [- I( I' u+ r
; input level! V& S) w& Z1 j$ ?, r+ l X8 b- }
macs ina, 0, in1, input_level ; default 0.57 R7 e- P! L7 m
macs inb, 0, in2, input_level
1 t' ~5 v! f4 B
) ]* z2 S$ x/ |( d& l: V; add early reflections, q y0 E: c/ p. Q3 p
; lexicon 480l, medium hall8 n( c; Z9 I: H
; left * U2 _/ g5 F# L
macs wrt12a, ina, rd19a, 0.2
3 N( q. B( N7 K; m: u$ b5 G: H }macs ga, 0, rd12a,-0.272302037# Y; y" P% f( K' C( C
macs ga, ga, rd13a,-0.197265388* Q% h6 W- m5 Q0 W" X5 i& ?- [
macs ga, ga, rd14a,-0.319926998
5 }8 ]# Z2 S8 Z7 V+ o. m! I+ S- jmacs ga, ga, rd15a, 0.153126688$ N5 Z! |9 H: V& M
macs ga, ga, rd16a,-0.17181097' c2 y0 _# l+ e. N+ }
macs ga, ga, rd17a, 0.489836215
. F, U4 m8 t/ {6 Bmacs ga, ga, rd18a,-0.120240532# i! }+ M; `& A0 Y& v
macs ga, ga, rd19a, 0.195007309
2 q/ s# v& J5 z" J1 x0 @
' u: l' f9 ^4 c ~3 \2 u6 y; right w1 E( k0 ? R# @1 `3 }+ @
macs wrt12b, inb, rd19b, 0.2
- c' T! l& G$ E- P$ E C# Amacs gb, 0, rd12b,-0.333553451
! V' Y; F7 j' k$ P! y, tmacs gb, gb, rd13b,-0.20098583
) N( k: d, ^5 v8 _% s, y6 w9 qmacs gb, gb, rd14b, 0.345275242
* ~: y% {9 @( qmacs gb, gb, rd15b,-0.3335534513 [: G5 f/ }/ F% ~. h; |9 c9 C6 B. R
macs gb, gb, rd16b, 0.163367416
3 C# R: B7 O) E2 z1 f. P! S5 fmacs gb, gb, rd17b, 0.2153601960 S2 D+ ?$ m @% O! {& O N
macs gb, gb, rd18b,-0.208048907
5 m0 U" S$ w; `5 v4 Nmacs gb, gb, rd19b, 0.540960355
/ c) D7 `; n# ]) B' O1 `( A% T$ y+ L2 A. M/ I
; early reflections level
3 ^" W7 {0 N' }4 x0 {( Kmacs ga, 0, ga, early_level 8 [/ X/ k: ]6 O4 u0 N* f+ x2 ]
macs gb, 0, gb, early_level
6 c) M* G. |/ ^2 T* ?0 ]2 u% f& H8 R+ D
; late input + early reflections 9 y8 z8 o, E0 K7 {
macs ina, ina, ga, 0.54 y9 P3 b5 H4 t# }8 F
macs inb, inb, gb, 0.5+ U/ _9 W; Y' S; z" V
- W) n* N6 W9 n) c4 o( B% U; trim sliders
0 Q, R- e6 |# W' T$ _4 A3 m" j6 Plog f, late_decay, 0x3, 0 ; logaritmic decay fader. x; U* h4 W- m: m" u R
5 H8 S" v' n) q4 r; 8 delay lines (comb filters with lowpass damping)
! z; j g! I& r0 ]0 h3 U; left # |( Z N9 o' i# \" B
macs wrt0a, ina, a0a, f ; decay set to ) p" u) x) _9 ?$ x- _* ^8 p' u$ c
interp a0a, a0a, late_damp, rd0a ; lp damping set to ' {" g3 J! ^' l
macs wrt1a, ina, a1a, f
; ~; R+ A9 C& dinterp a1a, a1a, late_damp, rd1a1 x; C; [! X3 l! N- ^4 M6 H
macs wrt2a, ina, a2a, f; x, i+ P" b2 T# N+ Y' i* r$ h
interp a2a, a2a, late_damp, rd2a5 J' U8 \/ I% T- O4 v) R* w: s8 h
macs wrt3a, ina, a3a, f
$ y& C# Z& [! P! Z$ [! Iinterp a3a, a3a, late_damp, rd3a$ a9 d' n3 ~2 u
macs wrt4a, ina, a4a, f) C1 Y0 e ?, m+ c; H) A
interp a4a, a4a, late_damp, rd4a 0 V+ X9 i" B4 X8 n" d6 Y! n
macs wrt5a, ina, a5a, f" }. X5 o" V6 s5 L6 q. m
interp a5a, a5a, late_damp, rd5a : H+ x: p1 M, u8 U/ D" v4 ^: v$ X
macs wrt6a, ina, a6a, f8 H3 q ~* k9 U8 ]8 t8 L% C+ `
interp a6a, a6a, late_damp, rd6a . ?3 X/ u! q7 L4 V: t
macs wrt7a, ina, a7a, f
: W( S2 t L0 R) u# S3 w* ointerp a7a, a7a, late_damp, rd7a
2 Z- r$ B" K+ [, ?* `( ] 7 C5 F8 X# T! P9 u4 A6 |
; right - b# b6 ]7 N" Z* u. m; d
macs wrt0b, inb, a0b, f ; decay set to
$ F/ L, s) k+ |! P8 [! g+ \6 rinterp a0b, a0b, late_damp, rd0b ; lp damping set to 5 {0 D( \" K- @! o) U
macs wrt1b, inb, a1b, f' Q: y% W9 u5 T/ f
interp a1b, a1b, late_damp, rd1b
v; j/ [; u2 Y0 vmacs wrt2b, inb, a2b, f7 g* {, f# K$ m* z f: Z0 w
interp a2b, a2b, late_damp, rd2b
, P! A( L, B# T) ]macs wrt3b, inb, a3b, f
. n" Z9 f7 J# ]/ G/ A' O5 Ninterp a3b, a3b, late_damp, rd3b3 ]8 b% v: q+ b2 n% P0 W0 p
macs wrt4b, inb, a4b, f
+ ]* x* r9 c- Q' Ninterp a4b, a4b, late_damp, rd4b
* x+ w( z$ g# Xmacs wrt5b, inb, a5b, f
6 t( E- H; D! D9 S4 R) v/ iinterp a5b, a5b, late_damp, rd5b
1 I" a+ }( ?" O$ Dmacs wrt6b, inb, a6b, f
" J! x3 Q* w+ Y( Uinterp a6b, a6b, late_damp, rd6b - v( U( Q7 G- _0 L2 G% D; y
macs wrt7b, inb, a7b, f. J9 u! X q1 p6 y
interp a7b, a7b, late_damp, rd7b% Y7 L8 O) ^9 X# @% X8 N4 z2 P
( p0 \* z9 U. n% ]2 k9 X& R# o7 J; add & gain taps - t2 m4 h, g/ C, X8 P
; left
- B7 B/ s8 z/ L7 D1 U+ i5 ^macs b1a, 0, a0a, 0.125
# y% m, a* l0 ]0 mmacs b1a, b1a, a1a, 0.125 ; post gain; F+ ]8 B% j0 _) b
macs b1a, b1a, a2a, 0.1256 w/ s) j8 n' u6 M" T
macs b1a, b1a, a3a, 0.125 + H: X ^) Y4 T0 |9 H
macs b1a, b1a, a4a, 0.1252 T! a! [6 \1 `4 R( g3 L
macs b1a, b1a, a5a, 0.125
, Z& f- Y( A( R8 p/ C8 t7 mmacs b1a, b1a, a6a, 0.125
5 R/ Y! Y+ \0 } W7 amacs b1a, b1a, a7a, 0.125
7 f9 k9 e5 Q) P
9 x' f7 Y* C/ }6 {; right
/ S4 ]: z: m) _4 v! E: qmacs b1b, 0, a0b, 0.125
) t$ Z/ I( h% W# smacs b1b, b1b, a1b, 0.125 ; post gain
) Z2 e- c+ m ?3 T# E" kmacs b1b, b1b, a2b, 0.125
# l& R" P& B `macs b1b, b1b, a3b, 0.125
$ I3 h8 x" c1 b) q. zmacs b1b, b1b, a4b, 0.125
! @! r4 `# k5 q5 o. ^macs b1b, b1b, a5b, 0.125 % S; S- c$ |$ _" q+ v9 f
macs b1b, b1b, a6b, 0.125( i! V& M7 m5 I7 u" w3 }
macs b1b, b1b, a7b, 0.125
3 F7 O0 O( k8 _: U# ]1 V2 x! _. ~. B; L W& e6 V
; allpasses (fixed feedback), diffusor3 G8 B2 G7 y4 V& J, ~
; left
- @. }, k8 ?: W% Z: rmacsn h, b1a, rd8a, ap_q ; ap 1
$ h6 {3 f, k ~. q* h: f% Tmacs wrt8a, h, 0, 0 ) j' v; R3 V2 e$ a' Q% [/ j
macs d1a, rd8a, h, ap_q
, H' B6 ~ z" i& {. G; s& D, _5 R
8 L! Y) ?9 p* r1 n! S* S S6 }1 Pmacsn h, d1a, rd9a, ap_q ; ap 2
$ j: B g( w- T- o( G/ d* bmacs wrt9a, h, 0, 0
" N' Q) P. Y: {macs d2a, rd9a, h, ap_q
) n p( l0 y+ f# h8 { 3 M: b/ r# j" T6 [* k3 @
macsn h, d2a, rd10a, ap_q ; ap 3% P9 O1 Y; a$ P& `4 w, C
macs wrt10a, h, 0, 0 9 H9 ]" |! _3 X s! Q/ J
macs d3a, rd10a, h, ap_q + d% D) m" O6 D% f( X2 _* g% X
' n6 E: q7 I1 T! C% h- |
macsn h, d3a, rd11a, ap_q ; ap 4
6 {) X, h! M" x& D6 Qmacs wrt11a, h, 0, 0
. b, H( ` P8 i: O) a$ e7 wmacs d4a, rd11a, h, ap_q : I- Q! Y* P- ]# K8 z& v
- n' B6 U2 D# |; right. \+ C% \1 N Q0 D7 Y; v2 ?; i3 x) ^# E& s
macsn h, b1b, rd8b, ap_q ; ap 1+ N% A6 `* o% I. }& E& S# d( P. e5 H
macs wrt8b, h, 0, 0 % V( I' V% V- E6 R# W5 a( l" U
macs d1b, rd8b, h, ap_q
) a2 R; `4 ~$ e4 o
2 @4 {: O1 h+ E/ T1 Q$ O6 [macsn h, d1b, rd9b, ap_q ; ap 2
( j% q1 ^4 o8 m( i' Vmacs wrt9b, h, 0, 0
# s* U, I% T+ u" n. zmacs d2b, rd9b, h, ap_q : `) I% h, K0 I- K
% ~% M% [$ ^( T& f% p
macsn h, d2b, rd10b, ap_q ; ap 3
+ p8 S: }1 E% T9 G6 @* W4 ~+ y8 ?& o# lmacs wrt10b, h, 0, 0
0 K# M$ l6 w$ q; e7 a2 Fmacs d3b, rd10b, h, ap_q ) L! ^0 b8 N/ K3 W
" m4 m4 {6 m' }$ t0 `
macsn h, d3b, rd11b, ap_q ; ap 4
! I* c3 I- q+ T; _9 h& u! `* U- ?- Omacs wrt11b, h, 0, 0 + O1 t0 ~# q+ _* O3 s/ O
macs d4b, rd11b, h, ap_q- B& {; T& ^; x* W4 W
) f0 F% n! L0 B& v; late reflections level
. |+ P+ W6 b6 O$ B8 Smacs d4a, 0, d4a, late_level
% P1 \. I, c' Z) f# ~2 R7 ~macs d4b, 0, d4b, late_level4 p0 R1 |8 r- ?" K
9 I( _7 N1 O8 K( A
; mix late & early reflections
& z7 h- S8 Z1 z6 b1 E" V( }5 g4 o/ Jmacs d4a, d4a, ga, 1; [& }. ]$ M0 E0 ^, }% q7 n) b0 j
macs d4b, d4b, gb, 16 [' v, u5 m9 N9 O
) r! o1 D. f5 v1 Q B; lowpass i0 G. s4 o( y6 z( A4 s; I: [% _
; left
) c* G3 k4 e5 ^& P7 C% O" a" hmacs d4a, d4a, ea, lp_q ; q9 ?" b+ a* A3 T
interp ea, ea, lp_cut, d4a ; cutoff % l1 L$ f" L8 S) ~
7 d2 f& C7 ^" q+ G$ I# x. w
; right- H n. q9 g2 T% E. k6 f- s/ n
macs d4b, d4b, eb, lp_q ; q4 L- ?% O, g# i7 Q& N6 G
interp eb, eb, lp_cut, d4b ; cutoff ; f1 @' Q2 E& \( V
8 r# `# n5 S* v% I, z! G
; output mix
9 R4 w: |. K, c& m8 e( g2 _( ~interp out1, in1, dry_wet, ea4 B" _9 [. @8 \& x# J9 @8 U
interp out2, in2, dry_wet, eb
) L; O( I( R) f7 t0 A; s( t" t" Q' l
- [/ H1 `$ H: ]! y( mend |
|