bformenc1 — Encode un signal dans le format ambisonic B.
aw, ax, ay, az bformenc1 asig, kalpha, kbeta
aw, ax, ay, az, ar, as, at, au, av bformenc1 asig, kalpha, kbeta
aw, ax, ay, az, ar, as, at, au, av, ak, al, am, an, ao, ap, aq bformenc1 \
asig, kalpha, kbeta
aarray[] bformenc1 asig, kalpha, kbeta
aw, ax, ay, ... -- cellules de sortie au format B.
aarray -- tableau de sortie pour recevoir les cellules au format B.
asig -- signal d'entrée.
kalpha –- angle d'azimut en degrés (dans le sens contraire des aiguilles d'une montre).
kbeta -- angle d'altitude en degrés.
Voici un exemple de l'opcode bformenc1. Il utilise le fichier bformenc1.csd.
Exemple 99. Exemple de l'opcode bformenc1.
Voir les sections Audio en Temps Réel et Options de la Ligne de Commande pour plus d'information sur l'utilisation des options de la ligne de commande.
<CsoundSynthesizer> <CsOptions> ; Select audio/midi flags here according to platform ; Audio out Audio in No messages ;-odac -iadc -d ;;;RT audio I/O ; For Non-realtime ouput leave only the line below: -o bformenc.wav -W ;;; for file output any platform </CsOptions> <CsInstruments> sr = 44100 ksmps = 32 nchnls = 8 0dbfs = 1 instr 1 ;without arrays ; generate pink noise anoise pinkish 1 ; two full turns kalpha line 0, p3, 720 kbeta = 0 ; generate B format aw, ax, ay, az, ar, as, at, au, av bformenc1 anoise, kalpha, kbeta ; decode B format for 8 channel circle loudspeaker setup a1, a2, a3, a4, a5, a6, a7, a8 bformdec1 4, aw, ax, ay, az, ar, as, at, au, av ; write audio out outo a1, a2, a3, a4, a5, a6, a7, a8 endin instr 2 ;with arrays (csound6) ;set file names for: S_bform = "bform_out.wav" ;b-format (2nd order) output S_sound = "sound_out.wav" ;sound output ; generate pink noise anoise pinkish 1 ; two full turns kalpha line 0, p3, 720 kbeta = 0 ;create array for B-format 2nd order (9 chnls) aBform[] init 9 ; generate B-format aBform bformenc1 anoise, kalpha, kbeta ;write out b-format fout "fout.wav", 18, aBform ;create array for audio output (8 channels) aAudio[] init 8 ;decode B format for 8 channel circle loudspeaker setup aAudio bformdec1 4, aBform ; write audio out fout S_sound, 18, aAudio endin </CsInstruments> <CsScore> i 1 0 8 i 2 8 8 e </CsScore> </CsoundSynthesizer>