|
|
@@ -0,0 +1,150 @@ |
|
|
|
|
|
|
|
/*******************************************************************************/ |
|
|
|
/* 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. */ |
|
|
|
/*******************************************************************************/ |
|
|
|
|
|
|
|
|
|
|
|
#include "Panner.H" |
|
|
|
|
|
|
|
/* 2D Panner widget. Supports various multichannel configurations. */ |
|
|
|
|
|
|
|
/* multichannel layouts, in degrees */ |
|
|
|
int Panner::_configs[][12] = |
|
|
|
{ |
|
|
|
/* mono */ |
|
|
|
{ -1 }, |
|
|
|
/* stereo */ |
|
|
|
{ 270, 90, -1 }, |
|
|
|
/* quad */ |
|
|
|
{ 315, 45, 225, 135, -1 }, |
|
|
|
/* 5.1 */ |
|
|
|
{ 315, 45, 225, 135, 0, -1 }, |
|
|
|
/* 7.1 */ |
|
|
|
{ 315, 45, 225, 135, 0, 270, 90, -1 }, |
|
|
|
|
|
|
|
}; |
|
|
|
|
|
|
|
|
|
|
|
Panner::Point * |
|
|
|
Panner::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; |
|
|
|
} |
|
|
|
|
|
|
|
void |
|
|
|
Panner::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() ); |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
int |
|
|
|
Panner::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; |
|
|
|
} |