|
|
声音可以秒杀现有任意kx的混响了(aps,efx之类)，但是高频比较粗，本想自己提高精度的，一看资源，mb外存操作已经几乎吃满了(50/64)，看来这是emu10k2的极限了，不知emu专业卡的10k2.5有没有提升外存操作能力，把下面的代码存为.da文件即可加载
3 z4 \1 d" V, h# r( Z9 V- f' D; |/ y& x$ s
V; D3 ~, x8 A/ k R; u4 z) E: A
% {; u0 c) h6 W8 R, F$ R. nname "superspace mh v1.0";, R4 D+ g) M1 P0 h
copyright "2009. stylus, http://stylus.siteboard.de"
: M$ l% Z9 V* C# U: ]/ l: Wcreated ""$ q' |: B+ R2 Y0 L5 Q$ }
engine "kX";$ [0 W2 k& M G2 c
comment "high end true stereo reverb, medium hall";
9 V) I, L2 f3 k% yguid "32295c17-f0ea-4f2c-b1e2-942e4b4e0f7d";7 i& A3 G/ V5 Q- p" y7 L- X
, h' P. f( z- s: @- r- Q. U
; late reverb algorithm from freeverb by "Jezar at Dreampoint"
/ g3 a' _5 l# Z9 m; early reflections from impulse response "lexicon 480l"
1 Q, |8 C8 d% D7 `) ]8 x' d; true stereo
" W8 y% g5 U/ p3 Q% f) ? P' b$ ~0 e
; registers- o5 G0 c9 _1 H0 X$ `; [
input in1, in2
9 R' P/ R: b; [( Poutput out1, out2
, F' I; L! D& ^0 v6 Mstatic a0a, a1a, a2a, a3a, a4a, a5a, a6a, a7a, b1a, d1a, d2a, d3a, d4a, ea7 y% P& F0 `% [' i; H! P
static a0b, a1b, a2b, a3b, a4b, a5b, a6b, a7b, b1b, d1b, d2b, d3b, d4b, eb
: ~8 h3 a9 u* ^: n$ t: |7 }6 ~static ap_q=0.5, f, ga, gb, h, ina, inb
! I6 @% f6 J% Q2 I Gcontrol input_level=0.7
. V/ _) `1 T% {* Fcontrol early_level=0.259 h% k% j; j( {+ H# b
control late_decay=0.85) a2 z+ P& ]$ B/ r) _8 n# z, p2 \8 D% p
control late_damp=0.95
# i u- W7 e) r- {, z! x4 _" O/ w/ fcontrol late_level=0.75' J5 w# M& G; C
control lp_cut=1
' }- ?& O3 ^) m/ x' e; T6 ~control lp_q=0.3
8 j. F' ]5 t+ m! xcontrol dry_wet=0.75
/ x c" q6 {( c; [! E; b2 `' f/ W+ {
xtramsize 27454& a- f0 K3 ~0 {5 N% `+ ~5 i9 R& n
# t/ a l% N7 G- R
; late reflections iir
! N3 K4 l! G! j" `5 k; left w! V1 o' ~! n4 G2 o
xdelay write wrt0a at 0
) ~& p$ i, f' W9 K6 T: Sxdelay read rd0a at 1556& Y0 h9 {2 G4 h8 z1 h/ G
xdelay write wrt1a at 1557 - |) _) P2 j( V; L1 L+ U
xdelay read rd1a at 31736 ?: ]2 ?- w+ f7 Y4 I3 t
xdelay write wrt2a at 3174 * d& n& q) @$ g$ Y1 c' D/ o
xdelay read rd2a at 4664
. I: ]4 | i4 K6 sxdelay write wrt3a at 4665
; j* i+ W2 k cxdelay read rd3a at 6086
: ?' R, u& Q+ O+ ~ R; f4 ~: }xdelay write wrt4a at 6087 / `! Q( b0 c- e6 g- c
xdelay read rd4a at 7363
- f- x$ b- h4 T. t6 E7 M& X Cxdelay write wrt5a at 7364 * M6 t: ^6 _! E
xdelay read rd5a at 8719
: L. {$ e _/ A- y5 Dxdelay write wrt6a at 8720 $ G* Q' l* Y6 w8 m( N; \
xdelay read rd6a at 99075 U! f- \9 O2 ^
xdelay write wrt7a at 9908 3 m4 ^1 u& J. H; t
xdelay read rd7a at 11023
0 A V/ n% R* V4 j& p) v$ T8 e" }, p1 P: ^6 d& p5 l
; right
& v$ O6 C$ ] E& k$ lxdelay write wrt0b at 11024 $ j" O' l4 P! B$ L
xdelay read rd0b at 12603) W# z2 y: ]2 g/ N' I6 d1 X
xdelay write wrt1b at 12604 5 D+ [1 ?! `( \) G# F% `8 b$ g
xdelay read rd1b at 14243
0 F1 U/ F& i9 G; Zxdelay write wrt2b at 14244
8 C9 r# ]/ `7 a: [xdelay read rd2b at 15757
' A) e, z. h5 R; Exdelay write wrt3b at 15758 % h8 J7 C1 `) z
xdelay read rd3b at 17202
! L6 ~, Z& a! [xdelay write wrt4b at 17203 0 v2 }+ U) ^# q' e4 }
xdelay read rd4b at 18502
8 R+ H3 k% K5 l) Y1 i1 txdelay write wrt5b at 18503
1 B2 S8 p* M8 O1 e( cxdelay read rd5b at 19881
+ z" ?9 y; N' g7 \: Vxdelay write wrt6b at 19882
' |( ^0 D& }1 c5 Fxdelay read rd6b at 21092+ u# {, Y+ w3 Y9 `
xdelay write wrt7b at 21093 6 A* k8 p" p U5 O
xdelay read rd7b at 22231
5 n4 J2 ?% V9 C
9 ~3 @' \4 N' r, D, z; lexicon 480l/ medium hall/ first 8 peaks( Q" e4 [) Q( o4 h- q9 K3 Q
; early reflections iir/fir
4 Y3 O7 i& ~' P4 T ]9 R; left * p6 T, L$ f! B4 O( ~
xdelay write wrt12a at 22232
2 a2 ]( S. T' z" i3 {' Lxdelay read rd12a at 23566
# x+ y) f$ L. |5 Kxdelay read rd13a at 23850
) \, w) I4 \. @; Nxdelay read rd14a at 24033+ r3 L0 `9 ~% }, {' a
xdelay read rd15a at 241341 ^8 l9 Z9 ~: V+ m" Q
xdelay read rd16a at 24317
# T) S/ S, H0 N+ N ~: R2 x6 @xdelay read rd17a at 24376- O" V$ E& z J- S6 t
xdelay read rd18a at 24418
+ m$ E, B) ~% i; E: y; y( Kxdelay read rd19a at 24500) h, y: m) D$ i) P6 n0 N3 N
# y+ ^; k' s" K. n; c" J, G; A% V; right. y' Q& l% ~$ o
xdelay write wrt12b at 24501 9 l, j% l. l& P# a3 d" e
xdelay read rd12b at 26715& c0 t8 c& }; u7 I: h$ E. }$ q
xdelay read rd13b at 26961
* t/ P) H5 O* ~) J. t# o$ n7 Gxdelay read rd14b at 26984
& j& D$ [. c6 H1 b: [, L3 t+ R/ Exdelay read rd15b at 27101# a8 \4 H6 }9 s3 ?( U/ _$ {5 u2 M) W% a
xdelay read rd16b at 27207$ n/ B5 m/ T3 W0 r c% u
xdelay read rd17b at 27268
9 ]7 q, f( z2 V/ V4 x/ t6 w2 Wxdelay read rd18b at 27347 H5 W" k& `2 ?5 ?
xdelay read rd19b at 27454) d4 V5 ]) \+ b) \
& f# I: y; t" J; X: k4 f( w2 n+ z, N3 X. Y
itramsize 3218
6 ^2 u& G1 L' K: t; allpasses iir3 x; g9 O: J; ]
; left 4 y; c9 O/ v) M H9 R- J! ]
idelay write wrt8a at 0 4 ] ~ V' y8 Z/ i
idelay read rd8a at 224
* ?* \( F1 T! v# k! N% kidelay write wrt9a at 225 ) m; x* N, | P+ r' d
idelay read rd9a at 7804 M) W) a/ g2 K$ f
idelay write wrt10a at 781 W- }$ o( O- A6 o% Q5 k5 a$ B! u2 d
idelay read rd10a at 1221/ W8 n1 s% J3 I/ x' V9 h. }" G9 I
idelay write wrt11a at 1222
0 @- s7 W2 a8 a* u0 D$ ]9 {. F6 u7 Aidelay read rd11a at 1562$ U0 p) S# Y* B1 H# u/ v
: `4 o; L2 p# H; T' \9 l; right ; T! ?5 g' A6 [9 z' b
idelay write wrt8b at 1563
8 H. Z; ^' ], K8 z* x3 P! {' X7 v( iidelay read rd8b at 1811! K$ T+ N; P8 L1 n0 g. A
idelay write wrt9b at 1812
3 ?4 [; b6 |& v2 C4 P* Midelay read rd9b at 2390: E& I% _4 v5 v; ]2 x! O# s, d, V
idelay write wrt10b at 2391 # G( f c: E. h! `) A
idelay read rd10b at 2854" v6 J: c& j, X+ q
idelay write wrt11b at 2855
/ Q, {, k2 E) e+ Aidelay read rd11b at 3218
/ p. r8 u% B9 X4 H
/ b, U) X1 | x4 X8 Q2 N; input level
T! t7 \' L. V+ [' _; {macs ina, 0, in1, input_level ; default 0.51 l3 I" M1 c6 f/ U5 E
macs inb, 0, in2, input_level
; L9 p4 h6 G4 ?. Z `! k- X$ F( }2 C
; add early reflections( C/ M% p# j/ R; l* w8 |5 G
; lexicon 480l, medium hall' _" r1 Z0 E$ Z$ H$ k; v
; left
9 R2 ^& z* i6 O/ q; Mmacs wrt12a, ina, rd19a, 0.2
' H) G* T2 Z9 ], d3 z9 f& n! z: Zmacs ga, 0, rd12a,-0.272302037
1 U, B& k3 q" B* N0 Xmacs ga, ga, rd13a,-0.197265388
# {) @7 z) I6 f0 @* q- Nmacs ga, ga, rd14a,-0.319926998; K1 [( ~8 q6 c: U# Q9 r* K& x9 ^
macs ga, ga, rd15a, 0.153126688
, n$ c+ r- N: }3 G+ U2 F! Fmacs ga, ga, rd16a,-0.171810972 N" F9 x8 O }0 {1 Y9 e. D
macs ga, ga, rd17a, 0.489836215
- n+ r8 s, k6 n. W6 Kmacs ga, ga, rd18a,-0.120240532
" q# e' c# f# t) }! w: v" vmacs ga, ga, rd19a, 0.195007309
5 R, h6 N3 ^/ ?# A9 s0 r" ~
i9 L2 _. ?: s6 @5 V; right
, i i# Z4 J7 h' o' T& Z% vmacs wrt12b, inb, rd19b, 0.2
- r6 r/ K+ f6 u8 dmacs gb, 0, rd12b,-0.333553451
1 a: }; u8 |# s& hmacs gb, gb, rd13b,-0.20098583
. N' I; \1 j' a3 E' ]$ Mmacs gb, gb, rd14b, 0.345275242
3 z' i/ ^ G3 T. ]/ Q& x+ G& `macs gb, gb, rd15b,-0.333553451
. X, |! t4 C/ \6 |$ F0 [; gmacs gb, gb, rd16b, 0.163367416! S- s5 J, \( ?/ A% O* R3 j0 R; D
macs gb, gb, rd17b, 0.2153601964 m' \- C+ H! n; V' M$ @& r+ S( }) ?
macs gb, gb, rd18b,-0.208048907- o5 q0 h: y7 {
macs gb, gb, rd19b, 0.540960355
V. o: z6 t- o! K9 _, v1 G2 d5 D8 [$ _" l
; early reflections level/ G; c" p+ n( s! B
macs ga, 0, ga, early_level ) g2 b# f3 p: y7 I9 D$ B* ]
macs gb, 0, gb, early_level0 `8 S6 S1 L/ c7 y" k
: E9 \3 {* r# k) W/ _! }+ G X; late input + early reflections 7 n/ x" A; ]( c* p0 N
macs ina, ina, ga, 0.5
$ Z7 b Y5 X) P1 }8 |9 G. e7 k4 pmacs inb, inb, gb, 0.5
# V4 X5 ]: L3 L! V: B2 e ' F4 L- w$ A* N' P# P- C9 r
; trim sliders4 r% \; E* T) I, B
log f, late_decay, 0x3, 0 ; logaritmic decay fader
, P( t; A, r% l$ V* O 4 Q7 n' q: [5 W2 Z6 D/ v: z
; 8 delay lines (comb filters with lowpass damping)( W b7 F3 s; K2 a. V2 k
; left
' |& F7 b' R. W8 n4 D0 amacs wrt0a, ina, a0a, f ; decay set to * }# z/ }% k' n' i
interp a0a, a0a, late_damp, rd0a ; lp damping set to * ~4 I- w3 H& V
macs wrt1a, ina, a1a, f7 i s5 y6 B" y4 A# N
interp a1a, a1a, late_damp, rd1a/ k+ J6 \( N- W6 n% i1 x& [
macs wrt2a, ina, a2a, f, y$ P% b( T5 |) q/ x9 N& Y2 V: d
interp a2a, a2a, late_damp, rd2a
3 [8 V z. |1 \7 }macs wrt3a, ina, a3a, f ; k' F0 K6 R6 P; m0 A
interp a3a, a3a, late_damp, rd3a
! @5 g- y7 U9 F) }" j7 T+ Amacs wrt4a, ina, a4a, f+ B5 @9 n( ^2 k
interp a4a, a4a, late_damp, rd4a
$ Y% M! Z" e3 y1 Emacs wrt5a, ina, a5a, f% J; h- p) R' N$ c+ y& V, Q0 m
interp a5a, a5a, late_damp, rd5a
4 k9 F2 s1 C$ E) Y$ v/ h, Gmacs wrt6a, ina, a6a, f t) f/ t+ D2 \9 d
interp a6a, a6a, late_damp, rd6a
6 E. |% j [ \. G' Gmacs wrt7a, ina, a7a, f
$ [& Y6 B/ I+ } ^7 @ cinterp a7a, a7a, late_damp, rd7a
. \# _* Z) Y$ ~
* c, d6 j$ H5 R! t9 f# v- g j! Y8 `; right
6 ], u& y8 y! W8 z9 t |macs wrt0b, inb, a0b, f ; decay set to
, u$ v K$ O- A. {9 {2 yinterp a0b, a0b, late_damp, rd0b ; lp damping set to " D& v9 m; s# f, `9 N% X& F h
macs wrt1b, inb, a1b, f3 N7 q7 E. ]9 J1 d
interp a1b, a1b, late_damp, rd1b$ a% Y9 A8 {& l/ g
macs wrt2b, inb, a2b, f. \8 S2 i" d$ O# y
interp a2b, a2b, late_damp, rd2b
' q; @. A `: Q/ gmacs wrt3b, inb, a3b, f 7 t6 \, Y) {3 b/ i o
interp a3b, a3b, late_damp, rd3b
0 f+ {; S8 S9 Cmacs wrt4b, inb, a4b, f) \3 ^; k. T5 L" t" J
interp a4b, a4b, late_damp, rd4b ! J' N- e% l5 v. P- E0 F/ v
macs wrt5b, inb, a5b, f
1 P1 b/ h( e4 \4 x& R6 W [7 {interp a5b, a5b, late_damp, rd5b
4 M6 O& _ E5 j- L1 ~+ xmacs wrt6b, inb, a6b, f
! u3 e A7 K* d9 W( ]& G& pinterp a6b, a6b, late_damp, rd6b
& ~% h0 w' f; p. O5 g6 B" Rmacs wrt7b, inb, a7b, f2 K7 R$ f5 A6 x4 Y" Z0 E) N4 g
interp a7b, a7b, late_damp, rd7b9 n$ `( |# x9 G9 [% P
1 V1 r4 B) ?" m, |, M0 ^% K; add & gain taps 3 `! G6 H$ j$ E# |% R* e
; left
- R, P* N; k( E: smacs b1a, 0, a0a, 0.125+ Q% C3 {- K% x* F
macs b1a, b1a, a1a, 0.125 ; post gain
4 ]: @3 V& n* c6 i7 G3 ?macs b1a, b1a, a2a, 0.125
- A- i" s2 A8 C H C3 }macs b1a, b1a, a3a, 0.125
' R2 n" N3 G2 q+ m4 d: qmacs b1a, b1a, a4a, 0.1255 H! [- }) ^# I, Q0 t# y/ K+ f
macs b1a, b1a, a5a, 0.125
0 t7 j4 j2 F; ]: ^1 T+ \macs b1a, b1a, a6a, 0.125
* J7 ^( a$ n1 v2 w" amacs b1a, b1a, a7a, 0.125) z. T9 J% h8 P
7 O% v) x' h8 h( Y
; right4 |& p6 R( V; x, A9 p% m- W7 M/ L5 Y" n
macs b1b, 0, a0b, 0.125. B2 {4 C# R; d% `, e( |
macs b1b, b1b, a1b, 0.125 ; post gain( }4 G$ l0 J V! L( w9 g; X) c
macs b1b, b1b, a2b, 0.125
: j& I8 v2 z/ J3 nmacs b1b, b1b, a3b, 0.125
0 A2 C5 q1 N [" C( z5 amacs b1b, b1b, a4b, 0.125
" I0 Z) E3 f: hmacs b1b, b1b, a5b, 0.125
) M, W, a7 }: P' Amacs b1b, b1b, a6b, 0.125
7 G7 A* h3 w. Imacs b1b, b1b, a7b, 0.125
2 S/ u" F0 U/ _) N! y4 E0 S1 V1 m9 i a' \( J' B* T
; allpasses (fixed feedback), diffusor
1 ?1 M2 y; z& B/ e- I; k; left
$ O1 H5 O% O" x% jmacsn h, b1a, rd8a, ap_q ; ap 1
( o! h1 x" A! R' n5 n6 lmacs wrt8a, h, 0, 0 6 ~4 V0 Z+ P! l. g! v8 [1 K6 f
macs d1a, rd8a, h, ap_q 2 M6 b" n% ]# V0 B) a/ |
3 d/ i1 N2 b% V. J* b
macsn h, d1a, rd9a, ap_q ; ap 2
) W% |' W( }& p( O$ k& H* rmacs wrt9a, h, 0, 0
1 ~& y! F9 P% H) O9 X5 Gmacs d2a, rd9a, h, ap_q ! ?" m# O& s% H! T; f& u
/ [( e$ X: M& X1 Omacsn h, d2a, rd10a, ap_q ; ap 3; V3 S. L. R! }
macs wrt10a, h, 0, 0 ! X- w3 c! D0 _
macs d3a, rd10a, h, ap_q 5 i8 h- u+ x5 t2 V z
, N" F% } x8 |' B/ _) Lmacsn h, d3a, rd11a, ap_q ; ap 4
6 `, s+ }6 O! omacs wrt11a, h, 0, 0 0 k- E8 Q" g1 y* ]6 g
macs d4a, rd11a, h, ap_q
0 D7 u6 a. R# V( ^5 c ' F. [- A6 b$ g9 S$ n' f
; right
$ _1 }7 c( Y$ M6 x" J3 Z0 `macsn h, b1b, rd8b, ap_q ; ap 10 t, J0 F& ~2 P; R& D
macs wrt8b, h, 0, 0 0 R9 X9 z# G9 y1 F! {4 S" ~
macs d1b, rd8b, h, ap_q
+ I2 \% r9 b& h' N1 ~ 6 D$ |* E+ ?3 F' f/ x7 q
macsn h, d1b, rd9b, ap_q ; ap 2
# z( U5 s" s I! ^; T7 Ymacs wrt9b, h, 0, 0 9 E5 X9 O, |$ k. N! t w" o$ |
macs d2b, rd9b, h, ap_q 2 x) Z6 S; U( W! k; E% A/ Q/ H, J
) n6 y( k* U) U0 L. l( T- f! S A
macsn h, d2b, rd10b, ap_q ; ap 3
- Q' e+ | q# W) K8 e: Y) Wmacs wrt10b, h, 0, 0
3 M1 p7 l; v( Z* {1 C ymacs d3b, rd10b, h, ap_q
; C' r ^5 s0 A9 c, J5 W, P
2 s$ i. m' H1 L2 o% S/ ]% `macsn h, d3b, rd11b, ap_q ; ap 4$ `; m8 y1 W8 i: u& s4 }: ?: a* U
macs wrt11b, h, 0, 0 4 O" ^! A# D) J. A( p9 }3 _2 F
macs d4b, rd11b, h, ap_q
( t6 s# q6 K+ d8 H
* L7 E L/ b( Z& _- G; late reflections level) J- {$ R( o& ]: N' U- f( H6 G; ~
macs d4a, 0, d4a, late_level 0 V- Y+ P# w! c. O2 P5 n
macs d4b, 0, d4b, late_level
* ]4 P! X1 m( `" a
0 l# ?6 M$ W5 p; mix late & early reflections7 K' V2 P) H: e' b* i
macs d4a, d4a, ga, 1
5 N4 j2 ^; j# N) v% r c6 Wmacs d4b, d4b, gb, 1
4 V6 }8 u3 ~' _5 S+ w
C% a# C/ O1 b! s' B* n: p! \; lowpass
# L' Q0 o" N- j* r; left: s3 H1 V& q3 u) B. `0 `
macs d4a, d4a, ea, lp_q ; q, e& P# W" w7 _8 l( D3 t6 H- |
interp ea, ea, lp_cut, d4a ; cutoff
* }( h6 N/ f9 K* m
% }( j" w" F! @; t* n2 L; p' }; right
! ~$ \3 Y e0 R; \7 c" W+ dmacs d4b, d4b, eb, lp_q ; q
- n% b. E1 m# `) [, f) g, ninterp eb, eb, lp_cut, d4b ; cutoff
. a5 a) E; F C0 I8 D
4 g9 F) T3 {, Q1 q7 e/ w9 A0 V; output mix) k+ F6 K- o$ [, |0 Z) ?6 Y
interp out1, in1, dry_wet, ea
; H( y! O1 \: `interp out2, in2, dry_wet, eb
; T& L+ N y7 ~
: P- _3 b3 ?- V ]9 u% zend |
|
IP卡
狗仔卡
发表于 2009-7-24 12:54
QQ好友和群
收藏
分享
好贴
烂贴
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡
楼主
