[PD-cvs] externals/miXed/cyclone/sickle capture.c,1.1.1.1,1.2 matrix.c,1.1,1.2

Krzysztof Czaja krzyszcz at users.sourceforge.net
Mon Feb 28 14:10:42 CET 2005


Update of /cvsroot/pure-data/externals/miXed/cyclone/sickle
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1442/cyclone/sickle

Modified Files:
	capture.c matrix.c 
Log Message:
cyclone alpha53 (see notes.txt for cyclone, bin and shared)

Index: capture.c
===================================================================
RCS file: /cvsroot/pure-data/externals/miXed/cyclone/sickle/capture.c,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** capture.c	23 May 2003 12:29:50 -0000	1.1.1.1
--- capture.c	28 Feb 2005 13:10:40 -0000	1.2
***************
*** 1,3 ****
! /* Copyright (c) 2002-2003 krzYszcz and others.
   * For information on usage and redistribution, and for a DISCLAIMER OF ALL
   * WARRANTIES, see the file, "LICENSE.txt," in this distribution.  */
--- 1,3 ----
! /* Copyright (c) 2002-2005 krzYszcz and others.
   * For information on usage and redistribution, and for a DISCLAIMER OF ALL
   * WARRANTIES, see the file, "LICENSE.txt," in this distribution.  */
***************
*** 55,59 ****
  	cnt += sprintf(bp, "%d", (int)f);
      if (col + cnt > maxcol)
! 	buf[0] = '\n', col = cnt;
      else
  	col += cnt;
--- 55,59 ----
  	cnt += sprintf(bp, "%d", (int)f);
      if (col + cnt > maxcol)
! 	buf[0] = '\n', col = cnt - 1;  /* assuming col > 0 */
      else
  	col += cnt;
***************
*** 145,149 ****
      char buf[MAXPDSTRING];
      int nindices = (x->x_nindices > 0 ? x->x_nindices : x->x_nblock);
!     hammereditor_open(x->x_filehandle, "Signal Capture");  /* CHECKED */
      if (x->x_mode == 'f' || count < x->x_bufsize)
      {
--- 145,149 ----
      char buf[MAXPDSTRING];
      int nindices = (x->x_nindices > 0 ? x->x_nindices : x->x_nblock);
!     hammereditor_open(x->x_filehandle, "Signal Capture", "");  /* CHECKED */
      if (x->x_mode == 'f' || count < x->x_bufsize)
      {
***************
*** 170,173 ****
--- 170,174 ----
  }
  
+ /* CHECKED without asking and storing the changes */
  static void capture_wclose(t_capture *x)
  {

Index: matrix.c
===================================================================
RCS file: /cvsroot/pure-data/externals/miXed/cyclone/sickle/matrix.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** matrix.c	27 Jan 2005 14:42:48 -0000	1.1
--- matrix.c	28 Feb 2005 13:10:40 -0000	1.2
***************
*** 10,14 ****
  
  #ifdef KRZYSZCZ
! #define MATRIX_DEBUG
  #endif
  
--- 10,14 ----
  
  #ifdef KRZYSZCZ
! //#define MATRIX_DEBUG
  #endif
  
***************
*** 125,128 ****
--- 125,154 ----
  }
  
+ static void matrix_set(t_matrix *x, t_floatarg f1, t_floatarg f2)
+ {
+     int i, onoff;
+     float gain = f1;
+     static int warned = 0;
+     if (fittermax_get() && !warned)
+     {
+ 	fittermax_warning(*(t_pd *)x, "'set' not supported in Max");
+ 	warned = 1;
+     }
+     onoff = (gain < -MATRIX_GAINEPSILON || gain > MATRIX_GAINEPSILON);
+     for (i = 0; i < x->x_ncells; i++)
+ 	x->x_cells[i] = onoff;
+     if (x->x_gains)
+     {
+ 	float ramp = (f2 < MATRIX_MINRAMP ? 0. : f2);
+ 	for (i = 0; i < x->x_ncells; i++)
+ 	{
+ 	    if (onoff)  /* LATER rethink */
+ 		x->x_gains[i] = gain;
+ 	    x->x_ramps[i] = ramp;
+ 	    matrix_retarget(x, i);
+ 	}
+     }
+ }
+ 
  /* CHECKED c74's refman and help patch are wrong about int pairs --
     the actual syntax is "[dis]connect indx ondx1 [ondx2 [ondx3..." */
***************
*** 544,547 ****
--- 570,575 ----
      class_addmethod(matrix_class, (t_method)matrix_clear,
  		    gensym("clear"), 0);
+     class_addmethod(matrix_class, (t_method)matrix_set,
+ 		    gensym("set"), A_FLOAT, A_DEFFLOAT, 0);
      class_addmethod(matrix_class, (t_method)matrix_connect,
  		    gensym("connect"), A_GIMME, 0);





More information about the Pd-cvs mailing list