rsc3/doc/help/ugen/oscillators/lf-cub.help.scrbl

92 lines
1.4 KiB
Text
Raw Normal View History

2022-08-24 13:53:18 +00:00
#lang scribble/manual
@(require (for-label racket))
@title{(lf-cub rate freq iphase)}
2022-08-28 10:27:01 +00:00
2022-08-24 13:53:18 +00:00
a sine like shape made of two cubic pieces. smoother than lf-par.
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(let ((f (mul-add (lf-cub kr (mul-add (lf-cub kr 0.2 0) 8 10) 0) 400 800)))
(mul (lf-cub ar f 0) 0.1))
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-cub ar (mul-add (lf-cub kr 0.2 0) 400 800) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-cub ar 800 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-cub ar (x-line kr 100 8000 30 do-nothing) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00
compare:
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(let ((f (mul-add (lf-par kr (mul-add (lf-par kr 0.2 0) 8 10) 0) 400 800)))
(mul (lf-par ar f 0) 0.1))
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-par ar (mul-add (lf-par kr 0.2 0) 400 800) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-par ar 800 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-par ar (x-line kr 100 8000 30 do-nothing) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00
compare:
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(let ((f (mul-add (sin-osc kr (mul-add (sin-osc kr 0.2 0) 8 10) 0) 400 800)))
(mul (sin-osc ar f 0) 0.1))
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (sin-osc ar (mul-add (sin-osc kr 0.2 0) 400 800) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (sin-osc ar 800 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (sin-osc ar (x-line kr 100 8000 30 do-nothing) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00
compare:
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(let ((f (mul-add (lf-tri kr (mul-add (lf-tri kr 0.2 0) 8 10) 0) 400 800)))
(mul (lf-tri ar f 0) 0.1))
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00
2022-08-28 10:27:01 +00:00
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-tri ar (mul-add (lf-tri kr 0.2 0) 400 800) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-tri ar 800 0) 0.1)
2022-08-28 10:27:01 +00:00
]
@racketblock[
2022-08-24 13:53:18 +00:00
(mul (lf-tri ar (x-line kr 100 8000 30 do-nothing) 0) 0.1)
2022-08-28 10:27:01 +00:00
]
2022-08-24 13:53:18 +00:00