<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
<title>fprintks</title>
<link rel="stylesheet" type="text/css" href="csound.css" />
<link rel="stylesheet" type="text/css" href="syntax-highlighting.css" />
<meta name="generator" content="DocBook XSL Stylesheets Vsnapshot" />
<link rel="home" href="index.html" title="The Canonical Csound Reference Manual" />
<link rel="up" href="OpcodesTop.html" title="Orchestra Opcodes and Operators" />
<link rel="prev" href="foutk.html" title="foutk" />
<link rel="next" href="fprints.html" title="fprints" />
</head>
<body>
<div class="navheader">
<table width="100%" summary="Navigation header">
<tr>
<th colspan="3" align="center">fprintks</th>
</tr>
<tr>
<td width="20%" align="left"><a accesskey="p" href="foutk.html">Prev</a> </td>
<th width="60%" align="center">Orchestra Opcodes and Operators</th>
<td width="20%" align="right"> <a accesskey="n" href="fprints.html">Next</a></td>
</tr>
</table>
<hr />
</div>
<div class="refentry">
<a id="fprintks"></a>
<div class="titlepage"></div>
<a id="IndexFprintks" class="indexterm"></a>
<div class="refnamediv">
<h2>
<span class="refentrytitle">fprintks</span>
</h2>
<p>fprintks —
Similar to printks but prints to a file.
</p>
</div>
<div class="refsect1">
<a id="idm281472929231368"></a>
<h2>Description</h2>
<p>
Similar to <a class="link" href="printks.html" title="printks"><em class="citetitle">printks</em></a> but prints to a file.
</p>
</div>
<div class="refsect1">
<a id="idm281472929229128"></a>
<h2>Syntax</h2>
<pre class="synopsis"><span class="command"><strong>fprintks</strong></span> "filename", "string", [, kval1] [, kval2] [...]</pre>
</div>
<div class="refsect1">
<a id="idm281472929226952"></a>
<h2>Initialization</h2>
<p>
<span class="emphasis"><em>"filename"</em></span> -- name of the output file.
</p>
<p>
<span class="emphasis"><em>"string"</em></span> -- the text string to be printed. Can be up to 8192 characters and must be in double quotes.
</p>
</div>
<div class="refsect1">
<a id="idm281472929224200"></a>
<h2>Performance</h2>
<p>
<span class="emphasis"><em>kval1, kval2, ...</em></span> (optional) -- The k-rate values to be printed. These are specified in <span class="emphasis"><em><span class="quote">“<span class="quote">string</span>”</span></em></span> with the standard C value specifier (%f, %d, etc.) in the order given.
</p>
<p>
<span class="emphasis"><em>fprintks</em></span> is similar to the <span class="emphasis"><em>printks</em></span> opcode except it outputs to a file and doesn't have a <span class="emphasis"><em>itime</em></span> parameter. For more information about output formatting, please look at <a class="link" href="printks.html" title="printks"><em class="citetitle">printks's documentation</em></a>.
</p>
</div>
<div class="refsect1">
<a id="idm281472929219128"></a>
<h2>Examples</h2>
<p>
Here is an example of the fprintks opcode. It uses the file <a class="ulink" href="examples/fprintks.csd" target="_top"><em class="citetitle">fprintks.csd</em></a>.
</p>
<div class="example">
<a id="idm281472929217272"></a>
<p class="title">
<strong>Example 346. Example of the fprintks opcode.</strong>
</p>
<div class="example-contents">
<p>See the sections <a class="link" href="UsingRealTime.html" title="Real-Time Audio"><em class="citetitle">Real-time Audio</em></a> and <a class="link" href="CommandFlags.html" title="Csound command line"><em class="citetitle">Command Line Flags</em></a> for more information on using command line flags.</p>
<div class="refsect1">
<a id="idm281472761570056"></a>
<pre class="programlisting">
<span class="nt"><CsoundSynthesizer></span>
<span class="nt"><CsOptions></span>
<span class="c1">; Select audio/midi flags here according to platform</span>
<span class="c1">; Audio out Audio in</span>
-odac -iadc <span class="c1">;;;RT audio I/O</span>
<span class="c1">; For Non-realtime ouput leave only the line below:</span>
<span class="c1">; -o fprintks.wav -W ;;; for file output any platform</span>
<span class="nt"></CsOptions></span>
<span class="nt"><CsInstruments></span>
<span class="cm">/* Written by Matt Ingalls, edited by Kevin Conder. */</span>
<span class="c1">; Initialize the global variables.</span>
<span class="vg">sr</span> <span class="o">=</span> <span class="mi">44100</span>
<span class="vg">kr</span> <span class="o">=</span> <span class="mi">4410</span>
<span class="vg">ksmps</span> <span class="o">=</span> <span class="mi">10</span>
<span class="vg">nchnls</span> <span class="o">=</span> <span class="mi">1</span>
<span class="c1">; Instrument #1 - a score generator example.</span>
<span class="kd">instr</span> <span class="nf">1</span>
<span class="c1">; K-rate stuff.</span>
k<span class="n">start</span> <span class="nb">init</span> <span class="mi">0</span>
k<span class="n">dur</span> <span class="nb">linrand</span> <span class="mi">10</span>
k<span class="n">pitch</span> <span class="nb">linrand</span> <span class="mi">8</span>
<span class="c1">; Printing to to a file called "my.sco".</span>
<span class="nb">fprintks</span> <span class="s">"my.sco"</span><span class="p">,</span> <span class="s">"i1</span><span class="se">\\</span><span class="s">t%2.2f</span><span class="se">\\</span><span class="s">t%2.2f</span><span class="se">\\</span><span class="s">t%2.2f</span><span class="se">\\</span><span class="s">n"</span><span class="p">,</span> k<span class="n">start</span><span class="p">,</span> k<span class="n">dur</span><span class="p">,</span> <span class="mi">4</span><span class="o">+</span>k<span class="n">pitch</span>
k<span class="n">next</span> <span class="nb">linrand</span> <span class="mi">1</span>
k<span class="n">start</span> <span class="o">=</span> k<span class="n">start</span> <span class="o">+</span> k<span class="n">next</span>
<span class="kd">endin</span>
<span class="nt"></CsInstruments></span>
<span class="nt"><CsScore></span>
<span class="cm">/* Written by Matt Ingalls, edited by Kevin Conder. */</span>
<span class="c1">; Play Instrument #1.</span>
<span class="nb">i</span> <span class="mi">1</span> <span class="mi">0</span> <span class="mf">0.001</span>
<span class="nt"></CsScore></span>
<span class="nt"></CsoundSynthesizer></span>
</pre>
</div>
</div>
</div>
<p><br class="example-break" />
This example will generate a file called <span class="quote">“<span class="quote">my.sco</span>”</span>. It should contain lines like this:
</p>
<pre class="screen">
i1 0.00 3.94 10.26
i1 0.20 3.35 6.22
i1 0.67 3.65 11.33
i1 1.31 1.42 4.13
</pre>
<p>
</p>
<p>
Here is an example of the fprintks opcode, which converts a standard MIDI file to a csound score. It uses the file <a class="ulink" href="examples/fprintks-2.csd" target="_top"><em class="citetitle">fprintks-2.csd</em></a>.
</p>
<div class="example">
<a id="idm281472929210376"></a>
<p class="title">
<strong>Example 347. Example of the fprintks opcode to convert a MIDI file to a csound score.</strong>
</p>
<div class="example-contents">
<div class="refsect1">
<a id="idm281472761481176"></a>
<pre class="programlisting">
<span class="nt"><CsoundSynthesizer></span>
<span class="nt"><CsOptions></span>
<span class="c1">; Select audio/midi flags here according to platform</span>
<span class="c1">; Audio out Audio in No messages</span>
<span class="c1">; -odac -iadc -d ;;;RT audio I/O</span>
<span class="c1">; For Non-realtime ouput leave only the line below:</span>
-n -Fmidichn_advanced.mid
<span class="c1">;Don't write audio ouput to disk and use the file midichn_advanced.mid as MIDI input</span>
<span class="nt"></CsOptions></span>
<span class="nt"><CsInstruments></span>
<span class="vg">sr</span> <span class="o">=</span> <span class="mi">48000</span>
<span class="vg">ksmps</span> <span class="o">=</span> <span class="mi">16</span>
<span class="vg">nchnls</span> <span class="o">=</span> <span class="mi">2</span>
<span class="c1">;Example by Jonathan Murphy 2007</span>
<span class="c1">; assign all midi events to instr 1000</span>
<span class="nb">massign</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">1000</span>
<span class="nb">pgmassign</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">1000</span>
<span class="kd">instr</span> <span class="nf">1000</span>
k<span class="n">tim</span> <span class="nb">timeinsts</span>
k<span class="n">st</span><span class="p">,</span> k<span class="n">ch</span><span class="p">,</span> k<span class="n">d1</span><span class="p">,</span> k<span class="n">d2</span> <span class="nb">midiin</span>
<span class="k">if</span> <span class="p">(</span>k<span class="n">st</span> <span class="o">!=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
<span class="c1">; p4 = MIDI event type p5 = channel p6= data1 p7= data2</span>
<span class="nb">fprintks</span> <span class="s">"MIDI2cs.sco"</span><span class="p">,</span> <span class="s">"i1</span><span class="se">\\</span><span class="s">t%f</span><span class="se">\\</span><span class="s">t%f</span><span class="se">\\</span><span class="s">t</span><span class="si">%d</span><span class="se">\\</span><span class="s">t</span><span class="si">%d</span><span class="se">\\</span><span class="s">t</span><span class="si">%d</span><span class="se">\\</span><span class="s">t</span><span class="si">%d</span><span class="se">\\</span><span class="s">n"</span><span class="p">,</span> k<span class="n">tim</span><span class="p">,</span> <span class="mi">1</span><span class="o">/</span><span class="vg">kr</span><span class="p">,</span> k<span class="n">st</span><span class="p">,</span> k<span class="n">ch</span><span class="p">,</span> k<span class="n">d1</span><span class="p">,</span> k<span class="n">d2</span>
<span class="k">endif</span>
<span class="kd">endin</span>
<span class="nt"></CsInstruments></span>
<span class="nt"><CsScore></span>
<span class="nb">i</span><span class="mi">1000</span> <span class="mi">0</span> <span class="mi">10000</span>
<span class="nb">e</span>
<span class="nt"></CsScore></span>
<span class="nt"></CsoundSynthesizer></span>
</pre>
</div>
</div>
</div>
<p><br class="example-break" />
This example will generate a file called <span class="quote">“<span class="quote">MIDI2cs.sco</span>”</span> containing i-events according to the MIDI file
</p>
<p>
Here is an advanced example of the fprintks opcode, which generates scores for Csound. It uses the file <a class="ulink" href="examples/scogen.csd" target="_top"><em class="citetitle">scogen-2.csd</em></a>.
</p>
<div class="example">
<a id="idm281472929206728"></a>
<p class="title">
<strong>Example 348. Example of the fprintks opcode to create a Csound score file generator using Csound.</strong>
</p>
<div class="example-contents">
<div class="refsect1">
<a id="idm281472760051320"></a>
<pre class="programlisting">
<span class="nt"><CsoundSynthesizer></span>
<span class="nt"><CsOptions></span>
<span class="c1">; Select audio/midi flags here according to platform</span>
<span class="c1">; Audio out Audio in No messages</span>
<span class="c1">; -odac -iadc -d ;;;RT audio I/O</span>
<span class="c1">; For Non-realtime ouput leave only the line below:</span>
-n
<span class="c1">;Don't write audio ouput to disk</span>
<span class="nt"></CsOptions></span>
<span class="nt"><CsInstruments></span>
<span class="c1">;===========================================================</span>
<span class="c1">; scogen.csd by: Matt Ingalls</span>
<span class="c1">;</span>
<span class="c1">; a "port" of sorts</span>
<span class="c1">; of the old "mills" score generator (scogen)</span>
<span class="c1">;</span>
<span class="c1">; this instrument creates a schottstaedt.sco file</span>
<span class="c1">; to be used with the schottstaedt.orc file</span>
<span class="c1">;</span>
<span class="c1">; as long as you dont save schottstaedt.orc as a .csd</span>
<span class="c1">; file, you should be able to keep it open in MacCsound</span>
<span class="c1">; and render each newly generated .sco file.</span>
<span class="c1">;</span>
<span class="c1">;===========================================================</span>
gS<span class="n">coName</span> <span class="o">=</span> <span class="s">"/Users/matt/Desktop/schottstaedt.sco"</span> <span class="c1">; the name of the file to be generated</span>
<span class="vg">sr</span> <span class="o">=</span> <span class="mi">100</span> <span class="c1">; this defines our temporal resolution,</span>
<span class="c1">; an sr of 100 means we will generate p2 and p3 values</span>
<span class="c1">; to the nearest 1/100th of a second</span>
<span class="vg">ksmps</span> <span class="o">=</span> <span class="mi">1</span> <span class="c1">; set kr=sr so we can do everything at k-rate</span>
<span class="c1">; some print opcodes</span>
<span class="kd">opcode</span> <span class="nf">PrintInteger</span><span class="p">,</span> <span class="kt">0</span><span class="p">,</span> <span class="kt">k</span>
k<span class="n">val</span> <span class="nb">xin</span>
<span class="nb">fprintks</span> gS<span class="n">coName</span><span class="p">,</span> <span class="s">"</span><span class="si">%d</span><span class="s">"</span><span class="p">,</span> k<span class="n">val</span>
<span class="kd">endop</span>
<span class="kd">opcode</span> <span class="nf">PrintFloat</span><span class="p">,</span> <span class="kt">0</span><span class="p">,</span> <span class="kt">k</span>
k<span class="n">val</span> <span class="nb">xin</span>
<span class="nb">fprintks</span> gS<span class="n">coName</span><span class="p">,</span> <span class="s">"%f"</span><span class="p">,</span> k<span class="n">val</span>
<span class="kd">endop</span>
<span class="kd">opcode</span> <span class="nf">PrintTab</span><span class="p">,</span> <span class="kt">0</span><span class="p">,</span> <span class="kt">0</span>
<span class="nb">fprintks</span> gS<span class="n">coName</span><span class="p">,</span> <span class="s">"</span><span class="se">%n</span><span class="s">"</span>
<span class="kd">endop</span>
<span class="kd">opcode</span> <span class="nf">PrintReturn</span><span class="p">,</span> <span class="kt">0</span><span class="p">,</span> <span class="kt">0</span>
<span class="nb">fprintks</span> gS<span class="n">coName</span><span class="p">,</span> <span class="s">"</span><span class="se">%r</span><span class="s">"</span>
<span class="kd">endop</span>
<span class="c1">; recursively calling opcode to handle all the optional parameters</span>
<span class="kd">opcode</span> <span class="nf">ProcessAdditionalPfields</span><span class="p">,</span> <span class="kt">0</span><span class="p">,</span> <span class="kt">ikio</span>
i<span class="n">Ptable</span><span class="p">,</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">NumPfields</span><span class="p">,</span> i<span class="n">Pfield</span> <span class="nb">xin</span>
<span class="c1">; additional pfields start at 5, we use a default 0 to identify the first call</span>
i<span class="n">Pfield</span> <span class="o">=</span> <span class="p">(</span>i<span class="n">Pfield</span> <span class="o">==</span> <span class="mi">0</span> <span class="p">?</span> <span class="mi">5</span> <span class="p">:</span> i<span class="n">Pfield</span><span class="p">)</span>
<span class="k">if</span> <span class="p">(</span>i<span class="n">Pfield</span> <span class="o">></span> i<span class="n">NumPfields</span><span class="p">)</span> <span class="k">goto</span> <span class="nl">endloop</span>
<span class="c1">; find our tables</span>
i<span class="n">MinTable</span> <span class="nb">table</span> <span class="mi">2</span><span class="o">*</span>i<span class="n">Pfield</span><span class="o">-</span><span class="mi">1</span><span class="p">,</span> i<span class="n">Ptable</span>
i<span class="n">MaxTable</span> <span class="nb">table</span> <span class="mi">2</span><span class="o">*</span>i<span class="n">Pfield</span><span class="p">,</span> i<span class="n">Ptable</span>
<span class="c1">; get values from our tables</span>
k<span class="n">Min</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">MinTable</span>
k<span class="n">Max</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">MaxTable</span>
<span class="c1">; find a random value in the range and write it to the score</span>
<span class="nb">fprintks</span> gS<span class="n">coName</span><span class="p">,</span> <span class="s">"</span><span class="se">%t</span><span class="s">%f"</span><span class="p">,</span> k<span class="n">Min</span> <span class="o">+</span> <span class="nb">rnd</span><span class="p">(</span>k<span class="n">Max</span><span class="o">-</span>k<span class="n">Min</span><span class="p">)</span>
<span class="c1">; recursively call for any additional pfields.</span>
<span class="nf">ProcessAdditionalPfields</span> i<span class="n">Ptable</span><span class="p">,</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">NumPfields</span><span class="p">,</span> i<span class="n">Pfield</span> <span class="o">+</span> <span class="mi">1</span>
<span class="nl">endloop</span><span class="p">:</span>
<span class="kd">endop</span>
<span class="cm">/* ===========================================================
Generate a gesture of i-statements
p2 = start of the gesture
p3 = duration of the gesture
p4 = number of a function that contains a list of all
function table numbers used to define the
pfield random distribution
p5 = scale generated p4 values according to density (0=off, 1=on) [todo]
p6 = let durations overlap gesture duration (0=off, 1=on) [todo]
p7 = seed for random number generator seed [todo]
===========================================================
*/</span>
<span class="kd">instr</span> <span class="nf">Gesture</span>
<span class="c1">; initialize</span>
i<span class="n">Resolution</span> <span class="o">=</span> <span class="mi">1</span><span class="o">/</span><span class="vg">sr</span>
k<span class="n">NextStart</span> <span class="nb">init</span> <span class="nb">p2</span>
k<span class="n">CurrentTime</span> <span class="nb">init</span> <span class="nb">p2</span>
i<span class="n">NumPfields</span> <span class="nb">table</span> <span class="mi">0</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">InstrMinTable</span> <span class="nb">table</span> <span class="mi">1</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">InstrMaxTable</span> <span class="nb">table</span> <span class="mi">2</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">DensityMinTable</span> <span class="nb">table</span> <span class="mi">3</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">DensityMaxTable</span> <span class="nb">table</span> <span class="mi">4</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">DurMinTable</span> <span class="nb">table</span> <span class="mi">5</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">DurMaxTable</span> <span class="nb">table</span> <span class="mi">6</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">AmpMinTable</span> <span class="nb">table</span> <span class="mi">7</span><span class="p">,</span> <span class="nb">p4</span>
i<span class="n">AmpMaxTable</span> <span class="nb">table</span> <span class="mi">8</span><span class="p">,</span> <span class="nb">p4</span>
<span class="c1">; check to make sure there is enough data</span>
<span class="nb">print</span> i<span class="n">NumPfields</span>
<span class="k">if</span> i<span class="n">NumPfields</span> <span class="o"><</span> <span class="mi">4</span> <span class="k">then</span>
<span class="nb">prints</span> <span class="s">"</span><span class="si">%d</span><span class="s">Error: At least 4 p-fields (8 functions) need to be specified.</span><span class="se">%n</span><span class="s">"</span><span class="p">,</span> i<span class="n">NumPfields</span>
<span class="nb">turnoff</span>
<span class="k">endif</span>
<span class="c1">; initial comment</span>
<span class="nb">fprints</span> gS<span class="n">coName</span><span class="p">,</span> <span class="s">"</span><span class="se">%!</span><span class="s">Generated Gesture from %f to %f seconds</span><span class="se">%n</span><span class="s"> </span><span class="se">%!%t%t</span><span class="s">with a p-max of </span><span class="si">%d</span><span class="se">%n%n</span><span class="s">"</span><span class="p">,</span> <span class="nb">p2</span><span class="p">,</span> <span class="nb">p3</span><span class="p">,</span> i<span class="n">NumPfields</span>
<span class="c1">; k-rate stuff</span>
<span class="k">if</span> <span class="p">(</span>k<span class="n">CurrentTime</span> <span class="o">>=</span> k<span class="n">NextStart</span><span class="p">)</span> <span class="k">then</span> <span class="c1">; write a new note!</span>
k<span class="n">ndx</span> <span class="o">=</span> <span class="p">(</span>k<span class="n">CurrentTime</span><span class="o">-</span><span class="nb">p2</span><span class="p">)</span><span class="o">/</span><span class="nb">p3</span>
<span class="c1">; get the required pfield ranges</span>
k<span class="n">InstMin</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">InstrMinTable</span>
k<span class="n">InstMax</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">InstrMaxTable</span>
k<span class="n">DensMin</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">DensityMinTable</span>
k<span class="n">DensMax</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">DensityMaxTable</span>
k<span class="n">DurMin</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">DurMinTable</span>
k<span class="n">DurMax</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">DurMaxTable</span>
k<span class="n">AmpMin</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">AmpMinTable</span>
k<span class="n">AmpMax</span> <span class="nb">tablei</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">AmpMaxTable</span>
<span class="c1">; find random values for all our required parameters and print the i-statement</span>
<span class="nb">fprintks</span> gS<span class="n">coName</span><span class="p">,</span> <span class="s">"i</span><span class="si">%d</span><span class="se">%t</span><span class="s">%f</span><span class="se">%t</span><span class="s">%f</span><span class="se">%t</span><span class="s">%f"</span><span class="p">,</span> k<span class="n">InstMin</span> <span class="o">+</span> <span class="nb">rnd</span><span class="p">(</span>k<span class="n">InstMax</span><span class="o">-</span>k<span class="n">InstMin</span><span class="p">),</span> k<span class="n">NextStart</span><span class="p">,</span> k<span class="n">DurMin</span> <span class="o">+</span> <span class="nb">rnd</span><span class="p">(</span>k<span class="n">DurMax</span><span class="o">-</span>k<span class="n">DurMin</span><span class="p">),</span> k<span class="n">AmpMin</span> <span class="o">+</span> <span class="nb">rnd</span><span class="p">(</span>k<span class="n">AmpMax</span><span class="o">-</span>k<span class="n">AmpMin</span><span class="p">)</span>
<span class="c1">; now any additional pfields</span>
<span class="nf">ProcessAdditionalPfields</span> <span class="nb">p4</span><span class="p">,</span> k<span class="n">ndx</span><span class="p">,</span> i<span class="n">NumPfields</span>
<span class="nf">PrintReturn</span>
<span class="c1">; calculate next starttime</span>
k<span class="n">Density</span> <span class="o">=</span> k<span class="n">DensMin</span> <span class="o">+</span> <span class="nb">rnd</span><span class="p">(</span>k<span class="n">DensMax</span><span class="o">-</span>k<span class="n">DensMin</span><span class="p">)</span>
<span class="k">if</span> <span class="p">(</span>k<span class="n">Density</span> <span class="o"><</span> i<span class="n">Resolution</span><span class="p">)</span> <span class="k">then</span>
k<span class="n">Density</span> <span class="o">=</span> i<span class="n">Resolution</span>
<span class="k">endif</span>
k<span class="n">NextStart</span> <span class="o">=</span> k<span class="n">NextStart</span> <span class="o">+</span> k<span class="n">Density</span>
<span class="k">endif</span>
k<span class="n">CurrentTime</span> <span class="o">=</span> k<span class="n">CurrentTime</span> <span class="o">+</span> i<span class="n">Resolution</span>
<span class="kd">endin</span>
<span class="nt"></CsInstruments></span>
<span class="nt"><CsScore></span>
<span class="cm">/*
===========================================================
scogen.sco
this csound module generates a score file
you specify a gesture of notes by giving
the "gesture" instrument a number to a
(negative) gen2 table.
this table stores numbers to pairs of functions.
each function-pair represents a range (min-max)
of randomness for every pfield for the notes to
be generated.
===========================================================
*/</span>
<span class="c1">; common tables for pfield ranges</span>
<span class="nb">f</span><span class="mi">100</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mi">0</span> <span class="mi">2</span> <span class="mi">0</span> <span class="c1">; static 0</span>
<span class="nb">f</span><span class="mi">101</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mi">1</span> <span class="mi">2</span> <span class="mi">1</span> <span class="c1">; static 1</span>
<span class="nb">f</span><span class="mi">102</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mi">0</span> <span class="mi">2</span> <span class="mi">1</span> <span class="c1">; ramp 0->1</span>
<span class="nb">f</span><span class="mi">103</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mi">1</span> <span class="mi">2</span> <span class="mi">0</span> <span class="c1">; ramp 1->0</span>
<span class="nb">f</span><span class="mi">105</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mi">10</span> <span class="mi">2</span> <span class="mi">10</span> <span class="c1">; static 10</span>
<span class="nb">f</span><span class="mi">106</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mf">.1</span> <span class="mi">2</span> <span class="mf">.1</span> <span class="c1">; static .1</span>
<span class="c1">; specific pfield ranges</span>
<span class="nb">f</span><span class="mi">10</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mf">.8</span> <span class="mi">2</span> <span class="mf">.01</span> <span class="c1">; density</span>
<span class="nb">f</span><span class="mi">11</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mi">8</span> <span class="mi">2</span> <span class="mi">4</span> <span class="c1">; pitchmin</span>
<span class="nb">f</span><span class="mi">12</span> <span class="mi">0</span> <span class="mi">2</span> <span class="o">-</span><span class="mi">7</span> <span class="mi">8</span> <span class="mi">2</span> <span class="mi">12</span> <span class="c1">; pitchmax</span>
<span class="c1">;=== table containing the function numbers used for all the p-field distributions</span>
<span class="c1">;</span>
<span class="c1">; p1 - table number</span>
<span class="c1">; p2 - time table is instantiated</span>
<span class="c1">; p3 - size of table (must be >= p5!)</span>
<span class="c1">; p4 - gen# (should be = -2)</span>
<span class="c1">; p5 - number of pfields of each note to be generated</span>
<span class="c1">; p6 - table number of the function representing the minimum possible note number (p1) of a generated note</span>
<span class="c1">; p7 - table number of the function representing the maximum possible note number (p1) of a generated note</span>
<span class="c1">; p8 - table number of the function representing the minimum possible noteon-to-noteon time (p2 density) of a generated note</span>
<span class="c1">; p9 - table number of the function representing the maximum possible noteon-to-noteon time (p2 density) of a generated note</span>
<span class="c1">; p10 - table number of the function representing the minimum possible duration (p3) of a generated note</span>
<span class="c1">; p11 - table number of the function representing the maximum possible duration (p3) of a generated note</span>
<span class="c1">; p12 - table number of the function representing the maximum possible amplitude (p4) of a generated note</span>
<span class="c1">; p13 - table number of the function representing the maximum possible amplitude (p5) of a generated note</span>
<span class="c1">; p14,p16.. - table number of the function representing the minimum possible value for additional pfields (p5,p6..) of a generated note</span>
<span class="c1">; p15,p17.. - table number of the function representing the maximum possible value for additional pfields (p5,p6..) of a generated note</span>
<span class="c1">; siz 2 #pds p1min p1max p2min p2max p3min p3max p4min p4max p5min p5max p6min p6max</span>
<span class="nb">f</span><span class="mi">1</span> <span class="mi">0</span> <span class="mi">32</span> <span class="o">-</span><span class="mi">2</span> <span class="mi">6</span> <span class="mi">101</span> <span class="mi">101</span> <span class="mi">10</span> <span class="mi">10</span> <span class="mi">101</span> <span class="mi">105</span> <span class="mi">100</span> <span class="mi">106</span> <span class="mi">11</span> <span class="mi">12</span> <span class="mi">100</span> <span class="mi">101</span>
<span class="c1">;gesture definitions</span>
<span class="c1">; start dur pTble scale overlap seed</span>
<span class="nb">i</span><span class="s">"Gesture"</span> <span class="mi">0</span> <span class="mi">60</span> <span class="mi">1</span> <span class="c1">;todo-->0 0 123</span>
<span class="nt"></CsScore></span>
<span class="nt"></CsoundSynthesizer></span>
</pre>
</div>
</div>
</div>
<p><br class="example-break" />
This example will generate a file called <span class="quote">“<span class="quote">schottstaedt.sco</span>”</span> which can be used as a score together with <a class="ulink" href="examples/schottstaedt.orc" target="_top"><em class="citetitle">schottstaedt.orc</em></a>
</p>
</div>
<div class="refsect1">
<a id="idm281472929203448"></a>
<h2>See Also</h2>
<p>
<a class="link" href="printks.html" title="printks"><em class="citetitle">printks</em></a>
</p>
</div>
<div class="refsect1">
<a id="idm281472929201304"></a>
<h2>Credits</h2>
<p>
</p>
<table border="0" summary="Simple list" class="simplelist">
<tr>
<td>Author: Matt Ingalls</td>
</tr>
<tr>
<td>January 2003</td>
</tr>
</table>
<p>
</p>
</div>
</div>
<div class="navfooter">
<hr />
<table width="100%" summary="Navigation footer">
<tr>
<td width="40%" align="left"><a accesskey="p" href="foutk.html">Prev</a> </td>
<td width="20%" align="center">
<a accesskey="u" href="OpcodesTop.html">Up</a>
</td>
<td width="40%" align="right"> <a accesskey="n" href="fprints.html">Next</a></td>
</tr>
<tr>
<td width="40%" align="left" valign="top">foutk </td>
<td width="20%" align="center">
<a accesskey="h" href="index.html">Home</a>
</td>
<td width="40%" align="right" valign="top"> fprints</td>
</tr>
</table>
</div>
</body>
</html>
distrib
>
Mageia
>
7
>
armv7hl
>
media
>
core-release
>
by-pkgid
>
5fcfcb7517038d1f44ab4e478e6e61fa
>
files
>
1940
