Browse Subversion Repository
Diff of /trunk/Ruby_Scripts/200.commands.rb
 Parent Directory
|  Revision Log
|  Patch
| 15 |
hash = Dialog.run { |
hash = Dialog.run { |
| 16 |
layout(1, |
layout(1, |
| 17 |
layout(2, |
layout(2, |
| 18 |
item(:text, :title=>"Old control number"), |
item(:text, :title=>"Old control Number"), |
| 19 |
item(:textfield, :width=>40, :range=>[0, 127], :tag=>"old"), |
item(:textfield, :width=>40, :range=>[0, 127], :tag=>"old"), |
| 20 |
item(:text, :title=>"New control number"), |
item(:text, :title=>"New control number"), |
| 21 |
item(:textfield, :width=>40, :range=>[0, 127], :tag=>"new")), |
item(:textfield, :width=>40, :range=>[0, 127], :tag=>"new")), |
| 39 |
end |
end |
| 40 |
end |
end |
| 41 |
|
|
| 42 |
|
def change_timebase |
| 43 |
|
timebase = self.timebase |
| 44 |
|
hash = Dialog.run { |
| 45 |
|
layout(1, |
| 46 |
|
layout(2, |
| 47 |
|
item(:text, :title=>"Current timebase = #{timebase}"), |
| 48 |
|
nil, |
| 49 |
|
item(:text, :title=>"New timebase"), |
| 50 |
|
item(:textfield, :width=>40, :range=>[24, 960], :tag=>"new"))) |
| 51 |
|
} |
| 52 |
|
p hash |
| 53 |
|
if hash[:status] == 0 |
| 54 |
|
new = hash["new"].to_f |
| 55 |
|
mult = new / timebase |
| 56 |
|
each_track { |tr| |
| 57 |
|
set1 = tr.all_events |
| 58 |
|
set2 = tr.eventset { |p| p.kind == :note } |
| 59 |
|
set2.modify_duration("*", mult) |
| 60 |
|
set1.modify_tick("*", mult) |
| 61 |
|
} |
| 62 |
|
self.set_timebase(new) |
| 63 |
|
end |
| 64 |
|
end |
| 65 |
|
|
| 66 |
end |
end |
| 67 |
|
|
| 68 |
|
register_menu("Change timebase...", :change_timebase) |
| 69 |
# register_menu("Change control number...", :change_control_number_ext) |
# register_menu("Change control number...", :change_control_number_ext) |
|
|
Legend:
| Removed from v.73 |
|
| changed lines |
| |
Added in v.74 |
|
|
| |
Alchemusica - Free MIDI Sequencer
Parent Directory
Revision Log
Patch