[PD-cvs] externals/frankenstein GArhythm.vcproj, NONE, 1.1 chords_memory.vcproj, NONE, 1.1 frankenstein.sln, NONE, 1.1 harmonizer.vcproj, NONE, 1.1 chords_memory.c, 1.6, 1.7 harmonizer.c, 1.3, 1.4
dmorelli
morellid at users.sourceforge.net
Sun Jan 15 02:38:35 CET 2006
- Previous message: [PD-cvs] externals/tb/chaos SConstruct, 1.3, 1.4 AUTHORS, 1.1.1.1, NONE ChangeLog, 1.1.1.1, NONE Makefile.am, 1.1.1.1, NONE NEWS, 1.1.1.1, NONE README, 1.1.1.1, NONE bootstrap.sh, 1.1.1.1, NONE configure.ac, 1.2, NONE
- Next message: [PD-cvs] externals/frankenstein rhythms_memory.c,1.11,1.12
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
Update of /cvsroot/pure-data/externals/frankenstein
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24611
Modified Files:
chords_memory.c harmonizer.c
Added Files:
GArhythm.vcproj chords_memory.vcproj frankenstein.sln
harmonizer.vcproj
Log Message:
improving harmonizer, adding MSVC project files
--- NEW FILE: GArhythm.vcproj ---
<?xml version="1.0" encoding = "Windows-1252"?>
<VisualStudioProject
ProjectType="Visual C++"
Version="7.00"
Name="GArhythm"
ProjectGUID="{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
Keyword="Win32Proj">
<Platforms>
<Platform
Name="Win32"/>
</Platforms>
<Configurations>
<Configuration
Name="Debug|Win32"
OutputDirectory="Debug"
IntermediateDirectory="Debug"
ConfigurationType="1"
CharacterSet="2">
<Tool
Name="VCCLCompilerTool"
Optimization="0"
AdditionalIncludeDirectories="../"
PreprocessorDefinitions="WIN32;_DEBUG;_WINDOWS"
MinimalRebuild="TRUE"
BasicRuntimeChecks="3"
RuntimeLibrary="5"
UsePrecompiledHeader="0"
WarningLevel="3"
Detect64BitPortabilityProblems="TRUE"
DebugInformationFormat="4"/>
<Tool
Name="VCCustomBuildTool"/>
<Tool
Name="VCLinkerTool"
AdditionalOptions="/export:GArhythm_setup /dll"
AdditionalDependencies="pd.lib"
OutputFile="$(OutDir)/GArhythm.dll"
LinkIncremental="2"
AdditionalLibraryDirectories="../"
GenerateDebugInformation="TRUE"
ProgramDatabaseFile="$(OutDir)/frankenstein.pdb"
SubSystem="0"
TargetMachine="1"/>
<Tool
Name="VCMIDLTool"/>
<Tool
Name="VCPostBuildEventTool"/>
<Tool
Name="VCPreBuildEventTool"/>
<Tool
Name="VCPreLinkEventTool"/>
<Tool
Name="VCResourceCompilerTool"/>
<Tool
Name="VCWebServiceProxyGeneratorTool"/>
<Tool
Name="VCWebDeploymentTool"/>
</Configuration>
<Configuration
Name="Release|Win32"
OutputDirectory="Release"
IntermediateDirectory="Release"
ConfigurationType="1"
CharacterSet="2">
<Tool
Name="VCCLCompilerTool"
Optimization="2"
InlineFunctionExpansion="1"
OmitFramePointers="TRUE"
PreprocessorDefinitions="WIN32;NDEBUG;_WINDOWS"
StringPooling="TRUE"
RuntimeLibrary="4"
EnableFunctionLevelLinking="TRUE"
UsePrecompiledHeader="3"
WarningLevel="3"
Detect64BitPortabilityProblems="TRUE"
DebugInformationFormat="3"/>
<Tool
Name="VCCustomBuildTool"/>
<Tool
Name="VCLinkerTool"
OutputFile="$(OutDir)/frankenstein.exe"
LinkIncremental="1"
GenerateDebugInformation="TRUE"
SubSystem="2"
OptimizeReferences="2"
EnableCOMDATFolding="2"
TargetMachine="1"/>
<Tool
Name="VCMIDLTool"/>
<Tool
Name="VCPostBuildEventTool"/>
<Tool
Name="VCPreBuildEventTool"/>
<Tool
Name="VCPreLinkEventTool"/>
<Tool
Name="VCResourceCompilerTool"/>
<Tool
Name="VCWebServiceProxyGeneratorTool"/>
<Tool
Name="VCWebDeploymentTool"/>
</Configuration>
</Configurations>
<Files>
<Filter
Name="Source Files"
Filter="cpp;c;cxx;def;odl;idl;hpj;bat;asm">
<File
RelativePath="GArhythm.c">
</File>
<File
RelativePath="common.c">
</File>
</Filter>
<Filter
Name="Header Files"
Filter="h;hpp;hxx;hm;inl;inc">
<File
RelativePath="common.h">
</File>
</Filter>
<Filter
Name="Resource Files"
Filter="rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe">
</Filter>
</Files>
<Globals>
</Globals>
</VisualStudioProject>
Index: harmonizer.c
===================================================================
RCS file: /cvsroot/pure-data/externals/frankenstein/harmonizer.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** harmonizer.c 10 Dec 2005 15:14:12 -0000 1.3
--- harmonizer.c 15 Jan 2006 01:38:32 -0000 1.4
***************
*** 46,49 ****
--- 46,52 ----
#define POSSIBLE_NOTES (NOTES_RANGE/12*4) // 4 is the max number of notes in a chord
+ // default values
+ #define DEF_WIDENESS 3 // 3 octaves
+ #define DEF_CENTER_NOTE 72 // central C
// testing i noticed that we don't need more than 1 generation..
// this is because we create an initial population that is really good
***************
*** 103,106 ****
--- 106,117 ----
int target_notes[POSSIBLE_NOTES];
t_outlet *l_out;
+
+ float wideness;
+ int center_note;
+ float i_like_parallelism;
+ float small_intervals;
+ //TODO
+ // int lower_octave;
+ // int notes_range;
} t_harmonizer;
***************
*** 339,344 ****
directions[2]==directions[3])
{
! // bad!
! res -= 10;
if (DEBUG_VERBOSE)
post("same direction!");
--- 350,354 ----
directions[2]==directions[3])
{
! res += 10 * x->i_like_parallelism;
if (DEBUG_VERBOSE)
post("same direction!");
***************
*** 358,362 ****
if (directions[i]==directions[j])
{
! res -= 10;
if (DEBUG_VERBOSE)
post("hidden or parallel consonance!");
--- 368,372 ----
if (directions[i]==directions[j])
{
! res += 10 * x->i_like_parallelism;
if (DEBUG_VERBOSE)
post("hidden or parallel consonance!");
***************
*** 380,384 ****
if (DEBUG_VERBOSE)
post("average note is %i after division by (VOICES-1)", tmp);
! tmp = abs((LOWER_POSSIBLE_NOTE + NOTES_RANGE)*2/3 - tmp); // how much average is far from 72
res += 30;
res -= tmp;
--- 390,395 ----
if (DEBUG_VERBOSE)
post("average note is %i after division by (VOICES-1)", tmp);
! // tmp = abs((LOWER_POSSIBLE_NOTE + NOTES_RANGE)*2/3 - tmp); // how much average is far from 72
! tmp = abs(x->center_note - tmp); // how much average is far from desired center note
res += 30;
res -= tmp;
***************
*** 414,432 ****
res += 5;
if (abs(transitions[i]==1))
! res += 5;
if (abs(transitions[i]==2))
! res += 5;
if (abs(transitions[i]==3))
! res += 2;
if (abs(transitions[i]==4))
! res += 2;
if (abs(transitions[i]==5))
! res += 1;
if (abs(transitions[i]==6))
! res += 1;
if (abs(transitions[i]>11))
! res -= 2;
if (abs(transitions[i]>15))
! res -= 5;
}
--- 425,443 ----
res += 5;
if (abs(transitions[i]==1))
! res += 5 * x->small_intervals;
if (abs(transitions[i]==2))
! res += 5 * x->small_intervals;
if (abs(transitions[i]==3))
! res += 2 * x->small_intervals;
if (abs(transitions[i]==4))
! res += 2 * x->small_intervals;
if (abs(transitions[i]==5))
! res += 1 * x->small_intervals;
if (abs(transitions[i]==6))
! res += 1 * x->small_intervals;
if (abs(transitions[i]>11))
! res -= 2 * x->small_intervals;
if (abs(transitions[i]>15))
! res -= 5 * x->small_intervals;
}
***************
*** 436,440 ****
// TODO: too many near limits?
! // TODO: is a complete chord?
// does this voicing have all 5 notes?
// first build a table for comparision
--- 447,451 ----
// TODO: too many near limits?
! // is a complete chord?
// does this voicing have all 5 notes?
// first build a table for comparision
***************
*** 457,461 ****
{
// no fundamental! this is bad!!
! res -= 5;
}
if ((chord_notes_ok[0] != 0) &&
--- 468,472 ----
{
// no fundamental! this is bad!!
! res -= 10;
}
if ((chord_notes_ok[0] != 0) &&
***************
*** 465,469 ****
{
// complete chord! this is good
! res += 5;
}
for (j=0; j<4; j++)
--- 476,480 ----
{
// complete chord! this is good
! res += 10;
}
for (j=0; j<4; j++)
***************
*** 636,639 ****
--- 647,702 ----
}
+ //how any octaves should this chord be?
+ void set_wideness(t_harmonizer *x, t_floatarg f)
+ {
+ if (f>=0)
+ x->wideness = f;
+ }
+
+ // which note should the center note have ?
+ void set_center_note(t_harmonizer *x, t_floatarg f)
+ {
+ if ((f>=LOWER_POSSIBLE_NOTE)&&(f<120))
+ x->center_note = (int) f;
+ }
+
+ // which note should the center note have ?
+ void set_i_like_parallelism(t_harmonizer *x, t_floatarg f)
+ {
+ float newval = f;
+ if (newval<-1)
+ newval = -1;
+ if (newval>1)
+ newval = 1;
+ x->i_like_parallelism = newval;
+ }
+
+ // which note should the center note have ?
+ void set_small_intervals(t_harmonizer *x, t_floatarg f)
+ {
+ float newval = f;
+ if (newval<-1)
+ newval = -1;
+ if (newval>1)
+ newval = 1;
+ x->small_intervals = newval;
+ }
+
+ void print_help(t_harmonizer *x)
+ {
+ post("");
+ post("harmonizer is an external that builds voicing");
+ post("takes chords name and outputs a list of %i midi notes", VOICES);
+ post("available commands:");
+ post("current symbol: sets the current chord name (which chordwe are in)");
+ post("target symbol: sets the target chord name (which chord we want to go to)");
+ post("wideness float: now many octaves wide should the next chord be? must be > than 0");
+ post("set_center_note int: sets the desired center chord note, min 24 max 100");
+ post("i_like_parallelism float: do I want parallelism? from -1 (I don't want them) to 1 (I like them), 0 means I don't care, default = -1");
+ post("small_intervals float: do I want small intervals? from -1 (I don't want them) to 1 (I like them), 0 means I don't care, default = 1");
+ post("this externalis part of the frank framework");
+ post("authors: davide morelli, david casals");
+
+ }
void *harmonizer_new(t_symbol *s, int argc, t_atom *argv)
***************
*** 642,646 ****
time_t a;
t_harmonizer *x = (t_harmonizer *)pd_new(harmonizer_class);
! x->l_out = outlet_new(&x->x_obj, &s_list);
/*
for (i=0; i<BUFFER_LENGHT; i++)
--- 705,709 ----
time_t a;
t_harmonizer *x = (t_harmonizer *)pd_new(harmonizer_class);
! x->l_out = outlet_new(&x->x_obj, gensym("list"));
/*
for (i=0; i<BUFFER_LENGHT; i++)
***************
*** 650,654 ****
*/
srand(time(&a));
!
return (x);
}
--- 713,720 ----
*/
srand(time(&a));
! x->center_note = DEF_CENTER_NOTE;
! x->wideness = DEF_WIDENESS;
! x->i_like_parallelism = -1; // by default we don't like them!
! x->small_intervals = 1; //by default we want small intervals
return (x);
}
***************
*** 659,667 ****
(t_method)harmonizer_free, sizeof(t_harmonizer), CLASS_DEFAULT, A_GIMME, 0);
class_addbang(harmonizer_class, (t_method)harmonizer_bang);
class_addmethod(harmonizer_class, (t_method)set_current, gensym("current"),A_SYMBOL, 0);
class_addmethod(harmonizer_class, (t_method)set_target, gensym("target"),A_SYMBOL, 0);
// class_addmethod(harmonizer_class, (t_method)harmonizer_fitness1_set, gensym("fitness1"), A_DEFFLOAT, 0);
class_addlist(harmonizer_class, (t_method)set_current_voices);
!
}
--- 725,738 ----
(t_method)harmonizer_free, sizeof(t_harmonizer), CLASS_DEFAULT, A_GIMME, 0);
class_addbang(harmonizer_class, (t_method)harmonizer_bang);
+ class_addmethod(harmonizer_class, (t_method)print_help, gensym("help"),0, 0);
class_addmethod(harmonizer_class, (t_method)set_current, gensym("current"),A_SYMBOL, 0);
class_addmethod(harmonizer_class, (t_method)set_target, gensym("target"),A_SYMBOL, 0);
// class_addmethod(harmonizer_class, (t_method)harmonizer_fitness1_set, gensym("fitness1"), A_DEFFLOAT, 0);
class_addlist(harmonizer_class, (t_method)set_current_voices);
! class_addmethod(harmonizer_class, (t_method)set_wideness, gensym("wideness"), A_DEFFLOAT, 0);
! class_addmethod(harmonizer_class, (t_method)set_center_note, gensym("center_note"), A_DEFFLOAT, 0);
! class_addmethod(harmonizer_class, (t_method)set_i_like_parallelism, gensym("i_like_parallelism"), A_DEFFLOAT, 0);
! class_addmethod(harmonizer_class, (t_method)set_small_intervals, gensym("small_intervals"), A_DEFFLOAT, 0);
!
}
--- NEW FILE: chords_memory.vcproj ---
<?xml version="1.0" encoding = "Windows-1252"?>
<VisualStudioProject
ProjectType="Visual C++"
Version="7.00"
Name="chords_memory"
ProjectGUID="{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
Keyword="Win32Proj">
<Platforms>
<Platform
Name="Win32"/>
</Platforms>
<Configurations>
<Configuration
Name="Debug|Win32"
OutputDirectory="Debug"
IntermediateDirectory="Debug"
ConfigurationType="1"
CharacterSet="2">
<Tool
Name="VCCLCompilerTool"
Optimization="0"
AdditionalIncludeDirectories="../"
PreprocessorDefinitions="WIN32;_DEBUG;_WINDOWS"
MinimalRebuild="TRUE"
BasicRuntimeChecks="3"
RuntimeLibrary="5"
UsePrecompiledHeader="0"
WarningLevel="3"
Detect64BitPortabilityProblems="TRUE"
DebugInformationFormat="4"/>
<Tool
Name="VCCustomBuildTool"/>
<Tool
Name="VCLinkerTool"
AdditionalOptions="/export:chords_memory_setup /dll"
AdditionalDependencies="pd.lib"
OutputFile="$(OutDir)/chords_memory.dll"
LinkIncremental="2"
AdditionalLibraryDirectories="../"
GenerateDebugInformation="TRUE"
ProgramDatabaseFile="$(OutDir)/frankenstein.pdb"
SubSystem="0"
TargetMachine="1"/>
<Tool
Name="VCMIDLTool"/>
<Tool
Name="VCPostBuildEventTool"/>
<Tool
Name="VCPreBuildEventTool"/>
<Tool
Name="VCPreLinkEventTool"/>
<Tool
Name="VCResourceCompilerTool"/>
<Tool
Name="VCWebServiceProxyGeneratorTool"/>
<Tool
Name="VCWebDeploymentTool"/>
</Configuration>
<Configuration
Name="Release|Win32"
OutputDirectory="Release"
IntermediateDirectory="Release"
ConfigurationType="1"
CharacterSet="2">
<Tool
Name="VCCLCompilerTool"
Optimization="2"
InlineFunctionExpansion="1"
OmitFramePointers="TRUE"
PreprocessorDefinitions="WIN32;NDEBUG;_WINDOWS"
StringPooling="TRUE"
RuntimeLibrary="4"
EnableFunctionLevelLinking="TRUE"
UsePrecompiledHeader="3"
WarningLevel="3"
Detect64BitPortabilityProblems="TRUE"
DebugInformationFormat="3"/>
<Tool
Name="VCCustomBuildTool"/>
<Tool
Name="VCLinkerTool"
OutputFile="$(OutDir)/frankenstein.exe"
LinkIncremental="1"
GenerateDebugInformation="TRUE"
SubSystem="2"
OptimizeReferences="2"
EnableCOMDATFolding="2"
TargetMachine="1"/>
<Tool
Name="VCMIDLTool"/>
<Tool
Name="VCPostBuildEventTool"/>
<Tool
Name="VCPreBuildEventTool"/>
<Tool
Name="VCPreLinkEventTool"/>
<Tool
Name="VCResourceCompilerTool"/>
<Tool
Name="VCWebServiceProxyGeneratorTool"/>
<Tool
Name="VCWebDeploymentTool"/>
</Configuration>
</Configurations>
<Files>
<Filter
Name="Source Files"
Filter="cpp;c;cxx;def;odl;idl;hpj;bat;asm">
<File
RelativePath="chords_memory.c">
</File>
<File
RelativePath="common.c">
</File>
</Filter>
<Filter
Name="Header Files"
Filter="h;hpp;hxx;hm;inl;inc">
<File
RelativePath="common.h">
</File>
</Filter>
<Filter
Name="Resource Files"
Filter="rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe">
</Filter>
</Files>
<Globals>
</Globals>
</VisualStudioProject>
--- NEW FILE: frankenstein.sln ---
Microsoft Visual Studio Solution File, Format Version 7.00
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "chords_memory", "chords_memory.vcproj", "{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "rhythms_memory", "rhythms_memory.vcproj", "{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "themes_memory", "themes_memory.vcproj", "{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "harmonizer", "harmonizer.vcproj", "{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "voicing_analyzer", "voicing_analyzer.vcproj", "{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
EndProject
Global
GlobalSection(SolutionConfiguration) = preSolution
ConfigName.0 = Debug
ConfigName.1 = Release
EndGlobalSection
GlobalSection(ProjectDependencies) = postSolution
EndGlobalSection
GlobalSection(ProjectConfiguration) = postSolution
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.ActiveCfg = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.Build.0 = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.ActiveCfg = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.Build.0 = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.ActiveCfg = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.Build.0 = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.ActiveCfg = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.Build.0 = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.ActiveCfg = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.Build.0 = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.ActiveCfg = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.Build.0 = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.ActiveCfg = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.Build.0 = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.ActiveCfg = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.Build.0 = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.ActiveCfg = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Debug.Build.0 = Debug|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.ActiveCfg = Release|Win32
{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}.Release.Build.0 = Release|Win32
EndGlobalSection
GlobalSection(ExtensibilityGlobals) = postSolution
EndGlobalSection
GlobalSection(ExtensibilityAddIns) = postSolution
EndGlobalSection
EndGlobal
--- NEW FILE: harmonizer.vcproj ---
<?xml version="1.0" encoding = "Windows-1252"?>
<VisualStudioProject
ProjectType="Visual C++"
Version="7.00"
Name="harmonizer"
ProjectGUID="{DBC75D2A-816A-4C0A-8FE7-2016518D2D19}"
Keyword="Win32Proj">
<Platforms>
<Platform
Name="Win32"/>
</Platforms>
<Configurations>
<Configuration
Name="Debug|Win32"
OutputDirectory="Debug"
IntermediateDirectory="Debug"
ConfigurationType="1"
CharacterSet="2">
<Tool
Name="VCCLCompilerTool"
Optimization="0"
AdditionalIncludeDirectories="../"
PreprocessorDefinitions="WIN32;_DEBUG;_WINDOWS"
MinimalRebuild="TRUE"
BasicRuntimeChecks="3"
RuntimeLibrary="5"
UsePrecompiledHeader="0"
WarningLevel="3"
Detect64BitPortabilityProblems="TRUE"
DebugInformationFormat="4"/>
<Tool
Name="VCCustomBuildTool"/>
<Tool
Name="VCLinkerTool"
AdditionalOptions="/export:harmonizer_setup /dll"
AdditionalDependencies="pd.lib"
OutputFile="$(OutDir)/harmonizer.dll"
LinkIncremental="2"
AdditionalLibraryDirectories="../"
GenerateDebugInformation="TRUE"
ProgramDatabaseFile="$(OutDir)/frankenstein.pdb"
SubSystem="0"
TargetMachine="1"/>
<Tool
Name="VCMIDLTool"/>
<Tool
Name="VCPostBuildEventTool"/>
<Tool
Name="VCPreBuildEventTool"/>
<Tool
Name="VCPreLinkEventTool"/>
<Tool
Name="VCResourceCompilerTool"/>
<Tool
Name="VCWebServiceProxyGeneratorTool"/>
<Tool
Name="VCWebDeploymentTool"/>
</Configuration>
<Configuration
Name="Release|Win32"
OutputDirectory="Release"
IntermediateDirectory="Release"
ConfigurationType="1"
CharacterSet="2">
<Tool
Name="VCCLCompilerTool"
Optimization="2"
InlineFunctionExpansion="1"
OmitFramePointers="TRUE"
PreprocessorDefinitions="WIN32;NDEBUG;_WINDOWS"
StringPooling="TRUE"
RuntimeLibrary="4"
EnableFunctionLevelLinking="TRUE"
UsePrecompiledHeader="3"
WarningLevel="3"
Detect64BitPortabilityProblems="TRUE"
DebugInformationFormat="3"/>
<Tool
Name="VCCustomBuildTool"/>
<Tool
Name="VCLinkerTool"
OutputFile="$(OutDir)/frankenstein.exe"
LinkIncremental="1"
GenerateDebugInformation="TRUE"
SubSystem="2"
OptimizeReferences="2"
EnableCOMDATFolding="2"
TargetMachine="1"/>
<Tool
Name="VCMIDLTool"/>
<Tool
Name="VCPostBuildEventTool"/>
<Tool
Name="VCPreBuildEventTool"/>
<Tool
Name="VCPreLinkEventTool"/>
<Tool
Name="VCResourceCompilerTool"/>
<Tool
Name="VCWebServiceProxyGeneratorTool"/>
<Tool
Name="VCWebDeploymentTool"/>
</Configuration>
</Configurations>
<Files>
<Filter
Name="Source Files"
Filter="cpp;c;cxx;def;odl;idl;hpj;bat;asm">
<File
RelativePath="common.c">
</File>
<File
RelativePath="harmonizer.c">
</File>
</Filter>
<Filter
Name="Header Files"
Filter="h;hpp;hxx;hm;inl;inc">
<File
RelativePath="common.h">
</File>
<File
RelativePath="sglib.h">
</File>
</Filter>
<Filter
Name="Resource Files"
Filter="rc;ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe">
</Filter>
</Files>
<Globals>
</Globals>
</VisualStudioProject>
Index: chords_memory.c
===================================================================
RCS file: /cvsroot/pure-data/externals/frankenstein/chords_memory.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** chords_memory.c 8 Dec 2005 16:31:10 -0000 1.6
--- chords_memory.c 15 Jan 2006 01:38:32 -0000 1.7
***************
*** 1095,1099 ****
x->x_outchordname = outlet_new(&x->x_obj, gensym("symbol"));
x->x_outtonalityname = outlet_new(&x->x_obj, gensym("symbol"));
! x->x_outchordssequence = outlet_new(&x->x_obj, &s_list);
srand(time(&a));
chords_memory_init_graph(x);
--- 1095,1099 ----
x->x_outchordname = outlet_new(&x->x_obj, gensym("symbol"));
x->x_outtonalityname = outlet_new(&x->x_obj, gensym("symbol"));
! x->x_outchordssequence = outlet_new(&x->x_obj, gensym("list"));
srand(time(&a));
chords_memory_init_graph(x);
***************
*** 1116,1153 ****
}
- // TEST
- typedef struct _bla
- {
- int value;
- int index;
- } bla_t;
- typedef struct _bla2
- {
- bla_t array[10];
- } bla2_t;
- #define BLA_COMPARATOR(e1, e2) (e1.value - e2.value)
- //TEST
- void chords_memory_bang(t_chords_memory *x)
- {
- int i;
- bla2_t test[2];
- for (i=0; i<10; i++)
- {
- test[1].array[i].index = i;
- test[1].array[i].value = 10-i;
- }
- SGLIB_ARRAY_QUICK_SORT (bla_t, test[1].array, 10, BLA_COMPARATOR, SGLIB_ARRAY_ELEMENTS_EXCHANGER);
- for (i=0; i<10; i++)
- {
- post("array[%i].value = %i, array[%i].index = %i",i, test[1].array[i].value,i, test[1].array[i].index );
- }
-
- }
-
void chords_memory_setup(void)
{
chords_memory_class = class_new(gensym("chords_memory"), (t_newmethod)chords_memory_new,
(t_method)chords_memory_free, sizeof(t_chords_memory), CLASS_DEFAULT, A_GIMME, 0);
- class_addbang(chords_memory_class, (t_method)chords_memory_bang);
// file I/O
class_addmethod(chords_memory_class, (t_method)chords_memory_write_to_file, gensym("write"),A_SYMBOL, 0);
--- 1116,1123 ----
- Previous message: [PD-cvs] externals/tb/chaos SConstruct, 1.3, 1.4 AUTHORS, 1.1.1.1, NONE ChangeLog, 1.1.1.1, NONE Makefile.am, 1.1.1.1, NONE NEWS, 1.1.1.1, NONE README, 1.1.1.1, NONE bootstrap.sh, 1.1.1.1, NONE configure.ac, 1.2, NONE
- Next message: [PD-cvs] externals/frankenstein rhythms_memory.c,1.11,1.12
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
More information about the Pd-cvs
mailing list