SF.net SVN: supercollider: [7661] trunk/build

View: New views

1 Messages — Rating Filter: Alert me

SF.net SVN: supercollider: [7661] trunk/build

by cruxxial :: Rate this Message:

Reply (Restricted by the Administrator) | Reply to Author | View Threaded | Show Only this Message

Revision: 7661
http://svn.sourceforge.net/supercollider/?rev=7661&view=rev
Author: cruxxial
Date: 2008-07-08 15:31:39 -0700 (Tue, 08 Jul 2008)

Log Message:
-----------
CCResponder, NoteOnResponder, NoteOffResponder, BendResponder and TouchResponder can be set to learn mode and will wait for the next event.

Modified Paths:
--------------
trunk/build/Help/Control/CCResponder.html
trunk/build/Help/Control/MIDIResponder.html
trunk/build/Help/Control/NoteOnResponder.html
trunk/build/SCClassLibrary/Common/Control/MIDIResponder.sc

Modified: trunk/build/Help/Control/CCResponder.html
===================================================================
--- trunk/build/Help/Control/CCResponder.html 2008-07-08 10:27:16 UTC (rev 7660)
+++ trunk/build/Help/Control/CCResponder.html 2008-07-08 22:31:39 UTC (rev 7661)
@@ -5,7 +5,7 @@
<meta http-equiv="Content-Style-Type" content="text/css">
<title></title>
<meta name="Generator" content="Cocoa HTML Writer">
-<meta name="CocoaVersion" content="824.47">
+<meta name="CocoaVersion" content="824.48">
<style type="text/css">
p.p1 {margin: 0.0px 0.0px 0.0px 0.0px; font: 18.0px Helvetica}
p.p2 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; min-height: 12.0px}
@@ -14,11 +14,16 @@
p.p5 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; min-height: 14.0px}
p.p6 {margin: 0.0px 0.0px 0.0px 29.0px; text-indent: -29.0px; font: 12.0px Helvetica}
p.p7 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco}
-p.p8 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #1530a3}
+p.p8 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0000bf}
+p.p9 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #000000}
+p.p10 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #bf0000}
+p.p11 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #000000; min-height: 14.0px}
+p.p12 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #000000}
+p.p13 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #000000; min-height: 12.0px}
+p.p14 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #1a32a0}
span.s1 {color: #000000}
span.s2 {text-decoration: underline}
-span.s3 {color: #0013bb}
-span.s4 {color: #0021b3}
+span.s3 {color: #0000bf}
span.Apple-tab-span {white-space:pre}
</style>
</head>
@@ -47,34 +52,44 @@
 eg: { |val| val < 50 }
 
(
- c = CCResponder({ |src,chan,num,value|
- [src,chan,num,value].postln;
- },
- nil, // any source
- nil, // any channel
- nil, // any CC number
- nil // any value
- )
+ c = CCResponder({ |src,chan,num,value|
+ [src,chan,num,value].postln;
+ },
+ nil, // any source
+ nil, // any channel
+ nil, // any CC number
+ nil // any value
+ )
)
 
c.remove
 
 
(
- c = CCResponder({ |src,chan,num,value|
- [src,chan,num,value].postln;
- },
- nil, // any source
- nil, // any channel
- 80, // CC number 80
- { |val| val < 50 } // any value less than 50
- )
+ c = CCResponder({ |src,chan,num,value|
+ [src,chan,num,value].postln;
+ },
+ nil, // any source
+ nil, // any channel
+ 80, // CC number 80
+ { |val| val < 50 } // any value less than 50
+ )
)
 
c.remove
 
+ 
+learn
 
-CCResponder.removeAll
+wait for the next CC message, reset to match src,chan, cc num
+(
+ 
+ c = CCResponder({ |src,chan,num,value|
+ [src,chan,num,value].postln;
+ });
+ c.learn; // wait for the first controller
+)
+CCResponder.removeAll
 
 
</body>

Modified: trunk/build/Help/Control/MIDIResponder.html
===================================================================
--- trunk/build/Help/Control/MIDIResponder.html 2008-07-08 10:27:16 UTC (rev 7660)
+++ trunk/build/Help/Control/MIDIResponder.html 2008-07-08 22:31:39 UTC (rev 7661)
@@ -5,7 +5,7 @@
<meta http-equiv="Content-Style-Type" content="text/css">
<title></title>
<meta name="Generator" content="Cocoa HTML Writer">
-<meta name="CocoaVersion" content="824.44">
+<meta name="CocoaVersion" content="824.48">
<style type="text/css">
p.p1 {margin: 0.0px 0.0px 0.0px 0.0px; font: 18.0px Helvetica}
p.p2 {margin: 0.0px 0.0px 0.0px 0.0px; font: 18.0px Helvetica; min-height: 22.0px}
@@ -14,13 +14,13 @@
p.p5 {margin: 0.0px 0.0px 0.0px 0.0px; font: 14.0px Helvetica}
p.p6 {margin: 0.0px 0.0px 0.0px 29.0px; text-indent: -29.0px; font: 12.0px Helvetica}
p.p7 {margin: 0.0px 0.0px 0.0px 29.0px; text-indent: -29.0px; font: 12.0px Helvetica; min-height: 14.0px}
-p.p8 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #000000}
-p.p9 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #bf0000}
-p.p10 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #000000; min-height: 12.0px}
-p.p11 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #000000}
-p.p12 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0000bf}
-p.p13 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #942b17; min-height: 12.0px}
-span.s1 {color: #0000bf}
+p.p8 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco}
+p.p9 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #a8220e}
+p.p10 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #000000}
+p.p11 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; min-height: 12.0px}
+p.p12 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0013bb}
+p.p13 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #84331b; min-height: 12.0px}
+span.s1 {color: #0013bb}
span.s2 {color: #000000}
span.Apple-tab-span {white-space:pre}
</style>
@@ -33,7 +33,7 @@
MIDIResponder is an abstract class. Its subclasses allow functions to be registered to respond to midi events.
 
Read the general help file here and then see the individual help files.
- 
+ 
CCResponder Respond to control messages
NoteOnResponder Respond to note-on messages
NoteOffResponder Respond to note-off messages
@@ -80,26 +80,32 @@
 
MIDIResponders automatically initialize the MIDIClient with 1 standard device. This means the first time you install any MIDIResponder, it will make sure that MIDI has been initialized. If you have more devices or a specific setup, simply initialize the MIDIClient yourself before using any MIDIResponders.
 
+learn
+ 
+CCResponder, NoteOnResponder, NoteOffResponder, BendResponder and TouchResponder can be set to learn mode and will wait for the next event.
+ 
+ 
+ 
Removal:
 
Just call .remove on the responder.
 
c = CCResponder({ ... }, num: 1); // respond to any modwheel
- 
+ 
c.remove; // stop this responder
- 
-Or remove all of a specific class:
- 
+ 
+Or remove all of a specific class:
+ 
CCResponder.removeAll
NoteOnResponder.removeAll
NoteOffResponder.removeAll
BendResponder.removeAll
TouchResponder.removeAll
- 
-or remove all midi responders in all classes:
- 
+ 
+or remove all midi responders in all classes:
+ 
MIDIResponder.removeAll
- 
+ 
 
 
 

Modified: trunk/build/Help/Control/NoteOnResponder.html
===================================================================
--- trunk/build/Help/Control/NoteOnResponder.html 2008-07-08 10:27:16 UTC (rev 7660)
+++ trunk/build/Help/Control/NoteOnResponder.html 2008-07-08 22:31:39 UTC (rev 7661)
@@ -5,26 +5,32 @@
<meta http-equiv="Content-Style-Type" content="text/css">
<title></title>
<meta name="Generator" content="Cocoa HTML Writer">
-<meta name="CocoaVersion" content="824.44">
+<meta name="CocoaVersion" content="824.48">
<style type="text/css">
p.p1 {margin: 0.0px 0.0px 0.0px 0.0px; font: 18.0px Helvetica}
p.p2 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; min-height: 12.0px}
-p.p3 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #0000ff}
+p.p3 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #0018e8}
p.p4 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica}
-p.p5 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; min-height: 14.0px}
-p.p6 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco}
-p.p7 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0424af}
-p.p8 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #84331b}
+p.p5 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #000000; min-height: 14.0px}
+p.p6 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #000000}
+p.p7 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0000bf}
+p.p8 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #bf0000}
+p.p9 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #000000; min-height: 12.0px}
+p.p10 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #000000}
+p.p11 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco}
+p.p12 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0928ab}
+p.p13 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0928ab; min-height: 12.0px}
span.s1 {color: #000000}
-span.s2 {color: #0424af}
-span.s3 {color: #84331b}
+span.s2 {text-decoration: underline}
+span.s3 {color: #0000bf}
+span.s4 {color: #bf0000}
span.Apple-tab-span {white-space:pre}
</style>
</head>
<body>
NoteOnResponder
 
-see also <a href="SC://MIDIResponder">MIDIResponder</a>
+see also <a href="SC://MIDIResponder">MIDIResponder</a>
 
NoteOnResponder(function, src, chan, num, value, install = true,swallowEvent = false)
 
@@ -32,30 +38,40 @@
 c = NoteOnResponder({ |src,chan,note,vel|
 [src,chan,note,vel].postln;
 },
- nil, // any source
- nil, // any channel
- nil, // any note
- nil // any vel
+ nil, // any source
+ nil, // any channel
+ nil, // any note
+ nil // any vel
 )
)
- 
+ 
c.remove
- 
- 
+ 
+ 
(
 c = NoteOnResponder({ |src,chan,num,value|
 [src,chan,num,value].postln;
 },
- nil, // any source
- nil, // any channel
- { |val| val.exclusiveBetween(50,60) }, // within this note range
- nil // any vel
+ nil, // any source
+ nil, // any channel
+ { |val| val.exclusiveBetween(50,60) }, // within this note range
+ nil // any vel
 )
)
- 
+ 
c.remove
 
+learn
 
-CCResponder.removeAll
+wait for the next midi note. reset self to match to that src and chan
+(
+ c = NoteOnResponder({ |src,chan,num,value|
+ [src,chan,num,value].postln;
+ });
+ c.learn; // wait for the first note
+)
+ 
+NoteOnResponder.removeAll
+ 
</body>
</html>

Modified: trunk/build/SCClassLibrary/Common/Control/MIDIResponder.sc
===================================================================
--- trunk/build/SCClassLibrary/Common/Control/MIDIResponder.sc 2008-07-08 10:27:16 UTC (rev 7660)
+++ trunk/build/SCClassLibrary/Common/Control/MIDIResponder.sc 2008-07-08 22:31:39 UTC (rev 7661)
@@ -65,6 +65,13 @@
*remove { arg resp;
nonr.remove(resp);
}
+ learn {
+ var oneShot;
+ oneShot = this.class.new({ |src,chan,num,value|
+ this.matchEvent_(MIDIEvent(nil,src,chan,nil,nil));
+ oneShot.remove;
+ },nil,nil,nil,nil,true,true)
+ }
}

NoteOffResponder : NoteOnResponder {
@@ -131,6 +138,13 @@
})
};
}
+ learn {
+ var oneShot;
+ oneShot = CCResponder({ |src,chan,num,value|
+ this.matchEvent_(MIDIEvent(nil,src,chan,num,nil));
+ oneShot.remove;
+ },nil,nil,nil,nil,true,true)
+ }
}

TouchResponder : MIDIResponder {
@@ -164,6 +178,13 @@
*remove { arg resp;
touchr.remove(resp);
}
+ learn {
+ var oneShot;
+ oneShot = this.class.new({ |src,chan,num,value|
+ this.matchEvent_(MIDIEvent(nil,src,chan,nil,nil));
+ oneShot.remove;
+ },nil,nil,nil,nil,true,true)
+ }
}

BendResponder : TouchResponder {
@@ -197,12 +218,15 @@
PolyTouchResponder
*/

+/*
+good to go but waiting for wouter's permission and so that he can comment it out in his lib.
+
ProgramChangeResponder : MIDIResponder {
classvar <pcinit = false,<pcr;

*new { arg function, src, chan, value, install=true;
^super.new.function_(function)
- .matchEvent_(MIDIEvent(nil, this.fixSrc(src), chan, nil, value))
+ .matchEvent_(MIDIEvent(nil, src.asMIDIInPortUID, chan, nil, value))
.init(install)
}
*init {
@@ -230,4 +254,5 @@
}
}

+*/

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
_______________________________________________
sc-dev mailing list
sc-dev@...
http://lists.create.ucsb.edu/mailman/listinfo/sc-dev