zgomot 0.0.1

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/LICENSE

@@ -0,0 +1,22 @@
+The MIT License
+
+Copyright (c) 2009 troystribling
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,7 @@
+= zgomot
+
+A music composition DSL
+
+== Copyright
+
+Copyright (c) 2009 Troy Stribling. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,24 @@
+$:.unshift('lib')
+require 'rubygems'
+require 'rake'
+
+#####-------------------------------------------------------------------------------------------------------
+task :default => :test
+
+#####-------------------------------------------------------------------------------------------------------
+begin
+require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "zgomot"
+    gem.summary = %Q{zgomot is a simple DSL for writting MIDI music.}
+    gem.email = "troy.stribling@gmail.com"
+    gem.homepage = "http://github.com/troystribling/zgomot"
+    gem.authors = ["Troy Stribling"]
+    gem.files.include %w(lib/jeweler/templates/.gitignore VERSION)
+    gem.add_dependency('rake',        '>= 0.8.3')
+    gem.add_dependency('midiator',    '>= 0.3.3')
+  end
+rescue LoadError
+  abort "jeweler is not available. In order to run test, you must: sudo gem install technicalpickles-jeweler --source=http://gems.github.com"
+end
+

data/VERSION

@@ -0,0 +1 @@
+0.0.1

data/bin/zgomot

@@ -0,0 +1,2 @@
+#!/usr/bin/ruby
+exec "irb -I #{File.dirname($0)}/../lib/ -r zlive"

data/examples/arp_chords.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'arp', cp([:B,3],:ionian,:l=>4)[1,4,5,5].arp!(16), :lim=>1 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/full_scale_notes.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'full_scale', np(nil,5,4), :lim=>6 do |pattern|
+  ch << pattern.tonic!(:A, count)
+end
+
+#.........................................................................................................
+play

data/examples/inv_chords.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'inversion', cp([:C,3],:ionian,:l=>4).inv!(2), :lim=>1 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/modes_notes.rb

@@ -0,0 +1,16 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'modes', [np([:A,4],nil,:l=>4), np([:A,4],nil,:l=>4).reverse!.shift, n(:R)], :lim=>6 do |pattern|
+  Zgomot.logger.info "TONIC: [A,4], MODE: #{count-1}"
+  ch << pattern.mode!(count)
+end
+
+#.........................................................................................................
+play

data/examples/notes.rb

@@ -0,0 +1,18 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+score = [n([:C,5]), n(:B), n(:R), n(:G), n(:C,:l=>2), n([:E,5],:l=>2)]
+
+#.........................................................................................................
+str 'notes', score, :lim=>3 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/percs.rb

@@ -0,0 +1,20 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+ score = [pr(:acoustic_bass_drum), pr(:bass_drum_1), pr(:acoustic_snare), pr(:electric_snare),
+          pr(:open_hi_hat), pr(:closed_hi_hat), pr(:high_tom), pr(:low_mid_tom),
+          pr(:low_tom), pr(:hand_clap), pr(:ride_cymbal_1), pr(:cowbell)]
+
+#.........................................................................................................
+str 'percussion', score, :lim=>:inf do |pattern|
+  ch(2) << pattern
+end
+
+#.........................................................................................................
+play

data/examples/percs_multi.rb

@@ -0,0 +1,18 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+score = [pr([:acoustic_bass_drum, :cowbell]), pr(:R), pr([:acoustic_snare, :hand_clap]), pr(:R)]
+
+#.........................................................................................................
+str 'percussion', score, :lim=>:inf do |pattern|
+  ch(2) << pattern
+end
+
+#.........................................................................................................
+play

data/examples/phase_notes.rb

@@ -0,0 +1,20 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'melody-1', np([:B,3],nil,:l=>4)[1,4,5,5], :lim=>:inf do |pattern|
+  ch(0) << pattern.mode!((count/4) % 7 + 1)
+end
+
+#.........................................................................................................
+str 'melody-2', np([:B,3],:ionian,:l=>4)[1,4,5,5].bpm!(16.0/15.0), :lim=>:inf  do |pattern|
+  ch(1) << pattern
+end
+
+#.........................................................................................................
+play

data/examples/prog_chords.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'prog', cp([:B,3],:ionian,:l=>4)[1,4,5,5], :lim=>1 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/prog_chords_multi_vel_length.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'prog', cp([:A,4],nil,:l=>[4,4,8,8,4], :v=>[0.6, 0.4, 0.7, 0.6, 0.4])[7,5,3,3,1], :lim=>6 do |pattern|
+  ch << pattern.mode!(count)
+end
+
+#.........................................................................................................
+play

data/examples/prog_chords_rest.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'prog', cp([:B,3],:ionian,:l=>4)[1,4,:R,5], :lim=>1 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/prog_notes.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'prog', np([:A,4],nil,:l=>4)[7,5,3,1], :lim=>6 do |pattern|
+  ch << pattern.mode!(count)
+end
+
+#.........................................................................................................
+play

data/examples/prog_notes_multi_vel_length.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'prog', np([:A,4],nil,:l=>[4,4,8,8,4], :v=>[0.6, 0.4, 0.7, 0.6, 0.4])[7,5,3,3,1], :lim=>6 do |pattern|
+  ch << pattern.mode!(count)
+end
+
+#.........................................................................................................
+play

data/examples/prog_notes_rest.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'prog', np([:A,4],nil,:l=>4)[7,:R,3,1], :lim=>6 do |pattern|
+  ch << pattern.mode!(count)
+end
+
+#.........................................................................................................
+play

data/examples/progressive_modes.rb

@@ -0,0 +1,51 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+major_modes = [:ionian, :lydian, :mixolydian] 
+minor_modes = [:dorian, :phrygian, :aeolian]
+
+#.........................................................................................................
+m_slow = mark
+m_slow.add([0.6, 0.4]) do |count|
+  np([:A,4],major_modes[count % 3],:l=>4)[7,5,3,1]
+end
+m_slow.add([0.4, 0.6]) do |count|
+  np([:A,4],minor_modes[count % 3],:l=>4)[7,5,3,1]
+end
+
+#.........................................................................................................
+str :slow do
+  ch(0) << m_slow.next(count)
+end
+
+#.........................................................................................................
+m_fast = mark
+m_fast.add([0.6, 0.4]) do |count|
+  np([:G,4],major_modes[count % 3],:l=>4)[7,5,3,1].bpm!(16.0/15.0)
+end
+m_fast.add([0.4, 0.6]) do |count|
+  np([:G,4],minor_modes[count % 3],:l=>4)[7,5,3,1].bpm!(16.0/15.0)
+end
+
+#.........................................................................................................
+str :fast do
+  ch(1) << m_fast.next(count)
+end
+
+#.........................................................................................................
+str :perc do 
+  ch(2) << if (count % 2).eql?(0)
+             [pr(:R, :l=>2), pr(:hand_clap), pr(:hand_clap)]
+           else
+             pr(:R,:l=>1)
+           end
+end
+
+#.........................................................................................................
+play

data/examples/reverse_chords.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'chords', [c(:C,:min).arp!(4), c(:C,:min).arp!(4).rev!, c(:E,:min).arp!(4), c(:E,:min).arp!(4).rev!], :lim=>3 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/scale_chords.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'scale', cp([:C,4],:ionian,:l=>4), :lim=>1 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/scale_notes.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'scale', [np([:C,4],:dorian,:l=>4), np([:C,4],:dorian,:l=>4).reverse!.shift, n(:R)], :lim=>3 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/scales_notes.rb

@@ -0,0 +1,19 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+pclass = [:C, :Cs, :D, :Ds, :E, :F, :Fs, :G, :Gs, :A, :As, :B]
+
+#.........................................................................................................
+str 'scale', [np(nil,:dorian,:l=>4), np(nil,:dorian,:l=>4).reverse!.shift, n(:R)], :lim=>pclass.length do |pattern|
+  Zgomot.logger.info "TONIC: [#{pclass[count-1]},4], MODE: dorian"
+  ch << pattern.tonic!([pclass[count-1], 4])
+end
+
+#.........................................................................................................
+play

data/examples/simple_chords.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'chords', [ c(:C), c(:E,:min), c(:D,:min), c(:B,:dim), c(:G,:maj)], :lim=>3 do |pattern|
+  ch << pattern
+end
+
+#.........................................................................................................
+play

data/examples/simple_markov.rb

@@ -0,0 +1,24 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+m = mark
+m.add([0.6, 0.4]) do
+  np([:A,4],:dorian,:l=>4)[7,5,3,1,]
+end
+m.add([0.4, 0.6]) do
+  np([:A,4],:ionian,:l=>4)[7,5,3,1]
+end
+
+#.........................................................................................................
+str 'markov' do
+  ch << m.next
+end
+
+#.........................................................................................................
+play

data/examples/simple_notes.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'notes' do
+  ch << [n([:C,5]), n(:B), n(:R), n(:G), n(:C,:l=>2), n([:E,5],:l=>2)]
+end
+
+#.........................................................................................................
+play

data/examples/simple_notes_length.rb

@@ -0,0 +1,17 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'notes' do
+  (ch << [n([:C,5]), n(:B), n(:G), n(:C,:l=>2), n([:E,5],:l=>1)]).each do |note|
+    note.length = 2**(note.time.beat + 2)
+  end
+end
+
+#.........................................................................................................
+play

data/examples/simple_notes_velocity.rb

@@ -0,0 +1,17 @@
+require 'rubygems'
+require "#{File.dirname(__FILE__)}/../lib/zgomot"
+
+#.........................................................................................................
+before_start do
+  Zgomot.logger.level = Logger::DEBUG
+end
+
+#.........................................................................................................
+str 'notes' do
+  (ch << [n([:C,5]), n(:B), n(:R), n(:G), n(:C,:l=>2), n([:E,5],:l=>2)]).each do |note|
+    note.velocity = 0.2*note.time.beat + 0.2
+  end
+end
+
+#.........................................................................................................
+play

data/examples/zgomot.yml

@@ -0,0 +1,3 @@
+beats_per_minute: 120
+time_signature: 4/4
+resolution: 1/64

data/lib/zgomot/boot.rb

@@ -0,0 +1,56 @@
+##############################################################################################################
+module Zgomot
+
+  #####-------------------------------------------------------------------------------------------------------
+  class Boot
+    
+    ####......................................................................................................
+    class << self
+
+      #.......................................................................................................
+      def boot
+        
+        ####..............
+        Zgomot.logger = Logger.new(STDOUT)
+        Zgomot.logger.level = Logger::WARN 
+
+        ####..............
+        call_if_implemented(:call_before_start)
+
+        ####..............
+        Zgomot.logger.info "ZGOMOT BEGINNING"
+        Zgomot.logger.info "APPLICATION PATH: #{Zgomot.app_path}"
+        Zgomot.logger.info "CONFIGURATION FILE: #{Zgomot.config_file}"
+        Zgomot.logger.info "CONFIGURATION: #{Zgomot.config.inspect}"    
+        
+      end
+      
+      ####....................................................................................................
+      # application deligate methods
+      #.......................................................................................................
+      def call_if_implemented(method, *args)
+        send(method, *args) if respond_to?(method)
+      end
+      
+      #.........................................................................................................
+      def callbacks(*args)
+        args.each do |meth| 
+          instance_eval <<-do_eval
+            def #{meth}(&blk)
+              define_meta_class_method(:call_#{meth}, &blk)
+            end
+          do_eval
+        end
+      end 
+                                  
+    #### self
+    end
+
+    #.........................................................................................................
+    callbacks(:before_start)
+
+  #### Boot
+  end
+  
+#### Zgomot
+end