@@ -41,10 +41,10 @@ notes = [] (36..45).each do |midi_note_number| notes << Drum.new(:note => note(midi_note_number), :when => L{|beat| false}, - :number_generator => L{0.5}, - # :number_generator => L{rand}, - :next => L{|queue| queue[queue.size - 1]}, - # :next => L{|queue| queue[rand(queue.size)]}, + # :number_generator => L{0.5}, + :number_generator => L{rand}, + # :next => L{|queue| queue[queue.size - 1]}, + :next => L{|queue| queue[rand(queue.size)]}, :probabilities => probabilities[midi_note_number] || probabilities[:none]) end notes db_drum_definition.rb @@ -1,11 +1,12 @@ require 'lib/archaeopteryx' -@loop = Loop.new(:measures => 4, +@loop = Loop.new(:measures => 32, :beats => 16, :logging => false, :evil_timer_offset_wtf => 0.2, - :clock => Clock.new(@tempo = 170), + :clock => (@clock = Clock.new(@tempo = 170)), :midi => (@midi = FileMIDI.new(:tempo => @tempo, + :clock => @clock, :filename => "db_drums.midi", :name => "d&b drums")), :generator => Rhythm.new(:drumfile => "db_drum_definition.rb", drums_file.rb @@ -11,6 +11,7 @@ class FileMIDI def initialize(options) raise :hell unless options.is_a? Hash @filename = options[:filename] + @clock = options[:clock] @events = [] @sequence = MIDI::Sequence.new @@ -25,18 +26,15 @@ class FileMIDI def infinite? false end + def midilib_delta + # figuring this shit out was an epic fucking nightmare and to be honest I still have no idea why it works + ((@sequence.note_to_delta("16th") / @clock.interval) * @clock.time).to_i + end def play(note) - # http://github.com/jvoorhis/music.rb/blob/5cf79915dda155d4e8348750d731739c85ac1e60/lib/music/smf_writer.rb - @track.events << NoteOnEvent.new(note.channel, - note.number, - note.velocity, - 0) # this number here should carry an offset representing the - # amount of time since the last message in this stream. it's still - # not clear to me how to handle simultaneous notes, however. - # @track.events << NoteOffEvent.new(note.channel, - # note.number, - # note.velocity, - # @sequence.note_to_delta("16th")) # yeah, well, whatever + @track.merge [NoteOnEvent.new(note.channel, + note.number, + note.velocity, + midilib_delta)] end def write File.open(@filename, 'wb') do |file| @@ -44,7 +42,3 @@ class FileMIDI end end end - -# I think what this has to do is have a ticker. because it expects to tick, and you're using predefined -# intervals. so if you've got a ticker, you just have to check if it's ticked, or something. actually I -# have no idea - I don't know how midilib tracks time. lib/midi/file_output/file_midi.rb 7a2fd57a0f1a6704f5d40b7e6158f611adc1c943 Giles Bowkett gilesb@gmail.com http://github.com/gilesbowkett/archaeopteryx/commit/deb77cb653682ad789a94ef588ee44e162c26d4e deb77cb653682ad789a94ef588ee44e162c26d4e 2009-05-06T17:56:25-07:00 2009-05-06T17:56:25-07:00 midi_files branch is complete. you can now export MIDI files from Arx. the workflow is like this: fuck with it live in the text editor, live-coding, til you like what you hear. then run it again in MIDI file export mode. then import the MIDI file into your MIDI app (e.g., Propellerhead Reason, Ableton Live) and fuck with it to your heart's content. a022431cfa2f4ec7cd2b0e649d45fbbc0a3041fb Giles Bowkett gilesb@gmail.com