Record sound: Difference between revisions
Content deleted Content added
→Tcl: Added implementation |
Added PicoLisp |
||
Line 2: | Line 2: | ||
Record sound (mono 16-bit PCM) into an integer array. |
Record sound (mono 16-bit PCM) into an integer array. |
||
=={{header|PicoLisp}}== |
|||
<lang PicoLisp>(in '(rec -q -c1 -tu16 - trim 0 2) # Record 2 seconds |
|||
(make |
|||
(while (rd 2) |
|||
(link @) ) ) )</lang> |
|||
Output: |
|||
<pre>-> (16767 19071 17279 ... 5503 9343 14719) # 96000 numbers</pre> |
|||
=={{header|Python}}== |
=={{header|Python}}== |