From 9a9ca22d9a8f9c9f6ae371e489490d36e0ab2404 Mon Sep 17 00:00:00 2001
From: Matthias Neeracher <neeri@users.sourceforge.net>
Date: Sun, 21 Oct 2007 20:54:18 +0000
Subject: [PATCH] Use standard ruby debug mechanism

---
 Filters/VLBIABType.reader | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/Filters/VLBIABType.reader b/Filters/VLBIABType.reader
index dcfe715..2cbd520 100755
--- a/Filters/VLBIABType.reader
+++ b/Filters/VLBIABType.reader
@@ -5,8 +5,6 @@
 # Based on reverse engineering work by Alf Warnock & Alain Brenzikofer
 #
 
-DEBUG = false
-
 require File.dirname($0)+'/plistWriter'
 require File.dirname($0)+'/vl'
 
@@ -326,7 +324,7 @@ end
 
 if styleFile
   styleFile = File.basename(styleFile, '.STY')
-  puts "Style #{styleFile}" if DEBUG
+  puts "Style #{styleFile}" if $DEBUG
   groove = STY_GROOVE[styleFile] || groove
 end
 OUTPUT['groove'] = groove[0] || 'Swing'
@@ -341,16 +339,16 @@ if biab.sub!(/^.*?\xA0\xB0\xC1/m, '')
   (0...noteCount).each do |i|
     onset, channel, pitch, velocity, duration = biab[i*12, 12].unpack('VCCCxV')
     break if channel==0
-    puts "O #{onset}; C #{channel}; P #{pitch}; V #{velocity}; D #{duration}" if DEBUG
-    if channel==176 or channel==179
+    puts "O #{onset}; C #{channel}; P #{pitch}; V #{velocity}; D #{duration}" if $DEBUG
+    if channel==176 or channel==179 or channel==180
       pitch = VL::NoPitch
     end
-    onset = (onset / 10.0).round
+    onset = (onset / 10.0).floor
     RAWNOTES.push([onset, pitch])
   end
 end
 
-p RAWNOTES, CHORDS, STEPS, ROOTS if DEBUG
+p RAWNOTES, CHORDS, STEPS, ROOTS if $DEBUG
 
 CHORDS.pop
 measLen        = VL::Fract.new(PROP['timeNum']*48, PROP['timeDenom']).num