Merge branch 'develop' into feature/JAL-3390hideUnmappedStructure

[jalview.git] / srcjar / fr / orsay / lri / varna / views / VueBPHeightIncrement.java

diff --git a/srcjar/fr/orsay/lri/varna/views/VueBPHeightIncrement.java b/srcjar/fr/orsay/lri/varna/views/VueBPHeightIncrement.java
new file mode 100644 (file)
index 0000000..342608f
--- /dev/null
+++ b/srcjar/fr/orsay/lri/varna/views/VueBPHeightIncrement.java
@@ -0,0 +1,79 @@
+/*
+ VARNA is a tool for the automated drawing, visualization and annotation of the secondary structure of RNA, designed as a companion software for web servers and databases.
+ Copyright (C) 2008  Kevin Darty, Alain Denise and Yann Ponty.
+ electronic mail : Yann.Ponty@lri.fr
+ paper mail : LRI, bat 490 Université Paris-Sud 91405 Orsay Cedex France
+
+ This file is part of VARNA version 3.1.
+ VARNA version 3.1 is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License
+ as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
+
+ VARNA version 3.1 is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
+ without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ See the GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along with VARNA version 3.1.
+ If not, see http://www.gnu.org/licenses.
+ */
+package fr.orsay.lri.varna.views;
+
+import java.awt.Dimension;
+import java.awt.FlowLayout;
+
+import javax.swing.JLabel;
+import javax.swing.JPanel;
+import javax.swing.JSlider;
+
+import fr.orsay.lri.varna.VARNAPanel;
+import fr.orsay.lri.varna.controlers.ControleurBPHeightIncrement;
+import fr.orsay.lri.varna.controlers.ControleurSliderLabel;
+import fr.orsay.lri.varna.models.VARNAConfig;
+import fr.orsay.lri.varna.models.rna.RNA;
+
+public class VueBPHeightIncrement {
+       private VARNAPanel _vp;
+       private JPanel panel;
+       private JSlider spaceSlider;
+
+       public VueBPHeightIncrement(VARNAPanel vp) {
+               _vp = vp;
+               panel = new JPanel();
+
+               spaceSlider = new JSlider(JSlider.HORIZONTAL, 10, 200, Integer
+                               .valueOf(String.valueOf(Math
+                                               .round(vp.getRNA().getBPHeightIncrement() * 100))));
+               // Turn on labels at major tick marks.
+               spaceSlider.setMajorTickSpacing(30);
+               spaceSlider.setPaintTicks(true);
+               spaceSlider.setPaintLabels(true);
+
+               JLabel spaceLabel = new JLabel(String
+                               .valueOf(vp.getRNA().getBPHeightIncrement() * 100.0));
+               spaceLabel.setPreferredSize(new Dimension(50, spaceLabel
+                               .getPreferredSize().height));
+               spaceSlider.addChangeListener(new ControleurSliderLabel(spaceLabel,
+                               false));
+               spaceSlider.addChangeListener(new ControleurBPHeightIncrement(this));
+
+               panel = new JPanel();
+               panel.setLayout(new FlowLayout(FlowLayout.LEFT));
+
+               JLabel labelS = new JLabel("HeighInc:");
+
+               panel.add(labelS);
+               panel.add(spaceSlider);
+               panel.add(spaceLabel);
+       }
+
+       public VARNAPanel get_vp() {
+               return _vp;
+       }
+
+       public JPanel getPanel() {
+               return panel;
+       }
+
+       public Double getIncrement() {
+               return spaceSlider.getValue() / 100.0;
+       }
+}