Csound Csound-dev Csound-tekno Search About

[Csnd] r statement not work on RPI?

Date2018-10-12 13:06
Fromfauveboy
Subject[Csnd] r statement not work on RPI?
I'm running this very same code on the RPI3 which works on OSX. But the score
doesn't repeat like it should?

the compiler says 

Repeats=2
Repeat section 
Loop terminated
       ...done

why is that?




; ==============================================


sr	=	44100
ksmps	=	10
nchnls	=	2
0dbfs	=	1

giSine ftgen 0, 0, 16384, 10, 1

	instr	1 

iseed	=	0.8		; Random generator seed

apink	pinkish 2, 0, 20, iseed ; Use multi-rate pink noise

idur	=	p3		; Duration
iamp	=	p4		; Amplitude
ifqc	=	cpspch(p5)	; Pitch to frequency
irez	=	p6		; Tone
ispdec	=	p7		; Spring decay
ispton	=	p8		; Spring tone
ispmix	=	p9		; Spring mix
ispq	=	p10		; Spring Q
ipbnd	=	p11		; Pitch bend
ipbtm	=	p12		; Pitch bend time

arndr1 init      0
arndr2 init      0

kdclk  linseg    1, idur-.002, 1, .002, 0                ; Declick envelope
aamp   linseg    1, .2/ifqc, 1, .2/ifqc, 0, idur-.002, 0 ; An amplitude
pulse
kptch  linseg    1, ipbtm, ipbnd, ipbtm, 1, .1, 1

aosc1   vco      1, ifqc, 2, 1, giSine, 1 ; Use a pulse of the vco to
stimulate the filters
aosc    =        -aosc1*aamp        ; Multiply by the envelope pulse
aosc2   butterlp aosc, 12000        ; Lowpass at 12K to take the edge off

asig1   moogvcf  aosc,    ifqc*kptch, .9*irez      ; Moof filter with high
resonance for basic drum tone
asig2   moogvcf  aosc*.5, ifqc*2.1*kptch, .75*irez ; Sweeten with an
overtone

aampr  expseg    .1, .002, 1, .2, .005


arnd1	= 		apink      
arnd2	=    	apink 

arnd1   =        arnd1*2*asig1
arndr1 delay     arnd1-arndr2*.6, .01

arnd2   =        arnd2*2*asig1
arndr2 delay     arnd2-arndr1*.6, .01

ahp1l   rezzy    arnd1+arndr1, 2700*ispton*kptch, 5*ispq, 1 ; High pass
rezzy based at 2700
ahp2l   butterbp arnd1, 2000*ispton*kptch, 500/ispq  ; Generate an undertone
ahp3l   butterbp arnd1, 5400*ispton*kptch, 500/ispq  ; Generate an overtone
ahpl    pareq    ahp1l+ahp2l*.7+ahp3l*.3, 15000, .1, .707, 2 ; Attenuate the
highs a bit

ahp1r   rezzy    arnd2+arndr2, 2700*ispton*kptch, 5*ispq, 1 ; High pass
rezzy based at 2700
ahp2r   butterbp arnd2, 2000*ispton*kptch, 500/ispq  ; Generate an undertone
ahp3r   butterbp arnd2, 5400*ispton*kptch, 500/ispq  ; Generate an overtone
ahpr    pareq    ahp1r+ahp2r*.7+ahp3r*.3, 15000, .1, .707, 2 ; Attenuate the
highs a bit


; Mix drum tones, pulse and noise signal & declick
aoutl  =         (asig1+asig2+aosc2*.1+ahpl*ispmix*4)*iamp*kdclk 
aoutr  =         (asig1+asig2+aosc2*.1+ahpr*ispmix*4)*iamp*kdclk 
     outs      aoutl, aoutr            ; Output the sound

       endin




; ==============================================




r 4 
t 0 145.70

;		Sta		Dur		Amp		Fqc		
i1		0		2		0.1		7.00	

		;Tone   SprDec	SprTone SprMix	
		.5		0.9		2		7.5		

		;SprQ	PBend	PBTime
		1		1.9		2.0		 
s











--
Sent from: http://csound.1045644.n5.nabble.com/Csound-General-f1093014.html

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here
Date2018-10-12 13:14
FromVictor Lazzarini
SubjectRe: [Csnd] r statement not work on RPI?
Version?
========================
Prof. Victor Lazzarini
Dean of Arts, Celtic Studies, and Philosophy,
Maynooth University,
Maynooth, Co Kildare, Ireland
Tel: 00 353 7086936
Fax: 00 353 1 7086952 

> On 12 Oct 2018, at 13:06, fauveboy  wrote:
> 
> I'm running this very same code on the RPI3 which works on OSX. But the score
> doesn't repeat like it should?
> 
> the compiler says 
> 
> Repeats=2
> Repeat section 
> Loop terminated
>       ...done
> 
> why is that?
> 
> 
> 
> 
> ; ==============================================
> 
> 
> sr	=	44100
> ksmps	=	10
> nchnls	=	2
> 0dbfs	=	1
> 
> giSine ftgen 0, 0, 16384, 10, 1
> 
> 	instr	1 
> 
> iseed	=	0.8		; Random generator seed
> 
> apink	pinkish 2, 0, 20, iseed ; Use multi-rate pink noise
> 
> idur	=	p3		; Duration
> iamp	=	p4		; Amplitude
> ifqc	=	cpspch(p5)	; Pitch to frequency
> irez	=	p6		; Tone
> ispdec	=	p7		; Spring decay
> ispton	=	p8		; Spring tone
> ispmix	=	p9		; Spring mix
> ispq	=	p10		; Spring Q
> ipbnd	=	p11		; Pitch bend
> ipbtm	=	p12		; Pitch bend time
> 
> arndr1 init      0
> arndr2 init      0
> 
> kdclk  linseg    1, idur-.002, 1, .002, 0                ; Declick envelope
> aamp   linseg    1, .2/ifqc, 1, .2/ifqc, 0, idur-.002, 0 ; An amplitude
> pulse
> kptch  linseg    1, ipbtm, ipbnd, ipbtm, 1, .1, 1
> 
> aosc1   vco      1, ifqc, 2, 1, giSine, 1 ; Use a pulse of the vco to
> stimulate the filters
> aosc    =        -aosc1*aamp        ; Multiply by the envelope pulse
> aosc2   butterlp aosc, 12000        ; Lowpass at 12K to take the edge off
> 
> asig1   moogvcf  aosc,    ifqc*kptch, .9*irez      ; Moof filter with high
> resonance for basic drum tone
> asig2   moogvcf  aosc*.5, ifqc*2.1*kptch, .75*irez ; Sweeten with an
> overtone
> 
> aampr  expseg    .1, .002, 1, .2, .005
> 
> 
> arnd1	= 		apink      
> arnd2	=    	apink 
> 
> arnd1   =        arnd1*2*asig1
> arndr1 delay     arnd1-arndr2*.6, .01
> 
> arnd2   =        arnd2*2*asig1
> arndr2 delay     arnd2-arndr1*.6, .01
> 
> ahp1l   rezzy    arnd1+arndr1, 2700*ispton*kptch, 5*ispq, 1 ; High pass
> rezzy based at 2700
> ahp2l   butterbp arnd1, 2000*ispton*kptch, 500/ispq  ; Generate an undertone
> ahp3l   butterbp arnd1, 5400*ispton*kptch, 500/ispq  ; Generate an overtone
> ahpl    pareq    ahp1l+ahp2l*.7+ahp3l*.3, 15000, .1, .707, 2 ; Attenuate the
> highs a bit
> 
> ahp1r   rezzy    arnd2+arndr2, 2700*ispton*kptch, 5*ispq, 1 ; High pass
> rezzy based at 2700
> ahp2r   butterbp arnd2, 2000*ispton*kptch, 500/ispq  ; Generate an undertone
> ahp3r   butterbp arnd2, 5400*ispton*kptch, 500/ispq  ; Generate an overtone
> ahpr    pareq    ahp1r+ahp2r*.7+ahp3r*.3, 15000, .1, .707, 2 ; Attenuate the
> highs a bit
> 
> 
> ; Mix drum tones, pulse and noise signal & declick
> aoutl  =         (asig1+asig2+aosc2*.1+ahpl*ispmix*4)*iamp*kdclk 
> aoutr  =         (asig1+asig2+aosc2*.1+ahpr*ispmix*4)*iamp*kdclk 
>     outs      aoutl, aoutr            ; Output the sound
> 
>       endin
> 
> 
> 
> 
> ; ==============================================
> 
> 
> 
> 
> r 4 
> t 0 145.70
> 
> ;		Sta		Dur		Amp		Fqc		
> i1		0		2		0.1		7.00	
> 
> 		;Tone   SprDec	SprTone SprMix	
> 		.5		0.9		2		7.5		
> 
> 		;SprQ	PBend	PBTime
> 		1		1.9		2.0		 
> s
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> --
> Sent from: http://csound.1045644.n5.nabble.com/Csound-General-f1093014.html
> 
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>        https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here
Date2018-10-12 13:21
Fromfauveboy
SubjectRe: [Csnd] r statement not work on RPI?
The Pi is running the PiTOP OS
and the version I have of csound is version 6.08



--
Sent from: http://csound.1045644.n5.nabble.com/Csound-General-f1093014.html

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here
Date2018-10-12 13:53
FromJohn ff
SubjectRe: [Csnd] r statement not work on RPI?
That is an old version.  Certainly before the rewrite

Sent from TypeApp
On 12 Oct 2018, at 13:21, fauveboy <joel.ramsbottom@hotmail.co.uk> wrote:
The Pi is running the PiTOP OS
and the version I have of csound is version 6.08



--
Sent from: http://csound.1045644.n5.nabble.com/Csound-General-f1093014.html

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here