SF.net SVN: supercollider:[9107] trunk/build/SCClassLibrary/Common/GUI/osx/ Base/SCView.sc

[ctrl-t]

Revision: 9107
          http://supercollider.svn.sourceforge.net/supercollider/?rev=9107&view=rev
Author:   ctrl-t
Date:     2009-04-23 09:50:31 +0000 (Thu, 23 Apr 2009)

Log Message:
-----------
fixed addValue

Modified Paths:
--------------
    trunk/build/SCClassLibrary/Common/GUI/osx/Base/SCView.sc

Modified: trunk/build/SCClassLibrary/Common/GUI/osx/Base/SCView.sc
===================================================================
--- trunk/build/SCClassLibrary/Common/GUI/osx/Base/SCView.sc 2009-04-23 07:00:55 UTC (rev 9106)
+++ trunk/build/SCClassLibrary/Common/GUI/osx/Base/SCView.sc 2009-04-23 09:50:31 UTC (rev 9107)
@@ -1903,22 +1903,17 @@
 
  addValue { arg xval, yval;
  var arr, arrx, arry, aindx;
- aindx = this.lastIndex;
- aindx.postln;
- if(xval.isNil && yval.isNil, {
- arr = this.value;
- arrx = arr@0;
- arry = arr@1;
- xval = arrx.at(aindx) + 0.05;
- yval = arry.at(aindx);
- });
- if(aindx < (arrx.size - 1), {
- arrx = arrx.insert(aindx + 1 , xval);
- arry = arry.insert(aindx + 1, yval);
- },{
- arrx = arrx.add( xval );
- arry = arry.add( yval);
- });
+ arr = this.value;
+ arrx = arr@0;
+ arry = arr@1;
+ arrx.do{|val, i|
+ if(val>xval and: aindx.isNil){
+ aindx = i;
+ }
+ };
+// this.debug(aindx);
+ arrx = arrx.insert(aindx , xval);
+ arry = arry.insert(aindx , yval);
  this.value_([arrx,arry]);
  }
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

_______________________________________________
sc-dev mailing list

info (subscription, etc.): http://www.beast.bham.ac.uk/research/sc_mailing_lists.shtml
archive: http://www.listarc.bham.ac.uk/marchives/sc-dev/
search: http://www.listarc.bham.ac.uk/lists/sc-dev/search/