Work on panner widget.

Mixer_Strip.fl

@@ -5,6 +5,9 @@ code_name {.C}
 decl {\#include "DPM.H"} {public global
 } 
 
+decl {\#include "Panner.H"} {public global
+} 
+
 decl {\#include "Fl_Scalepack.H"} {public global
 } 
 
@@ -53,7 +56,7 @@ widget_class Mixer_Strip {open
       xywh {9 208 33 448} type {Vert Knob} color 32 selection_color 1 minimum 1.5 maximum 0 step 0.01 value 1 textsize 14
     }
     Fl_Pack meters_pack {
-      label meters open selected
+      label meters open
       xywh {56 208 55 471} type HORIZONTAL labeltype NO_LABEL align 0
       class Fl_Scalepack
     } {
@@ -80,8 +83,9 @@ widget_class Mixer_Strip {open
     }
   }
   Fl_Box {} {
-    label {<Panner>}
-    xywh {6 693 110 90} box UP_FRAME
+    label Pan selected
+    xywh {6 693 110 90} box THIN_UP_BOX labelsize 11 align 1
+    class Panner
   }
   Fl_Progress {} {
     xywh {8 789 110 21} labeltype NO_LABEL

Panner.H

@@ -0,0 +1,185 @@
+
+/*******************************************************************************/
+/* Copyright (C) 2008 Jonathan Moore Liles                                     */
+/*                                                                             */
+/* This program 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 2 of the License, or (at your      */
+/* option) any later version.                                                  */
+/*                                                                             */
+/* This program 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 This program; see the file COPYING.  If not,write to the Free Software */
+/* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+/*******************************************************************************/
+
+#pragma once
+
+#include <FL/Fl_Widget.H>
+#include <FL/fl_draw.H>
+
+#include <vector>
+using namespace std;
+
+
+class Panner : public Fl_Widget
+{
+
+    struct Point
+    {
+        /* axes */
+        float x, y;
+
+        Point ( ) : x( 0.0f ), y( 0.0f ) { }
+        Point ( float X, float Y ) : x( X ), y( Y ) { }
+    };
+
+
+    /* channel configuration */
+    int _ins,
+        _outs;
+
+    vector <Point> _points;
+
+    static int pw ( void ) { return 6; }
+    static int ph ( void ) { return 6; }
+
+    void bbox ( int &X, int &Y, int &W, int &H )
+        {
+            W = w() - Fl::box_dw( box() ) - pw();
+            H = h() - Fl::box_dh( box() ) - ph();
+            X = x() + Fl::box_dx( box() );
+            Y = y() + Fl::box_dy( box() );
+        }
+
+public:
+
+    Panner ( int X, int Y, int W, int H, const char *L = 0 ) :
+        Fl_Widget( X, Y, W, H, L )
+        {
+            _ins = _outs = 4;
+            _points.push_back( Point( -1, -1 ) );
+            _points.push_back( Point( 1, 1 ) );
+            _points.push_back( Point( -1, 1 ) );
+            _points.push_back( Point( 1, -1 ) );
+
+            _outs = 5;
+
+        }
+
+    virtual ~Panner ( ) { }
+
+    Point *
+    event_point ( void )
+        {
+
+            int X, Y, W, H;
+
+            bbox( X, Y, W, H );
+
+            for ( int i = _ins; i--; )
+            {
+                Point *p = &_points[ i ];
+
+                if ( Fl::event_inside( X + ((p->x * (W / 2)) + (W / 2)),
+                                       Y + ((p->y * (H / 2)) + (H / 2)), pw(), ph() ) )
+                    return p;
+            }
+
+            return NULL;
+        }
+
+    virtual void
+    draw ( void )
+        {
+            draw_box();
+//            draw_box( FL_FLAT_BOX, x(), y(), w(), h(), FL_BLACK );
+            draw_label();
+
+            int tw, th, tx, ty;
+
+            bbox( tx, ty, tw, th );
+
+            fl_color(  FL_GRAY );
+
+            switch ( _outs )
+            {
+                case 2:                                         /* stereo */
+
+                case 4:                                         /* quad */
+                    fl_line( x(), y(), x()+ w(), y() + h() );
+                    fl_line( x() + w(), y(), x(), y() + h() );
+                    break;
+                case 5:                                         /* 5.1 */
+                    fl_line( x(), y(), x() + w(), y() + h() );
+                    fl_line( x() + w(), y(), x(), y() + h() );
+                    fl_line( x() + (w() / 2), y(), x() + (w() / 2), y() + (h() / 2) );
+                    break;
+
+
+            }
+
+
+
+            for ( int i = _ins; i--; )
+            {
+                Point *p = &_points[ i ];
+
+                fl_color( (Fl_Color) 10 + i );
+
+                const int bx = tx + ((tw / 2) * p->x + (tw / 2));
+                const int by = ty + ((th / 2) * p->y + (th / 2));
+
+                fl_rectf( bx, by, pw(), ph() );
+
+                char pat[4];
+                snprintf( pat, 4, "%d", i + 1 );
+
+                fl_color( FL_BLACK );
+                fl_font( FL_HELVETICA, ph() + 2 );
+                fl_draw( pat, bx, by + ph() );
+            }
+        }
+
+    virtual int
+    handle ( int m )
+        {
+            static Point *drag;
+
+            switch ( m )
+            {
+
+                case FL_PUSH:
+                    if ( ( drag = event_point() ) )
+                    {
+                        printf( "bing\n" );
+                        return 1;
+                    }
+                    else
+                        return 0;
+                case FL_RELEASE:
+                    drag = NULL;
+                    return 1;
+                case FL_DRAG:
+                {
+                    float X = Fl::event_x() - x();
+                    float Y = Fl::event_y() - y();
+
+                    drag->x = (float)(X / (w() / 2)) - 1.0f;
+                    drag->y = (float)(Y / (h() / 2)) - 1.0f;
+
+                    redraw();
+
+                    return 1;
+                }
+
+            }
+
+            return 0;
+        }
+
+};