home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 November / CMCD1104.ISO / Software / Complet / ZynAddFX / Setup_ZynAddSubFX-2.1.1.exe / ResonanceUI.fl < prev    next >
Encoding:
FLTK User Interface Designer  |  2004-08-15  |  10.0 KB  |  365 lines
  1. # data file for the Fltk User Interface Designer (fluid)
  2. version 1.0105 
  3. header_name {.h} 
  4. code_name {.cc}
  5. decl {//Copyright (c) 2002-2004 Nasca Octavian Paul} {} 
  6.  
  7. decl {//License: GNU GPL version 2} {} 
  8.  
  9. decl {\#include <FL/Fl_Box.H>} {public
  10. } 
  11.  
  12. decl {\#include <FL/fl_draw.H>} {public
  13. } 
  14.  
  15. decl {\#include <FL/Fl_Value_Output.H>} {public
  16. } 
  17.  
  18. decl {\#include <math.h>} {} 
  19.  
  20. decl {\#include <stdio.h>} {} 
  21.  
  22. decl {\#include <stdlib.h>} {} 
  23.  
  24. decl {\#include <string.h>} {} 
  25.  
  26. decl {\#include "../Synth/Resonance.h"} {public
  27. } 
  28.  
  29. decl {\#include "WidgetPDial.h"} {public
  30. } 
  31.  
  32. decl {\#include "PresetsUI.h"} {public
  33. } 
  34.  
  35. class ResonanceGraph {: {public Fl_Box}
  36. } {
  37.   Function {ResonanceGraph(int x,int y, int w, int h, const char *label=0):Fl_Box(x,y,w,h,label)} {} {
  38.     code {respar=NULL;
  39. cbwidget=NULL;} {}
  40.   }
  41.   Function {init(Resonance *respar_,Fl_Value_Output *khzvalue_,Fl_Value_Output *dbvalue_)} {} {
  42.     code {respar=respar_;
  43. khzvalue=khzvalue_;
  44. dbvalue=dbvalue_;
  45. oldx=-1;
  46. khzval=-1;} {}
  47.   }
  48.   Function {draw_freq_line(REALTYPE freq,int type)} {} {
  49.     code {REALTYPE freqx=respar->getfreqpos(freq);
  50. switch(type){
  51.   case 0:fl_line_style(FL_SOLID);break;
  52.   case 1:fl_line_style(FL_DOT);break;
  53.   case 2:fl_line_style(FL_DASH);break;
  54. }; 
  55.  
  56.  
  57. if ((freqx>0.0)&&(freqx<1.0))
  58.    fl_line(x()+(int) (freqx*w()),y(),
  59.    x()+(int) (freqx*w()),y()+h());} {}
  60.   }
  61.   Function {draw()} {} {
  62.     code {int ox=x(),oy=y(),lx=w(),ly=h(),i,ix,iy,oiy;
  63. REALTYPE freqx;
  64.  
  65. fl_color(FL_BLACK);
  66. fl_rectf(ox,oy,lx,ly);
  67.  
  68.  
  69. //draw the lines
  70. fl_color(FL_GRAY);
  71.  
  72. fl_line_style(FL_SOLID);
  73. fl_line(ox+2,oy+ly/2,ox+lx-2,oy+ly/2);
  74.  
  75. freqx=respar->getfreqpos(1000.0);
  76. if ((freqx>0.0)&&(freqx<1.0))
  77.    fl_line(ox+(int) (freqx*lx),oy,
  78.     ox+(int) (freqx*lx),oy+ly);
  79.  
  80. for (i=1;i<10;i++){
  81.    if(i==1){
  82.      draw_freq_line(i*100.0,0);
  83.      draw_freq_line(i*1000.0,0);
  84.    }else 
  85.     if (i==5){
  86.       draw_freq_line(i*100.0,2);
  87.       draw_freq_line(i*1000.0,2);
  88.     }else{
  89.       draw_freq_line(i*100.0,1);
  90.       draw_freq_line(i*1000.0,1);
  91.     };
  92. };
  93.  
  94. draw_freq_line(10000.0,0);
  95. draw_freq_line(20000.0,1);
  96.  
  97. fl_line_style(FL_DOT);
  98. int GY=10;if (ly<GY*3) GY=-1;
  99. for (i=1;i<GY;i++){
  100.    int tmp=(int)(ly/(REALTYPE)GY*i);
  101.    fl_line(ox+2,oy+tmp,ox+lx-2,oy+tmp);
  102. };
  103.  
  104.  
  105.  
  106. //draw the data
  107. fl_color(FL_RED);
  108. fl_line_style(FL_SOLID);
  109. oiy=(int)(respar->Prespoints[0]/128.0*ly);
  110. for (i=1;i<N_RES_POINTS;i++){
  111.    ix=(int)(i*1.0/N_RES_POINTS*lx);
  112.    iy=(int)(respar->Prespoints[i]/128.0*ly);
  113.    fl_line(ox+ix-1,oy+ly-oiy,ox+ix,oy+ly-iy);
  114.    oiy=iy;
  115. };} {}
  116.   }
  117.   Function {handle(int event)} {return_type int
  118.   } {
  119.     code {int x_=Fl::event_x()-x();
  120. int y_=Fl::event_y()-y();
  121. if ( (x_>=0)&&(x_<w()) && (y_>=0)&&(y_<h())){
  122.    khzvalue->value(respar->getfreqx(x_*1.0/w())/1000.0);
  123.    dbvalue->value((1.0-y_*2.0/h())*respar->PmaxdB);
  124. };
  125.  
  126. if ((event==FL_PUSH)||(event==FL_DRAG)){
  127.   int leftbutton=1;
  128.   if (Fl::event_button()==FL_RIGHT_MOUSE) leftbutton=0;
  129.   if (x_<0) x_=0;if (y_<0) y_=0;
  130.   if (x_>=w()) x_=w();if (y_>=h()-1) y_=h()-1;
  131.  
  132.   if ((oldx<0)||(oldx==x_)){
  133.     int sn=(int)(x_*1.0/w()*N_RES_POINTS);
  134.     int sp=127-(int)(y_*1.0/h()*127);
  135.     if (leftbutton!=0) respar->setpoint(sn,sp);
  136.         else respar->setpoint(sn,64);
  137.   } else {
  138.     int x1=oldx;
  139.     int x2=x_;
  140.     int y1=oldy;
  141.     int y2=y_;
  142.     if (oldx>x_){
  143.       x1=x_;y1=y_;
  144.       x2=oldx;y2=oldy;
  145.     };
  146.    for (int i=0;i<x2-x1;i++){
  147.       int sn=(int)((i+x1)*1.0/w()*N_RES_POINTS);
  148.       REALTYPE yy=(y2-y1)*1.0/(x2-x1)*i;
  149.       int sp=127-(int)((y1+yy)/h()*127);
  150.       if (leftbutton!=0) respar->setpoint(sn,sp);
  151.          else respar->setpoint(sn,64);
  152.     };
  153.   };
  154.  
  155.   oldx=x_;oldy=y_;
  156.   redraw();
  157. };
  158.  
  159. if (event==FL_RELEASE) {
  160.     oldx=-1;
  161.     if (cbwidget!=NULL) cbwidget->do_callback();
  162. };
  163.  
  164. return(1);} {}
  165.   }
  166.   Function {setcbwidget(Fl_Widget *cbwidget)} {} {
  167.     code {this->cbwidget=cbwidget;} {}
  168.   }
  169.   decl {Fl_Value_Output *khzvalue;} {}
  170.   decl {Fl_Value_Output *dbvalue;} {}
  171.   decl {Resonance *respar;} {}
  172.   decl {int oldx,oldy;} {}
  173.   decl {REALTYPE khzval;} {public
  174.   }
  175.   decl {Fl_Widget *cbwidget;} {}
  176. } 
  177.  
  178. class ResonanceUI {: PresetsUI_
  179. } {
  180.   Function {make_window()} {} {
  181.     Fl_Window resonancewindow {
  182.       label Resonance
  183.       xywh {45 259 780 305} type Double hide
  184.     } {
  185.       Fl_Value_Output khzvalue {
  186.         label kHz
  187.         xywh {415 264 45 18} align 8 minimum 0.001 maximum 48 step 0.01 textfont 1
  188.         code0 {//this widget must be before the calling widgets}
  189.       }
  190.       Fl_Value_Output dbvalue {
  191.         label dB
  192.         xywh {415 282 45 18} align 8 minimum -150 maximum 150 step 0.1 textfont 1
  193.         code0 {//this widget must be before the calling widgets}
  194.       }
  195.       Fl_Group {} {
  196.         xywh {6 5 768 256} box BORDER_BOX
  197.         code0 {rg=new ResonanceGraph(o->x(),o->y(),o->w(),o->h(),"");}
  198.         code1 {rg->init(respar,khzvalue,dbvalue);}
  199.         code2 {rg->show();}
  200.       } {}
  201.       Fl_Button {} {
  202.         label Close
  203.         callback {resonancewindow->hide();}
  204.         xywh {690 270 84 27} box THIN_UP_BOX
  205.       }
  206.       Fl_Button {} {
  207.         label Zero
  208.         callback {for (int i=0;i<N_RES_POINTS;i++) 
  209.    respar->setpoint(i,64);
  210. resonancewindow->redraw();
  211. redrawPADnoteApply();}
  212.         tooltip {Clear the resonance function} xywh {491 264 66 15} box THIN_UP_BOX labelfont 1
  213.       }
  214.       Fl_Button {} {
  215.         label Smooth
  216.         callback {respar->smooth();
  217. resonancewindow->redraw();
  218. redrawPADnoteApply();}
  219.         tooltip {Smooth the resonance function} xywh {491 282 66 18} box THIN_UP_BOX labelfont 1
  220.       }
  221.       Fl_Check_Button enabled {
  222.         label Enable
  223.         callback {respar->Penabled=(int) o->value();
  224. redrawPADnoteApply();}
  225.         xywh {6 270 78 27} box THIN_UP_BOX down_box DOWN_BOX
  226.         code0 {o->value(respar->Penabled);}
  227.       }
  228.       Fl_Roller maxdb {
  229.         callback {maxdbvo->value(o->value());
  230. respar->PmaxdB=(int) o->value();
  231. redrawPADnoteApply();}
  232.         xywh {90 282 84 15} type Horizontal minimum 1 maximum 90 step 1 value 30
  233.       }
  234.       Fl_Value_Output maxdbvo {
  235.         label {Max.}
  236.         callback {o->value(respar->PmaxdB);}
  237.         tooltip {The Maximum amplitude (dB)} xywh {126 264 24 18} minimum 1 maximum 127 step 1 value 30 textfont 1
  238.         code0 {o->value(respar->PmaxdB);}
  239.       }
  240.       Fl_Box {} {
  241.         label dB
  242.         xywh {150 264 24 18}
  243.       }
  244.       Fl_Value_Output centerfreqvo {
  245.         label {C.f.}
  246.         callback {o->value(respar->getcenterfreq()/1000.0);}
  247.         tooltip {Center Frequency (kHz)} xywh {210 264 33 18} when 3 minimum 1 maximum 10 step 0.01 value 1 textfont 1
  248.         code0 {o->value(respar->getcenterfreq()/1000.0);}
  249.       }
  250.       Fl_Value_Output octavesfreqvo {
  251.         label {Oct.}
  252.         callback {o->value(respar->getoctavesfreq());}
  253.         tooltip {No. of octaves} xywh {210 282 33 18} when 3 minimum 1 maximum 127 step 1 value 30 textfont 1
  254.         code0 {o->value(respar->getoctavesfreq());}
  255.       }
  256.       Fl_Button {} {
  257.         label RND2
  258.         callback {respar->randomize(1);
  259. resonancewindow->redraw();
  260. redrawPADnoteApply();}
  261.         tooltip {Randomize the resonance function} xywh {566 276 42 12} box THIN_UP_BOX labelfont 1 labelsize 10
  262.       }
  263.       Fl_Button {} {
  264.         label RND1
  265.         callback {respar->randomize(0);
  266. resonancewindow->redraw();
  267. redrawPADnoteApply();}
  268.         tooltip {Randomize the resonance function} xywh {566 264 42 12} box THIN_UP_BOX labelfont 1 labelsize 10
  269.       }
  270.       Fl_Button {} {
  271.         label RND3
  272.         callback {respar->randomize(2);
  273. resonancewindow->redraw();
  274. redrawPADnoteApply();}
  275.         tooltip {Randomize the resonance function} xywh {566 288 42 12} box THIN_UP_BOX labelfont 1 labelsize 10
  276.       }
  277.       Fl_Check_Button p1st {
  278.         label {P.1st}
  279.         callback {respar->Pprotectthefundamental=(int) o->value();
  280. redrawPADnoteApply();}
  281.         tooltip {Protect the fundamental frequency (do not damp the first harmonic)} xywh {365 285 45 15} down_box DOWN_BOX labelsize 10
  282.         code0 {o->value(respar->Pprotectthefundamental);}
  283.       }
  284.       Fl_Button {} {
  285.         label InterpP
  286.         callback {int type;
  287. if (Fl::event_button()==FL_LEFT_MOUSE) type=0;
  288.        else type=1;
  289. respar->interpolatepeaks(type);
  290. resonancewindow->redraw();
  291. redrawPADnoteApply();}
  292.         tooltip {Interpolate the peaks} xywh {365 265 46 15} box THIN_UP_BOX labelfont 1 labelsize 10
  293.       }
  294.       Fl_Dial centerfreq {
  295.         label {C.f.}
  296.         callback {respar->Pcenterfreq=(int)o->value();
  297. centerfreqvo->do_callback();
  298. rg->redraw();
  299. redrawPADnoteApply();}
  300.         xywh {245 265 30 30} box ROUND_UP_BOX labelsize 10 maximum 127 step 1
  301.         code0 {o->value(respar->Pcenterfreq);}
  302.         class WidgetPDial
  303.       }
  304.       Fl_Dial octavesfreq {
  305.         label {Oct.}
  306.         callback {respar->Poctavesfreq=(int)o->value();
  307. octavesfreqvo->do_callback();
  308. rg->redraw();
  309. redrawPADnoteApply();}
  310.         xywh {280 265 30 30} box ROUND_UP_BOX labelsize 11 maximum 127 step 1
  311.         code0 {o->value(respar->Poctavesfreq);}
  312.         class WidgetPDial
  313.       }
  314.       Fl_Button {} {
  315.         label C
  316.         callback {presetsui->copy(respar);}
  317.         xywh {625 275 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 12 labelcolor 7
  318.       }
  319.       Fl_Button {} {
  320.         label P
  321.         callback {presetsui->paste(respar,this);}
  322.         xywh {655 275 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 12 labelcolor 7
  323.       }
  324.     }
  325.   }
  326.   Function {ResonanceUI(Resonance *respar_)} {} {
  327.     code {respar=respar_;
  328. cbwidget=NULL;
  329. make_window();} {}
  330.   }
  331.   Function {~ResonanceUI()} {} {
  332.     code {resonancewindow->hide();} {}
  333.   }
  334.   Function {redrawPADnoteApply()} {} {
  335.     code {if (cbwidget!=NULL) cbwidget->do_callback();} {}
  336.   }
  337.   Function {setcbwidget(Fl_Widget *cbwidget)} {} {
  338.     code {this->cbwidget=cbwidget;
  339. rg->setcbwidget(cbwidget);} {}
  340.   }
  341.   Function {refresh()} {} {
  342.     code {redrawPADnoteApply();
  343.  
  344. enabled->value(respar->Penabled);
  345.  
  346. maxdb->value(respar->PmaxdB);
  347. maxdbvo->value(respar->PmaxdB);
  348.  
  349. centerfreqvo->value(respar->getcenterfreq()/1000.0);
  350. octavesfreqvo->value(respar->getoctavesfreq());
  351.  
  352. centerfreq->value(respar->Pcenterfreq);
  353. octavesfreq->value(respar->Poctavesfreq);
  354.  
  355. p1st->value(respar->Pprotectthefundamental);
  356.  
  357. rg->redraw();} {selected
  358.     }
  359.   }
  360.   decl {Resonance *respar;} {public
  361.   }
  362.   decl {ResonanceGraph *rg;} {}
  363.   decl {Fl_Widget *cbwidget;} {}
  364. } 
  365.