Removed RCS-style IDs.
[multipass-eu.git] / src / player-drawer-bottom-eq.rb
1 c = EDJE.collection("euphoria")
2 parts = []
3
4 c.part("player.normal.group.drawer.bottom.eq", :rect) do |p|
5         parts << p
6         p.mouse_events = false
7
8         p.description.color = "#00000000"
9 end
10
11 c.part("player.background.eq", :image) do |p|
12         parts << p
13
14         p.description do |d|
15                 d.rel[0].to = d.rel[1].to = parts.first
16                 d.rel[0].set_offset(4, 41)
17
18                 d.auto_rel = true
19                 d.image = "background-eq.png"
20         end
21
22         h = {"preamp" => 11, "band01" => 28, "band02" => 42,
23              "band03" => 57, "band04" => 72, "band05" => 87,
24              "band06" => 102, "band07" => 117, "band08" => 133,
25              "band09" => 147, "band10" => 162}
26         h.each do |name, x|
27                 VerticalSlider.new(c, "player.slider.eq.#{name}", parts.first,
28                                    x, 63, 50)
29         end
30 end
31
32 c.part("player.normal.group.drawer.bottom.eq.clip", :rect) do |p|
33         p.description do |d|
34                 d.rel[0].to = d.rel[1].to =
35                         c.part("player.normal.group.drawer.bottom")
36                 d.rel[1].set_offset(0, -25)
37         end
38
39         parts.each { |part| part.clip = p }
40         parts.first.description { |d| d.rel[0].to = d.rel[1].to = p }
41 end